"0000000"when others; with sj select nsjl="01111l1"when"0000", "1101101"when"1111" "0000000"when others; with kz select d<=nsjl when'1', nsjh when'0', "0000000"when others; END a; LIBRARY ieee; USE ieee.std_logic_1164.ALL; ENTITY dk IS PORT( cp IN STD_LOGIC: sj:IN STD LOGIC VECTOR(4 downto 1): Ir,lg,ly:OUT STD LOGIC VECTOR(4 downto 1)); END dk: ARCHITECTURE a OF dk IS SIGNAL ra,rb,ga,gb,ya,yb:STD LOGIC; BEGIN ra<=si(4): rb<=not sj(4)方 ga<=(not sj(4))and(sj(3)or(sj(2)and sj(1))or((sj(2)xor sj(1))and cp)); gb <si(4)and(si(3)or(si(2)and sj(1))or((si(2)xor si(1))and cp)); ya<=(not sj(4))and(not(sj(3)or sj(2)or sj(1))); yb <sj(4)and(not(sj(3)or sj(2)or sj(1))); Ir(1)<=ra; lr(2)<=rb: lg(1)<=ga; 1g(2)<=gb, ly(1)<=ya; y(2)<=yb: END a; 六、实验报告 1、仔细分析该实验程序，可以试着将其分成几个基本模块，以备将来设计时随时调用： 2、仔细分析该实验程序，看是否将其优化： 3、可以仔细观察街道上的交通实况，根据实际情况或假想情况调整设计思路。"0000000" when others; with sj select nsjl <= "0111111" when "0000", …… "1101101" when "1111", "0000000" when others; with kz select d <= nsjl when '1', nsjh when '0', "0000000" when others; END a; LIBRARY ieee; USE ieee.std_logic_1164.ALL; ENTITY dk IS PORT( cp : IN STD_LOGIC; sj : IN STD_LOGIC_VECTOR(4 downto 1); lr,lg,ly : OUT STD_LOGIC_VECTOR(4 downto 1)); END dk; ARCHITECTURE a OF dk IS SIGNAL ra,rb,ga,gb,ya,yb : STD_LOGIC; BEGIN ra <= sj(4); rb <= not sj(4); ga <= (not sj(4))and(sj(3)or(sj(2)and sj(1))or((sj(2)xor sj(1))and cp)); gb <= sj(4)and(sj(3)or(sj(2)and sj(1))or((sj(2)xor sj(1))and cp)); ya <= (not sj(4))and(not(sj(3)or sj(2)or sj(1))); yb <= sj(4)and(not(sj(3)or sj(2)or sj(1))); lr(1) <= ra; lr(2) <= rb; lg(1) <= ga; lg(2) <= gb; ly(1) <= ya; ly(2) <= yb; END a; 六、实验报告 1、 仔细分析该实验程序，可以试着将其分成几个基本模块，以备将来设计时随时调用； 2、 仔细分析该实验程序，看是否将其优化； 3、 可以仔细观察街道上的交通实况，根据实际情况或假想情况调整设计思路