上傳 電梯設(shè)計

1、題目： 電梯控制 第一章 設(shè)計說明一，設(shè)計思路本設(shè)計為電梯控制，具有樓層顯示功能和箭頭顯示功能。用一個數(shù)碼管顯示樓層，樓層顯示1-7，電梯自動從1層上升到7層，再從7層下降到1層。在點陣電路上顯示上下箭頭，電梯上升時顯示向上箭頭，電梯下降時顯示下降箭頭。本設(shè)計用clk和clk1作為輸入量，輸入兩種頻率不同的時鐘信號。line，row，t，q作為輸出量；i，flag，c作為中間變量。i指示樓層，flag作為標(biāo)志量，clk輸入時鐘信號，每個上升沿到來時，i值變化1，當(dāng)flag為0時，i執(zhí)行加1，當(dāng)flag為1時，i執(zhí)行減1；當(dāng)i為3b111時，置flag為1，當(dāng)i變回3b001時，置flag為0。

2、同時，clk1輸入比clk頻率更高的時鐘信號，控制8*8點陣顯示模塊的逐行掃描頻率；每當(dāng)clk1上升沿到來時，掃描一行。row代表行，line代表列，以中間變量c的case語句分別控制上升箭頭和下降箭頭的圖形，當(dāng)flag為0時執(zhí)行上升箭頭顯示段，當(dāng)flag為1時執(zhí)行下降箭頭顯示段。用一個動態(tài)數(shù)碼管顯示樓層，中間變量q用于數(shù)碼管位選，此設(shè)計中賦值q=3b000。用以i為敏感信號的always塊語句控制譯碼器工作，t為數(shù)碼管輸出，以i的case語句為t賦值。上升箭頭，下降箭頭點陣樣式如下圖所示： 二，模塊介紹本設(shè)計程序為單模塊Verilog HDL程序，模塊定義如下：module lift(clk

3、,clk1,line,row,t,q);input clk,clk1;output line,row,T,q;reg2:0 i;reg7:0 line;reg7:0 row;reg6:0 t;reg2:0 q;integer flag;integer c;模塊功能由三個并行的always塊語句實現(xiàn)，第一句為always (posedge clk)，用來執(zhí)行i由3b001到3'b111再回到3'b001的循環(huán)。第二句為always (posedge clk1)，用來執(zhí)行上升箭頭和下降箭頭的交替顯示。第三句為always (i)，用來執(zhí)行譯碼器功能，將3位二進制數(shù)i轉(zhuǎn)換為7位顯示譯

4、碼。三，真值表第二章 Verilog HDL設(shè)計源程序設(shè)計程序如下：module lift(clk,clk1,line,row,t,q);/模塊聲明input clk,clk1;output line,row,t,q;reg2:0 i;reg7:0 line;reg7:0 row;reg6:0 t;reg2:0 q;integer flag;integer c;always (posedge clk)begin /i循環(huán)變化if(flag=0) begin i=i+1; if(i=3'b111) flag=1; endelse if(flag=1) begin i=i-1; if(i=

5、3'b001) flag=0; endendalways (posedge clk1)if(flag=1) /上升箭頭點陣顯示beginif (c>7) begin c<=0;end else begin case(c) 0: begin line<=8'b00010000;row<=8'b01111111;end 1: begin line<=8'b00111000;row<=8'b10111111;end 2: begin line<=8'b01010100;row<=8'b110111

6、11;end 3: begin line<=8'b10010010;row<=8'b11101111;end 4: begin line<=8'b00010000;row<=8'b11110111;end 5: begin line<=8'b00010000;row<=8'b11111011;end 6: begin line<=8'b00010000;row<=8'b11111101;end 7: begin line<=8'b00010000;row<=8&#

7、39;b11111110;end endcase c<=c+1; end endelse if(flag=0) /下降箭頭點陣顯示 beginif (c>7) begin c<=0; end else begin case(c) 0: begin line<=8'b00010000;row<=8'b01111111;end 1: begin line<=8'b00010000;row<=8'b10111111;end 2: begin line<=8'b00010000;row<=8'b110

8、11111;end 3: begin line<=8'b00010000;row<=8'b11101111;end 4: begin line<=8'b10010010;row<=8'b11110111;end 5: begin line<=8'b01010100;row<=8'b11111011;end 6: begin line<=8'b00111000;row<=8'b11111101;end 7: begin line<=8'b00010000;row<=8'b11111110;end endcase c<=c+1; endendalways (i) /3-7譯碼begin q=3'b000; case(i) 3'b001: t= 7'b0000110; / 1 3'b010: t= 7'b101101