;
MOV B,#0
MOV DPTR,#1000H
MOV R2,#100
LOP:
MOVX A,@DPTR
CJNE A,B,$ + 3
JC NEXT
MOV B,A
NEXT:
INC DPTR
DJNZ R2,LOP
MOV DPTR,#1100H
MOV A,B
MOV @DPTR,A
SJMP $