ORG 0000H
LJMP MAIN																																																																																																				
ORG 0080H																																																																																																																																																																																																																																																																																																																																																																																																																																																																								
DELAY:
PUSH 02H
PUSH 03H
DELAY_00:
MOV R2,#100
DELAY_10:
MOV R3,#50
DELAY_20:
DJNZ R3,DELAY_20
DJNZ R2,DELAY_10
DJNZ R7,DELAY_00
POP 03H
POP 02H
RET
MAIN:
MOV P1,#0FEH
LOOP:
MOV R7,#10
LCALL DELAY
MOV A,P1
RL A
MOV P1,A
SJMP LOOP
END