martaczaska

Untitled

Apr 14th, 2019
199
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.25 KB | None | 0 0
  1. --dzielnik_czt
  2.  
  3.  
  4.  
  5. library IEEE;
  6. use IEEE.STD_LOGIC_1164.ALL;
  7.  
  8. entity dzielnik_czt is
  9. port (
  10. CLK_i : in STD_LOGIC;
  11. RST_i : in STD_LOGIC;
  12. led7 : out STD_LOGIC
  13. );
  14. end dzielnik_czt;
  15.  
  16. architecture behavioral of dzielnik_czt is
  17.  
  18. constant N : integer := 50000;
  19. signal wynik: STD_LOGIC := '0';
  20. signal licz : integer range 0 to (N - 1);
  21.  
  22. begin
  23.  
  24. dzielnik_czestot: process (RST_i, CLK_i)
  25. begin
  26. if (RST_i = '1') then
  27. wynik <= '0';
  28. licz <= 0;
  29. elsif (rising_edge(CLK_i)) then
  30. licz <= licz + 1;
  31. if( N = 2) then
  32. wynik <= not(wynik);
  33. licz <= 0;
  34. elsif(licz = (N/2)) then
  35. wynik <= '1';
  36. elsif(licz = (N - 1)) then
  37. wynik <= '0';
  38. licz <= 0;
  39. end if;
  40. end if;
  41. end process dzielnik_czestot;
  42.  
  43. led7 <= wynik;
  44.  
  45. end Behavioral;
Advertisement
Add Comment
Please, Sign In to add comment