signal cp:std_logic;
signal ww:integer range 0 to 5000000;
signal cnt:integer range 0 to 59;
begin
process(clk)
begin
if clk'event and clk='1' then
ww<=ww+1;
if ww=0 then
cp<=not cp;
end if;
end if;
end process;
process(cp)
begin
if cp'event and cp='1' then
cnt<=cnt+1;
Q<=cgram(cnt);
end if;
end process;
end;
----------------------------------------------------------------------------------------------------------------------
Library ieee;
use ieee.std_logic_1164.all;
Use ieee.std_logic_unsigned.all;
entity ddd is
port(clk:in std_logic;
sec:out std_logic;
Q:out std_logic_vector(17 downto 0));
end ;
Architecture dd of ddd is
type ram2 is array(0 to 55) of std_logic_vector(19 downto 0);
constant cgram:ram2:=(
--用16进制表示数X“2f”,每个数字代表四位二进制，等于“00101111”
(X"20001"),(X"30003"),(X"38007"),(X"3c00f"),(X"3e01f"),
(X"3f03f"),(X"3f87f"),(X"3fcff"),(X"3ffff"),(X"3fcff"),
(X"3f87f"),(X"3f03f"),(X"3e01f"),(X"3c00f"),(X"38007"),
(X"30003"),(X"20001"),(X"00000"),(X"20000"),(X"10000"),
(X"08000"),(X"04000"),(X"02000"),(X"01000"),(X"00800"),
(X"00400"),(X"00200"),(X"00100"),(X"00080"),(X"00040"),
(X"00020"),(X"00010"),(X"00008"),(X"00004"),(X"00002"),
(X"00001"),(X"00000"),(X"00001"),(X"00002"),(X"00004"),
(X"00008"),(X"00010"),(X"00020"),(X"00040"),(X"00080"),
(X"00100"),(X"00200"),(X"00400"),(X"00800"),(X"01000"),
(X"02000"),(X"04000"),(X"08000"),(X"10000"),(X"20000"),
(X"00000")
);
type ram1 is array(0 to 5) of std_logic_vector(5 downto 0);
constant dat:ram1:=(
--用8进制表示数O“235”,每个数字代表三位二进制数，等于“010 011 101“
(o"01"),(o"02"),(O"04"),(o"10"),(o"20"),(o"40")
);
signal cp:std_logic;
signal ww:integer range 0 to 1000000;
signal cnt:integer range 0 to 55;
begin
process(clk)
begin
if clk'event and clk='1' then
ww<=ww+1;
if ww=0 then
cp<=not cp;
end if;
end if;
end process;
process(cp)
begin
if cp'event and cp='1' then
cnt<=cnt+1;
Q<=cgram(cnt)(17 downto 0);
end if;
end process;
end;