用单片机控制交通灯源程序代码及流程图

用单片机控制交通灯
传统的交通灯控制电路一般由数字电路构成，电路复杂、体积大、成本高。

采用单片机控制交通灯不但可以解决上述问题，而且还具有时间显示功能，非常方便。

下面介绍一种用单片机控制交通灯的方法。

一、硬件硬件电路如附图。

ＡＴ８９Ｃ２０５１的Ｐ１．７～Ｐ１．５和Ｐ１．３～Ｐ１．１直接驱动红、黄、绿灯，利用单片机的串口和二片７４ＬＳ１６４串／并转换移位寄存器实现时间显示，七段数码管为共阴管，硬件电路极为简单。

二、软件交通灯有红、黄、绿三种。

红灯亮，停止通行；绿灯亮，允许通行；黄灯亮，作过渡。

红灯亮６０秒，绿灯亮５５秒，黄灯亮５秒。

每组灯的亮暗状态以２分钟为周期循环，故程序采用主、子程序方式，循环结构。

另外，为了简化电路，红、黄、绿灯采用低电平点亮。

源程序清单如下：
ＯＲＧ００００Ｈ
ＳＴＡＲＴ：ＭＯＶＤＲＴＲ，＃ＴＡＢ
ＭＯＶＳＣＯＮ，＃００Ｈ
ＭＯＶＰ１，＃６ＣＨ；点亮红、绿灯
ＭＯＶＲ０，＃０；Ｒ０清零
ＬＥＦＴ：ＩＮＣＲ０
ＣＪＮＥＲ０，＃５５，ＬＰ０；Ｒ０＜５５，转ＬＰ０
ＭＯＶＰ１，＃６ＡＨ；Ｒ０＝５５，点亮红、黄灯
ＬＪＭＰＬＰ１
ＬＰ０：ＣＪＮＥＲ０，＃６０，ＬＰ１；Ｒ０＜６０，转ＬＰ１
ＭＯＶＰ１，＃０Ｃ６Ｈ；Ｒ０＝６０，点亮绿、红灯
ＬＪＭＰＲＩＧＨＴ
ＬＰ１：ＬＣＡＬＬＤＢＤＢ
ＬＣＡＬＬＤＩＳＰ
ＬＪＭＰＬＥＦＴ；２０Ｈ为１，转ＬＥＦＴ
ＲＩＧＨＴ：ＤＥＣＲ０
ＣＪＮＥＲ０，＃５，ＬＰ２；Ｒ０＞０，转ＬＰ２
ＭＯＶＰ１，＃０Ａ６Ｈ；Ｒ０＝５，点亮黄、红灯
ＬＪＭＰＬＰ３
ＬＰ２：ＣＪＮＥＲ０，＃０，ＬＰ３
ＭＯＶＰ１，＃６ＣＨ；Ｒ０＝０，点亮红、绿灯
ＬＪＭＰＬＥＦＴ
ＬＰ３：ＬＣＡＬＬＤＢＤＢ
ＬＣＡＬＬＤＩＳＰ
ＬＪＭＰＲＩＧＨＴ
ＤＢＤＢ：ＭＯＶＡ，Ｒ０
ＭＯＶＢ，＃１０
ＤＩＶＡＢ
ＭＯＶＲ１，Ａ
ＭＯＶＲ２，Ｂ
ＲＥＴ
ＤＩＳＰ：ＭＯＶＡ，Ｒ２
ＭＯＶＣＡ，＠Ａ＋ＤＰＴＲ
ＭＯＶＳＢＵＦ，Ａ
ＪＮＢＴＩ，$；查ＴＩ位
ＣＬＲＴＩ
ＭＯＶＡ，Ｒ１
ＭＯＶＣＡ，＠Ａ＋ＤＰＴＲ
ＭＯＶＳＢＵＦ，Ａ
ＪＮＢＴ１，$
ＣＬＲＴＩ
ＬＣＡＬＬＤＥＡＬＹ
ＲＥＴ
ＤＥＬＡＹ：ＭＯＶＲ３，＃０９Ｈ
Ｋ１：ＭＯＶＲ４，＃１００
Ｋ２：ＭＯＶＲ５，＃２５０
Ｋ３：ＤＪＮＺＲ５，Ｋ３
ＤＪＮＺＲ４，Ｋ２
ＫＪＮＺＲ３，Ｋ１
ＲＥＴ
ＴＡＢ：ＤＢ３ＦＨ，０６Ｈ，５ＢＨ
ＤＢ４ＦＨ，６６Ｈ
ＤＢ６ＤＨ，７ＤＨ，０７Ｈ
ＤＢ７ＦＨ，６ＦＨ
三.实验电路及连线
四.实验说明
1.因为本实验是交通灯控制实验，所以要先了解实际交通灯的变化规律。

假设一个十字路口为东西南北走向。

初始状态0为东西红灯，南北红灯。

然后转状态1南北绿灯通车，东西红灯。

过一段时间转状态2，南北绿灯闪几次转亮黄灯，延时几秒，东西仍然红灯。

再转状态3，东西绿灯通车，南北红灯。

过一段时间转
状态4，东西绿灯闪几次转亮黄灯，延时几秒，南北仍然红灯。

最后循环至状态1。

2.双色LED是由一个红色LED管芯和一个绿色LED管芯封装在一起，公用负端。

当红色正端加高电平，绿色正端加低电平时，红灯亮；红色正端加低电平，绿色正端加高电平时，绿灯亮；两端都加高电平时，黄灯亮。

五.实验程序框图
程序框图：
源代码：
ORG 0000H
LJMP START
ORG 0040H
START:
MOV SP,#60H
LCALL STATUS0 ;初始状态(都是红灯) CIRCLE: LCALL STATUS1 ;南北绿灯,东西红灯
LCALL STATUS2 ;南北绿灯闪转黄灯,东西红灯
LCALL STATUS3 ;南北红灯,东西绿灯
LCALL STATUS4 ;南北红灯,东西绿灯闪转黄灯
LJMP CIRCLE
STATUS0: ;南北红灯,东西红灯
MOV DPTR,#8300H
MOV A,#0FH
MOVX @DPTR,A
MOV R2,#10 ;延时1秒
LCALL DELAY
RET
STATUS1: ;南北绿灯,东西红灯
MOV DPTR,#08300H
MOV A,#5AH ;南北绿灯,东西红灯
MOVX @DPTR,A
MOV R2,#50 ;延时5秒
LCALL DELAY
RET
STATUS2: ;南北绿灯闪转黄灯,东西红灯
MOV DPTR,#8300H
MOV R3,#03H ;绿灯闪3次FLASH: MOV A,#5FH
MOVX @DPTR,A
MOV R2,#03H
LCALL DELAY
MOV A,#5AH
MOVX @DPTR,A
MOV R2,#03H
LCALL DELAY
DJNZ R3,FLASH
MOV A,#0AH ;南北黄灯,东西红灯
MOVX @DPTR,A
MOV R2,#10 ;延时1秒
LCALL DELAY
RET
STATUS3: ;南北红灯,东西绿灯
MOV DPTR,#8300H
MOV A,#0A5H
MOVX @DPTR,A
MOV R2,#50 ;延时5秒
LCALL DELAY
RET
STATUS4: ;南北红灯,东西绿灯闪转黄灯
MOV DPTR,#8300H
MOV R3,#03H ;绿灯闪3次FLASH1: MOV A,#0AFH
MOVX @DPTR,A
MOV R2,#03H
LCALL DELAY
MOV A,#0A5H
MOVX @DPTR,A
MOV R2,#03H
LCALL DELAY
DJNZ R3,FLASH1
MOV A,#05H ;南北红灯,东西黄灯
MOVX @DPTR,A
MOV R2,#10 ;延时1秒
LCALL DELAY
NOP
RET
DELAY: ;延时子程序 PUSH 2
PUSH 1
PUSH 0
DELAY1: MOV 1,#00H
DELAY2: MOV 0,#0B2H
DJNZ 0,$
DJNZ 1,DELAY2 ;延时 100 mS
DJNZ 2,DELAY1
POP 0
POP 1
POP 2
RET
END
交通灯的程序及流程图
电路说明: 由六个LED(两组红、绿、黄)控制东西向和南北向车流，两位数码管显示本状态剩余时间（秒），具体灯亮的的方式如下：
流程图
程序如下:
ORG 0000H
AJMP MAIN
MAIN: MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0EEH ;LED显示红红
LCALL DEL
CLR P3.0
MOV 7EH,#04H ;把41S 3S送入显示缓冲区
MOV 7DH,#01H
MOV 7AH,#00H
MOV 79H,#03H
LCALL DISP
MOV R6,#03H
MOV R4,#29H
AA1: MOV R5,#50H
AA2: LCALL DISP
MOV R0,#7AH
LCALL DAAD1 ;南北数码显示各减1
MOV R0,#7EH
LCALL DAAD1
DJNZ R6,AA1 ;3S时间是否到
LCALL DEL
MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0BEH ;LED显示红绿
CLR P3.0
MOV 7EH,#03H ;把38S 30S 分别送入显示缓冲区
MOV 7DH,#08H
MOV 7AH,#03H
MOV 79H,#00H
LCALL DISP
MOV R6,#1EH
MOV R4,#26H
BB1: MOV R5,#50H
BB2: LCALL DISP
DJNZ R5,BB2
MOV R0,#7AH ;显示减1
LCALL DAAD1
MOV R0,#7EH
LCALL DAAD1
DJNZ R6,BB1 ;30S是否到
MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0DEH ;LED显示红黄
LCALL DEL
CLR P3.0
MOV 7EH,#00H ;把8S 5S分别送入显示缓冲区
MOV 7DH,#08H
MOV 7AH,#00H
MOV 79H,#05H
LCALL DISP
MOV R6,#05H
MOV R4,#08H
CC1: MOV R5,#50H
CC2: LCALL DISP
DJNZ R5,CC2
MOV R0,#7AH
MOV R0,#7EH
LCALL DAAD1
DJNZ R6,CC1 ;5S是否到
MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0EEH ;LED显示红红
LCALL DEL
CLR P3.0
MOV 7EH,#00H
MOV 7DH,#03H
MOV 7AH,#04H
MOV 79H,#01H
LCALL DISP
MOV R6,#29H
MOV R4,#03H
DD1: MOV R5,#50H
DD2: LCALL DISP
DJNZ R5,DD2
MOV R0,#7AH
LCALL DAAD1
MOV R0,#7EH
LCALL DAAD1
DJNZ R4,DD1 ;3S是否到
MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0EBH ;LED显示绿红
LCALL DEL
CLR P3.0
MOV 7EH,#03H
MOV 7DH,#00H
MOV 7AH,#03H
MOV 79H,#08H
LCALL DISP
MOV R6,#26H
MOV R4,#1EH
EE1: MOV R5,#50H
EE2: LCALL DISP
DJNZ R5,EE2
MOV R0,#7AH
LCALL DAAD1
MOV R0,#7EH
DJNZ R4,EE1 ;30S是否到
MOV P2,#00H
SETB P3.0
CLR P2.7
MOV P0,#0EDH ;LED显示黄红
LCALL DEL
CLR P3.0
MOV 7EH,#00H
MOV 7DH,#05H
MOV 7AH,#00H
MOV 79H,#08H
LCALL DISP
MOV R6,#08H
MOV R4,#05H
FF1: MOV R5,#50H
FF2: LCALL DISP
DJNZ R5,FF2
MOV R0,#7AH
LCALL DAAD1
MOV R0,#7EH
LCALL DAAD1
DJNZ R4,FF1 ;5S是否到
LJMP MAIN ;返回主程序显示红红
;*************************************************
;显示子程序显示缓冲区地址:79H,7AH,7BH,7CH,7DH,7EH
;*************************************************
DISP: PUSH DPH
PUSH DPL
PUSH ACC
PUSH PSW
SETB RS1 ;改变当前寄存器组为组2
CLR RS0
MOV R1, #79H ;显示缓冲存储单元首地址
MOV R2, #01H ;从右至左显示
DISP1: MOV A, @R1
MOV DPTR, #TAB
MOVC A, @A+DPTR
MOV P0, A ;送段控
MOV P2, R2 ;送位控
ACALL DL ;延时2毫秒
MOV A, R2
JB ACC.5, DISP2
RL A
INC R1
MOV R2, A
AJMP DISP1
DISP2: POP PSW ;恢复当前寄存器组的组号POP ACC
POP DPL
POP DPH
RET
;**********************************
;减1子程序
;***********************************
DAAD1: MOV A,@R0
DEC R0
SW AP A
ORL A,@R0
ADD A,#99H
DA A
MOV R2,A
ANL A,#0FH
MOV @R0, A
MOV A,R2
INC R0
ANL A,#0F0H
SW AP A
MOV @R0,A
RET
;**************************************
;延时1MS子程序（晶振为6MHZ）
;**************************************
DEL: MOV R2,#01H
TIME0: MOV R3,#0FFH
TIME1: DJNZ R3,TIME1
DJNZ R2,TIME0
RET
;延时2毫秒子程序
DL: PUSH PSW
SETB RS1
SETB RS0
MOV R7, #02H
DL1: MOV R6, #0FFH
DL2: DJNZ R6, DL2
DJNZ R7, DL1
POP PSW
RET
;***************************************************
;显示字符段选码表(共阳极代码)
;*****************************************************
TAB: DB 03H,9FH,25H,0DH,99H,49H,41H,1FH,01H ;0-8
DB 09H,0FH,83H,0C6H,0A1H,86H,8EH,0FFH,030H ;9-F ,灭,p.。