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

标题: 利用TMR1振荡器外接时钟输入计时的秒表及显示转 [打印本页]

作者: eva 时间: 2012-8-21 14:33
标题: 利用TMR1振荡器外接时钟输入计时的秒表及显示转
/* ****************************************************************
** 功能描述: 利用TMR1振荡器外接时钟输入计时的秒表及显示
*************************************************************** */
#include "pic18.h" /* PIC18系列的头文件 */
unsigned char  s[4]={0,0,0,0}; /* 定义1秒、10秒、1分、10分计时器,初值为0 */
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 的中断不使能 */
}
/* ****************************************************************
** 函数名: tm1int()
** 功能描述: TMR1初始化子程序
*************************************************************** */
void tm1int()
{
T1CON=0X0A; /*定TMR1工作于外部时钟,1分频，使能TMR1工作 */
TMR1IE=1; /* TMR1中断允许 */
TMR1IF=0; /* 清除TMR1的中断标志 */
TMR1IP=1; /* TMR1中断高优先级 */
IPEN=1;    /* 使能中断优先级 */
TMR1H=0X80; /*0X10000-0X8000=32768,32.768k晶振,1秒溢出1次*/
TMR1L=0X00; /* 对TMR1写入调整值 */
}
/* ****************************************************************
** 函数名: 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 发送完成标志 */
}
/* ****************************************************************
** 函数名: dealtime()
** 功能描述: 处理定时器中断子程序
*************************************************************** */
void dealtime()
{
s[0]=s[0]+1; /* s计时 */
if(s[0]==10) /* 10s位计时 */
{
  s[0]=0;
  s[1]=s[1]+1; /* 10s计时 */
  if(s[1]==6)
  {
s[1]=0 ;
s[2]=s[2]+1;  /* 分计时,60秒计分进位 */
if(s[2]==10)
{
s[2]=0;
s[3]=s[3]+1; /* 10分计时 */
if(s[3]==6) s[3]=0; /* 60分时清0 */
}
  }
}
}
/* ****************************************************************
** 函数名: interrupt HI_ISR()
** 功能描述: 高优先级中断子程序：定时器TMR1 1s定时中断
*************************************************************** */
void interrupt HI_ISR()
{
if(TMR1IF==1) /* 定时器1中断 */
{
  TMR1IF=0; /* 清除中断标志 */
  TMR1H=0X80;  /*0X10000-0X8000=32768, 32.768k晶振,1秒溢出1次*/
  TMR1L=0X00;  /* 对TMR1写入调整值 */
  dealtime(); /* 处理定时器中断子程序 */
}
}
/* ****************************************************************
** 函数名: display()
** 功能描述: 8个数码管显示数据子程序
*************************************************************** */
void display()
{
unsigned  char  k;
unsigned  char  data;
RA5=0;    /* 准备锁存显示数据 */
/* 显示4位秒表(占用4个数码管显示10分位、分位、10秒位和秒)** */
for(k=0;k<4;k++)
{
  data=s[k];
  data=table[data];  /* 查找显示段码 */
  SPILED(data); /* 发送显示段码 */
}
for(k=0;k<4;k++)
{
  data=0xFF;
  SPILED(data); /* 连续发送4个DARK(即4个数码管不显示) */
}
RA5=1;    /* 给锁存信号,显示数字 */
}
main()
{
initial();    /* 系统初始化子程序 */
tm1int();    /* TMR1初始化 */
SPIinitial(); /* SPI初始化子程序 */
IPEN=1;    /* 使能中断高低优先级 */
INTCON=INTCON|0xc0; /* 开总中断、开外围接口中断 */
s[0]=0;                /* 写入秒计时初值 */
s[1]=0;                /* 写入10秒计时初值 */
s[2]=8;                /* 写入分计时初值 */
s[3]=4;                /* 写入10分计时初值 */
TMR1ON=1; /* 打开TMR1定时器 */
while(1)
{
  display(); /* 调用显示子程序(SPI串行输出秒表) */
}
}

欢迎光临英锐恩单片机论坛,Microchip单片机,模拟器件,接口电路,麦肯单片机,单片机应用交流 (http://enroobbs.com/)