148 lines
4.8 KiB
Plaintext
148 lines
4.8 KiB
Plaintext
------------------------------------------------------------
|
|
-- VHDL Testbench for TBarLedWindow
|
|
-- 2004 1 30 12 16 46
|
|
-- Created by "EditVHDL"
|
|
-- "Copyright (c) 2002 Altium Limited"
|
|
------------------------------------------------------------
|
|
|
|
Library IEEE;
|
|
Use IEEE.std_logic_1164.all;
|
|
Use IEEE.std_logic_textio.all;
|
|
Use STD.textio.all;
|
|
use ieee.std_logic_unsigned.all;
|
|
------------------------------------------------------------
|
|
|
|
------------------------------------------------------------
|
|
entity TestTBarLedWindow is
|
|
end TestTBarLedWindow;
|
|
------------------------------------------------------------
|
|
|
|
------------------------------------------------------------
|
|
architecture stimulus of TestTBarLedWindow is
|
|
file RESULTS: TEXT open WRITE_MODE is "results.txt";
|
|
procedure WRITE_RESULTS(
|
|
BACKCOLOUR: std_logic_vector(7 downto 0);
|
|
CLK: std_logic;
|
|
HASFOCUS: std_logic;
|
|
HEIGHT: std_logic_vector(15 downto 0);
|
|
ISDISPLAYED: std_logic;
|
|
LEDS: std_logic_vector(15 downto 0);
|
|
LEFT: std_logic_vector(15 downto 0);
|
|
MOUSEEVENT: std_logic_vector(7 downto 0);
|
|
SETFOCUS: std_logic;
|
|
TOP: std_logic_vector(15 downto 0);
|
|
VIDEOOUT: std_logic_vector(7 downto 0);
|
|
WIDTH: std_logic_vector(15 downto 0);
|
|
XIN: std_logic_vector(15 downto 0);
|
|
YIN: std_logic_vector(15 downto 0)
|
|
) is
|
|
variable l_out : line;
|
|
begin
|
|
write(l_out, now, right, 15);
|
|
write(l_out, BACKCOLOUR, right, 9);
|
|
write(l_out, CLK, right, 2);
|
|
write(l_out, HASFOCUS, right, 2);
|
|
write(l_out, HEIGHT, right, 17);
|
|
write(l_out, ISDISPLAYED, right, 2);
|
|
write(l_out, LEDS, right, 17);
|
|
write(l_out, LEFT, right, 17);
|
|
write(l_out, MOUSEEVENT, right, 9);
|
|
write(l_out, SETFOCUS, right, 2);
|
|
write(l_out, TOP, right, 17);
|
|
write(l_out, VIDEOOUT, right, 9);
|
|
write(l_out, WIDTH, right, 17);
|
|
write(l_out, XIN, right, 17);
|
|
write(l_out, YIN, right, 17);
|
|
writeline(RESULTS, l_out);
|
|
end procedure;
|
|
|
|
component TBarLedWindow
|
|
port (
|
|
BACKCOLOUR: in std_logic_vector(7 downto 0);
|
|
CLK: in std_logic;
|
|
HASFOCUS: in std_logic;
|
|
HEIGHT: in std_logic_vector(15 downto 0);
|
|
ISDISPLAYED: out std_logic;
|
|
LEDS: in std_logic_vector(15 downto 0);
|
|
LEFT: in std_logic_vector(15 downto 0);
|
|
MOUSEEVENT: in std_logic_vector(7 downto 0);
|
|
SETFOCUS: out std_logic;
|
|
TOP: in std_logic_vector(15 downto 0);
|
|
VIDEOOUT: out std_logic_vector(7 downto 0);
|
|
WIDTH: in std_logic_vector(15 downto 0);
|
|
XIN: in std_logic_vector(15 downto 0);
|
|
YIN: in std_logic_vector(15 downto 0)
|
|
);
|
|
end component;
|
|
|
|
signal BACKCOLOUR: std_logic_vector(7 downto 0):= (others =>'0');
|
|
signal CLK: std_logic :='0';
|
|
signal HASFOCUS: std_logic:='0';
|
|
signal HEIGHT: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal ISDISPLAYED: std_logic:='0';
|
|
signal LEDS: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal LEFT: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal MOUSEEVENT: std_logic_vector(7 downto 0):= (others =>'0');
|
|
signal SETFOCUS: std_logic:='0';
|
|
signal TOP: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal VIDEOOUT: std_logic_vector(7 downto 0):= (others =>'0');
|
|
signal WIDTH: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal XIN: std_logic_vector(15 downto 0):= (others =>'0');
|
|
signal YIN: std_logic_vector(15 downto 0):= (others =>'0');
|
|
|
|
constant PERIOD: time := 10 ns;
|
|
begin
|
|
DUT:TBarLedWindow port map (
|
|
BACKCOLOUR => BACKCOLOUR,
|
|
CLK => CLK,
|
|
HASFOCUS => HASFOCUS,
|
|
HEIGHT => HEIGHT,
|
|
ISDISPLAYED => ISDISPLAYED,
|
|
LEDS => LEDS,
|
|
LEFT => LEFT,
|
|
MOUSEEVENT => MOUSEEVENT,
|
|
SETFOCUS => SETFOCUS,
|
|
TOP => TOP,
|
|
VIDEOOUT => VIDEOOUT,
|
|
WIDTH => WIDTH,
|
|
XIN => XIN,
|
|
YIN => YIN
|
|
);
|
|
|
|
CLK <= not CLK after period;
|
|
|
|
Xin <= Xin + 42 after period *4;
|
|
Yin <= Yin + 51 after period *4;
|
|
left <= left + 23 after period * 4;
|
|
top <= top + 98 after period *4;
|
|
width <= width + 17 after period *4;
|
|
height <= height + 56 after period *4;
|
|
backColour <= backColour + 8 after period *4;
|
|
mouseEvent <= mouseEvent +13 after period *4;
|
|
LEDS <= LEDS + 31 after period *4;
|
|
|
|
|
|
|
|
|
|
WRITE_RESULTS(
|
|
BACKCOLOUR,
|
|
CLK,
|
|
HASFOCUS,
|
|
HEIGHT,
|
|
ISDISPLAYED,
|
|
LEDS,
|
|
LEFT,
|
|
MOUSEEVENT,
|
|
SETFOCUS,
|
|
TOP,
|
|
VIDEOOUT,
|
|
WIDTH,
|
|
XIN,
|
|
YIN
|
|
);
|
|
|
|
end architecture;
|
|
------------------------------------------------------------
|
|
|
|
------------------------------------------------------------
|