time.c

基于51系列单片机内部定时器写的一个时钟程序

#include <reg51.h>
#include <stdio.h>

#define uchar unsigned char
#define uint  unsigned int

sfr p0=0x80;
sfr p1=0x90;
sfr p2=0xa0;
sfr p3=0xb0;
sbit key0=p1^0;
sbit key1=p1^1;
sbit key2=p1^2;
sbit DQ=p1^7;

uchar code dis_7[12]={0x3f,0x06,0x5b,0x4f,0x66,
                  0x6d,0x7d,0x07,0x7f,0x67,0x40,0x40
                 };//断码0,1,2,3,4,5,6,7,8,9,-,-
//uchar code choose[6]={0xdf,0xef,0xf7,0xfb,0xfd,0xfe};//位选 
uchar code choose[8]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe};//位选
uchar data disbuffer[8]={0x01,0x02,0x0a,0x00,0x00,0x0b,0x00,0x00};
                  //显示缓冲区，hour,'-', minite, '-'  second
 uchar code dis_4[]={0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09};
 uchar code chocode[]={0x30,0xd0,0x60};
 uchar data disbuffer1[]={0,0,0};
uint i;
uchar data ms50=0x00,second=0x00,minite=0x00,hour=12;
uchar temp1,temp2,temp;
uchar set=0;
//1MS延时
delay(uint t)
{
 uint i,j;
 for(i=0;i<t;i++)
  for(j=0;j<120;j++);
}

//显示子程序
display()
{
 uint i;
 disbuffer[0]=hour/10;disbuffer[1]=hour%10;
 disbuffer[3]=minite/10;disbuffer[4]=minite%10;
 disbuffer[6]=second/10;disbuffer[7]=second%10;
 for(i=0;i<8;i++)
  {
   p0=dis_7[disbuffer[i]];p2=choose[i];delay(1);p2=0xff;
  }
}

//按键扫描程序
//void keyscan(void)
//{
// 	      if(key0==0) 
//        { 
//          delay(10);
//          if(key0==0) 
//            { 
//              second++; 
//              if(second==60) 
//                { 
//                  second=0; 
//                } 
//              disbuffer[7]=second%10; 
//              disbuffer[6]=second/10; 
//              while(key0==0); 
//            } 
//        } 
//      if(key1==0) 
//        { 
//         delay(10); 
//          if(key1==0) 
//            { 
//              minite++; 
//              if(minite==60) 
//                { 
//                  minite=0; 
//                } 
//              disbuffer[4]=minite%10; 
//              disbuffer[3]=minite/10; 
//              while(key1==0); 
//            } 
//        } 
//      if(key2==0) 
//        { 
//          delay(10);
//          if(key2==0) 
//            { 
//              hour++; 
//              if(hour==24) 
//                { 
//                  hour=0; 
//               } 
//              disbuffer[1]=hour%10; 
//              disbuffer[0]=hour/10; 
//              while(key2==0); 
//            } 
//        } 
     
//}


void set_time(void)
{
    set++;
	if(set>=4)
	set=0;  
}

void inc_time(void)
{
 switch(set)
 {
 case 1:second++;if(second>=59)second=59;break;
 case 2:minite++;if(minite>=59)minite=59;break;
 case 3:hour++; if(hour>=23)hour=23;break;
 default:break;
 }
}

void dec_time(void)
{
switch(set)
 {
 case 1:second--;if(second<=0)second=0;break;
 case 2:minite--;if(minite<=0)minite=0;break;
 case 3:hour--; if(hour<=0)hour=0;break;
 default:break;
 }
}

void keyscan(void)
{
  if(key0==0)
  {
  delay(10);
  if(key0==0)
  set_time();
  }
  if(key1==0)
  {
  delay(10);
  if(key1==0)
  inc_time();
  }
  if(key2==0)
  {
  delay(10);
  if(key2==0)
  dec_time();
  } 
}

////////////////////////////////////////////////////////////////

//测温程序
//***********ds18b20延迟子函数（晶振12MHz ）*******/ 

void delay_18B20(uint i)
{
	while(i--);
}

/**********ds18b20初始化函数**********************/

void Init_DS18B20(void) 
{
	 unsigned char x=0;
	 DQ = 1;          //DQ复位
	 delay_18B20(8);  //稍做延时
	 DQ = 0;          //单片机将DQ拉低
	 delay_18B20(80); //精确延时 大于 480us
	 DQ = 1;          //拉高总线
	 delay_18B20(14);
	 x=DQ;            //稍做延时后 如果x=0则初始化成功 x=1则初始化失败
	 delay_18B20(20);
}

/***********ds18b20读一个字节**************/  

unsigned char ReadOneChar(void)
{
	uchar i=0;
	uchar dat = 0;
	for (i=8;i>0;i--)
	 {
		  DQ = 0; // 给脉冲信号
		  dat>>=1;
		  DQ = 1; // 给脉冲信号
		  if(DQ)
		  dat|=0x80;
		  delay_18B20(4);
	 }
 	return(dat);
}

/*************ds18b20写一个字节****************/  

void WriteOneChar(uchar dat)
{
 	uchar i=0;
 	for (i=8; i>0; i--)
 	{
  		DQ = 0;
 		DQ = dat&0x01;
    	delay_18B20(5);
 		DQ = 1;
    	dat>>=1;
 }
}

/**************读取ds18b20当前温度************/

void ReadTemperature(void)
{
	uchar a=0;
	uchar b=0;
	uchar t=0;

	Init_DS18B20();
	WriteOneChar(0xCC);    	// 跳过读序号列号的操作
	WriteOneChar(0x44); 	// 启动温度转换

	delay_18B20(100);       // this message is wery important

	Init_DS18B20();
	WriteOneChar(0xCC); 	//跳过读序号列号的操作
	WriteOneChar(0xBE); 	//读取温度寄存器等（共可读9个寄存器） 前两个就是温度

	delay_18B20(100);

	a=ReadOneChar();    	//读取温度值低位
	b=ReadOneChar();   		//读取温度值高位
	temp1=b<<4;
	temp1+=(a&0xf0)>>4;
	temp2=a&0x0f;

   temp=((b*256+a)>>4);    //当前采集温度值除16得实际温度值


}

dis()
{
 uint i;
 disbuffer1[0]=temp1/10;disbuffer1[1]=temp1%10;disbuffer1[2]=temp2/10;
 for(i=0;i<3;i++)
 {
   p3=dis_4[disbuffer1[i]]|chocode[i];delay(1);p3=0xff;
 }
}	  
//////////////////////////////////////////////////////////////////////////

void main(void)
{
  TMOD=0X01;
  TH0=0X3C;TL0=0XB0;
  ET0=1;TR0=1;EA=1;
  while(1)
  {
   ReadTemperature();
   display();
   dis();
   keyscan();
  }
}

//中断服务程序
void time_0(void) interrupt 1
{
 ET0=0;TR0=0;TH0=0X3C;TL0=0XB0;TR0=1;
 ms50++;
 if(ms50==20)
   {ms50=0;second++;
    if(second==60)
	{
	 second=0;minite++;
	 if(minite==60)
	 {
	  minite=0;hour++;
	  if(hour==24)
	  hour=0;
	 }
	}
   }
  ET0=1;
}