要怎么改才能使得下面的程式能繼續讀取，使得彩燈花樣發生變化？
USE IEEE.std_logic_1164.ALL;
ENTITY XIANSHI IS
PORT(CLKOUT:IN STD_LOGIC;CLR :IN STD_LOGIC;
LED :OUT STD_LOGIC_VECTOR(7 DOWNTO 0));
END entity XIANSHI;
ARCHITECTURE ART OF XIANSHI IS
TYPE STATES IS(S0,S1,S2,S3);
SIGNAL STATE:STATES;
SIGNAL LIGHT: STD_LOGIC_VECTOR(7 DOWNTO 0);
BEGIN PROCESS(CLR,CLKOUT)
BEGIN IF CLR='1' THEN
STATE<=S0;
LIGHT<="00000000";
ELSIF(CLKOUT'EVENT AND CLKOUT='1') THEN
CASE STATE IS
WHEN S0=>
STATE<=S1;
WHEN S1=>
STATE<=S2;
LIGHT<="10000001";
LIGHT<="01000010";
LIGHT<="00100100";
LIGHT<="00011000";
LIGHT<="00100100";
LIGHT<="01000010";
WHEN S2=>
STATE<=S3;
LIGHT<="00000000";
LIGHT<="10000000";
LIGHT<="11000000";
LIGHT<="11100000";
LIGHT<="11110000";
LIGHT<="11111000";
LIGHT<="11111100";
LIGHT<="11111110";
LIGHT<="11111111";
LIGHT<="01111111";
LIGHT<="00111111";
LIGHT<="00011111";
LIGHT<="00001111";
LIGHT<="00000111";
LIGHT<="00000011";
LIGHT<="00000001";
WHEN S3=>
STATE<=S1;
LIGHT<="10000000";
LIGHT<="01000000";
LIGHT<="00100000";
LIGHT<="00010000";
LIGHT<="00001000";
LIGHT<="00000100";
LIGHT<="00000010";
LIGHT<="00000001";
LIGHT<="00000010";
LIGHT<="00000100";
LIGHT<="00001000";
LIGHT<="00010000";
LIGHT<="00100000";
LIGHT<="01000000";
END CASE;
END IF;
END PROCESS;
LED <=LIGHT;
END ARCHITECTURE ART;
轉載請註明出處，本文鏈接：https://www.uj5u.com/qita/135978.html
標籤：其他技術討論專區
上一篇：第一次來這個大佬聚集的地方，領域不一樣，我就吃吃瓜！
下一篇：電腦藍屏求助