return:
;push acc 
;movc a, @a+dptr
;pop acc
inc a
sjmp return 

return:
;push acc 
;movc a, @a+dptr
;pop acc
inc dptr
sjmp return