?? shumaer.vhd
字號:
LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
ENTITY shumaer IS
PORT ( CLK : IN STD_LOGIC;
cat : OUT STD_LOGIC_VECTOR(5 DOWNTO 0);
yout : out STD_LOGIC_VECTOR(9 downto 0));
END shumaer;
ARCHITECTURE code of shumaer IS
SIGNAL con : STD_LOGIC_VECTOR(5 DOWNTO 0);
SIGNAL o : STD_LOGIC_VECTOR(9 DOWNTO 0);
BEGIN
p1:PROCESS(CLK)
BEGIN
if(CLK 'event and CLK='1') then
CASE con IS
when "111110"=>con<="111101";
when "111101"=>con<="111011";
when "111011"=>con<="110111";
when "110111"=>con<="101111";
when "101111"=>con<="011111";
when "011111"=>con<="111110";
when "111110"=>con<="111101";
when "111101"=>con<="111011";
when "111011"=>con<="110111";
when "110111"=>con<="101111";
when "101111"=>con<="111111";
when others=>con<="111110";
END CASE;
end if;
END PROCESS p1;
p2:PROCESS(CLK)
BEGIN
if(CLK 'event and CLK='1') then
case o is
when "0001111110" =>o <= "0000110000";
when "0000110000" =>o <= "0001101101";
when "0001101101" =>o <= "0001111001";
when "0001111001" =>o <= "0000110011";
when "0000110011" =>o <= "0001011011";
when "0001011011" =>o <= "0010110000";
when "0010110000" =>o <= "0011101101";
when "0011101101" =>o <= "0011111001";
when "0011111001" =>o <= "0010110011";
when "0010110011" =>o <= "0011011011";
when "0011011011" =>o <= "0000000000";
when "0000000000" =>o <= "0101101101";
when "0101101101" =>o <= "0101111001";
when "0101111001" =>o <= "0100110011";
when "0100110011" =>o <= "0101011011";
when "0101011011" =>o <= "0101111110";
when "0101111110" =>o <= "0100110000";
when "0100110000" =>o <= "0111111001";
when "0111111001" =>o <= "0110110011";
when "0110110011" =>o <= "0111011011";
when "0111011011" =>o <= "0111111110";
when "0111111110" =>o <= "0110110000";
when "0110110000" =>o <= "0111101101";
when "0111101101" =>o <= "1000110011";
when "1000110011" =>o <= "1001011011";
when "1001011011" =>o <= "1001111110";
when "1001111110" =>o <= "1000110000";
when "1000110000" =>o <= "1001101101";
when "1001101101" =>o <= "1001111001";
when "1001111001" =>o <= "1011011011";
when "1011011011" =>o <= "1011111110";
when "1011111110" =>o <= "1010110000";
when "1010110000" =>o <= "1011101101";
when "1011101101" =>o <= "1011111001";
when "1011111001" =>o <= "1010110011";
when others=>o<="0001111110";
end case;
end if;
end process p2;
cat<=con;
yout<=o;
end code;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -