Retinal Prosthesis Dissertation - Student Home Pages

END COMPONENT;
COMPONENT pulsar --Intensity values to
pulse count.
Port (pc_clk: in std_logic; --pc_clk maps to "spike_clock"
value: in STD_LOGIC_VECTOR (7 downto 0); --8 bits
ZZ: out std_logic_vector (7 downto 0)); --8 bits
END COMPONENT;
--The following component: "pulse_count_to_pc_stream" is the OUTGOING signal
COMPONENT pulse_count_to_pc_stream is
Port (pc_clk: in STD_LOGIC;
four_bit_address: in STD_LOGIC_VECTOR (3 downto 0);
R_count: in STD_LOGIC_VECTOR (7 downto 0);
G_count: in STD_LOGIC_VECTOR (7 downto 0);
B_count: in STD_LOGIC_VECTOR (7 downto 0);
pc_stream: out STD_LOGIC_VECTOR (21 downto 0) --formerly (33/23
downto 0)
); --Use "file_support_conventional_stream.vhd" to write to
"colour_stream.csv"
END COMPONENT;
--dout: out std_logic_vector ((3*data_width) - 1 downto 0));
constant clock_cycle: time: = 39.0625 ns; --25MHz has the periodic time 40ns
--Simulation time will be: 2500000ns
--signal show_p_data: std_logic_vector (23 downto 0);
signal pixel_data: std_logic_vector (23 downto 0);
signal incoming_clock: std_logic;
signal incoming_clock_done: boolean: = not TRUE;
signal partial_spike_clock: std_logic;
signal spike_clock: std_logic;
signal pixel_clock: std_logic;
signal resits: std_logic;
signal partial_clock_done: boolean: = not TRUE;
signal address: std_logic_vector (3 downto 0):= "0000";
signal addra: std_logic_vector (3 downto 0):= "0000";
constant reset_time: time: = 1*clock_cycle;
--Declaring the raw colour signals
signal red: std_logic_vector (7 downto 0);
signal green: std_logic_vector (7 downto 0);
signal blue: std_logic_vector (7 downto 0);
--Declaring the colour signals in terms of their pulse count
signal red_pulse_count:std_logic_vector (7 downto 0);
signal green_pulse_count:std_logic_vector (7 downto 0);
signal blue_pulse_count:std_logic_vector (7 downto 0);
signal pulse_count_stream: std_logic_vector (21 downto 0); --formerly (33/23
downto 0)
begin
--tb_clk: process is
--begin
-- incoming_clock