fp2.vhd

很精典的一个分频程序

LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
USE IEEE.STD_LOGIC_ARITH.ALL;
USE IEEE.STD_LOGIC_UNSIGNED.ALL;
ENTITY fp2 IS
PORT(clk:IN STD_LOGIC;
 outp: out STD_LOGIC
);
END fp2;
ARCHITECTURE rtl OF fp2 IS
signal count:integer;
begin

process(clk)
begin 
	if(clk'event and clk='1') then
	if(count=9999)then
			count<=0;
	else 
	
			count<=count+1;
		if (count<5000) then
			outp<='0';
		else
			outp<='1';
		end if;
	end if;
	end if;
end process;
end rtl;