【正文】 end arch。 END CASE。8 WHEN 1001 =dataout_xhdl1 = 1101111。6 WHEN 0111 =dataout_xhdl1 = 0000111。4 WHEN 0101 =dataout_xhdl1 = 1101101。2 WHEN 0011 =dataout_xhdl1 = 1001111。0 WHEN 0001 =dataout_xhdl1 = 0000110。END process。 END CASE。 when 7 = lie=00000000。 when 5 = lie=10000001。 when 3 = lie=11000011。 when 1 = lie=11100111。 END CASE。 when 7 = lie=00000000。 when 5 = lie=10000001。 when 3 = lie=11000011。 when 1 = lie=11111111。 END CASE。 when 7 = lie=00000000。 when 5 = lie=10000001。 when 3 = lie=11111111。 when 1 = lie=11111111。 END CASE。 when 7 = lie=11111111。 when 5 = lie=11111111。 when 3 = lie=11111111。 when 1 = lie=11111111。 end case。 when 111 = shu:=7。 when 101 = shu:=5。 when 011 = shu:=3。 when 001 = shu:=1。t的觸發(fā)進程 process(t,clk2) variable shu:integer range 0 to 7。 end if。 count:=count+1。t=000。t=111。t=110。t=101。t=100。t=011。t=010。t=001。t=000。 end if。139。 begin if clk139。 END PROCESS。 when others = null。 when others=data4=led6。139。 end case。=DATA4=led51 。 when 101111= case dingshi is when 39。 when others=data4=led4。139。 case en_xhdl is when 111110= data4=led1。 when others = null。039。 when others= en_xhdl=011111。dian=39。139。 end case。dian=39。039。)。 when 2= en_xhdl=(4=clk2,others=39。039。數(shù)碼管還處于選擇狀態(tài)，處于閃爍 when others= en_xhdl=110111。dian=39。139。為0時數(shù)碼管的小數(shù)點就不顯示 end case。dian=39。139。)。 when 1 = case t1 is when 4= en_xhdl=(2=clk2,others=39。dian=39。 end if。 else t=t+1。139。********調整閃爍時間*******************process(t,en_xhdl,data4)begin if(clk139。 end if。039。139。 n:=n+1。039。139。 n:=n+1。 and n=0) then L=39。) THEN if (start=39。EVENT AND CLK2=39。******************開關按鍵處理***********process(start,P)variable n:integer range 0 to 1:=0。 end if。 else yellow=39。 ) then 當kaishi為1時 為危險使用黃燈1s不停閃爍 yellow=39。 and kaimeng=39。***************檢查門有沒有關好**************process(kaimeng,CLK2)begin IF(CLK2=39。 end if。 else bell=39。139。139。 end if。 led5=0000。 led3=0000。 led6=1000。 led4=1000。 then led1=1000。上電檢查 IF jiance=39。 end if。 end case。 end case。 when 1=case led6 is when0000= led6=1001。 when others= led5=led51。 end case。 when 3=case led4 is when0000= led4=0101。 when others= led3=led31。039。 end case。 end case。 when 1=case led6 is when1001= led6=0000。 when others= led5=led5+1。 end case。 when 3=case led4 is when0101= led4=0000。 通過移移位按鈕控制要調節(jié)的數(shù)碼管， when others= led3=led3+1。039。 end if。) THEN if t1=4 then t1=0。 THEN if (yiwei=39。 ******************調時****************** if dingshi=39。 end case。 then火候選擋 case led1 is when 0011=led1=0000。 elsif xuandang=39。 when others=led3=led31。 when others=led4=led41。 when others= led5=led51。 when others=led6=led61。 led4=0000。 case led6 is when0000=led6=0000。 case led4 is when0000=led4=0101。為了實現(xiàn)假如用戶調節(jié)時間的時候不用一定要調節(jié)四位，就直接可以按開始按鈕，數(shù)碼管就不會不停止那里閃爍。039。039。139。ELSIF(CLK239。P=39。dingshi=39。 led6=0000。 led4=0000。039。) THEN led1=0000。***********************正常時間倒計時設置*************************process(clk2,rst,L) beginIF(rst=39。 end if。 else t:=t+1。)then if t =25000 then t:=1。event and clk1=39。***************1s鐘信號 ****************process(clk1) variable t : integer range 1 to 25000。 end if。 else tt:=tt+1。)then if tt=500 then tt:=1。event and clk=39。 只顯示北面三盞燈***********5000hz分頻***********process(clk)variable tt : integer range 1 to 500。 數(shù)碼管端輸出en=en_xhdl。signal t:std_logic_vector(2 downto 0)。數(shù)碼管段顯示signal en_xhdl:std_logic_vector(5 downto 0)。 用于計時signal data4:std_logic_vector(3 downto 0)。ARCHITECTURE arch OF seg73 ISsignal clk1,clk2,dingshi,L,P:std_logic。727071彩燈 tishi:out std_logic_vector(3 d