试验：交通灯设计一、设计任务及规定：设计任务：模拟十字路口交通信号灯的工作过程，运用试验板上的两组红、黄、绿LED作为交通信号灯，设计一种交通信号灯控制器。规定：（1）交通灯从绿变红时，有4秒黄灯亮的间隔时间；（2）交通灯红变绿是直接进行的，没有间隔时间；（3）主干道上的绿灯时间为40秒，支干道的绿灯时间为20秒；（4）在任意时间，显示每个状态到该状态结束所需的时间。支干道主干道图1路口交通管理示意图ABC主干道交通灯绿（25秒）黄（5秒）红（30秒）支干道交通灯红（30秒）黄（5秒）绿（25秒）表1交通信号灯的4种状态设计规定：（1）采用VHDL语言编写程序，并在QuartusII工具平台中进行仿真，下载到EDA试验箱进行验证。（2）编写设计汇报，规定包括方案选择、程序清单、调试过程及测试成果。二、设计原理1、设计目的：学习DEA开发软件和QuartusII的使用措施，熟悉可编程逻辑器件的使用。通过制作来理解交通灯控制系统，交通灯控制系统重要是实现都市十字交叉路口红绿灯的控制2、设计阐明（1）第一模块：clk时钟秒脉冲发生电路在红绿灯交通信号系统中，大多数状况是通过自动控制的方式指挥交通的。因此为了防止意外事件的发生，电路必须给一种稳定的时钟（clock）才能让系统正常运作。模块阐明：系统输入信号：Clk:由外接信号发生器提供256的时钟信号；系统输出信号：full：产生每秒一种脉冲的信号；（2）第二模块：计数秒数选择电路计数电路最重要的功能就是记数负责显示倒数的计数值，对下一种模块提供状态转换信号。模块阐明：系统输入：full:接受由clk电路的提供的1HZ的时钟脉冲信号；系统输出信号：tm：产生显示电路状态转换信号tl：倒计数值秒数个位变化控制信号th：倒计数值秒数十位变化控制信号（3）第三模块：红绿灯状态转换电路本电路负责红绿灯的转换。模块阐明：系统输入信号：full:接受由clk电路的提供的1hz的时钟脉冲信号；tm:接受计数秒数选择电路状态转换信号；系统输出信号：comb_out:负责红绿灯的状态显示。（4）第四模块：时间显示电路本电路负责红绿灯的计数时间的显示。模块阐明：系统输入信号：tl：倒计数值秒数个位变化控制信号；th：倒计数值秒数十位变化控制信号；系统输出信号：led7s1:负责红绿灯的显示秒数个位。led7s2：负责红绿灯的显示秒数十位。三、设计方案时间显示数据输出红黄绿灯信号输出图2交通信号灯控制器的原理框图采用VHDL语言输入的方式实现交通信号灯控制器状态发生器（两位二进制计数器）定期时间到检测电路预置数产生电路计时器1秒时钟脉冲信号发生器红黄绿灯输出控制电路（RYG）CLK时间显示数据输出信号灯输出图3交通信号灯控制器程序原理框图该程序由7个进程构成，进程P1和P2将CLK信号分频后产生1秒信号，进程P3、P4、P5构成两个带有预置数功能的十进制计数器，其中P4产生容许十位计数器计数的控制信号。进程P6实现实状况态转换和产生状态转换的控制信号，进程P7产生次态信号和信号灯输出信号，以及每一种状态的时间值。四、程序清单：LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYtrafficISPORT(clk:instd_logic;led7s1:outstd_logic_vector(6downto0);led7s2:outstd_logic_vector(6downto0);comb_out:outstd_logic_vector(5downto0));END;ARCHITECTUREoneOFtrafficISTYPEdmIS(s0,s1,s2,s3);SIgnalcurrent_state,next_state:dm;SIGNALFULL:STD_LOGIC;SIGNALtl:STD_LOGIC_VECTOR(6DOWNTO0);SIGNALth:STD_LOGIC_VECTOR(1DOWNTO0);SIGNALtm:STD_LOGIC_VECTOR(6DOWNTO0);SIGNALTIME:STD_LOGIC_VECTOR(6DOWNTO0);BEGINP_REG:PROCESS(CLK)VARIABLECNT8:STD_LOGIC_VECTOR(7DOWNTO0);BEGINIFCLK'EVENTANDCLK='1'THENIFCNT8="11111111"THENCNT8:="01111111";FULL<='1';ELSECNT8:=CNT8+1;秒脉冲信号发生器（进程P1和P2）计数器（进程P3、P4和P5）状态寄存器（进程P6）次态发生器信号灯输出信号（进程P7）FULL<='0';ENDIF;ENDIF;ENDPROCESSP_REG;PROCESS(full)BEGINIFfull'EVENTANDfull='1'THENIFTIME<"1000011"THENTIME<=TIME+1;ELSeTIME<="0000000";ENDIF;ENDIF;ENDPROCESS;REG:process(...
