bcd.vhd

本源码用VHDL语言实现了用键盘控制米字管显示十进制

library ieee;
use ieee.std_logic_1164.all;

entity bcd is
	port( a:in std_logic_vector(3 downto 0);
		  Y:out std_logic_vector(6 downto 0));
end bcd;

architecture bcd_arch of bcd is
begin
	process(a)
	begin
		case a is
			when "0000"=>Y<="1111110";
			when "0001"=>Y<="0110000";
			when "0010"=>Y<="1101101";
			when "0011"=>Y<="1111001";
			when "0100"=>Y<="0110011";
			when "0101"=>Y<="1011011";
			when "0110"=>Y<="1011111";
			when "0111"=>Y<="1110000";
			when "1000"=>Y<="1111111";
			when "1001"=>Y<="1111011";
			when "1010"=>Y<="1110111";
			when "1011"=>Y<="0011111";
			when "1100"=>Y<="1001110";
			when "1101"=>Y<="0111101";
			when "1110"=>Y<="1001111";
			when others=>Y<="1000111";
		end case;
	end process;
end bcd_arch;