MOV R0,}#73H
MOV A,#88H
MOVX @R0,A
MOV R1,#20H
MOV R2,#32H
LOOP:
MOV R0,@72H
LOOP1:
MOW A, @R0
JB ACC.7,LOOP1
MOV R0,#70H
MOV A, @R1
MOVX @R0,A
INC R1
MOV R0,#73H
MOV A,#00H
MOVX @R0,A
MOV A, #01H
MOVX @R0,A
DJN R2,LOOP
RET