bcd_data.vhd

在maxplus2环境下的vhdl设计交通灯

LIBRARY IEEE; 
USE IEEE.STD_LOGIC_1164.ALL; 
ENTITY bcd_data IS
	PORT(bcd_data:in STD_LOGIC_VECTOR(3 downto 0);
 		 segout: out STD_LOGIC_VECTOR(6 downto 0));
END ENTITY;
ARCHITECTURE behavior OF bcd_data IS 
BEGIN
	process(bcd_data)
	  BEGIN
		case bcd_data is
  			when "0000"=>segout<="1111110";
 			when "0001"=>segout<="0110000"; 
  			when "0010"=>segout<="1101101"; 
			when "0011"=>segout<="1111001";
 			when "0100"=>segout<="0110011";
 			when "0101"=>segout<="1011011";
  			when "0110"=>segout<="0011111";
  			when "0111"=>segout<="1110000";
 			when "1000"=>segout<="1111111";
  			when "1001"=>segout<="1110011";
 			when others =>null;
		END CASE;
	END PROCESS;
END ARCHITECTURE behavior;