交通灯信号控制设计_(编辑修改稿)

交通灯信号控制设计_(编辑修改稿)内容摘要：

模块源程序 LIBRARY IEEE。 USE。 USE。 5 ENTITY time_25s IS PORT(SB, SM, CLK, EN25: IN STD_LOGIC。 DOUT25M, DOUT25B: OUT STD_LOGIC_VECTOR(7 DOWNTO 0))。 END ENTITY time_25s。 ARCHITECTURE ART OF time_25s IS SIGNAL CNT_5Bit: STD_LOGIC_VECTOR(4 DOWNTO 0)。 BEGIN PROCESS(SB, SM, CLK, EN25) IS BEGIN IF SB=39。 039。 OR SM=39。 039。 THEN CNT_5Bit=00000。 ELSIF(CLK39。 EVENT AND CLK= 39。 139。 )THEN IF EN25=39。 139。 THEN CNT_5Bit=CNT_5Bit+1。 ELSIF EN25=39。 039。 THEN CNT_5Bit=00000。 END IF。 END IF。 END PROCESS。 PROCESS(CNT_5Bit) IS BEGIN CASE CNT_5Bit IS WHEN 00000=DOUT25B=00100101。 DOUT25M=00110000。 BCD 数 25, 50 WHEN 00001=DOUT25B=00100100。 DOUT25M=00101001。 BCD 数 24, 49 WHEN 00010=DOUT25B=00100011。 DOUT25M=00101000。 BCD 数 23, 48 WHEN 00011=DOUT25B=00100010。 DOUT25M=00100111。 BCD 数 22, 48 WHEN 00100=DOUT25B=00100001。 DOUT25M=00100110。 BCD 数 21, 50 WHEN 00101=DOUT25B=00100000。 DOUT25M=00100101。 BCD 数 20, 49 WHEN 00110=DOUT25B=00011001。 DOUT25M=00100100。 BCD 数 19, 48 WHEN 00111=DOUT25B=00011000。 DOUT25M=00100011。 BCD 数 18, 48 WHEN 01000=DOUT25B=00010111。 DOUT25M=00100010。 BCD 数 17, 50 WHEN 01001=DOUT25B=00010110。 DOUT25M=00100001。 BCD 数 16, 49 WHEN 01010=DOUT25B=00010101。 DOUT25M=00100000。 BCD 数 15, 48 WHEN 01011=DOUT25B=00010100。 DOUT25M=00011001。 BCD 数 14, 48 WHEN 01100=DOUT25B=00010011。 DOUT25M=00011000。 BCD 数 13, 50 WHEN 01101=DOUT25B=00010010。 DOUT25M=00010111。 BCD 数 12, 49 WHEN 01110=DOUT25B=00010001。 DOUT25M=00010110。 BCD 数 11, 48 WHEN 01111=DOUT25B=00010000。 DOUT25M=00010101。 BCD 数 10, 48 WHEN 10000=DOUT25B=00001001。 DOUT25M=00010100。 BCD 数 9, 50 WHEN 10001=DOUT25B=00001000。 DOUT25M=00010011。 BCD 数 8, 49 6 WHEN 10010=DOUT25B=00000111。 DOUT25M=00010010。 BCD 数 7, 48 WHEN 10011=DOUT25B=00000110。 DOUT25M=00010001。 BCD 数 6, 48 WHEN 10100=DOUT25B=00000101。 DOUT25M=00010000。 BCD 数 5, 50 WHEN 10101=DOUT25B=00000100。 DOUT25M=00001001。 BCD 数 4, 49 WHEN 10110=DOUT25B=00000011。 DOUT25M=00001000。 BCD 数 3, 48 WHEN 10111=DOUT25B=00000010。 DOUT25M=00000111。 BCD 数 2, 07 WHEN 11000=DOUT25B=00000001。 DOUT25M=00000110。 BCD 数 1, 06 WHEN OTHERS =DOUT25B=00000000。 DOUT25M=00000000。 BCD 数 00, 00 END CASE。 END PROCESS。 END ARCHITECTURE ART。 （四）编写 5S 定时单元 CNT05S 模块的 VHDL程序，并对其进行编译和仿真，初步验证设计的正确性。 5s 定时模块源程序 LIBRARY IEEE。 USE。 USE。 ENTITY time_5s IS PORT(CLK, EN05M, EN05B: IN STD_LOGIC。 DOUT5: OUT STD_LOGIC_VECTOR(7 DOWNTO 0))。 END ENTITY time_5s。 ARCHITECTURE ART OF time_5s IS SIGNAL CNT_3Bit: STD_LOGIC_VECTOR(2 DOWNTO 0)。 BEGIN PROCESS(CLK, EN05M, EN05B) IS BEGIN IF(CLK39。 EVENT AND CLK= 39。 139。 )THEN IF EN05M=39。 139。 OR EN05B=39。 139。 THEN CNT_3Bit=CNT_3Bit+1。 ELSE CNT_3Bit=000。 END IF。 END IF。 END PROCESS。 PROCESS(CNT_3Bit) IS BEGIN CASE CNT_3Bit IS。