SBCDA: MOV R0,#20H SBCDADD: CLR C MOV A,@R0 INC R0 ADD A,@R0 DA A INC R0 MOV @R0,A RLC A ANL A,#01H INC R0 MOV @R0,A RET