CLR A
MOV R7,A
MOV R6,A
MOV R5,A
LOOP1:
MOV A,#20H
ADD A,R5
MOV R0,A
MOV A,@R0
ADD A,R7
MOV R7,A
CLR A
ADDC A,R6
MOV R6,A
INC R5
CJNE R5,#010H,LOOP1
MOV A,R6
SWAP A
MOV R0,A
ANL A,#0F0H
XCH A,R0
MOV A,R7
SWAP A
ANL A,#0FH
ORL A,R0
MOV 30H,A
SJMP $
END