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