帶時(shí)間顯示的交通燈課程設(shè)計(jì)PLC

1、 綜合成績(jī)優(yōu)秀 良好 優(yōu)秀 良好 不及格 教師簽名批改日期2021年 月 日 PLC 課程設(shè)計(jì)報(bào)告院系 電子與電氣工程學(xué)院 專業(yè) 電氣工程及其自動(dòng)化 班級(jí) 電氣3081 學(xué)號(hào)3082110123姓名 周曉文 2021年1月課題名稱：帶時(shí)間顯示的交通燈課題分值:10分1、 控制要求：信號(hào)燈守兩個(gè)啟動(dòng)按鈕控制，當(dāng)SB1按下后，信號(hào)燈系統(tǒng)執(zhí)行夜間工作模式，兩車道黃燈以2秒為周期不停閃爍。當(dāng)SB2按下后，信號(hào)等系統(tǒng)執(zhí)行白天模式，具體要求如下。南北紅燈維持25秒，在南北紅燈亮的同時(shí)東西綠燈也亮，并維持20秒。到20秒時(shí)，東西綠燈也亮，閃亮3秒后熄滅。在東西綠燈熄滅時(shí)，東西黃燈亮，并維持2秒。到2秒后，東

2、西黃燈熄滅，東西紅燈亮，同時(shí)南北紅燈熄滅，綠燈亮。東西紅燈維持30秒。南北綠燈維持25秒，然后閃亮3秒后熄滅，這時(shí)南北紅燈亮，東西綠燈亮。周而復(fù)始。按下停止按鈕SB3后，全部燈熄滅。白天工作方式必須完成兩種時(shí)間顯示模式：1） 兩個(gè)LED組合顯示南北紅燈倒計(jì)時(shí)時(shí)間東西紅燈時(shí)間不顯示。2） 分別用一個(gè)LED顯示東西、南北紅燈倒計(jì)時(shí)時(shí)間自行將工作周期壓縮至個(gè)位數(shù)。2、 控制系統(tǒng)設(shè)計(jì)分析輸入輸出點(diǎn)統(tǒng)計(jì)序號(hào)元器件用途1SB12SB23總停開(kāi)關(guān)5模式轉(zhuǎn)換開(kāi)關(guān)6南北綠燈7南北黃燈8南北紅燈9東西綠燈10東西黃燈11東西紅燈12數(shù)碼管G14數(shù)碼管F15數(shù)碼管E16數(shù)碼管D17數(shù)碼管C18數(shù)碼管B19數(shù)碼管A2

3、0東西夜間黃燈21南北夜間黃燈三 PLC系統(tǒng)硬件配置槽號(hào)12345模塊選擇PS307 5ACPU314-2DPSM321 DC 24V 16點(diǎn)SM322DO 24V16點(diǎn)I/O點(diǎn)范圍六、PLC程序設(shè)計(jì)library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity sheji3 isport(clk,ck:in std_logic; sel:in std_logic_vector(1 downto 0); sm:out std_logic_vector(6 downto 0); duan:out st

4、d_logic_vector(5 downto 0);end sheji3;architecture art of sheji3 is signal cnt:std_logic_vector(3 downto 0); signal temp:integer range 0 to 5; signal x:std_logic_vector(3 downto 0); signal y:std_logic_vector(3 downto 0) beginp1:process(clk) begin if(clk'event and clk='1') then case sel i

5、s when "00"=>if(cnt>="0100")then cnt<="0000" else cnt<=cnt+1; end if; when "01"=>if(cnt=>"1000" or cnt="0001" or cnt="0011" or cnt="0101" or cnt="0111")then cnt<="0000" else cnt&l

6、t;=cnt+2; end if; when "10"=>if(cnt>="1001" or cnt="0000" or cnt="0010" or cnt="0100" or cnt="0110" or cnt="1000")then cnt<="0001" else cnt<=cnt+2; end if; when"11"=>if(cnt>"0101" or

7、 cnt="0001" or cnt="0000")then cnt<="0101" else cnt<=cnt-1; end if; when others=>cnt<="1111" end case; y<=cnt; end if;end process p1; p2:process(ck)begin if(ck'event and ck='1')then case temp is when 0=>duan<="000001"

8、 x<=y; when 1=>duan<="000010" x<=y; when 2=>duan<="000100" x<=y; when 3=>duan<="001000" x<="00"&sel; when 4=>duan<="010000" x<="00"&sel; when others=>duan<="100000" x<="

9、00"&sel; end case; temp<=temp+1; end if; end process p2;p3:process(x) begin case x is when"0000"=>sm<="1111110" when"0001"=>sm<="0110000" when"0010"=>sm<="1101101" when"0011"=>sm<="1111001" when"0100"=>sm<="0110011" when"0101"=>sm<="1011011" when"0110"=>sm<="1011111" when"0111"=>sm<="1110000" when"1000"=>