Lámpara de agua basada en vhdl

Un principio experimental
El experimento de la lámpara de agua corriente consiste en generar un pulso con un período de 20ms a través del botón de control, que se utiliza para la frecuencia del agua corriente. Luego, a través del circuito de decodificación para controlar la función de la tubería.

Dos módulos experimentales
El experimento tiene dos módulos, el módulo de circuito de frecuencia de la tubería y el módulo de control LED.
Módulo de control de frecuencia de tubería Módulo de control

LED

Tres
retardo de implementación de código vhdl

LIBRARY IEEE;
USE IEEE.std_logic_1164.ALL;
USE ieee.std_logic_unsigned.all;

ENTITY delay IS
PORT (CLK,RST: IN std_logic;
PUL: OUT std_logic
);
END delay;

ARCHITECTURE behav OF delay IS
SIGNAL cnt:std_logic_vector(23 DOWNTO 0);

BEGIN

PROCESS(CLK,RST)
BEGIN
  if(RST='0') then
   cnt<="000000000000000000000000";
  elsif(CLK'event and CLK='1') then
    if(cnt="100110001001011001111111") then
       cnt<="100110001001011001111111";
       PUL<='0';
      else cnt<=cnt+'1';
           PUL<='1';
     end if;
   end if;
end process;
end behav;

ligero

USE IEEE.std_logic_1164.ALL;
USE ieee.std_logic_unsigned.all;

ENTITY light IS
PORT (PUL,RST: IN std_logic;
LED: OUT std_logic_vector(5 downto 0)
);
END light;

ARCHITECTURE behav OF light IS
SIGNAL i:std_logic_vector(2 DOWNTO 0);

BEGIN

PROCESS(PUL,RST)
BEGIN
  if(RST='0') then
   LED<="000000";
   i<="000";
  elsif(PUL'event and PUL='1') then
    if(i=5) then
       i<="000";
      else 
           i<=i+'1';
     end if;
   case i is
      when "000"=>LED<="111110";
      when "001"=>LED<="111101";
      when "010"=>LED<="111011";
      when "011"=>LED<="110111";
      when "100"=>LED<="101111";
      when others=>LED<="011111";
      end case;
  end if;
 end process;
end behav;

Diagrama de circuito completo de cuatro máquinas

Cinco resultados de simulación