ok1.txt

来自「用vhdl语言编写的ps2键盘识别程序,并可输出到8*8矩阵显示」· 文本 代码 · 共 363 行 · 第 1/2 页

TXT
363
字号
                 when 6=>ho<="00000100";vo<="11110111";
		         when 7=>ho<="00000010";vo<="11110111";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00111110"=>                       --'8'
               case counter1 is
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11100111";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11011011";
                 when 5=>ho<="00001000";vo<="11100111";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11100111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "01000110"=>                       --'9'
               case counter1 is
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11100111";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11011011";
                 when 5=>ho<="00001000";vo<="11100111";
                 when 6=>ho<="00000100";vo<="11111011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11100111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
       when "00011100"=>                        --'A'
               case counter1 is
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11100111";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11011011";
                 when 5=>ho<="00001000";vo<="11000011";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
      when "00110010"=>                        --'B'
               case counter1 is
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000111";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11011011";
                 when 5=>ho<="00001000";vo<="11000111";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11000111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00100001"=>                       
               case counter1 is               --'c'
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11100111";
                 when 3=>ho<="00100000";vo<="11011111";
                 when 4=>ho<="00010000";vo<="11011111";
                 when 5=>ho<="00001000";vo<="11011111";
                 when 6=>ho<="00000100";vo<="11011111";
		         when 7=>ho<="00000010";vo<="11100111";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00100011"=>                       --'D'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000111";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11011011";
                 when 5=>ho<="00001000";vo<="11011011";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11000111";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00100100"=>                       --'E'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000011";
                 when 3=>ho<="00100000";vo<="11011111";
                 when 4=>ho<="00010000";vo<="11011111";
                 when 5=>ho<="00001000";vo<="11000011";
                 when 6=>ho<="00000100";vo<="11011111";
		         when 7=>ho<="00000010";vo<="11011111";
		         when 8=>ho<="00000001";vo<="11000011";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00101011"=>                       --'F'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000011";
                 when 3=>ho<="00100000";vo<="11011111";
                 when 4=>ho<="00010000";vo<="11011111";
                 when 5=>ho<="00001000";vo<="11000011";
                 when 6=>ho<="00000100";vo<="11011111";
		         when 7=>ho<="00000010";vo<="11011111";
		         when 8=>ho<="00000001";vo<="11011111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00110100"=>                       --'G'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11100011";
                 when 3=>ho<="00100000";vo<="11011111";
                 when 4=>ho<="00010000";vo<="11011111";
                 when 5=>ho<="00001000";vo<="11010011";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11100011";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		
	 when "00110011"=>                        --'H'
               case counter1 is
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11011011";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11000011";
                 when 5=>ho<="00001000";vo<="11011011";
                 when 6=>ho<="00000100";vo<="11011011";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "01000011"=>                       --'I'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000111";
                 when 3=>ho<="00100000";vo<="11101111";
                 when 4=>ho<="00010000";vo<="11101111";
                 when 5=>ho<="00001000";vo<="11101111";
                 when 6=>ho<="00000100";vo<="11101111";
		         when 7=>ho<="00000010";vo<="11000111";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "00111011"=>                       --'J'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11000011";
                 when 3=>ho<="00100000";vo<="11110111";
                 when 4=>ho<="00010000";vo<="11110111";
                 when 5=>ho<="00001000";vo<="11110111";
                 when 6=>ho<="00000100";vo<="10110111";
		         when 7=>ho<="00000010";vo<="11001111";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "01000010"=>                       --'K'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11011011";
                 when 3=>ho<="00100000";vo<="11011011";
                 when 4=>ho<="00010000";vo<="11010111";
                 when 5=>ho<="00001000";vo<="11001111";
                 when 6=>ho<="00000100";vo<="11010111";
		         when 7=>ho<="00000010";vo<="11011011";
		         when 8=>ho<="00000001";vo<="11011011";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		when "01001011"=>                       --'L'
               case counter1 is              
                 when 1=>ho<="10000000";vo<="11111111";
                 when 2=>ho<="01000000";vo<="11011111";
                 when 3=>ho<="00100000";vo<="11011111";
                 when 4=>ho<="00010000";vo<="11011111";
                 when 5=>ho<="00001000";vo<="11011111";
                 when 6=>ho<="00000100";vo<="11011111";
		         when 7=>ho<="00000010";vo<="11000011";
		         when 8=>ho<="00000001";vo<="11111111";
		         when others=>ho<="00000000";vo<="11111111";
		        end case;
		
         when others=>ho<="00000000";vo<="11111111";
         end case;
         end process;


end frame;

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?