xianshi.vhd

自己 写的课程设计

library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_unsigned.all; 
entity xianshi is
port(BIN:IN integer range 0 to 255;
seg1:out std_logic_vector(6 downto 0);
seg2:out std_logic_vector(6 downto 0);
 getdata:buffer std_logic_vector(7 downto 0));

end xianshi; 
architecture behav of xianshi is
begin
getdata<="00000000" WHEN BIN = 0 ELSE
"00000001" WHEN BIN = 1 ELSE
"00000010" WHEN BIN = 2 ELSE
"00000011" WHEN BIN = 3 ELSE
"00000100" WHEN BIN = 4 ELSE
"00000101" WHEN BIN = 5 ELSE
"00000110" WHEN BIN = 6 ELSE
"00000111" WHEN BIN = 7 ELSE
"00001000" WHEN BIN = 8 ELSE
"00001001" WHEN BIN = 9 ELSE
"00010000" WHEN BIN = 10 ELSE
"00010001" WHEN BIN = 11 ELSE
"00010010" WHEN BIN = 12 ELSE
"00010011" WHEN BIN = 13 ELSE
"00010100" WHEN BIN = 14 ELSE
"00010101" WHEN BIN = 15 ELSE
"00010110" WHEN BIN = 16 ELSE
"00010111" WHEN BIN = 17 ELSE
"00011000" WHEN BIN = 18 ELSE
"00011001" WHEN BIN = 19 ELSE
"00100000" WHEN BIN = 20 ELSE
"00100001" WHEN BIN = 21 ELSE
"00100010" WHEN BIN = 22 ELSE
"00100011" WHEN BIN = 23 ELSE
"00100100" WHEN BIN = 24 ELSE
"00100101" WHEN BIN = 25 ELSE
"00100110" WHEN BIN = 26 ELSE
"00100111" WHEN BIN = 27 ELSE
"00101000" WHEN BIN = 28 ELSE
"00101001" WHEN BIN = 29 ELSE
"00110000" WHEN BIN = 30 ELSE
"00110001" WHEN BIN = 31 ELSE
"00110010" WHEN BIN = 32 ELSE
"00110011" WHEN BIN = 33 ELSE
"00110100" WHEN BIN = 34 ELSE
"00110101" WHEN BIN = 35 ELSE
"00110110" WHEN BIN = 36 ELSE
"00110111" WHEN BIN = 37 ELSE
"00111000" WHEN BIN = 38 ELSE
"00111001" WHEN BIN = 39 ELSE
"01000000" WHEN BIN = 40 ELSE
"01000001" WHEN BIN = 41 ELSE
"01000010" WHEN BIN = 42 ELSE
"01000011" WHEN BIN = 43 ELSE
"01000100" WHEN BIN = 44 ELSE
"01000101" WHEN BIN = 45 ELSE
"01000110" WHEN BIN = 46 ELSE
"01000111" WHEN BIN = 47 ELSE
"01001000" WHEN BIN = 48 ELSE
"01001001" WHEN BIN = 49 ELSE
"01010000" WHEN BIN = 50 ELSE
"01010001" WHEN BIN = 51 ELSE
"01010010" WHEN BIN = 52 ELSE
"01010011" WHEN BIN = 53 ELSE
"01010100" WHEN BIN = 54 ELSE
"01010101" WHEN BIN = 55 ELSE
"01010110" WHEN BIN = 56 ELSE
"01010111" WHEN BIN = 57 ELSE
"01011000" WHEN BIN = 58 ELSE
"01011001" WHEN BIN = 59 ELSE
"01100000" WHEN BIN = 60 ELSE
"01100001" WHEN BIN = 61 ELSE
"01100010" WHEN BIN = 62 ELSE
"01100011" WHEN BIN = 63 ELSE
"01100100" WHEN BIN = 64 ELSE
"01100101" WHEN BIN = 65 ELSE
"01100110" WHEN BIN = 66 ELSE
"01100111" WHEN BIN = 67 ELSE
"01101000" WHEN BIN = 68 ELSE
"01101001" WHEN BIN = 69 ELSE
"01110000" WHEN BIN = 70 ELSE
"01110001" WHEN BIN = 71 ELSE
"01110010" WHEN BIN = 72 ELSE
"01110011" WHEN BIN = 73 ELSE
"01110100" WHEN BIN = 74 ELSE
"01110101" WHEN BIN = 75 ELSE
"01110110" WHEN BIN = 76 ELSE
"01110111" WHEN BIN = 77 ELSE
"01111000" WHEN BIN = 78 ELSE
"01111001" WHEN BIN = 79 ELSE
"10000000" WHEN BIN = 80 ELSE
"10000001" WHEN BIN = 81 ELSE
"10000010" WHEN BIN = 82 ELSE
"10000011" WHEN BIN = 83 ELSE
"10000100" WHEN BIN = 84 ELSE
"10000101" WHEN BIN = 85 ELSE
"10000110" WHEN BIN = 86 ELSE
"10000111" WHEN BIN = 87 ELSE
"10001000" WHEN BIN = 88 ELSE
"10001001" WHEN BIN = 89 ELSE
"10010000" WHEN BIN = 90 ELSE
"10010001" WHEN BIN = 91 ELSE
"10010010" WHEN BIN = 92 ELSE
"10010011" WHEN BIN = 93 ELSE
"10010100" WHEN BIN = 94 ELSE
"10010101" WHEN BIN = 95 ELSE
"10010110" WHEN BIN = 96 ELSE
"10010111" WHEN BIN = 97 ELSE
"10011000" WHEN BIN = 98 ELSE
"10011001" WHEN BIN = 99 ELSE
"00000000";

SEG1 <= "0111111" WHEN getdata(7 downto 4) = "0000" ELSE
"0000110" WHEN getdata(7 downto 4) = "0001"ELSE
"1011011" WHEN getdata(7 downto 4) = "0010" ELSE
"1001111" WHEN getdata(7 downto 4) = "0011" ELSE
"1100110" WHEN getdata(7 downto 4) = "0100" ELSE
"1101101" WHEN getdata(7 downto 4) = "0101" ELSE
"1111101" WHEN getdata(7 downto 4) = "0110" ELSE
"0000111" WHEN getdata(7 downto 4) = "0111" ELSE
"1111111" WHEN getdata(7 downto 4) = "1000" ELSE
"1101111" WHEN getdata(7 downto 4) = "1001" ELSE
"1110111" WHEN getdata(7 downto 4) = "1010" ELSE
"1111100" WHEN getdata(7 downto 4) = "1011" ELSE
"0111001" WHEN getdata(7 downto 4) = "1100" ELSE
"1011110" WHEN getdata(7 downto 4) = "1101" ELSE
"1111001" WHEN getdata(7 downto 4) = "1110" ELSE
"1110001" WHEN getdata(7 downto 4) = "1111" ELSE
"0000000";
SEG2 <= "0111111" WHEN getdata(3 downto 0) = "0000" ELSE
"0000110" WHEN getdata(3 downto 0) = "0001"ELSE
"1011011" WHEN getdata(3 downto 0) = "0010" ELSE
"1001111" WHEN getdata(3 downto 0) = "0011" ELSE
"1100110" WHEN getdata(3 downto 0) = "0100" ELSE
"1101101" WHEN getdata(3 downto 0) = "0101" ELSE
"1111101" WHEN getdata(3 downto 0) = "0110" ELSE
"0000111" WHEN getdata(3 downto 0) = "0111" ELSE
"1111111" WHEN getdata(3 downto 0) = "1000" ELSE
"1101111" WHEN getdata(3 downto 0) = "1001" ELSE
"1110111" WHEN getdata(3 downto 0) = "1010" ELSE
"1111100" WHEN getdata(3 downto 0) = "1011" ELSE
"0111001" WHEN getdata(3 downto 0) = "1100" ELSE
"1011110" WHEN getdata(3 downto 0) = "1101" ELSE
"1111001" WHEN getdata(3 downto 0) = "1110" ELSE
"1110001" WHEN getdata(3 downto 0) = "1111" ELSE
"0000000";

End behav;