ORG 0000H
MOV P0, #01111011B ;P0.7=P0.2=0, 東西 南北 都是紅燈.
LCALL DL3S
LOOP:
MOV P0, #11011011B ;P0.5=P0.2=0, 南北綠 東西紅.
LCALL DL15S
MOV P0, #10111011B ;P0.6=P0.2=0, 南北黃 東西紅.
LCALL DL3S
MOV P0, #01111110B ;P0.7=P0.0=0, 南北紅 東西綠.
LCALL DL15S
MOV P0, #01111101B ;P0.7=P0.1=0, 南北紅 東西黃.
LCALL DL3S
SJMP LOOP
DL15S:
MOV R2, #5
DL2:
CALL DL3S
DJNZ R2, DL2
RET
DL3S: ;延時3s,實測3.03s
MOV R5, #23
DL3:
MOV R6, #0
DL4:
MOV R7, #0
DL5:
DJNZ R7, DL5
DJNZ R6, DL4
DJNZ R5, DL3
RET
END