star 发表于 2012-8-21 14:27:17

ECCP1工作于比较工作方式的特殊事件触发方式,启动A/D转换...

ECCP1工作于比较工作方式的特殊事件触发方式,启动A/D转换并显示计算结果 转
/* ****************************************************************
** 功能描述: ECCP1工作于比较工作方式的特殊事件触发方式,启动A/D转换并显示计算结果
*************************************************************** */
#include "pic18.h"   /* PIC18系列的头文件 */
unsigned int Adresult=0;   /* AD转换计算结果 */
unsigned int Ad_Sample_result=0; /* AD转换采样结果 */
unsigned char AD_Flag=0;   /* =1有新的AD数据转换完成 */
const char table={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0XD8,0x80,0x90, 0x88,0x83,0xc6,0xa1,0x86,0x8e};
      /* 不带小数点的显示段码表,依顺序为0-F共16个 */
const char table0={0X40,0X79,0X24,0X30,0X19,0X12,0X02,0X78,0X00,0X10};
      /* 带小数点的0-9显示段码表 */
/* ****************************************************************
** 函 数 名: initial()
** 功能描述: 系统初始化子程序,放在程序首部
*************************************************************** */
void initial()
{
INTCON=0x00;    /* bit7-bit0:关总中断 */
ADCON1=0X07;    /* 设置数字输入输出口 */
PIE1=0;      /* PIE1 的中断不使能 */   
PIE2=0;      /* PIE2 的中断不使能 */
PIE3=0;      /* PIE3 的中断不使能 */
}
/***************************************************************
** 函 数 名: ECCPinitial()
** 功    能:ECCP1初始化子程序
****************************************************************** */
void ECCPinitial()
{
CMCON=0x07;       /* 关比较器 */
TRISD4=0;   /* 设置ECCP1(RD4)引脚为输出方式*/
TMR1H=0xc3;
TMR1L=0x50;         /* 0xc350=50000,50ms比较匹配 */
T1CON=0x21;   /* Timer1为定时工作,4分频,使能Timer1工作 */
ECCP1IE=1;   /* ECCP1中断使能 */
ECCP1CON=0X0B;   /* ECCP1比较方式的特殊事件触发启动A/D转换 */
ECCP1IP=1;   /* ECCP1高优先级中断 */
}
/***************************************************************
** 函 数 名: AD_Initial()
** 功    能:A/D转化初始化子程序
****************************************************************** */
void AD_Initial()
{
ADCON0=0x51;   /* 选择通道为AN2,A/D处于工作状态,转换时钟8tosc */
ADCON1=0X82;   /* 转换结果右移,及ADRESH寄存器的高6位为"0",且
把RA2(AN2,直流输入通道)设置为模拟量输入方式,
RA5设置为数字口 */
ADIF=0;   /* 清除A/D转换标志 */
ADIE=1;   /* A/D转换中断允许 */
ADIP=1;   /* AD中断高优先级 */
TRISA=TRISA|0x04;/* 设置RA2(AN2通道)为输入方式 */
}
/***************************************************************
** 函 数 名: Deal_AD()
** 功    能:AD转换完成后处理数据子程序
****************************************************************** */
void Deal_AD()
{
unsigned int temp;
Ad_Sample_result=ADRESL+(ADRESH<<8);
       /* 读取并存储A/D转换结果(10位,高6位为0)*/
AD_Flag=0;    /* AD转换完成标志清0 */
Adresult=(Ad_Sample_result*50)>>10;
       /* 将AD采样结果转换为以两位数表示的值,即放大
10倍,乘以满该度值5V,除以满刻度转换值10位(1024)*/
temp=Adresult;
Adresult=(((temp/10)<<4)&0xf0)+(Adresult % 10);
       /* 转换为带一位小数的BCD码实际值如25表示2.5V,
本程序在0通道输入时直接加直流电压0-5V */
}
/* ****************************************************************
** 函 数 名: SPIinitial()
** 功能描述: SPI输出初始化子程序
*************************************************************** */
void SPIinitial()
{
TRISA=TRISA&0xdf;/* 设置RA5输出74HC595锁存信号 */
TRISC=TRISC&0xd7;/* SDO(RC5)引脚为输出,SCK(RC3)引脚为输出 */
SSPCON1=0x30;   /* SSPEN=1;CKP=1,FOSC/4 */
SSPSTAT=0xC0;   /* 时钟下降沿发送数据 */
SSPIF=0;   /* 清除SSPIF标志 */
}
/* ****************************************************************
** 函 数 名: SPILED()
** 功能描述: SPI传输数据(发送数据)子程序
*************************************************************** */
void   SPILED(char data)
{
SSPBUF=data;    /* 启动 SPI 发送 */
do
{
   ;
}while(SSPIF==0);   /* 等待SPI 发送完成 */
SSPIF=0;   /* 清SPI 发送完成标志 */
}
/* ****************************************************************
** 函 数 名: display()
** 功能描述: 8个数码管显示数据子程序
*************************************************************** */
void display()
{
unsignedchark;
unsignedchardata;
RA5=0;   /* 准备锁存显示数据 */
/* 显示AD结果(占用2个数码管9.9V)*************** */
data=Adresult&0x0f;/* Adresult的输入数据低4位 */
data=table;   /* 查显示段码,个位不显示小数点 */
SPILED(data);    /* 发送显示段码 */
data=(Adresult&0xf0)>>4; /* Adresult的数据高4位 */
data=table0;   /* 查显示段码,高位需要显示小数点 */
SPILED(data);    /* 发送显示段码 */
for(k=0;k<6;k++)
{
data=0xFF;
SPILED(data);   /* 连续发送6个DARK(即6个数码管不显示)*/
}
RA5=1;   /* 给锁存信号,显示数字 */
}
/* ****************************************************************
** 函 数 名: interrupt HI_ISR()
** 功能描述: 高优先级中断子程序:ECCP1的特殊事件触发方式,启动A/D转换及AD转换完成中断
*************************************************************** */
void interrupt HI_ISR()
{
if(ECCP1IF==1)    /* CCP1中断 */
      ECCP1IF=0;    /* 清标志 */
if(ADIF==1)   /* AD转换完成 */
{
ADIF=0;   /* 清除中断标志 */
AD_Flag=1;    /* 置AD转换完成标志 */
}
}
main()   
{
initial();      /* 系统初始化子程序 */
CMCON=0x07;       /* 关比较器 */
TRISD=0x00;   /* PORTD口为输出 */
PORTD=0xff;   /* PORTD口输出全1,8个发光二极管全灭 */
ECCPinitial();   /* ECCP1设置 */
AD_Initial();   /* A/D转换初始化 */
SPIinitial();   /* SPI初始化子程序 */
IPEN=1;      /* 使能中断高低优先级 */
INTCON=INTCON|0xc0;/* 开总中断、开外围接口中断 */
while(1)
{
display();   /* 显示子程序(SPI串行输出AD测量结果) */
if(AD_Flag==1)   /* AD采样完成 */
   Deal_AD();   /* 处理AD数据 */
}
}

页: [1]
查看完整版本: ECCP1工作于比较工作方式的特殊事件触发方式,启动A/D转换...