I copied the same program twice-my apologies. Here is the working program:
.ORG 2020H
MOV R7,#16
MOV 50H,#00H
MOV 51H,#50H
MOV 52H,#20H
MOV 53H,#00H
MOV 54H,#10H
GET:MOV DPH,50H
MOV DPL,51H
CLR A
MOVC A,@A+DPTR
MOV DPH,52H
MOV DPL,53H
DEST:MOVX @DPTR,A
ADD A,#30H
MOV DPL,54H
MOVX @DPTR,A
INC 51H
INC 53H
INC 54H
DJNZ R7,GET
LJMP 0000
;END