cunchuqi.vhd

2FSK调制功能

library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_unsigned.all;
entity cunchuqi is
   port(
clk:in std_logic;
d:in std_logic_vector(5 downto 0);
wave7,wave6,wave5,wave4,wave3,wave2,wave1,wave0:out std_logic
);
end cunchuqi;
architecture a of cunchuqi is
signal wave:std_logic_vector(7 downto 0);
begin
process(clk,d)
begin
if (clk'event and clk='0') then
  
case d is
 when "000000"=>wave<="01111111";
 when "000001"=>wave<="10001011";
 when "000010"=> wave<="10011000";
 when "000011"=> wave<="10100100";
 when "000100"=> wave<="10110000";
 when "000101" =>wave<="10111011";
 when "000110"=> wave<="11000110";
 when "000111" =>wave<="11010000";
 when "001000"=> wave<="11011001";
 when "001001"=> wave<="11100001";
 when "001010"=> wave<="11101001";
 when "001011"=> wave<="11101111";
 when "001100"=> wave<="11110100";
 when "001101"=> wave<="11111001";
 when "001110" =>wave<="11111100";
 when "001111"=> wave<="11111101";
 when "010000"=> wave<="11111110";
 when "010001"=> wave<="11111101";
 when "010010" =>wave<="11111100";
 when "010011"=> wave<="11111001";
 when "010100"=> wave<="11110100";
 when "010101"=> wave<="11101111";
 when "010110"=> wave<="11101001";
 when "010111"=> wave<="11100001";
 when "011000"=> wave<="11011001";
 when "011001"=> wave<="11010000";
 when "011010"=> wave<="11000110";
 when "011011"=> wave<="10111011";
 when "011100"=> wave<="10110000";
 when "011101"=> wave<="10100100";
 when "011110"=> wave<="10011000";
 when "011111"=>wave<="10001011";
 when "100000" =>wave<="01111111";
 when "100001"=> wave<="01110011";
 when "100010"=> wave<="01100110";
 when "100011"=> wave<="01011010";
 when "100100"=> wave<="01001110";
 when "100101"=> wave<="01000011";
 when "100110"=> wave<="00111000";
 when "100111"=>wave<="00101110";
 when "101000"=> wave<="00100101";
 when "101001"=> wave<="00011101";
 when "101010"=> wave<="00010101";
 when "101011" =>wave<="00001111";
 when "101100" =>wave<="00001010";
 when "101101"=> wave<="00000101";
 when "101110"=>wave<="00000010";
 when "101111"=> wave<="00000001";
 when "110000"=> wave<="00000000";
 when "110001" =>wave<="00000001";
 when "110010"=> wave<="00000010";
 when "110011"=> wave<="00000101";
 when "110100" =>wave<="00001010";
 when "110101"=> wave<="00001111";
 when "110110"=> wave<="00010101";
 when "110111" =>wave<="00011101";
 when "111000"=> wave<="00100101";
 when "111001"=> wave<="00101110";
 when "111010" =>wave<="00111000";
 when "111011"=> wave<="01000011";
 when "111100" =>wave<="01001110";
 when "111101"=> wave<="01011010";
 when "111110" =>wave<="01100110";
 when others=> wave<="01110011";
end case;
end if;

end process;
wave7<=wave(7);
wave6<=wave(6);
wave5<=wave(5);
wave4<=wave(4);
wave3<=wave(3);
wave2<=wave(2);
wave1<=wave(1);
wave0<=wave(0);
end a;