develop23 发表于 2012-5-16 11:06:43

哪位大哥能帮我 翻译一下这个程序吗 顺便做个仿真 我的毕业论文要用

LIBRARY IEEE;
        USE IEEE.STD_LOGIC_1164.ALL;
        ENTITYmIS
   PORT(clr,clk,load:IN STD_LOGIC;
      din:IN STD_LOGIC_VECTOR(3 downto 0);
      dout:OUT STD_LOGIC
      )
        END m;
        ARCHITECTURE bhv OF m IS
    IGNAL rfsr:STD_LOGIC_VECTOR(3 downto 0);
        SIGNAL tmp:STD_LOGIC;
        BEGIN
    ROCESS(clr,clk,load,din)
      BEGIN
      IF(clr='1') THEN
         rfsr <=(OTHERS=>'0');
      ELSIF(clk'EVENT AND clk='1') THEN                                                                                                                                                                                                                     
         IF(load='1')THEN
          rfsr<= din;
          ELSE
         dout<= rfsr(0);
       rfsr(3)<=rfsr(0)XOR rfsr(1);
       rfsr(2 downto 0)<=rfsr(3 downto 1);
      END IF;
   END IF;
   END PROCESS
    END bhv;

camp 发表于 2012-5-16 21:51:51

对于毕业论文,我一般都很纠结.......

camp 发表于 2012-5-16 21:51:54

对于毕业论文,我一般都很纠结.......

yoyo_note 发表于 2012-5-18 22:06:48

这个确实不好懂,对齐一下,仿真不难的:sleepy:
LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;

ENTITYmIS
PORT(
        clr,clk,load:INSTD_LOGIC;
        din                        :INSTD_LOGIC_VECTOR(3 downto 0);
    dout                :OUT STD_LOGIC
)
END m;
ARCHITECTURE bhv OF m IS
        SIGNAL rfsr:STD_LOGIC_VECTOR(3 downto 0);
--        SIGNAL tmp:STD_LOGIC;

        BEGIN ROCESS(clr,clk,load,din) BEGIN
                IF(clr='1') THEN
            rfsr <=(OTHERS=>'0');
         ELSIF(clk'EVENT AND clk='1') THEN                                                                                                                                                                                  IF(load='1')THEN
                     rfsr<= din;
             ELSE
                          rfsr(3)         <=rfsr(0)XOR rfsr(1);
                          rfsr(2 downto 0)<=rfsr(3 downto 1);

                                dout<= rfsr(0);
                 END IF;
      END IF;
        END PROCESS

END bhv;

yoyo_note 发表于 2012-5-18 22:07:37

还是有点偏,:(
页: [1]
查看完整版本: 哪位大哥能帮我 翻译一下这个程序吗 顺便做个仿真 我的毕业论文要用