123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475 |
- ----------------------------------------------------------------------------------
- -- Company:
- -- Engineer:
- --
- -- Create Date: 02.07.2021 10:43:18
- -- Design Name:
- -- Module Name: KeyboardToASCII - Behavioral
- -- Project Name:
- -- Target Devices:
- -- Tool Versions:
- -- Description:
- --
- -- Dependencies:
- --
- -- Revision:
- -- Revision 0.01 - File Created
- -- Additional Comments:
- --
- ----------------------------------------------------------------------------------
-
-
- library IEEE;
- use IEEE.STD_LOGIC_1164.ALL;
-
- entity KeyboardToASCII is
- Port ( KeyCode : in STD_LOGIC_VECTOR (0 to 7);
- CodeASCII : out STD_LOGIC_VECTOR (0 to 6));
- end KeyboardToASCII;
-
- architecture Behavioral of KeyboardToASCII is
-
- begin
-
- CodeASCII <= "0000000" when (KeyCode = x"05") else -- F1 -> flush
- "0001101" when (KeyCode = x"5a") else -- Enter
- "1111111" when (KeyCode = x"66") else -- Del
- "1000001" when (KeyCode = x"15") else -- A
- "1000010" when (KeyCode = x"32") else -- B
- "1000011" when (KeyCode = x"21") else -- C
- "1000100" when (KeyCode = x"23") else -- D
- "1000101" when (KeyCode = x"24") else -- E
- "1000110" when (KeyCode = x"2b") else -- F
- "1000111" when (KeyCode = x"34") else -- G
- "1001000" when (KeyCode = x"33") else -- H
- "1001001" when (KeyCode = x"43") else -- I
- "1001010" when (KeyCode = x"3b") else -- J
- "1001011" when (KeyCode = x"42") else -- K
- "1001100" when (KeyCode = x"4b") else -- L
- "1001101" when (KeyCode = x"4c") else -- M
- "1001110" when (KeyCode = x"31") else -- N
- "1001111" when (KeyCode = x"44") else -- O
- "1010000" when (KeyCode = x"4d") else -- P
- "1010001" when (KeyCode = x"1c") else -- Q
- "1010010" when (KeyCode = x"2d") else -- R
- "1010011" when (KeyCode = x"1b") else -- S
- "1010100" when (KeyCode = x"2c") else -- T
- "1010101" when (KeyCode = x"3c") else -- U
- "1010110" when (KeyCode = x"2a") else -- V
- "1010111" when (KeyCode = x"1a") else -- W
- "1011000" when (KeyCode = x"22") else -- X
- "1011001" when (KeyCode = x"35") else -- Y
- "1011010" when (KeyCode = x"1d") else -- Z
- "0110000" when (KeyCode = x"70") else -- 0
- "0110001" when (KeyCode = x"69") else -- 1
- "0110010" when (KeyCode = x"72") else -- 2
- "0110011" when (KeyCode = x"7a") else -- 3
- "0110100" when (KeyCode = x"6b") else -- 4
- "0110101" when (KeyCode = x"73") else -- 5
- "0110110" when (KeyCode = x"74") else -- 6
- "0110111" when (KeyCode = x"6c") else -- 7
- "0111000" when (KeyCode = x"75") else -- 8
- "0111001" when (KeyCode = x"7d") else -- 9
- "0000001"; -- Rien
-
- end Behavioral;
|