Resetas: process begin
        R <= '1'; -- reset signalas
        wait for 20 ns;
        R <= '0';
        wait;
end process;

Clockas: process begin
        C <= '0'; -- ciklas 5-5ns
        wait for 5 ns;
        C <= '1';
        wait for 5 ns;
end process;

Reiksmes: process begin
        D0 <= '0'; D1 <= '1'; D2 <= '1'; D3 <= '0';
        wait;
end process;

Signalas: process begin
        L <= '1';
        wait for 40 ns;
        L <= '0';
        wait for 180 ns;
        L <= '1';
        wait for 20 ns;
        L <= '0';
        wait;
end process;