程序如下
ORG 0030H
MAIN:
MOV DPTR,#0DFFFH
MOV R7,#7FH
MOV A,R7
L:
RR A
MOVX @DPTR,A
LCALL DELAY
CJNE A,#0FEH,L
MOV DPTR,#0BFFFH
LL:
RR A
MOVX @DPTR,A
LCALL DELAY
CJNE A,#0FEH,LL
MOV DPTR,#0DFFFH
SJMP L
DELAY:
MOV R0,#200
DDD: MOV R1,#200
DJNZ R1,$
DJNZ R0,DDD
RET
END |