[an error occurred while processing this directive]
|
[/pre]
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_strobe <= '1';
count <= 0;
end if;
end if;
[pre]
E-mail: info@telesys.ru