tonetaba.vhd

来自「软件开发环境：ISE 7.1i 仿真环境：ModelSim SE 6.0 1. 」· VHDL 代码 · 共 27 行

library ieee;
use ieee.std_logic_1164.all;
entity tonetaba is
port(index:in std_logic_vector(3 downto 0);
	tone:out std_logic_vector(10 downto 0));
end;
architecture one of tonetaba is
begin
	search:process(index)
	begin
	case index is
	when "0000"=>tone<="11111111111";
	when "0001"=>tone<="10001000011";
	when "0010"=>tone<="10010101101";
	when "0011"=>tone<="10100001010";
	when "0100"=>tone<="10100110011";
	when "0101"=>tone<="10110000010";
	when "0110"=>tone<="10111001000";
	when "0111"=>tone<="11000000110";
	when "1000"=>tone<="11000100001";
	when "1001"=>tone<="11001010110";
	when "1010"=>tone<="01110010000";
	when others=>null;
	end case;
	end process;
end;