实用的计数器

library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
USE IEEE.STD_LOGIC_UNSIGNED.ALL;entity CNT10 is
--  Port ( );PORT(CLK,RST,EN,LOAD : IN STD_LOGIC;DATA : IN STD_LOGIC_VECTOR(3 DOWNTO 0); --4位预置数 DOUT : OUT STD_LOGIC_VECTOR(3 DOWNTO 0); --计数值输出 COUT : OUT STD_LOGIC     --计数进位输出             );
end CNT10;architecture Behavioral of CNT10 isbeginPROCESS(CLK,RST,EN,LOAD)VARIABLE Q : STD_LOGIC_VECTOR(3 DOWNTO 0);BEGIN IF RST = '0' THEN Q := (OTHERS => '0'); --复位低电平时，计数寄存器清零 ELSIF CLK'EVENT AND CLK = '1' THEN  --检测到是时钟上升沿 IF EN = '1' THEN           --计数使能高电平，允许计数 IF (LOAD = '0') THEN Q := DATA; ELSE --预置控制低电平，允许加载 IF Q < 9 THEN Q := Q + 1;  --计数小于9，继续累加 ELSE Q := (OTHE