利用TMR1振荡器外接时钟输入计时的秒表及显示转

eva

/* ****************************************************************
** 功能描述: 利用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串行输出秒表) */
}
}