002计数器
计数器在时序逻辑中应用极为普遍，用于计数、定时、分频和时序控制。对计数器的常用操作有装载、复位、置位、增1和减1。通常，装载、复位和置位的操作优先级高于增1和减1。装载操作与置位复位操作优先级关系随具体设计而定。增减操作中，有时减计数的优先级更高。
一、Procedure LoadValue()
例2：同样假设一个计数器cnt，受到rst, set, inc, dec, ld五个boolean类型信号控制，rst为同步复位(reset)，set为同步置位，inc为增1使能(increase)，dec为减1使能(decrease)，ld为装载条件(load)。那么：
                   if rst then
                            cnt< = (others => '0');
                   elsif inc then
                            cnt< = cnt + 1;
                   elsif dec then
                            cnt< = cnt - 1;
                   end if;
其功能显而易见，不作赘述。硬件语言区别于C语言的一个显著特点是其赋值分为信号赋值和变量赋值。根据信号赋值的特点，上述简短代码等效代码如下：
                   if dec then
                            cnt< = cnt - 1;
                   end if;      
                   if inc then
                            cnt< = cnt + 1;
                   end if;      
                   if rst then
                            cnt< = (others => '0');
                   end if;
同一个进程内对同一个信号赋值，后面的赋值条件优先级高于前面的赋值条件。上述三次赋值，形式相同。形式为
                   if load_condition then
                            q< = d;
                   end if;
的赋值语句极为常用，所以定义：
         Procedure LoadValue(signal q : out std_logic; d : in std_logic; load : in boolean) is
         begin
                   if load then
                            q <= d;
                   end if;
         End;
为了使LoadValue子进程更具一般性，重载如下：
         Procedure LoadValue(signal q : out std_logic; d : in std_logic; load : in std_logic) is
         begin                  
                   LoadValue(q, d, load = '1');
         End;
同理，继续重载LoadValue为：
Procedure LoadValue(signal q : out std_vector;      d : in std_vector;      load : in boolean);   
Procedure LoadValue(signal q : out std_vector;      d : in std_vector;      load : in std_logic);