--************************************************--
--**      Registr pro mikroprocesou Hazard      **--
--**   Autor: Leos Marsalek    (c) 2002-2003    **--
--**     E-mail: Leos.Marsalek@tiscali.cz       **--
--**      Spolupracovali : Lukas Vaculík,       **--
--**              Miroslav Copian               **--
--************************************************--
 
library IEEE;
use IEEE.std_logic_1164.all;

entity registr16 is                  -- entita pro register
Port(Ain STD_LOGIC_vector (15 downto 0);bout STD_LOGIC_vector (15 downto 0):="0000000000000000";
clk,Enable:in STD_LOGIC);
end  registr16;   


architecture me of registr16 is     -- vlastni architektura entity
signal C:STD_logic_vector (15 downto 0);
begin
registr
:process (clk,enable,A)     -- proces se vykona pri zmene clk, enable,A
begin    
    if enable
='1' then             -- povoleni zapisu do registru
        c<=A;
    end if;  
    if rising_edge(clkand enable='1'  then     -- zapis uchovane informace na out
         B<=C;
    end if;
end process
end;