eda實驗交通燈設(shè)計報告

-.z.EDA原理及應(yīng)用實驗報告題目：交通燈控制器專業(yè)：電子信息工程 班級： ： **：設(shè)計題目：交通燈控制器設(shè)計目標(biāo)：1、設(shè)計一個交通信號燈控制器，由一條主干道和一條支干道匯合成十字路口，在每個入口處設(shè)置紅、綠、黃三色信號燈，紅燈亮禁止通行，綠燈亮允許通行，黃燈亮則給行駛中的車輛有時間停在禁行線外。2、紅、綠、黃發(fā)光二極管作信號燈。3、主干道亮綠燈時，支干道亮紅燈；支干道亮綠燈時，主干道亮紅燈。4、主、支干道均有車時，兩者交替允許通行，主干道每次放行45秒，支干道每次放行25秒，設(shè)立45秒、25秒計時、顯示電路。5、在每次由綠燈亮到紅燈亮的轉(zhuǎn)換過程中，要亮5秒黃燈作為過渡，使行駛中的車輛有時間停到禁行線外，設(shè)立5秒計時、顯示電路。設(shè)計原理：（含系統(tǒng)總的原理圖）由兩個分頻器模塊，三個計數(shù)器模塊及它的選擇器，一個掃描數(shù)碼管模塊，和一個紅綠燈控制模塊連接而成。RTL狀態(tài)圖設(shè)計內(nèi)容：（含狀態(tài)轉(zhuǎn)換圖、軟件流程圖、說明文字等，每單獨模塊的圖標(biāo)和VHDL程序；最后為總體程序框圖）分頻器1LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYDVFISPORT(CLK:INSTD_LOGIC;--D:INSTD_LOGIC_VECTOR(3DOWNTO0);FOUT:OUTSTD_LOGIC);END;ARCHITECTUREoneOFDVFISSIGNALFULL:STD_LOGIC;BEGINP_REG:PROCESS(CLK)VARIABLECNT8:INTEGERRANGE48000000DOWNTO0;BEGINIFCLK'EVENTANDCLK='1'THENIFCNT8=24000000THENCNT8:=0;FULL<='1';ELSECNT8:=CNT8+1;FULL<='0';ENDIF;ENDIF;ENDPROCESSP_REG;P_DIV:PROCESS(FULL)VARIABLECNT2:STD_LOGIC;BEGINIFFULL'EVENTANDFULL='1'THENCNT2:=NOTCNT2;IFCNT2='1'THENFOUT<='1';ELSEFOUT<='0';ENDIF;ENDIF;ENDPROCESSP_DIV;END;說明：采用的是48M時鐘輸入，作為后面的時鐘信號。分頻器2LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYDVF2ISPORT(CLK:INSTD_LOGIC;--D:INSTD_LOGIC_VECTOR(3DOWNTO0);FOUT:OUTSTD_LOGIC);END;ARCHITECTUREoneOFDVF2ISSIGNALFULL:STD_LOGIC;BEGINP_REG:PROCESS(CLK)VARIABLECNT8:INTEGERRANGE48000000DOWNTO0;BEGINIFCLK'EVENTANDCLK='1'THENIFCNT8=20000THENCNT8:=0;FULL<='1';ELSECNT8:=CNT8+1;FULL<='0';ENDIF;ENDIF;ENDPROCESSP_REG;P_DIV:PROCESS(FULL)VARIABLECNT2:STD_LOGIC;BEGINIFFULL'EVENTANDFULL='1'THENCNT2:=NOTCNT2;IFCNT2='1'THENFOUT<='1';ELSEFOUT<='0';ENDIF;ENDIF;ENDPROCESSP_DIV;END;說明：改變了分頻器的大小，這個頻率很高，是給掃描數(shù)碼管模塊使用的。計數(shù)器1LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYtnISPORT(CLK:INSTD_LOGIC;CLR:INSTD_LOGIC_vector(2downto0);U:INSTD_LOGIC_VECTOR(2DOWNTO0);A,B:OUTSTD_LOGIC_VECTOR(3DOWNTO0));END;ARCHITECTUREbhvOFtnISSIGNALJ,K,L:STD_LOGIC;SIGNALQ2,Q1:STD_LOGIC_VECTOR(3DOWNTO0);BEGINa1:PROCESS(CLK)BEGINIFCLR="001"THENQ1<="0100";ELSIFU="010"THENIFCLK'EVENTANDCLK='1'THENQ1<=Q1-1;IFQ1="0000"THENQ1<="1001";J<='1';ELSEJ<='0';ENDIF;ENDIF;A<=Q1;ENDIF;ENDPROCESS;a2:PROCESS(J)BEGINIFCLR="001"THENQ2<="0010";ELSIFU="010"THENIFJ'EVENTANDJ='1'THENQ2<=Q2-1;IFQ2="0000"THENQ2<="0010";K<='0';ELSEK<='1';ENDIF;ENDIF;B<=Q2;ENDIF;ENDPROCESS;END;說明：作為支干道通行時間，倒計時25s。計數(shù)器2LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYtmISPORT(CLK:INSTD_LOGIC;CLR:INSTD_LOGIC_vector(2downto0);U:INSTD_LOGIC_VECTOR(2DOWNTO0);C,D:OUTSTD_LOGIC_VECTOR(3DOWNTO0));END;ARCHITECTUREbhvOFtmISSIGNALJ,K,L:STD_LOGIC;SIGNALQ2,Q1:STD_LOGIC_VECTOR(3DOWNTO0);BEGINa1:PROCESS(CLK)BEGINIFCLR="010"THENQ1<="0101";ELSIFU="001"THENIFCLK'EVENTANDCLK='1'THENQ1<=Q1-1;IFQ1="0000"THENQ1<="1001";J<='1';ELSEJ<='0';ENDIF;ENDIF;C<=Q1;ENDIF;ENDPROCESS;a2:PROCESS(J)BEGINIFCLR="010"THENQ2<="0000";ELSIFU="001"THENIFJ'EVENTANDJ='1'THENQ2<=Q2-1;IFQ2="0000"THENQ2<="0010";K<='0';ELSEK<='1';ENDIF;ENDIF;D<=Q2;ENDIF;ENDPROCESS;END;說明：要亮5秒黃燈作為過渡計數(shù)器3LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYtlISPORT(CLK:INSTD_LOGIC;CLR:INSTD_LOGIC_vector(2downto0);U:INSTD_LOGIC_VECTOR(2DOWNTO0);E,F:OUTSTD_LOGIC_VECTOR(3DOWNTO0));END;ARCHITECTUREbhvOFtlISSIGNALJ,K,L:STD_LOGIC;SIGNALQ2,Q1:STD_LOGIC_VECTOR(3DOWNTO0);BEGINa1:PROCESS(CLK)BEGINIFCLR="001"THENQ1<="0100";ELSIFU="000"THENIFCLK'EVENTANDCLK='1'THENQ1<=Q1-1;IFQ1="0000"THENQ1<="1001";J<='1';ELSEJ<='0';ENDIF;ENDIF;E<=Q1;ENDIF;ENDPROCESS;a2:PROCESS(J)BEGINIFCLR="001"THENQ2<="0100";ELSIFU="000"THENIFJ'EVENTANDJ='1'THENQ2<=Q2-1;IFQ2="0000"THENQ2<="0010";K<='0';ELSEK<='1';ENDIF;ENDIF;F<=Q2;ENDIF;ENDPROCESS;END;說明：作為主干道通行時間，倒計時45s。選擇器LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITY*uanzeISPORT(U:INSTD_LOGIC_VECTOR(2DOWNTO0);A,B,C,D,E,F:INSTD_LOGIC_VECTOR(3DOWNTO0);Q1,Q2:OUTSTD_LOGIC_VECTOR(3DOWNTO0));END;ARCHITECTUREbhvOF*uanzeISBEGINPROCESS(U)BEGINcaseUISWHEN"000"=>Q1<=E;Q2<=F;WHEN"001"=>Q1<=C;Q2<=D;WHEN"010"=>Q1<=A;Q2<=B;WHENOTHERS=>NULL;ENDCASE;ENDPROCESS;END;說明：不同的狀態(tài)數(shù)碼管分別顯示45s，25s，5s倒計時。紅綠燈控制模塊libraryieee;useieee.std_logic_1164.all;USEIEEE.STD_LOGIC_UNSIGNED.ALL;entitydengisgeneric(a:integer:=45;b:integer:=5;c:integer:=25);port(clk,rst:instd_logic;R1,G1,Y1,R2,G2,Y2:outstd_logic;U:outstd_logic_vector(2downto0));end;architectureoneofdengistypefsm_stis(QA,QB,QC,QD);signalcurrent_state,ne*t_state:fsm_st;SIGNALq:integerrange0TO200;begin--process(clk)--begin--ifclk='1'andclk'eventthen--ifq=29thenq<=0;elseq<=q+1;endif;endif;--endprocess;process(clk)beginifrst='0'thencurrent_state<=QA;q<=0;elsifclk='1'andclk'eventthencurrent_state<=ne*t_state;ifq=a+b+b+c-1thenq<=0;elseq<=q+1;endif;endif;endprocess;process(current_state,q)begincasecurrent_stateiswhenQA=>G1<='0';R2<='0';R1<='1';Y1<='1';G2<='1';Y2<='1';U<="000";ifq=a-1thenne*t_state<=QB;elsene*t_state<=QA;endif;whenQB=>Y1<='0';R2<='0';R1<='1';G1<='1';G2<='1';Y2<='1';U<="001";ifq=a+b-1thenne*t_state<=QC;elsene*t_state<=QB;endif;whenQC=>R1<='0';G2<='0';Y1<='1';G1<='1';R2<='1';Y2<='1';U<="010";ifq=a+b+c-1thenne*t_state<=QD;elsene*t_state<=QC;endif;whenQD=>R1<='0';Y2<='0';Y1<='1';G1<='1';G2<='1';R2<='1';U<="001";ifq=a+b+b+c-1thenne*t_state<=QA;elsene*t_state<=QD;endif;endcase;endprocess;end;說明：設(shè)置四種狀態(tài)QA主綠，支紅；QB主黃，支紅；QC主紅，支綠；QD主紅，支黃；同時用時間控制狀態(tài)的切換掃描數(shù)碼管模塊libraryieee;useieee.std_logic_1164.all;useieee.std_logic_unsigned.all;entityscan_ledisport(clk:instd_logic;a1,a2,a3,a4,a5,a6,a7,a8:instd_logic_vector(3downto0);sg:outstd_logic_vector(6downto0);bt:outstd_logic_vector(7downto0));end;architectureoneofscan_ledissignalt8:std_logic_vector(2downto0);signala:std_logic_vector(3downto0);beginp1:process(cnt8)begincaset8iswhen"000"=>bt<=NOT"00000001";a<=a1;when"001"=>bt<=NOT"00000010";a<=a2;when"010"=>bt<=NOT"00000100";a<=a3;when"011"=>bt<=NOT"00001000";a<=a4;when"100"=>bt<=NOT"00010000";a<=a5;when"101"=>bt<=NOT"00100000";a<=a6;when"110"=>bt<=NOT"01000000";a<=a7;when"111"=>bt<=NOT"10000000";a<=a8;whenothers=>null;endcase;endprocessp1;p2:process(clk)beginifclk'eventandclk='1'thent8<=cnt8+1;endif;endprocessp2;p3:process(a)begincaseaiswhen"0000"=>sg<=NOT"0111111";when"0001"=>sg<=