51 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			VHDL
		
	
	
	
	
	
			
		
		
	
	
			51 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			VHDL
		
	
	
	
	
	
 | 
						|
-- written by Robert Sanchez
 | 
						|
 | 
						|
library IEEE;
 | 
						|
use IEEE.STD_LOGIC_1164.ALL;
 | 
						|
use IEEE.NUMERIC_STD.ALL;
 | 
						|
 | 
						|
 | 
						|
entity gigatron_tb is
 | 
						|
end gigatron_tb;
 | 
						|
 | 
						|
architecture Behavioral of gigatron_tb is
 | 
						|
 | 
						|
    component gigatron
 | 
						|
    Port (
 | 
						|
         sysclk : in std_logic;
 | 
						|
         VGA_R : out std_logic_vector(3 downto 0);
 | 
						|
         VGA_G : out std_logic_vector(3 downto 0);
 | 
						|
         VGA_B : out std_logic_vector(3 downto 0);
 | 
						|
         VGA_HS : out std_logic; 
 | 
						|
         VGA_VS : out std_logic;
 | 
						|
         LED : out std_logic_vector(15 downto 0));
 | 
						|
    end component;
 | 
						|
 | 
						|
    signal sysclk : std_logic := '0';
 | 
						|
    signal LED : std_logic_vector(15 downto 0);
 | 
						|
    signal VGA_R : std_logic_vector(3 downto 0);
 | 
						|
    signal VGA_G : std_logic_vector(3 downto 0);
 | 
						|
    signal VGA_B : std_logic_vector(3 downto 0);
 | 
						|
    
 | 
						|
    signal VGA_HS : std_logic;
 | 
						|
    signal VGA_VS : std_logic;
 | 
						|
 | 
						|
    constant clk_period : time := 10 ns;
 | 
						|
 | 
						|
begin
 | 
						|
 | 
						|
    uut: gigatron port map(sysclk, VGA_R, VGA_G, VGA_B, VGA_HS, VGA_VS, LED);
 | 
						|
 | 
						|
    clk_process: process
 | 
						|
    begin
 | 
						|
 | 
						|
    wait for clk_period/2;
 | 
						|
    sysclk <= '1';
 | 
						|
    wait for clk_period/2;
 | 
						|
    sysclk <= '0';
 | 
						|
 | 
						|
    end process;
 | 
						|
 | 
						|
end Behavioral;
 |