ds1302.c

DS1302+DS18B20+LCD1602在51系统上的实时时钟

#include "REG51.H"
#include "intrins.h"
#define uint unsigned int
#define uchar unsigned char
sbit  DS1302_CLK = P2^2;              //实时时钟时钟线引脚 
sbit  DS1302_IO  = P2^3;              //实时时钟数据线引脚 
sbit  DS1302_RST = P2^4;              //实时时钟复位线引脚
sbit  ACC0 = ACC^0;
sbit  ACC7 = ACC^7;

sbit Set = P1^0;       //模式切换键
sbit Up = P1^1;        //加法按钮
sbit Down = P1^2;      //减法按钮
sbit out = P1^3;       //立刻跳出调整模式按钮
sbit K1=P1^4;
sbit K2=P1^5;
sbit DQ = P2^1;        //温度传送数据IO口
sbit voice=P2^0;
uchar hide_sec,hide_min,hide_hour,hide_day,hide_week,hide_month,hide_year;  //秒,分,时到日,月,年位闪的计数
uchar done,temp,addr;
uchar alarm_TimeString[6]="10:01";
uchar temp_value,temp1_value;      //温度值
uchar TempBuffer[5],max_temp[4],min_temp[4],week_value[2];


void show_time();   //液晶显示程序
///////////////////////////////////////////////////
/***********1602液晶显示部分子程序****************/
///////////////////////////////////////////////////

//Port Definitions**********************************************************
sbit LcdRs		= P2^5;
sbit LcdRw		= P2^6;
sbit LcdEn  	= P2^7;
sfr  DBPort 	= 0x80;		//P0=0x80,P1=0x90,P2=0xA0,P3=0xB0.数据端口        
void delay_key(uint a)
{
  uint b;
  for(b=0;b<a;b++);
}
//向LCD写入命令或数据********************************************************
#define LCD_COMMAND			0      // Command
#define LCD_DATA			1      // Data
#define LCD_CLEAR_SCREEN	0x01      // 清屏
#define LCD_HOMING  		0x02      // 光标返回原点
  void LCD_Write(bit style, uchar input)   
{
	LcdRs=style;
    LcdRw=0;
	P0=input;
	delay_key(10);                                                                                         //为什么要延迟？？
	LcdEn=1;
	delay_key(10);
	LcdEn=0;
}

//设置显示模式************************************************************
#define LCD_SHOW			0x04    //显示开
#define LCD_HIDE			0x00    //显示关	  

#define LCD_CURSOR			0x02 	//显示光标
#define LCD_NO_CURSOR		0x00    //无光标		     

#define LCD_FLASH			0x01    //光标闪动
#define LCD_NO_FLASH		0x00    //光标不闪动

void LCD_SetDisplay(unsigned char DisplayMode)
{
	LCD_Write(LCD_COMMAND, 0x08|DisplayMode);	                                                  
}

//设置输入模式************************************************************
#define LCD_AC_UP			0x02
#define LCD_AC_DOWN			0x00      // default

#define LCD_MOVE			0x01      // 画面可平移
#define LCD_NO_MOVE			0x00      //default

void LCD_SetInput(unsigned char InputMode)
{
	LCD_Write(LCD_COMMAND, 0x04|InputMode);
}

//初始化LCD************************************************************
void LCD_Initial()
{
	LcdEn=0;
	LCD_Write(LCD_COMMAND,0x38);           //8位数据端口,2行显示,5*7点阵                                //为什么写两遍？？
	LCD_Write(LCD_COMMAND,0x38);
	LCD_SetDisplay(LCD_SHOW|LCD_NO_CURSOR);    //开启显示, 无光标
	LCD_Write(LCD_COMMAND,LCD_CLEAR_SCREEN);   //清屏
	LCD_SetInput(LCD_AC_UP|LCD_NO_MOVE);       //AC递增, 画面不动
}

//液晶字符输入的位置************************
void GotoXY(unsigned char x, unsigned char y)
{
	if(y==0)
		LCD_Write(LCD_COMMAND,0x80|x);
	if(y==1)
		LCD_Write(LCD_COMMAND,0x80|(x-0x40));
}

//将字符输出到液晶显示
void Print(unsigned char *str)
{
	while(*str!='\0')
	{
		LCD_Write(LCD_DATA,*str);
		str++;
	}
}
///////////////////////////////////////////////////
/***********DS1302时钟部分子程序******************/
///////////////////////////////////////////////////
typedef struct __SYSTEMTIME__
{
	unsigned char Second;
	unsigned char Minute;
	unsigned char Hour;
	unsigned char Week;
	unsigned char Day;
	unsigned char Month;
	unsigned char  Year;
	unsigned char DateString[11];
	unsigned char TimeString[9];
}SYSTEMTIME;	//定义的时间类型
SYSTEMTIME CurrentTime,ad_CurrentTime,*alarmtime;




#define AM(X)	X
#define PM(X)	(X+12)            	  // 转成24小时制
#define DS1302_SECOND	0x80          //时钟芯片的寄存器位置,存放时间
#define DS1302_MINUTE	0x82
#define DS1302_HOUR		0x84 
#define DS1302_WEEK		0x8A
#define DS1302_DAY		0x86
#define DS1302_MONTH	0x88
#define DS1302_YEAR		0x8C 
#define DS1302_WRITE	0x8E
void DS1302InputByte(unsigned char d) 	//实时时钟写入一字节(内部函数)
{ 
    unsigned char i;
    ACC = d;
    for(i=8; i>0; i--)
    {
        DS1302_IO = ACC0;           	//相当于汇编中的 RRC
        DS1302_CLK = 1;
        DS1302_CLK = 0;
        ACC = ACC >> 1; 
    } 
}

unsigned char DS1302OutputByte(void) 	//实时时钟读取一字节(内部函数)
{ 
    unsigned char i;
    for(i=8; i>0; i--)
    {
        ACC = ACC >>1;         			//相当于汇编中的 RRC 
        ACC7 = DS1302_IO;
        DS1302_CLK = 1;
        DS1302_CLK = 0;
    } 
    return(ACC); 
}

void Write1302(unsigned char ucAddr, unsigned char ucDa)	//ucAddr: DS1302地址, ucData: 要写的数据
{
    DS1302_RST = 0;
    DS1302_CLK = 0;
    DS1302_RST = 1;
    DS1302InputByte(ucAddr);       	// 地址，命令 
    DS1302InputByte(ucDa);       	// 写1Byte数据
    DS1302_CLK = 1;
    DS1302_RST = 0;
} 

unsigned char Read1302(unsigned char ucAddr)	//读取DS1302某地址的数据
{
    unsigned char ucData;
    DS1302_RST = 0;
    DS1302_CLK = 0;
    DS1302_RST = 1;
    DS1302InputByte(ucAddr|0x01);        // 地址，命令 
    ucData = DS1302OutputByte();         // 读1Byte数据
    DS1302_CLK = 1;
    DS1302_RST = 0;
    return(ucData);
}



void DS1302_GetTime(SYSTEMTIME *Time)  //获取时钟芯片的时钟数据到自定义的结构型数组
{
	unsigned char ReadValue;
	ReadValue = Read1302(DS1302_SECOND);
	Time->Second = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
	ReadValue = Read1302(DS1302_MINUTE);
	Time->Minute = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
	ReadValue = Read1302(DS1302_HOUR);
	Time->Hour = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
	ReadValue = Read1302(DS1302_DAY);
	Time->Day = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);	
	ReadValue = Read1302(DS1302_WEEK);
	Time->Week = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
	ReadValue = Read1302(DS1302_MONTH);
	Time->Month = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
	ReadValue = Read1302(DS1302_YEAR);
	Time->Year = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);	
}

void DateToStr(SYSTEMTIME *Time)    //将时间年,月,日,星期数据转换成液晶显示字符串,放到数组里DateString[]
{   if(hide_year<2)                //这里的if,else语句都是判断位闪烁,<2显示数据,>2就不显示
    {                               
		Time->DateString[0] = '2';
		Time->DateString[1] = '0';	 
		Time->DateString[2] = Time->Year/10 + '0';
		Time->DateString[3] = Time->Year%10 + '0';
	}
	else
	{ 
		Time->DateString[0] = ' ';
		Time->DateString[1] = ' ';		 
		Time->DateString[2] = ' ';
		Time->DateString[3] = ' ';
	}
	Time->DateString[4] = '/';
	if(hide_month<2)
	{
		Time->DateString[5] = Time->Month/10 + '0';
		Time->DateString[6] = Time->Month%10 + '0';
	}
	else
	{
		Time->DateString[5] = ' ';
		Time->DateString[6] = ' ';
	}
	Time->DateString[7] = '/';
	if(hide_day<2)
	{
		Time->DateString[8] = Time->Day/10 + '0';
		Time->DateString[9] = Time->Day%10 + '0';
	}
	else
	{
		Time->DateString[8] = ' ';
		Time->DateString[9] = ' ';	    
	}
	if(hide_week<2)
	{
		week_value[0] = Time->Week%10 + '0';  //星期的数据另外放到 week_value[]数组里,跟年,月,日的分开存放,因为等一下要在最后显示
	}
	else
	{
		week_value[0] = ' ';
	}
	week_value[1] = '\0';

	Time->DateString[10] = '\0'; //字符串末尾加 '\0' ,判断结束字符
}

void TimeToStr(SYSTEMTIME *Time)  //将时,分,秒数据转换成液晶显示字符放到数组 TimeString[];
{   if(hide_hour<2)
    {
		Time->TimeString[0] = Time->Hour/10 + '0';
		Time->TimeString[1] = Time->Hour%10 + '0';
	}
	else
	{
	    Time->TimeString[0] = ' ';
	    Time->TimeString[1] = ' ';
	}
	Time->TimeString[2] = ':';
    if(hide_min<2)
	{
		Time->TimeString[3] = Time->Minute/10 + '0';
		Time->TimeString[4] = Time->Minute%10 + '0';
	}
	else
	{
	    Time->TimeString[3] = ' ';
	    Time->TimeString[4] = ' ';
   	}
	Time->TimeString[5] = ':';
    if(hide_sec<2)
    {
		Time->TimeString[6] = Time->Second/10 + '0';
		Time->TimeString[7] = Time->Second%10 + '0';
    }
    else
    {
        Time->TimeString[6] = ' ';
	    Time->TimeString[7] = ' ';
    }
	Time->DateString[8] = '\0';
}

void alarm_save(unsigned char Begin)//利用DS1302的SRAM保存时钟
{
	unsigned char i,j=0;
	Write1302(DS1302_WRITE,0x00); //写入允许
	for(i=0;i<=10;i+=2)
	{
		Write1302(Begin+i,alarm_TimeString[j++]);
	}
	Write1302(DS1302_WRITE,0x80); //禁止写入
}

void alarm_read(unsigned char Begin)
{
	unsigned char i,j=0;
	for(i=0;i<=10;i+=2)
	{
		alarm_TimeString[j++]=Read1302(Begin+i);
	}
}

void Initial_DS1302(void)   //时钟芯片初始化
{   
	unsigned char temp;
	temp=Read1302(0xFD);//读SRAM30
	if(temp!=0x5A)//没有初始化过
	{	
		Write1302(DS1302_WRITE,0x00); //写入允许
		Write1302(DS1302_YEAR,0x08); //以下写入初始化时间 日期:08/07/15 
		Write1302(DS1302_MONTH,0x07);
		Write1302(DS1302_DAY,0x15);
		Write1302(DS1302_WEEK,0x02);//星期: 2.
		Write1302(DS1302_HOUR,0x11);//时间: 11:59:50
		Write1302(DS1302_MINUTE,0x59);
		Write1302(DS1302_SECOND,0x50);
		Write1302(0x90,0xAA);//涓流充电，双二极管，4K电阻
		Write1302(0xFC,0x5A);//写入已初始化标志
		alarm_save(0xC0);//三组闹钟初始时间均为10:01
		alarm_save(0xCC);
		alarm_save(0xD8);
		alarm_save(0xE4);//生日提醒默认为10月1日
		Write1302(DS1302_WRITE,0x80); //禁止写入
	}
	else
	{
		alarm_read(0xC0);//初始化过读取第一组闹钟
	} 
}

void ad_DS1302(void)   //时钟芯片初始化，修正时间后用
{   
    Write1302(0x8e,0x00); //写入允许
	Write1302(0x8c,(ad_CurrentTime.Year/10)<<4|(ad_CurrentTime.Year%10)); //以下写入初始化时间 日期:07/07/25.星期: 3. 时间: 23:59:55
	Write1302(0x88,(ad_CurrentTime.Month/10)<<4|(ad_CurrentTime.Month%10));
	Write1302(0x86,(ad_CurrentTime.Day/10)<<4|(ad_CurrentTime.Day%10));
	Write1302(0x8a,(ad_CurrentTime.Week/10)<<4|(ad_CurrentTime.Week%10));
	Write1302(0x84,(ad_CurrentTime.Hour/10)<<4|(ad_CurrentTime.Hour%10));
	Write1302(0x82,(ad_CurrentTime.Minute/10)<<4|(ad_CurrentTime.Minute%10));
	Write1302(0x80,(ad_CurrentTime.Second/10)<<4|(ad_CurrentTime.Second%10));
	Write1302(0x8e,0x80); //禁止写入 
}
 
//====================当前时间调整==========================
	void add_time(SYSTEMTIME *Time) 
{
	switch(addr)
	{
		case (0x80+0x02): Time->Year++;break;
		case (0x80+0x03): Time->Year++;break;
		case (0x80+0x05): Time->Month++;break;
		case (0x80+0x06): Time->Month++;break;
		case (0x80+0x08): Time->Day++;break;
		case (0x80+0x09): Time->Day++;break;
		case (0x80+0x0f): Time->Week++;break;
		case (0x80+0x40): Time->Hour++;break;
		case (0x80+0x41): Time->Hour++;break;
		case (0x80+0x43): Time->Minute++;break;
		case (0x80+0x44): Time->Minute++;break;
		case (0x80+0x46): Time->Second++;break;
		case (0x80+0x47): Time->Second++;break;
	}
}
  void sub_time(SYSTEMTIME *Time) 
{
	switch(addr)
	{
		case (0x80+0x02): Time->Year--;break;
		case (0x80+0x03): Time->Year--;break;
		case (0x80+0x05): Time->Month--;break;
		case (0x80+0x06): Time->Month--;break;
		case (0x80+0x08): Time->Day--;break;
		case (0x80+0x09): Time->Day--;break;
		case (0x80+0x0f): Time->Week--;break;
		case (0x80+0x40): Time->Hour--;break;
		case (0x80+0x41): Time->Hour--;break;
		case (0x80+0x43): Time->Minute--;break;
		case (0x80+0x44): Time->Minute--;break;
		case (0x80+0x46): Time->Second--;break;
		case (0x80+0x47): Time->Second--;break;
	}
}
//======================闹钟时间调整===========================
  void alarm_add_time() 
 {
	switch(addr)
	{ 
		case (0x80+0x40): alarm_TimeString[0]++;break;
		case (0x80+0x41): alarm_TimeString[1]++;break;
		case (0x80+0x43): alarm_TimeString[3]++;break;
		case (0x80+0x44): alarm_TimeString[4]++;break;
	}
  }
  void alarm_sub_time() 
 {
	switch(addr)
	{
		case (0x80+0x40): alarm_TimeString[0]--;break;
		case (0x80+0x41): alarm_TimeString[1]--;break;
		case (0x80+0x43): alarm_TimeString[3]--;break;
		case (0x80+0x44): alarm_TimeString[4]--;break;
	}
  }
//////////////////////////////////////////////////////////
/********************ds18b20子程序***********************/
//////////////////////////////////////////////////////////

/***********ds18b20延迟子函数（晶振12MHz ）*******/ 

void delay_18B20(unsigned int 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)
{
 	unsigned char i=0;
 	for (i=8; i>0; i--)
 	{
  		DQ = 0;
 		DQ = dat&0x01;
    	delay_18B20(5);
 		DQ = 1;
    	dat>>=1;
	}
}

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

void ReadTemp(void)
{
	unsigned char a=0;
	unsigned char b=0;
	unsigned char 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();   		//读取温度值高位
	temp_value=b<<4;
	temp_value+=(a&0xf0)>>4;  
    temp1_value=a&0x0f;             
}

void temp_to_str()   //温度数据转换成液晶字符显示
{
	TempBuffer[0]=temp_value/10+'0';  //十位
	TempBuffer[1]=temp_value%10+'0';  //个位
	TempBuffer[2]='.';
	TempBuffer[3]=temp1_value*625/1000%10+'0';
	TempBuffer[4]=0xdf;   //温度符号
	TempBuffer[5]='C';
	TempBuffer[6]='\0';
}
//===============上下限温度初始化===================
void max_temp_value()   //上限37度报警
{
	max_temp[0]='3';  //十位
	max_temp[1]='7';  //个位
	max_temp[2]='.';
	max_temp[3]='0';
}
void min_temp_value()   //下限10度报警
{
	min_temp[0]='1';  //十位
	min_temp[1]='0';  //个位
	min_temp[2]='.';
	min_temp[3]='0';
}
//**********************************************
//延时子程序模块
//**********************************************
void mdelay(uint delay)
{	uint i;
 	for(;delay>0;delay--)
   		{for(i=0;i<80;i++) //1ms延时.
       		{;}
   		}
}
void show_time()   //液晶显示程序
{
	DS1302_GetTime(&CurrentTime);  //获取时钟芯片的时间数据
	TimeToStr(&CurrentTime);       //时间数据转换液晶字符
	DateToStr(&CurrentTime);       //日期数据转换液晶字符
	ReadTemp();                    //开启温度采集程序
	temp_to_str();                 //温度数据转换成液晶字符
	GotoXY(10,1);                  //液晶字符显示位置
	Print(TempBuffer);             //显示温度
	GotoXY(0,1);
	Print(CurrentTime.TimeString); //显示时间
	GotoXY(0,0);
	Print(CurrentTime.DateString); //显示日期
	GotoXY(15,0);
	Print(week_value);             //显示星期
	GotoXY(11,0);
	Print("Week");	//在液晶上显示 字母 week
	mdelay(400);                 //扫描延时