移位寄存器的VHDL描述

1、本文格式为Word版，下载可任意编辑移位寄存器的VHDL描述 8位移位寄存器 LIBRARY ieee; USE ieee.std_logic_1164.all; ENTITY shifter IS PORT ( data_in: IN STD_LOGIC_VECTOR(7 DOWNTO 0);-输入的数据 n: IN STD_LOGIC_VECTOR(2 DOWNTO 0);-移位的数量 dir: IN STD_LOGIC-移动的方向 0:左 1:右 kind: IN STD_LOGIC_VECTOR(1 DOWNTO 0)；-移动类型 00:算术移 01:规律移 10:循环移 clock:

2、 IN BIT；-手动时钟PULSE data_out: OUT STD_LOGIC_VECTOR(7 DOWNTO 0)-移位的结果 ); END shifter;ARCHITECTURE behav of shifter IS BEGIN PROCESS (data_in, n, dir, kind) VARIABLE x,y : STD_LOGIC_VECTOR(7 DOWNTO 0); VARIABLE ctrl0,ctrl1,ctrl2 : STD_LOGIC_VECTOR (3 DOWNTO 0); BEGIN IF (clock'EVENT AND clock = 

3、9;1')THEN-产生掌握向量ctrl ctrl0 := n(0) dir kind(1) kind(0); ctrl1 := n(1) dir kind(1) kind(0); ctrl2 := n(2) dir kind(1) kind(0); ctrl2 := n(2) dir kind(1) kind(0); CASE ctrl0 IS WHEN "0000" | "0001" | "0010" | "0100" | "0101" | "0110" = x

4、:= data_in; -n=0时不移动 WHEN "1000" = x := data_in(6 DOWNTO 0) data_in(0);-算术左移1位 WHEN "1001" = x := data_in(6 DOWNTO 0) '0'-规律左移1位 WHEN "1010" = x := data_in(6 DOWNTO 0) data_in(7); -循环左移1位 WHEN "1100" = x := data_in(7) data_in(7 DOWNTO 1);-算术右移1位 WHEN &

5、quot;1101" = x := '0' data_in(7 DOWNTO 1);-规律右移1位 WHEN "1110" = x := data_in(0) data_in(7 DOWNTO 1);-循环右移1位 WHEN others = null; END CASE; CASE ctrl1 IS WHEN "0000" | "0001" | "0010" | "0100" | "0101" | "0110" = y := x

6、; -n=0时不移动 WHEN "1000" = y := x(5 DOWNTO 0) x(0) x(0);-算术左移2位 WHEN "1001" = y := x(5 DOWNTO 0) "00"-规律左移2位 WHEN "1010" = y := x(5 DOWNTO 0) x(7 DOWNTO 6);-循环左移2位 WHEN "1100" = y := x(7) x(7) x(7 DOWNTO 2);-算术右移2位 WHEN "1101" = y := "00

7、" x(7 DOWNTO 2);-规律右移2位 WHEN "1110" = y := x(1 DOWNTO 0) x(7 DOWNTO 2);-循环右移2位 WHEN others = null; END CASE;CASE ctrl2 IS WHEN "0000" | "0001" | "0010" | "0100" | "0101" | "0110" = data_out = y; -n=0时不移动 WHEN "1000"

8、 = data_out = y(3 DOWNTO 0) y(0) y(0) y(0) y(0); -算术左移4位 WHEN "1001" = data_out = y(3 DOWNTO 0) "0000" -规律左移4位 WHEN "1010" | "1110" = data_out = y(3 DOWNTO 0) y(7 DOWNTO 4);-循环左(右)移4位 WHEN "1100" = data_out = y(7) y(7) y(7) y(7) y(7 DOWNTO 4);-算术右移4位 WHEN "1101"