基于VerilogHDL的通行時(shí)間可變的交通燈控制器

1、百度文庫通行時(shí)間可變的交通燈控制器設(shè)計(jì)moduletr1(ng,clk,reset,resets,emergency,lighta,lightb,seg,select);inputng,clk,reset,emergency,resets;output6:0seg;顯示用的output3:0lighta,lightb;/a是主干道，b是支干道output3:0select;/選擇那一個(gè)管子進(jìn)行顯示regclk1,clk2;clk1要5HZclk2要幾千HZreg3:0select;regtim1,tim2;這是看你的等有沒有變過顏色的控制信號(hào)reg1:0cont;reg2:0state1,st

2、ate2,ste;兩個(gè)控制顏色變化狀態(tài)的信號(hào)。reg3:0lighta,lightb;/a是主干道，b是支干道reg3:0num;/譯碼器是根據(jù)這個(gè)東西來譯碼的reg35:0fout;reg6:0seg;顯示reg7:0numa,numb;reg7:0red1,red2,green1,green2,yellow1,yellow2,left1,left2;always(ng)if(!ng)begin設(shè)置計(jì)數(shù)初值green1<=8'b00110000;30Sred1<=8'b01010001;51S/yellow1<=8'b00000011;3s/left

3、1<=8'b00010101;/15S百度文庫green2<=8'b00110000;/30Sred2<=8'b01010001;/51Syellow2<=8'b00000011;/3Sleft2<=8'b00010101;/15Sendalways(posedgeclk)beginif(fout=36'b11)fout<=0;elsebeginfout<=fout+1;clk1=fout23;5HZclk2=fout13;幾千HZendendalways(posedgeclk1)beginif(rese

4、t)/復(fù)位與特殊情況控制這是主干道的復(fù)位beginlighta<=4'b1000;/lighta是主干道的交通燈，lightb是支干道的交通燈，1000是紅燈，0100是直行綠燈,0010是黃燈，0001是左轉(zhuǎn)綠燈numa<=red1;主干道的數(shù)碼管從紅燈開始記state1<=0;/這時(shí)候燈變化的控制信號(hào)為0end/elseif(emergency)/緊急情況百度文庫beginlighta<=4'b1000;/主干道紅了numa<=red1;/計(jì)時(shí)也從紅燈記end/elseif(ng)/這下開始正常工作了begin使能有效開始控制計(jì)數(shù)if(!tim

5、1)/你有沒有變過顏色?。繘]有？那開始變顏色吧。begin主干道交通燈點(diǎn)亮控制tim1<=1;主干道的燈的開關(guān)，行了，我變過了。case(state1)/state1是用來控制主干道亮燈的各個(gè)狀態(tài)的。/1000(8)是紅燈，0100(4)是直行綠燈，0010(2)是黃燈，0001(1)是左轉(zhuǎn)綠燈3'b000:beginnuma<=green1;lighta<=4;state1<=3'b001;end/直行綠3'b001:beginnuma<=yellow1;lighta<=2;state1<=3'b010;end/黃3&

6、#39;b010:beginnuma<=left1;lighta<=1;state1<=3'b011;end/左轉(zhuǎn)綠3'b011:beginnuma<=yellow1;lighta<=2;state1<=3'b100;end/黃3'b100:beginnuma<=red1;lighta<=8;state1<=3'b000;end/紅default:lighta<=8;/接二極管正極，負(fù)極接地endcaseend,/else/tm1=1,我變過顏色了，可以開始計(jì)數(shù)了。begin倒數(shù)計(jì)時(shí)if(num

7、a>0)if(numa3:0=0)/begin/numa3:0<=4'b1001;百度文庫numa7:4<=numa7:4-1;end/elsenuma3:0<=numa3:0-1;if(numa=1)tim1<=0;好了，差不多計(jì)完了，再讓我變一次吧。endendelse如果電路沒有啟動(dòng)beginlighta<=4'b0100;/默認(rèn)為直行綠燈numa=0;默認(rèn)計(jì)數(shù)為0tim1<=0;/默認(rèn)我沒有變過顏色endendalways(posedgeclk1)/下面就和主干道的一樣了beginif(reset)/復(fù)位與特殊情況控制begin

8、lightb<=4'b1000;numb<=red2;state2<=0;end、/elseif(emergency)/begin/lightb<=4'b1000;numb<=red2;百度文庫endelseif(ng)beginif(!tim2)begintim2<=1;state2<=1;endstate2<=2;endstate2<=3;endstate2<=4;endstate2<=0;endcase(state2)0:beginnumb<=red2;lightb<=8;1:beginnumb

9、<=green2;lightb<=4;2:beginnumb<=yellow2;lightb<=2;3:beginnumb<=left2;lightb<=1;4:beginnumb<=yellow2;lightb<=2;default:lightb<=8;endcaseendelsebegin倒數(shù)計(jì)時(shí)if(numb>0)if(numb3:0=0)beginnumb3:0<=4'b1001;numb7:4<=numb7:4-1;endelsenumb3:0<=numb3:0-1;if(numb=1)tim2&l

10、t;=0;end百度文庫endelsebegin/tim2<=0;state2<=0;lightb<=4'b0100;endendalways(posedgeclk2)begin/數(shù)碼管掃描if(resets)begincont=0;select=4'b1111;endelsebegincase(cont)2'b00:beginnum<=numa3:0;select<=4'b1101;cont<=cont+1;end2'b01:beginnum<=numa7:4;select<=4'b1011;co

11、nt<=cont+1;end2'b10:beginnum<=numb3:0;select<=4'b0111;cont<=cont+1;end2'b11:beginnum<=numb7:4;select<=4'b1110;cont<=cont+1;endendcase百度文庫endendalways(posedgeclk2)begin/數(shù)碼管譯碼顯示case(num)4'b0000:seg<=7'b0111111;/04'b0001:seg<=7'b0000110;/14'b0010:seg<=7'b1011011;/24'b0011:seg<=7'b1001111;/34'b0100:seg<=7'b1100110;/44'b0101:seg<=7'b1101101;/54'b0110:seg<