--时钟分频
process(clk)
begin
if(clk'event and clk='1')then
if(clkcnt=divcnt)then
clkcnt<="00000000000000000000";
else
clkcnt<=clkcnt+1;
end if;
end if;
end process;
----------------------------------------------------------------------
tc_clkcnt<='1' when clkcnt=divcnt else --tc_clkcnt 0.016s产生一次脉冲
'0';
--------------------------------------------------------------------
process(tc_clkcnt)
begin
if(tc_clkcnt'event and tc_clkcnt='1')then
clkdiv<=not clkdiv;
end if; --clkdiv 0.016s翻转一次 周期为0.032s
end process;
------------------------------------------------
process(clkdiv)
begin
if(clkdiv'event and clkdiv='1')then
clk_int<= not clk_int; --clk_int 0.032s翻转一次 周期为0.064s
end if;
end process;
------------------------------------------------
process(clkdiv)
begin
if(clkdiv'event and clkdiv='0')then
lcd_en<= not lcd_en;
end if;
end process;