rtcds1302.c

使用AT89S52单片机

/*****************************************************
       DS1302电子钟 C 程序
*******************************************************

 DS1302 接线图

         Vcc2  CLK I/O  /RST

            |   |   |   |
           -------------------
          | 8   7   6   5  |
          |   DS1302       |
          |                |
          | 1   2   3   4  |
           -------------------
            |   |   |   |
         VCC1           GND

1 脚接+5V    2，3脚32768HZ晶振  4脚接地  5脚接S51的P12 6脚接S51的P13 7接S51的P14
8脚接后备电源，可以接老计算机主板上的3.6V电池，也可以通过二级管隔离接一个大容量电解电容
电压在2.5V以上即可维持
//******************************************************/

#include <REG52.H>
#define uchar unsigned char
#define uint unsigned int

//DS1302引脚连接定义
sbit 	T_CLK=P1^2;
sbit 	T_IO =P1^3;
sbit 	T_RST=P1^4;

//sbit 	ACC0=ACC^0;           //1bit数据存储位
sbit 	ACC7=ACC^7;

uchar 	starts_time[7]={30,19,21,4,10,6,8};	 //初始化设置：秒，分，时，日，月，星期，年
uchar 	Second,Minute,Hour,Day,Month,Week,Year;  //时间变量

void 	RTCInputByte(uchar bData);		/* 输入 1Byte */
uchar 	RTCOutputByte(void);         	/* 输出 1Byte */
void 	Write1302(uchar ucAddr, uchar ucDa);	/* 向DS1302写入一个字节 */
uchar 	Read1302(uchar ucAddr);		/* 从DS1302读出一个字节 */
void 	SetTime(uchar *pClock);		/* 设置时间 */
void 	GetTime(void);              /* 读取时间 */

/*主函数*/
void main()
{
	SetTime(starts_time);
   	while(1)
   	{
    	GetTime();
   	}
}
/************************************************/


//********DS1302读写程序***************//
/********************************************************************
函 数 名：RTCInputByte()
功    能：实时时钟写入一字节
说    明：往DS1302写入1Byte数据 (内部函数)
入口参数：bData: 写入的数据
返 回 值：无
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
void RTCInputByte(uchar bData)
{
    uchar h;
    //ACC = bData;
    for(h=8; h>0; h--)
    {
        //T_IO = ACC0;           /*相当于汇编中的 RRC */
        T_IO = (bit)(bData&0x01);
        T_CLK = 1;
        T_CLK = 0;
        //ACC = ACC >> 1;
        bData = bData >> 1;
    }
}
/********************************************************************
函 数 名：RTCOutputByte()
功    能：实时时钟读取一字节
说    明：从DS1302读取1Byte数据 (内部函数)
入口参数：无
返 回 值：ACC: 输出的数据
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
uchar RTCOutputByte(void)
{
    uchar h;
    //uchar temp;
    for(h=8; h>0; h--)
    {
        ACC = ACC >>1;         /*相当于汇编中的 RRC */
        //temp = temp >> 1;
        ACC7 = T_IO;
        //temp =
        T_CLK = 1;
        T_CLK = 0;
    }
    return(ACC);
}
/********************************************************************
函 数 名：Write1302()
功    能：往DS1302写入数据
说    明：先写地址，后写命令/数据 (内部函数)
调    用：RTCInputByte() , RTCOutputByte()
入口参数：ucAddr: DS1302地址, ucData: 要写的数据
返 回 值：无
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
void Write1302(uchar ucAddr, uchar ucDa)
{
    T_RST = 0;
    T_CLK = 0;
    T_RST = 1;
    RTCInputByte(ucAddr);       /* 地址，命令 */
    RTCInputByte(ucDa);       /* 写1Byte数据*/
    T_CLK = 1;
    T_RST = 0;
}
/********************************************************************
函 数 名：Read1302()
功    能：读取DS1302某地址的数据
说    明：先写地址，后读命令/数据 (内部函数)
调    用：RTCInputByte() , RTCOutputByte()
入口参数：ucAddr: DS1302地址
返 回 值：ucData: 读取的数据
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
uchar Read1302(uchar ucAddr)
{
    uchar ucData;
    uchar temp1,temp2;
    T_RST = 0;
    T_CLK = 0;
    T_RST = 1;
    RTCInputByte(ucAddr);             /* 地址，命令 */
    ucData = RTCOutputByte();         /* 读1Byte数据 */
    T_CLK = 1;
    T_RST = 0;

    temp1 = ucData/16;
    temp2 = ucData%16;
    ucData = temp1*10 + temp2;		/* BCD转成16进制 */

    return(ucData);
}

/********************************************************************
函 数 名：SetTime()
功    能：设置初始时间
说    明：先写地址，后读命令/数据(寄存器多字节方式)
调    用：Write1302()
入口参数：pClock: 设置时钟数据地址 格式为: 秒 分 时 日 月 星期 年
                               7Byte (BCD码)1B 1B 1B 1B 1B  1B  1B
返 回 值：无
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
void SetTime(uchar *pClock)
{
    uchar h;
    uchar temp0,temp1,temp2;
    uchar ucAddr = 0x80;
    /*
    for (h = 0; h < 7; h++)
    {
    	temp1 = (*pClock)/10;
    	temp2 = (*pClock)%10;
    	*pClock = temp1*16 +temp2;
    	pClock++;
    }
    */
    Write1302(0x8e,0x00);           /* 控制命令,WP=0,允许写操作*/
    for(h =7; h>0; h--)
    {
    	temp0 = *pClock;
    	temp0 = temp0%100;
    	temp1 = temp0/10;
    	temp2 = temp0%10;
    	temp0 = temp1*16 +temp2;
        Write1302(ucAddr,temp0);  /* 秒 分 时 日 月 星期 年 */
        pClock++;
        ucAddr +=2;
    }
	Write1302(0xc0,0x01);
	Write1302(0XC2,0X03);			/* 初始自动转换显示时间为3秒 */
    Write1302(0x8e,0x80);           /* 控制命令,WP=1,写保护*/

}
/******************读取DS1302中的时间****************/
/********************************************************************
函 数 名：GetTime()
功    能：读取当前时间
说    明：先写地址，后读命令/数据(寄存器多字节方式)
调    用：Read1302()
入口参数：无
返 回 值：无
设    计：zhanghongjian        日    期：2008-10-04
修    改：                     日    期：
***********************************************************************/
void GetTime()
{
      Second=Read1302(0x81);   //对取 秒 分 时 日 月 星期 年
	  Minute=Read1302(0x83);
	  Hour=Read1302(0x85);
	  Day=Read1302(0x87);
	  Month=Read1302(0x89);
	  Year=Read1302(0x8d);
}