v6_12.vhd

台湾全华科技VHDL教材实例

library ieee;
use ieee.std_logic_1164.all;

entity loop2 is
 port(Din		: in  std_logic_vector(7 downto 0);
     Dout	: out std_logic_vector(7 downto 0);
     Reset  : in  std_logic;     
     Clk    : in  std_logic);
end loop2;

architecture a_loop2 of loop2 is 

begin

	process(Reset,Clk)
	begin
		if Reset = '0' then
			Dout <= "00000000";
		elsif Clk = '1' and Clk'event then
			Dout(7) <= Din(0);
			for i in 0 to 6 loop
				Dout(i) <= Din(i + 1);
			end loop;
		end if;
	end process;
	
end a_loop2;