EBCLR2: MOV A,ADDPL MOV DPL,A MOV A,ADDPH MOV DPH,A MOV A,R7 JZ EBC21 INC R6 EBC21: CLR A MOVX @DPTR,A INC DPTR DJNZ R7,EBC21 DJNZ R6,EBC21 EBMOV2: MOV A,ADDPL ADD A,R7 MOV DPL,A MOV A,R6 ADDC A,ADDPH MOV DPH,A MOV A,R7 ADD A,R1 XCH A,R0 ADDC A,R6 MOV P2,A MOV A,R7 JZ EBM21 INC R6 EBM21: DEC R0 CJNE R0,#0FFH,EBM22 DEC P2 EBM22: DEC DPL MOV A,DPL CJNE A,#0FFH,EBM23 DEC DPH EBM23: MOVX A,@R0 MOVX @DPTR,A DJNZ R7,EBM21 DJNZ R6,EBM21 RET