求助,请帮忙看一下为什么总是运行不了,谢谢

2019-07-16 02:28发布

请各位帮忙看一下这两个并串转换的小程序,为什么总是运行不了,谢谢

第一个:
LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
use ieee.std_logic_unsigned.all; --并串转换
ENtiTY bingchuan IS
PORT (RESET :IN STD_LOGIC;
CLK : IN STD_LOGIC;
DIN : IN STD_LOGIC_VECTOR(7 DOWNTO 0) ;
DOUT :OUT STD_LOGIC
);
END bingchuan ;

architecture bhv of bingchuan is

SIGNAL COUNT : STD_LOGIC_VECTOR(2 DOWNTO 0);
SIGNAL DAOUT : STD_LOGIC ;
BEGIN
PROCESS (CLK,COUNT,RESET)
BEGIN
IF RESET='1' THEN COUNT <= "000";

ELSIF COUNT="111" THEN
COUNT<="000";
ELSE COUNT<=COUNT+1;
END IF;

END PROCESS;
PROCESS(CLK,COUNT,RESET)
BEGIN
IF RESET='1' THEN COUNT<="000";
ELSIF CLK'EVENT AND CLK='1' THEN
CASE COUNT IS
WHEN "000"=>

DAOUT <=DIN(7);
WHEN "001"=>
DAOUT <=DIN(6);
WHEN "010"=>
DAOUT <=DIN(5);
WHEN "011"=>
DAOUT <=DIN(4);
WHEN "100"=>
DAOUT <=DIN(3);
WHEN "101"=>
DAOUT <=DIN(2);
WHEN "110"=>
DAOUT <=DIN(1);
WHEN "111"=>
DAOUT <=DIN(0);
END CASE ;
end IF;

END PROCESS ;
DOUT <= DAOUT ;
END bhv ;

第二个:
library ieee;
use ieee.Std_Logic_1164.all;

entity bch is
port
(
rst,clk : in Std_Logic;
ser : in Std_Logic_Vector (7 downto 0 );
par : out Std_Logic
);
end bch;

architecture bhv of bch is
variable i : integer range 0 to 7;
signal count:std_logic;
begin
process(clk,rst)
begin
if rst='1' then i:='0';
elsif clk 'event and clk='1' then
if i='7' then i:='0';
else i:=i+'1';
end if;
end if;
end process;
process(clk ,i,rst)
begin
if rst='1' then i:='0';
elsif clk 'event and clk<='1' then

case count is
when '0' =>
count<=per(0);
when '1' =>
count<=per(1);
when '2' =>
count<=per(2);
when '3' =>
count<=per(3);
when '4' =>
count<=per(4);
when '5' =>
count<=per(5);
when '6' =>
count<=per(6);
when '7' =>
count<=per(7);
when others=>i<='0';
end case;
end if;
end process;
ser<=count;

end bhv;
友情提示: 此问题已得到解决,问题已经关闭,关闭后问题禁止继续编辑,回答。
该问题目前已经被作者或者管理员关闭, 无法添加新回复
3条回答
叶思绪
1楼-- · 2019-07-16 06:29
运行不了是什么意思?

输出结果不对?
applezen
2楼-- · 2019-07-16 10:47
LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
use ieee.std_logic_unsigned.all; --并串转换
ENTITY bingchuan IS
        PORT (
                        RESET :IN STD_LOGIC;
                        CLK : IN STD_LOGIC;
                        DIN : IN STD_LOGIC_VECTOR(7 DOWNTO 0) ;
                        DOUT :OUT STD_LOGIC
                        );
END bingchuan ;

architecture bhv of bingchuan is
SIGNAL COUNT : STD_LOGIC_VECTOR(2 DOWNTO 0);
SIGNAL DAOUT : STD_LOGIC ;

BEGIN
        PROCESS (CLK,COUNT,RESET)                                //didn't use clk
                BEGIN
                        IF RESET='1' THEN COUNT <= "000";
                        ELSIF COUNT="111" THEN COUNT<="000";
                        ELSE COUNT<=COUNT+1;
                        END IF;
        END PROCESS;
       
        PROCESS(CLK,COUNT,RESET)
                BEGIN
                        IF RESET='1' THEN COUNT<="000";
                        ELSIF CLK'EVENT AND CLK='1' THEN
                        CASE COUNT IS
                                WHEN "000"=> DAOUT <=DIN(7);
                                WHEN "001"=> DAOUT <=DIN(6);
                                WHEN "010"=> DAOUT <=DIN(5);
                                WHEN "011"=> DAOUT <=DIN(4);
                                WHEN "100"=> DAOUT <=DIN(3);
                                WHEN "101"=> DAOUT <=DIN(2);
                                WHEN "110"=> DAOUT <=DIN(1);
                                WHEN "111"=> DAOUT <=DIN(0);
                        END CASE ;
                        end IF;
        END PROCESS ;
        DOUT <= DAOUT ;
END bhv ;

/************************第二个************************/
library ieee;
use ieee.Std_Logic_1164.all;

entity bch is
        port
                (
                        rst,clk : in Std_Logic;
                        ser : in Std_Logic_Vector (7 downto 0 );
                        par : out Std_Logic
                );
end bch;

architecture bhv of bch is
variable i : integer range 0 to 7;
signal count:std_logic;

begin
        process(clk,rst)
                        begin
                        if rst='1' then i:='0';
                        elsif clk 'event and clk='1' then
                                if i='7' then i:='0';
                                else i:=i+'1';                //i:= ??
                                end if;
                        end if;
        end process;
       
        process(clk ,i,rst)
                begin
                        if rst='1' then i:='0';
                        elsif clk 'event and clk <='1' then
                                case count is
                                        when '0' =>count<=per(0);
                                        when '1' =>count<=per(1);
                                        when '2' =>count<=per(2);
                                        when '3' =>count<=per(3);
                                        when '4' =>count<=per(4);
                                        when '5' =>count<=per(5);
                                        when '6' =>count<=per(6);
                                        when '7' =>count<=per(7);
                                        when others=>i<='0';
                                end case;
                        end if;
                end process;
        ser<=count;
end bhv;
菩提wei
3楼-- · 2019-07-16 15:49
       process(clk ,i,rst)
                begin
                        if rst='1' then i:='0';
                        elsif clk 'event and clk <='1' then
                                case i is
                                        when '0' =>count<=per(0);
                                        when '1' =>count<=per(1);
                                        when '2' =>count<=per(2);
                                        when '3' =>count<=per(3);
                                        when '4' =>count<=per(4);
                                        when '5' =>count<=per(5);
                                        when '6' =>count<=per(6);
                                        when '7' =>count<=per(7);
                                        when others=>count<='0';
                                end case;
                        end if;
                end process;

一周热门 更多>