方波,三角波锯齿波产生程序

ibrary ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity fangbo isport(clk,reset:in std_logic;q:out std_logic_vector(7 downto 0)); end;architecture behave of fangbo issignal a:std_logic;beginprocess(clk,reset)variable tmp:std_logic_vector(7 downto 0); begin if reset='0' then a<='0';elsif clk'event and clk='1' thenif tmp="11111111" thentmp:="00000000";elsetmp:=tmp+1;end if;if tmp<="10000000" thena<='1';else a<='0';end if;end if;end process;process(clk,a)beginif clk'event and clk='1' thenif a='1' thenq<="11111111";else q<="00000000";end if;end if;end process;end;三脚脖library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity sanjiaobo isport(reset:in std_logic;clk:in std_logic;q:out std_logic_vector(7 downto 0));architecture behave of sanjiaobo isbeginprocess(clk,reset)variable tmp:std_logic_vector(7 downto 0);variable a:std_logic;beginif reset='0' then q<="00000000";elsif clk'event and clk='1' thenif a='0' thenif tmp="11111110" thentmp:="11111111";a:='1';else tmp:=tmp+1;end if;elseif tmp="00000001" then tmp:="00000000";a:='0';else tmp:=tmp-1;end if;end if;end if;q<=tmp;end process;end;正选library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity Zhengxuanbo isport(clk,reset:in std_logic;d:out integer range 0 to 255);end;architecture behave of Zhengxuanbo isbeginprocess(clk,reset)variable tmp:integer range 0 to 63;beginif reset='0' thend<=0;elsif clk'event and clk='1' thenif tmp=63 thentmp:=0;elsetmp:=tmp+1;end if;case tmp iswhen 00=>d<=255; when 01=>d<=254; when02=>d<=252;when 03=>d<=249; when 04=>d<=245; when05=>d<=239;when 06=>d<=233; when 07=>d<=225; when08=>d<=217;when 09=>d<=207; when 10=>d<=197; when 11=>d<=186;when 12=>d<=174; when 13=>d<=162; when14=>d<=150;when 15=>d<=137; when 16=>d<=124; when17=>d<=112;when 18=>d<=99; when 19=>d<=87; when20=>d<=75;when 21=>d<=64; when 22=>d<=53; when23=>d<=43;when 24=>d<=34; when 25=>d<=26; when26=>d<=19;when 27=>d<=13; when 28=>d<=8; when29=>d<=4;when 30=>d<=1; when 31=>d<=0; when32=>d<=0;when 33=>d<=1; when 34=>d<=4; when35=>d<=8;when 36=>d<=13; when 37=>d<=19; when38=>d<=26;when 39=>d<=34; when 40=>d<=43; when41=>d<=53;when 42=>d<=64; when 43=>d<=75; when 44=>d<=87;when 45=>d<=99; when 46=>d<=112; when47=>d<=124;when 48=>d<=137; when 49=>d<=150; when50=>d<=162;when 51=>d<=174; when 52=>d<=186; when53=>d<=197;when 54=>d<=207; when 55=>d<=217; when56=>d<=225;when 57=>d<=233; when 58=>d<=239; when59=>d<=245;when 60=>d<=249; when 61=>d<=252; when62=>d<=254;when 63=>d<=255; when others=>null;end case;end if;end process;end;选择其LIBRARY IEEE;USE IEEE.STD_LOGIC_1164.ALL;USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY Xuanzeqi ISPORT ( sel: in std_logic_vector(1 downto 0); d1,d2,d3,d4:in std_logic_vector(7 downto 0); q:out std_logic_vector(7 downto 0)); END;ARCHITECTURE behave OF Xuanzeqi is BEGINPROCESS(sel)BEGINCASE sel ISWHEN "00"=>q<=d1; --三角波WHEN "01"=>q<=d2; --方波WHEN "10"=>q<=d3; --正弦波WHEN "11"=>q<=d4;WHEN OTHERS=>null;END CASE;END PROCESS;END;分频library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity fenpin isport(clk:in std_logic;d:in std_logic_vector(7 downto 0);fout:out std_logic);end;architecture one of fenpin issignal full:std_logic;beginp_reg:process(clk)variable cnt8:std_logic_vector(7 downto 0); beginif clk'event and clk='1' thenif cnt8="11111111" thencnt8:=d; full<='1';else cnt8:=cnt8+1; full<='0';end if;end if;end process p_reg;p_div:process(full)variable cnt2:std_logic;beginif full'event and full='1' thencnt2:=not cnt2;if cnt2='1' then fout<='1';else fout<='0';end if;end if;end process p_div;end;00000library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_arith.all;use ieee.std_logic_unsigned.all;entity sintra isport(clk,reset:in std_logic;k:in integer range 15 downto 0;d:out integer range 255 downto 0);end sintra;architecture dacc of sintra issignal q: integer range 63 downto 0;beginprocess(clk)beginif (clk'event and clk='1') thenq<=q+k;end if;end process;process(q)begincase q iswhen 00=>d<=255;when 01=>d<=247;when 02=>d<=239;when 03=>d<=231;when 04=>d<=223;when 05=>d<=215;when 06=>d<=207;when 08=>d<=191; when 09=>d<=183; when 10=>d<=175; when 11=>d<=167; when 12=>d<=159; when 13=>d<=151; when 14=>d<=143; when 15=>d<=135; when 16=>d<=128; when 17=>d<=115; when 18=>d<=103; when 19=>d<=90; when 20=>d<=79; when 21=>d<=67; when 22=>d<=57; when 23=>d<=47; when 24=>d<=37; when 25=>d<=29; when 26=>d<=21; when 27=>d<=15; when 28=>d<=10; when 29=>d<=5; when 30=>d<=2; when 31=>d<=1; when 32=>d<=0; when 33=>d<=1; when 34=>d<=2; when 35=>d<=5; when 36=>d<=10; when 37=>d<=15; when 38=>d<=21; when 39=>d<=29; when 40=>d<=37; when 41=>d<=47; when 42=>d<=57; when 43=>d<=67; when 44=>d<=79; when 45=>d<=90; when 46=>d<=103; when 47=>d<=115; when 48=>d<=127; when 49=>d<=135; when 50=>d<=143;when 52=>d<=159;when 53=>d<=167;when 54=>d<=175;when 55=>d<=183;when 56=>d<=191;when 57=>d<=199;when 58=>d<=207;when 59=>d<=215;when 60=>d<=223;when 61=>d<=231;when 62=>d<=239;when 63=>d<=247;when others=>null;end case;end process;end dacc;。