用1000H开始六个单元 给片内70H赋值

我想要通过这六个值点亮数码管，用片内数据都没错，一用片外就不对，数码管错误显示并且亮度很低 下面是给70H赋值的源码
MOV DPTR,#1000H
MOV A,#2
MOVX @DPTR,A
MOV DPTR,#1001H
MOV A,#1
MOVX @DPTR,A
MOV DPTR,#1002H
MOV A,#6
MOVX @DPTR,A
MOV DPTR,#1003H
MOV A,#7
MOVX @DPTR,A
MOV DPTR,#1004H
MOV A,#9
MOVX @DPTR,A
MOV DPTR,#1005H
MOV A,#8
MOVX @DPTR,A
MOV R1,#70H
MOV R5,#6
MOV DPTR,#1000H
LOOP1:
MOVX A,@DPTR
MOV @R1,A
INC DPTR
INC R1
DJNZ R5,LOOP1