ps2.vhd

EDA实验--PS2键盘实验:利用键盘作为输入设备

library IEEE;
use IEEE.std_logic_1164.all;
use IEEE.std_logic_unsigned.all;

entity PS2 is
    port ( KBdata: in STD_LOGIC;
           KBCLK:  in STD_LOGIC;
           --DOUT:   out STD_LOGIC_VECTOR(7 downto 0);
           CLKIN:  in STD_LOGIC;
	          hs : 	 out std_logic;
           vs : 	 out std_logic;
           r : 	 out std_logic;
           g : 	 out std_logic;
           b : 	 out std_logic;
           rst:    in std_logic );
end PS2;

architecture PS2_arch of PS2 is
--attribute clock_signal: string;
--attribute clock_signal of KBCLK: signal is "yes";
--attribute buffer_type: string;
--attribute buffer_type of KBCLK: signal is "ibuf";

	component vga_16 
	    Port ( clk : in std_logic;
	           hs : out std_logic;
	           vs : out std_logic;
	           r : out std_logic;
	           g : out std_logic;
	           b : out std_logic;
		        innum  : in std_logic_vector(15 downto 0);
	           innum1 : in std_logic_vector(6 downto 0);
	           innum2 : in std_logic_vector(6 downto 0);
	           innum3 : in std_logic_vector(6 downto 0);
		        innum4 : in std_logic_vector(6 downto 0));
	end component;

	signal test: std_logic;
	signal CLK: std_logic;
	signal M, S: std_logic_vector(9 downto 0);
	signal N2: std_logic_vector(4 downto 0);
	signal DREG: std_logic_vector(7 downto 0);
	signal LED: std_logic_vector(15 downto 0);
	signal NUM: std_logic_vector(6 downto 0);

	begin

		--LDG<='1';

		process(CLKIN,RST)
		begin
			if (RST='0' ) then
				CLK<= '1';
			elsif (CLKIN'event and CLKIN='1') then
				if KBCLK='0' then
						CLK <= KBCLK;
				else  
						CLK <= '1';
				end if;
			end if;
		end process;	
		--clk<=kbclk;

		process(CLK, KBDATA, S)
		begin
			if (CLK'event and CLK='0') then
				M <= KBDATA & S(9 DOWNTO 1);
			end if;
		end process;

		process(clk, M, N2, KBdata, S)
		begin
			if (CLK'EVENT AND CLK='1') THEN
			   	S <= M;
			end if;
				--DOUT <= (S(7 downto 0));
				case S(7 downto 0) is
					when "00010110" => NUM <= "1111001";
				  	when "00011110" => NUM <= "0100100";
				  	when "00100110" => NUM <= "0110000";
				  	when "00100101" => NUM <= "0011001";
				  	when "00101110" => NUM <= "0010010";
				  	when "00110110" => NUM <= "0000010";
				  	when "00111101" => NUM <= "1111000";
					when "00111110" => NUM <= "0000000";
					when "01000110" => NUM <= "0010000";
				  	when "01000101" => NUM <= "1000000";
					when "00011100" => NUM <= "0001000";
					when "00110010" => NUM <= "0000011";
					when "00100001" => NUM <= "1000110";
					when "00100011" => NUM <= "0100001";
					when "00100100" => NUM <= "0000110";
					when "00101011" => NUM <= "0001110";
					when others     => NUM <= "1111111";
				end case;
		end process;
		
		LED<="000000" & S(9 downto 0);
		U2: vga_16 port map(clkin,hs,vs,r,g,b,LED,NUM,NUM,NUM,NUM);

end PS2_arch;