pa.c

《嵌入式系统-使用HCS12微控制器的设计与应用》在CodeWarrior开发环境下的源程序。

//[PA.c]脉冲累加-----------------------------------------------------------*
//本文件包含:                                                              *
//    (1)PAInit:脉冲累加器初始化                                           *
//-------------------------------------------------------------------------*

//头文件
#include "PA.h"    //脉冲累加头文件

//PAInit:脉冲累加器初始化函数----------------------------------------------*
//功  能:初始化脉冲累加器                                                  *
//参  数:无                                                                *
//返  回:无                                                                *
//-------------------------------------------------------------------------*
void PAInit(void)
{
    DISABLE_INTERRUPTS;      //禁止中断   
    TIOS |= (1<<IOS7);       //单独使用16位脉冲累加器
    OC7M &= ~(1<<OC7M7);     //注意此时必须令IOS7＝1,OC7M7＝0,OM7＝0,OL7＝0
    TCTL1 &= ~(1<<OM7);
    TCTL1 &= ~(1<<OL7);
    PACTL &= ~(1<<PAMOD);    //事件计数方式 
    PACTL |= (1<<PEDGE);     //PT7引脚上的出现上升沿时脉冲累加器计数器加1
    PACTL |= (1<<PAOVI);     //允许脉冲累加器产生溢出时引发中断
    PACTL |= (1<<PAI);       //允许PT7引脚上出现上升沿时引发中断
    PACTL |= (1<<PAEN);      //启动脉冲累加器A 
    PACN32  =  0x0000;  
    ENABLE_INTERRUPTS;       //开中断
}