32 lines
847 B
VHDL
32 lines
847 B
VHDL
|
library IEEE;
|
||
|
|
use IEEE.STD_LOGIC_1164.all;
|
||
|
|
use IEEE.NUMERIC_STD.all;
|
||
|
|
|
||
|
|
entity FreqDivider is
|
||
|
|
port (clkIn : in std_logic;
|
||
|
|
k : in std_logic_vector(31 downto 0);
|
||
|
|
clkOut : out std_logic
|
||
|
|
);
|
||
|
|
end FreqDivider;
|
||
|
|
|
||
|
|
architecture Behavioral of FreqDivider is
|
||
|
|
signal s_counter : unsigned(31 downto 0);
|
||
|
|
signal s_halfWay : unsigned(31 downto 0);
|
||
|
|
begin
|
||
|
|
s_halfWay <= unsigned(k);
|
||
|
|
|
||
|
|
process(clkIn)
|
||
|
|
begin
|
||
|
|
if (rising_edge(clkIn)) then
|
||
|
|
if (s_counter = s_halfWay - 1) then
|
||
|
|
clkOut <= '0';
|
||
|
|
s_counter <= (others => '0');
|
||
|
|
else
|
||
|
|
if (s_counter = s_halfWay/2 - 1) then
|
||
|
|
clkOut <= '1';
|
||
|
|
end if;
|
||
|
|
s_counter <= s_counter + 1;
|
||
|
|
end if;
|
||
|
|
end if;
|
||
|
|
end process;
|
||
|
|
end Behavioral;
|