Verilog交通燈控制器程序 首頁 EDA技術嵌入式系統電子制作PCB技術綜合技術電路圖源碼資料 會員共享 欄目導航: FPGA/CPLD Verilog 
VHDL ModelSim Proteus 當前位置：首頁 > EDA技術 > Verilog交通燈控制器程序 
 
Verilog交通燈控制器程序 
  字體大小: 小 中 大 作者：     來源：     日期：2007-05-25     點擊：876 
交通燈控制器
/* 信號定義與說明：
CLK： 為同步時鐘；
EN： 使能信號，為1 的話，則控制器開始工作；
LAMPA： 控制A 方向四盞燈的亮滅；其中，LAMPA0~LAMPA3，分別控制A 方向的
左拐燈、綠燈、黃燈和紅燈；
LAMPB： 控制B 方向四盞燈的亮滅；其中，LAMPB0 ~ LAMPB3，分別控制B 方向的
左拐燈、綠燈、黃燈和紅燈；
ACOUNT： 用于A 方向燈的時間顯示，8 位，可驅動兩個數碼管；
BCOUNT： 用于B 方向燈的時間顯示，8 位，可驅動兩個數碼管。 */
module traffic(CLK,EN,LAMPA,LAMPB,ACOUNT,BCOUNT);
output[7:0] ACOUNT,BCOUNT;
output[3:0] LAMPA,LAMPB;
input CLK,EN;
reg[7:0] numa,numb;
reg tempa,tempb;
reg[2:0] counta,countb;
reg[7:0] ared,ayellow,agreen,aleft,bred,byellow,bgreen,bleft;
reg[3:0] LAMPA,LAMPB;
always @(EN)
if(!EN)
begin //設置各種燈的計數器的預置數
ared <=8'd55; //55 秒
ayellow <=8'd5; //5 秒
agreen <=8'd40; //40 秒
aleft <=8'd15; //15 秒
bred <=8'd65; //65 秒
byellow <=8'd5; //5 秒
bleft <=8'd15; //15 秒
bgreen <=8'd30; //30 秒
end
assign ACOUNT=numa;
assign BCOUNT=numb;
always @(posedge CLK) //該進程控制A 方向的四種燈
begin
if(EN)
begin
if(!tempa)
begin
tempa<=1;
case(counta) //控制亮燈的順序
0: begin numa<=agreen; LAMPA<=2; counta<=1; end
1: begin numa<=ayellow; LAMPA<=4; counta<=2; end
2: begin numa<=aleft; LAMPA<=1; counta<=3; end
3: begin numa<=ayellow; LAMPA<=4; counta<=4; end
4: begin numa<=ared; LAMPA<=8; counta<=0; end
default: LAMPA<=8;
endcase
end
else begin //倒計時
if(numa>1)
if(numa[3:0]==0) begin
numa[3:0]<=4'b1001;
numa[7:4]<=numa[7:4]-1;
end
else numa[3:0]<=numa[3:0]-1;
if (numa==2) tempa<=0;
end
end
else begin
LAMPA<=4'b1000;
counta<=0; tempa<=0;
end
end
always @(posedge CLK) //該進程控制B 方向的四種燈
begin
if (EN)
begin
if(!tempb)
begin
tempb<=1;
case (countb) //控制亮燈的順序
0: begin numb<=bred; LAMPB<=8; countb<=1; end
1: begin numb<=bgreen; LAMPB<=2; countb<=2; end
2: begin numb<=byellow; LAMPB<=4; countb<=3; end
3: begin numb<=bleft; LAMPB<=1; countb<=4; end
4: begin numb<=byellow; LAMPB<=4; countb<=0; end
default: LAMPB<=8;
endcase
end
else
begin //倒計時
if(numb>1)
if(!numb[3:0]) begin
numb[3:0]<=9;
numb[7:4]<=numb[7:4]-1;
end
else numb[3:0]<=numb[3:0]-1;
if(numb==2) tempb<=0;
end
end
else begin
LAMPB<=4'b1000;
tempb<=0; countb<=0;
end
end
endmodule