ORG 0000H
AJMP MAIN
ORG 0050H
MAIN:CLR P1.0
LOOP1:JNB P1.0, LOOP1
LOOP:CLR P0.0
SETB P0.1
ACALL DELAY
CLR P0.1
SETB P0.0
ACALL DELAY
SETB P0.1
SETB P0.0
AJMP MAIN
DELAY:MOV R0, #200
L1:MOV R1, #124
L2:NOP
DJNZ R1,L2
DJNZ R0,L1
RET
END
AJMP MAIN
ORG 0050H
MAIN:CLR P1.0
LOOP1:JNB P1.0, LOOP1
LOOP:CLR P0.0
SETB P0.1
ACALL DELAY
CLR P0.1
SETB P0.0
ACALL DELAY
SETB P0.1
SETB P0.0
AJMP MAIN
DELAY:MOV R0, #200
L1:MOV R1, #124
L2:NOP
DJNZ R1,L2
DJNZ R0,L1
RET
END