OpenCores
URL https://opencores.org/ocsvn/rise/rise/trunk

Subversion Repositories rise

[/] [rise/] [trunk/] [vhdl/] [tb_rise_uart.vhd] - Diff between revs 142 and 148

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 142 Rev 148
-- File: ex_stage.vhd
-- File: ex_stage.vhd
-- Author: Jakob Lechner, Urban Stadler, Harald Trinkl, Christian Walter
-- Author: Jakob Lechner, Urban Stadler, Harald Trinkl, Christian Walter
-- Created: 2006-11-29
-- Created: 2006-11-29
-- Last updated: 2006-11-29
-- Last updated: 2006-11-29
 
 
-- Description:
-- Description:
-- Execute stage
-- Execute stage
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
 
 
library ieee;
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_1164.all;
use ieee.std_logic_unsigned.all;
use ieee.std_logic_unsigned.all;
use ieee.numeric_std.all;
use ieee.numeric_std.all;
use work.rise_pack.all;
use work.rise_pack.all;
use work.RISE_PACK_SPECIFIC.all;
use work.RISE_PACK_SPECIFIC.all;
 
 
entity tb_rise_vhd is
entity tb_rise_vhd is
end tb_rise_vhd;
end tb_rise_vhd;
 
 
architecture behavior of tb_rise_vhd is
architecture behavior of tb_rise_vhd is
 
 
  component rise
  component rise
    port(
    port(
      clk   : in  std_logic;
      clk   : in  std_logic;
      reset : in  std_logic;
      reset : in  std_logic;
      rx    : in  std_logic;
      rx    : in  std_logic;
      tx    : out std_logic
      tx    : out std_logic
      );
      );
  end component;
  end component;
 
 
  --Inputs
  --Inputs
  signal clk   : std_logic := '0';
  signal clk   : std_logic := '0';
  signal reset : std_logic := '0';
  signal reset : std_logic := '0';
  signal rx    : std_logic := '1';
  signal rx    : std_logic := '1';
 
 
  --Outputs
  --Outputs
  signal tx : std_logic;
  signal tx : std_logic;
 
 
begin
begin
 
 
  -- Instantiate the Unit Under Test (UUT)
  -- Instantiate the Unit Under Test (UUT)
  uut : rise port map(
  uut : rise port map(
    clk   => clk,
    clk   => clk,
    reset => reset,
    reset => reset,
    rx    => rx,
    rx    => rx,
    tx    => tx
    tx    => tx
    );
    );
 
 
  clk_gen : process
  clk_gen : process
  begin
  begin
    clk <= '1';
    clk <= '1';
    wait for 10 ns;
    wait for 10 ns;
    clk <= '0';
    clk <= '0';
    wait for 10 ns;
    wait for 10 ns;
  end process;
  end process;
 
 
  tb : process
  tb : process
  begin
  begin
 
 
    wait for 5 ns;
    wait for 5 ns;
 
 
    -- Place stimulus here
    -- Place stimulus here
    reset <= '1';
    reset <= '1';
 
 
    -- Let the simulation run for 200 ns;
    -- Let the simulation run for 200 ns;
    wait for 200 ns;
    wait for 200 ns;
 
 
    rx <= '0';                          --startbit
    rx <= '0';                          --startbit
    wait for 8600 ns;                   -- zellenzeit 8,6 us
    wait for 8600 ns;                   -- zellenzeit 8,6 us
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 datenbits
    rx <= '1';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 datenbits
    rx <= '1';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 datenbits
    rx <= '1';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 stopbit
    rx <= '1';                          -- 8 stopbit
    wait for 8600ns;
    wait for 8600ns;
 
 
    wait for 20us;
    wait for 20us;
 
 
    -- send a 'CR' = 0x0A
    -- send a 'CR' = 0x0A
    rx <= '0';                          -- 8 startbit
    rx <= '0';                          -- 8 startbit
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 datenbits
    rx <= '1';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 datenbits
    rx <= '1';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '0';                          -- 8 datenbits
    rx <= '0';                          -- 8 datenbits
    wait for 8600ns;
    wait for 8600ns;
    rx <= '1';                          -- 8 stopbit
    rx <= '1';                          -- 8 stopbit
    wait for 8600ns;
    wait for 8600ns;
 
 
    wait;
    wait;
  end process;
  end process;
 
 
end;
end;
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.