51单片机定时做可调普通时钟源程序 -

/*-----------------------------------------------
名称：定时器时钟数码管显示
------------------------------------------------*/
#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
#define KeyPort P3 //定义按键端口
#define DataPort P0 //定义数据端口程序中遇到DataPort 则用P0 替换
sbit LATCH1=P2^2;//定义锁存使能端口段锁存
sbit LATCH2=P2^3;// 位锁存
sbit SPK=P1^0; //定义喇叭端口
unsigned char hour,minute,second;//定义时分秒
bit UpdateTimeFlag;//定义读时间标志
unsigned char code dofly_DuanMa[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};// 显示段码值0~9
unsigned char code dofly_WeiMa[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//分别对应相应的数码管点亮,即位码
unsigned char TempData[8]; //存储显示值的全局变量
void DelayUs2x(unsigned char t);//us级延时函数声明
void DelayMs(unsigned char t); //ms级延时
void Display(unsigned char FirstBit,unsigned char Num);//数码管显示函数
unsigned char KeyScan(void);//键盘扫描
void Init_Timer0(void);//定时器初始化
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{
unsigned char num;
Init_Timer0();//定时器初始化
while (1)//主循环
{
num=KeyScan();
switch(num)
{
case 1:hour++;if(hour==24)hour=0; //正常时间小时加1
break;
case 2:hour--;if(hour==255)hour=23; //正常时间小时减1
break;
case 3:minute++;if(minute==60)minute=0; //分钟加1
break;
case 4:minute--;if(minute==255)minute=59; //分钟减1
break;
default:break;
}/* 结束switch语句 */
if(UpdateTimeFlag==1)
{
UpdateTimeFlag=0;
TempData[0]=dofly_DuanMa[hour/10]; //时 //数据的转换，因我们采用数码管0~9的显示,将数据分开
TempData[1]=dofly_DuanMa[hour%10];
TempData[2]=0x40; //加入"-"
TempData[3]=dofly_DuanMa[minute/10];//分
TempData[4]=dofly_DuanMa[minute%10];
TempData[5]=0x40;
TempData[6]=dofly_DuanMa[second/10];//秒
TempData[7]=dofly_DuanMa[second%10];
} /* 结束if语句 */
}/* 结束while语句 */
}/* 结束main语句 */
/*------------------------------------------------
uS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编,大致延时
长度如下 T=tx2+5 uS
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{
while(--t);
}
/*------------------------------------------------
mS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编
------------------------------------------------*/
void DelayMs(unsigned char t)
{
while(t--)
{
//大致延时1mS
DelayUs2x(245);
DelayUs2x(245);
}
}
/*------------------------------------------------
显示函数，用于动态扫描数码管
输入参数 FirstBit 表示需要显示的第一位，如赋值2表示从第三个数码管开始显示
如输入0表示从第一个显示。
Num表示需要显示的位数，如需要显示99两位数值则该值输入2
------------------------------------------------*/
void Display(unsigned char FirstBit,unsigned char Num)
{
static unsigned char i=0;
DataPort=0; //清空数据，防止有交替重影
LATCH1=1; //段锁存
LATCH1=0;
DataPort=dofly_WeiMa[i+FirstBit]; //取位码
LATCH2=1; //位锁存
LATCH2=0;
DataPort=TempData[i]; //取显示数据，段码
LATCH1=1; //段锁存
LATCH1=0;
i++;
if(i==Num)
i=0;
}
/*------------------------------------------------
定时器初始化子程序
------------------------------------------------*/
void Init_Timer0(void)
{
TMOD |= 0x01; //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响
//TH0=0x00; //给定初值
//TL0=0x00;
EA=1; //总中断打开
ET0=1; //定时器中断打开
TR0=1; //定时器开关打开
}
/*------------------------------------------------
定时器中断子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1
{
static unsigned int num,i;
TH0=(65536-2000)/256; // 给THO赋初值为（65536-2000),当其加1到65535溢出中断一次即2ms中断一次 2000为2000/1=2000(在晶振为12MHz的时候)
//重新赋值 1.8ms 即1.8ms中断一次 2000为2000/1.09=1834.86(在晶振为11.0592MHz的时候)
TL0=(65536-2000)%256;
Display(0,8); // 调用数码管扫描
i++;
if(i==10) //20ms更新一次
{
i=0;
UpdateTimeFlag=1; //更新时间志位置1
}
num++;
if(num==500) //大致1s
{
num=0;
second++;
if(minute == 59) //当分钟到59的时响蜂鸣器
{
if(second >= 51) //隔一秒响一下
{
SPK=0; /* 开蜂鸣器 */
DelayMs(1000);
SPK=1; /* 关蜂鸣器 */
second++;
}
}
if(second==60) //秒到60，分钟加1
{
second=0;
minute++;
if(minute==60)//分钟到60，小时加1
{
minute=0;
SPK=1; /* 关蜂鸣器 */
hour++;
if(hour==24)//小时到24，回零
hour=0;
}
}
}
}
/*------------------------------------------------
按键扫描函数，返回扫描键值
------------------------------------------------*/
unsigned char KeyScan(void)
{
unsigned char keyvalue;
if(KeyPort!=0xff)
{
DelayMs(10);
if(KeyPort!=0xff)
{
keyvalue=KeyPort;
while(KeyPort!=0xff);
switch(keyvalue)
{
case 0xfe:return 1;break; //单个按键控制
case 0xfd:return 2;break;
case 0xfb:return 3;break;
case 0xf7:return
…………限于本文篇幅余下代码请从51黑下载附件…………

复制代码