text47.vhd

大家一定要看 哦 程序在与多看多练 我找了好久才找到呢

library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_unsigned.all;
--*************************
entity text47 is
port(
    num:in std_logic_vector(3 downto 0);
    q:out std_logic_vector(6 downto 0)
    );
end text47;
--**************************
architecture behav of text47 is
begin
process(num)
begin
case num is
when "0000"=>q<="1111110";
when "0001"=>q<="0110000";
when "0010"=>q<="1101101";
when "0011"=>q<="1111001";
when "0100"=>q<="0110011";
when "0101"=>q<="1011011";
when "0110"=>q<="1011111";
when "0111"=>q<="1110000";
when "1000"=>q<="1111111";
when "1001"=>q<="1111011";
when others=>q<="0000000";
end case;
end process;
end behav;