Question

我写了一个代码，这是一个Ram。它在模拟中效果很好，但是当我在Altera DE-0板上试用它时，它将无法正常工作。我使用8个开关作为“data_i”，1个开关作为“New_data”，8个LED作为“data_o”，2个LED作为“错误”，3个按钮作为“重置”，“开始”，“发送_End”。

如果我尝试发送3个数据，Error_2会变高，这意味着内存已满。或者有时它会变高，当第二个甚至第一个“New_Data”信号变高时。

如果我尝试发送2个数据，当我按下“开始”按钮时，我可以看到第一个数据。然后我按下“Send_End”按钮查看第二个，但没有任何反应。

我错过了什么？

library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.NUMERIC_STD.all;
-------------------------------------------------------------------------------
Entity Ram1 is
Port(
Clk : in std_logic;
Reset : in std_logic;
Start : in std_logic;
Send_End : in std_logic;
New_Data : in std_logic; 
Error_1 : out std_logic; -- "System is busy" warning.
Error_2 : out std_logic; -- "Memory is full" error.
data_i : in std_logic_vector(7 downto 0);
data_o : out std_logic_vector(7 downto 0)
);
END Ram1;
-------------------------------------------------------------------------------
Architecture Ram1_a of Ram1 is
-------------------------------------------------------------------------------
Type Ram_t is Array (0 to 10) of std_logic_vector(7 downto 0);
Signal Ram : Ram_t := (others => (others => '0'));
Signal address_i, address_o : integer range 0 to 10:=0; 
Signal Enable_Send_s : std_logic:='0'; -- Also Busy signal
Signal Enable_Receive_s : std_logic:='1'; 
Signal Send_Completed_s : std_logic:='0';
Signal Error_1_s, Error_2_s : std_logic:='0';
Signal new_data_ff_s, send_end_ff_s, enable_send_ff_s : std_logic:='0';
-------------------------------------------------------------------------------
BEGIN
-------------------------------------------------------------------------------
PROCESS(Clk, Send_Completed_s, Enable_Receive_s, Error_2_s, Reset) -- Receiving, Error_2_s 
BEGIN
    IF(Reset='0')Then
        address_i<=0;
        Error_2_s<='0';
        Ram<=(others => (others => '0'));
    ELSIF(Send_Completed_s='1')Then -- Getting ready for next receiving
        address_i<=0;
        Ram<=(others => (others => '0'));
    ELSIF(Enable_Receive_s='1')Then
        IF(Rising_edge(Clk))Then            
            IF(new_data='1' and new_data_ff_s='0')Then
                ram(address_i)<=data_i;
                    IF(address_i=10)Then
                        Error_2_s<='1'; -- Memory is full.
                    ELSE
                        address_i<=address_i+1;
                    END IF;
            END IF;
        END IF;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Send_Completed_s, Enable_Send_s, Reset) -- Sending  
BEGIN
    IF(Reset='0')Then
        data_o<="00000000";
        address_o<=0;
    ELSIF(Send_Completed_s='0')Then
        IF(Enable_Send_s='1')Then           
            IF(Rising_edge(Clk))Then    
                IF(Enable_Send_s='1' and Enable_send_ff_s='0')Then
                    data_o<=ram(0); -- Send the first data immediately.
                    address_o<=address_o+1;
                ELSIF(Send_End='0' and send_end_ff_s='0')Then -- send the next one.
                    data_o<=ram(address_o);     
                    address_o<=address_o+1;             
                END IF; 
            END IF;
        END IF;
    ELSIF(Send_Completed_s='1')Then
        address_o<=0;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Reset) -- Enable_Receive_s, Error_1_s
BEGIN -- Busy Error, Data is being sent
    IF(Reset='0')Then
        Error_1_s<='0';
        Enable_Receive_s<='1';
    ELSIF(Rising_edge(Clk))Then
        IF(Enable_Send_s='1')Then   
            Enable_Receive_s<='0'; -- Don't want to receive a new data while sending.
                IF(New_Data='1')Then -- System is busy (Sending) Warning. 
                    Error_1_s<='1';
                ELSE
                    Error_1_s<='0';
                END IF;
        ELSE            
        Enable_Receive_s<='1';
        END IF;

        IF(Error_2_s='1')Then -- If the memory is full, disable receiving.
            Enable_Receive_s<='0';
        ELSE
            Enable_Receive_s<='1';
        END IF;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Start, Reset) -- Enable_Send_s, Send_Completed_s
BEGIN
    IF(Reset='0')Then
        Enable_Send_s<='0';
        Send_Completed_s<='0';
    ELSIF(Rising_edge(Clk))Then
        IF(Error_2_s='1')Then -- If the memory is full, disable sending.
            Enable_Send_s<='0';
        ELSIF(Start='0')Then
            Enable_Send_s<='1';
        ELSIF(Send_Completed_s='1')Then
            Enable_Send_s<='0';
        END IF;

        IF(address_o>0)Then
            IF(address_o=address_i)Then -- When all the data are sent
                Send_Completed_s<='1';
            END IF;

        ELSIF(address_o=0)Then
            Send_Completed_s<='0';
        END IF;     
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Reset) -- New_Data Flip Flop
BEGIN
    IF(Reset='0')Then
        new_data_ff_s<='0';
    ELSIF(Rising_edge(Clk))Then
        new_data_ff_s<=New_Data;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Reset) -- Send_End Flip Flop
BEGIN
    IF(Reset='0')Then
        send_end_ff_s<='0';
    ELSIF(Rising_edge(Clk))Then
        send_end_ff_s<=send_End;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
PROCESS(Clk, Reset) -- Enable_Send_s Flip Flop
BEGIN
    IF(Reset='0')Then
        enable_send_ff_s<='0';
    ELSIF(Rising_edge(Clk))Then
        enable_send_ff_s<=enable_Send_s;
    END IF;
END PROCESS;
-------------------------------------------------------------------------------
Error_1<=Error_1_s;
Error_2<=Error_2_s;
-------------------------------------------------------------------------------
END Ram1_a;

模拟：picture

谢谢。

Answer 1

看起来你没有去掉你的按钮或＆＃34; new_data＆＃34;切换，你的症状表明＆＃34; new_data＆＃34;正在弹跳。

Vhdl代码在模拟中不起作用

1 个答案: