英锐恩单片机论坛,Microchip单片机,模拟器件,接口电路,麦肯单片机,单片机应用交流

 找回密码
 立即注册
搜索
电子烟方案单片机单片机开发深圳单片机开发
单片机方案国产单片机8位单片机电子烟方案开发
查看: 4574|回复: 0
打印 上一主题 下一主题

CCP中断中启动A/D转换并显示计算结果转

[复制链接]
跳转到指定楼层
1#
发表于 2012-8-21 14:30:39 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
/* ****************************************************************
** 功能描述: CCP1工作于比较工作方式,在CCP中断中启动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[16]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0XD8,0x80,0x90, 0x88,0x83,0xc6,0xa1,0x86,0x8e};
        /* 不带小数点的显示段码表,依顺序为0-F共16个 */
const char table0[10]={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 的中断不使能 */
}

/*  **************************************************************
** 函 数 名: CCPinitial()
** 功    能:CCP1捕捉初始化子程序
****************************************************************** */
void CCPinitial()
{
TRISC2=0;     /* 设置CCP1(RC2)引脚为输出方式*/  
TMR1H=0xc3;
TMR1L=0x50;           /* 0xc350=50000 */
T1CON=0x21;    /* Timer1为定时工作,4分频,使能Timer1工作 */
CCP1IE=1;     /* CCP1中断使能 */
CCP1CON=0X0A;    /* CCP1工作于比较方式 */
CCP1IP=1;     /* CCP1CCP1高优先级中断 */
}

/*  **************************************************************
** 函 数 名: 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()
{
unsigned  char  k;
unsigned  char  data;

RA5=0;     /* 准备锁存显示数据 */
/* 显示AD结果(占用2个数码管9.9V)*************** */
data=Adresult&0x0f;  /* Adresult的输入数据低4位 */
data=table[data];   /* 查显示段码,个位不显示小数点 */
SPILED(data);    /* 发送显示段码 */
data=(Adresult&0xf0)>>4; /* Adresult的数据高4位 */
data=table0[data];   /* 查显示段码,高位需要显示小数点 */
SPILED(data);    /* 发送显示段码 */

for(k=0;k<6;k++)
{
  data=0xFF;
  SPILED(data);   /* 连续发送6个DARK(即6个数码管不显示)*/
}
RA5=1;     /* 给锁存信号,显示数字 */
}

/* ****************************************************************
** 函 数 名: interrupt HI_ISR()
** 功能描述: 高优先级中断子程序:CCP1及AD转换完成中断
*************************************************************** */
void interrupt HI_ISR()
{
if(CCP1IF==1)    /* CCP1中断 */
{
        CCP1IF=0;    /* 清标志 */
  ADCON0=ADCON0|0x04; /* 启动直流输入通道AD采样 */
}
if(ADIF==1)     /* AD转换完成 */
{
  ADIF=0;     /* 清除中断标志 */
  AD_Flag=1;    /* 置AD转换完成标志 */
}
}

main()     
{
initial();      /* 系统初始化子程序 */
CMCON=0x07;       /* 关比较器 */
TRISD=0x00;     /* PORTD口为输出 */
PORTD=0xff;     /* PORTD口输出全1,8个发光二极管全灭 */
CCPinitial();     /* CCP1捕捉设置 */
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 下一条

小黑屋|公司首页|Microchip单片机,模拟器件,接口电路,麦肯单片机,单片机应用交流 ( 粤ICP备09008620号 )

GMT+8, 2024-11-24 02:14 , Processed in 0.051772 second(s), 22 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表