基于cpld的交通灯课程设计

基于cpld的交通灯课程设计内容摘要：

d10n。 PROCESS (clk,cr) BEGIN IF(cr=39。 039。 )THEN vcd10n=0010。 ELSIF (EN1=39。 139。 )THEN IF(CLK39。 EVENT AND CLK=39。 139。 )THEN IF(bcd1n=0)THEN IF(vcd10n=0)THEN vcd10n=0000。 ELSE vcd10n=vcd10n1。 END IF。 END IF。 END IF。 END IF。 END PROCESS。 PROCESS(bcd1n,vcd10n) BEGIN J1=39。 039。 IF(bcd1n=0 and vcd10n=0)THEN J1=39。 139。 END IF。 END PROCESS。 END。 13 元件图 （ 25秒倒计时计数器元件图） 仿真图 （ 25 秒倒计时计数器仿真图） 电路图 （ 25 秒倒计时计数器 RTL 电路图） 14 20 秒倒计时计数器 源代码 LIBRARY IEEE。 USE。 USE。 ENTITY djs20 IS PORT (clk:IN STD_LOGIC。 cr: IN STD_LOGIC。 EN3:IN STD_LOGIC。 J3:OUT STD_LOGIC。 q1:OUT STD_LOGIC_VECTOR(3 DOWNTO 0)。 y10:OUT STD_LOGIC_VECTOR(3 DOWNTO 0))。 END djs20。 ARCHITECTURE a OF djs20 IS SIGNAL bcd1n:STD_LOGIC_VECTOR(3 DOWNTO 0)。 SIGNAL vcd10n:STD_LOGIC_VECTOR(3 DOWNTO 0)。 BEGIN PROCESS(clk,cr) BEGIN IF(cr=39。 039。 )THEN bcd1n=0000。 J1=39。 139。 ELSIF(EN3=39。 139。 )THEN IF(CLK39。 EVENT AND CLK=39。 139。 )THEN IF(bcd1n=0 and vcd10n/=0)THEN bcd1n=1001。 ELSIF(bcd1n=0 and vcd10n=0)THEN bcd1n=0000。 ELSE bcd1n=bcd1n1。 END IF。 END IF。 END IF。 END PROCESS。 q1=bcd1n。 y10=vcd10n。 15 PROCESS(clk,cr) BEGIN IF(cr=39。 039。 )THEN vcd10n=0010。 ELSIF (EN3=39。 139。 )THEN IF(CLK39。 EVENT AND CLK=39。 139。 )THEN IF(bcd1n=0)THEN IF(vcd10n=0)THEN vcd10n=0000。 ELSE vcd10n=vcd10n1。 END IF。 END IF。 END IF。 END IF。 END PROCESS。 PROCESS(bcd1n,vcd10n) BEGIN J3=39。 039。 IF(bcd1n=0 and vcd10n=0)THEN J3=39。 139。 END IF。 END PROCESS。 END。 元件图 （ 20秒倒计时计数器元件图） 16 仿真图 （ 20s 倒计时计数器仿真图） 电路图 （ 20 秒倒计时计数器 RTL 电路图） 30 秒倒计时计数器 源代码 LIBRARY IEEE。 USE。 USE。 ENTITY djs30 IS PORT (clk: IN STD_LOGIC。 17 cr:IN STD_LOGIC。 EN4: IN STD_LOGIC。 J4:OUT STD_LOGIC。 q1:OUT STD_LOGIC_VECTOR(3 DOWNTO 0)。 y10:OUT STD_LOGIC_VECTOR(3 DOWNTO 0))。 END djs30。 ARCHITECTURE a OF djs30 IS SIGNAL bcd1n:STD_LOGIC_VECTOR(3 DOWNTO 0)。 SIGNAL vcd10n:STD_LOGIC_VECTOR(3 DOWNTO 0)。 BEGIN PROCESS(clk,cr) BEGIN IF(cr=39。 039。 )THEN bcd1n=0000。 J1=39。 139。 ELSIF(EN4=39。 139。 )THEN IF(CLK39。 EVENT AND CLK=39。 139。 )THEN IF(bcd1n=0 and vcd10n/=0)THEN bcd1n=1001。 ELSIF(bcd1n=0 and vcd10n=0)THEN bcd1n=0000。 ELSE bcd1n=bcd1n1。 END IF。 END IF。 END IF。 END PROCESS。 q1=bcd1n。 y10=vcd10n。 PROCESS(clk,cr) BEGIN IF(cr=39。 039。 )THEN vcd10n=0011。 J1=39。 139。 ELSIF(EN4=39。 139。 )THEN IF(CLK39。 EVENT AND CLK=39。 139。 )THEN IF(bcd1n=0)THEN IF(vcd10n=0)THEN vcd10n=0000。 ELSE 18 vcd10n=vcd10n1。 END IF。 END IF。 END IF。 END IF。 END PROCESS。 PROCESS(bcd1n,vcd10n) BEGIN J4=39。 039。 IF(bcd1n=0 and vcd10n=0)THEN J4=39。 139。 END IF。 END PROCESS。 END。 元件图 （ 30秒倒计时计数器元件图 ） 仿真图 （ 30 秒倒计时计数器仿真图） 19 电路图 （ 30 秒倒计时计数器 RTL 电路图） 15 秒倒计时计数器 源代码 LIBRARY IEEE。 USE。 USE。 ENTITY djs15 IS PORT。