8个LED灯闪烁程序单片机

ORG 0000H
START:MOV R1,#0AH
D0: MOV A,#01H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D0
MOV R1,#0AH
D1: MOV A,#02H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D1
MOV R1,#0AH
D2: MOV A,#04H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D2
MOV R1,#0AH
D3: MOV A,#08H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D3
MOV R1,#0AH
D4: MOV A,#10H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D4
MOV R1,#0AH
D5: MOV A,#20H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D5
MOV R1,#0AH
D6: MOV A,#40H
MOV P1,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D6
MOV R1,#0AH
D7: MOV A,#80H
MOV P2,A
ACALL DELAY
CLR A
MOV P2,A
ACALL DELAY
DJNZ R1,D7
LJMP START
DELAY:MOV R5,#8
L1: MOV R4,#249
L2: MOV R3,#250
L3: DJNZ R3,L3
DJNZ R4,L2
DJNZ R5,L1
RET
END