XH1 DATA 100H ;定义循环单元地址
XH2 DATA 105H
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN: MOV P0, #11111110B ;初始化
MOV P2, #11111110B
MOV P1, #11110111B
MOV P3, #11110111B
ACALL DEL30S ；黄灯闪耀
CPL P0.0
CPL P2.0
CPL P0.6
CPL P2.6
ACALL DEL05S
MOV XH1, #10
YELL0: CPL P0.6
CPL P2.6
ACALL DEL05S
DJNZ XH1, YELL0 ；闪耀11次
MOV P0, #11110111B ；换向
MOV P2, #11110111B
MOV P1, #11111110B
MOV P3, #11111110B
ACALL DEL30S
CPL P1.0 ；黄灯闪耀
CPL P3.0
CPL P1.6
CPL P3.6
ACALL DEL05S
MOV XH2, #10
YELL1: CPL P1.6
CPL P3.6
ACALL DEL05S
DJNZ XH2, YELL1 ；闪耀11次
AJMP MAIN
;延时0.5S子程序
DEL05S: MOV R5, #04H
DEL1: MOV R6, #0F0H
DEL2: MOV R7, #0F0H
DJNZ R7, $
DJNZ R6, DEL2
DJNZ R5, DEL1
RET
;延时30S子程序
DEL30S: MOV R4, #0FH
D1: MOV R5, #10H
D2: MOV R6, #0F0H
D3: MOV R7, #0F0H
DJNZ R7, $
DJNZ R6, D3
DJNZ R5, D2
DJNZ R4, D1
RET
END
本文关键字：交通灯 自动控制-单片机，电子制作 - 自动控制-单片机
