--------------------------------------------------------------------------------
-- Company: 
-- Engineer:
--
-- Create Date:    13:42:03 10/29/05
-- Design Name:    
-- Module Name:    piso - Behavioral
-- Project Name:   
-- Target Device:  
-- Tool versions:  
-- Description:
--
-- Dependencies:
-- 
-- Revision:
-- Revision 0.01 - File Created
-- Additional Comments:
-- 
--------------------------------------------------------------------------------
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;

---- Uncomment the following library declaration if instantiating
---- any Xilinx primitives in this code.
--library UNISIM;
--use UNISIM.VComponents.all;

entity piso is
	 Generic (N    : integer := 8);
    Port ( rst : in std_logic;
           clk : in std_logic;
           ce : in std_logic;
           load_en : in std_logic;
           d_in : in std_logic_vector(N-1 downto 0);
           d_out : out std_logic);
end piso;

architecture Behavioral of piso is

signal reg        : std_logic_vector(N-1 downto 0);

begin

process (rst, clk, ce, reg, load_en, d_in)
begin
   if rst ='1' then 
      reg <= (others => '0'); 
   elsif load_en = '1' then 
      reg <= d_in; 
   elsif clk'event and clk='1' then  
      if ce = '1' then 
         reg <= '0' & reg((N-1) downto 1);
      end if; 
   end if;
   d_out <= reg(0);
end process;

end Behavioral;