[an error occurred while processing this directive]
|
TERMINAL_COUNT := 32;
count_tclk_proc:process(tclk, reset)
begin
if reset = '1' then
count <= 0;
elsif falling_edge(tclk) then
count <= count + 1;
if (count = TERMINAL_COUNT-1) then
count <= 0;
count_strobe <= '1';
else
count_strobe <= '0';
end if;
end if;
end if;
E-mail: info@telesys.ru