void delay(unsigned int time)
{
 while(time--);
}

/* 实时时钟模块 时钟芯片型号：DS1302 */
/*/
/*********************************************************************/
sbit T_CLK = P1^0; /*实时时钟时钟线引脚 */
sbit T_IO = P1^1; /*实时时钟数据线引脚 */
sbit T_RST = P1^2; /*实时时钟复位线引脚 */
/******************************************************************** 
*
* 名称: DS1302_InputByte()
* 功能: 往DS1302写入1Byte数据
* 输入: ucDa 写入的数据 
***********************************************************************/
void DS1302_InputByte(unsigned char ucDa) 
{ 
unsigned char i;
unsigned char temp;
temp = ucDa; 
for(i=8; i>0; i--)
{
T_IO = temp&0x01;
T_CLK = 1;
T_CLK = 0;
temp = temp >> 1; 
} 
}
/******************************************************************** 
*
* 名称: DS1302_OutputByte() 
* 功能: 从DS1302读取1Byte数据
***********************************************************************/
unsigned char DS1302_OutputByte(void) 
{ 
unsigned char i;
unsigned char temp;
temp=0;
for(i=0; i<8;i++)
{
T_CLK = 0;
if(T_IO!=0) temp|=(1<<i);
T_CLK = 1;
} 
return(temp); 
}
/******************************************************************** 
*
* 名称: DS1302_InputByte() 
* 说明: 先写地址，后写命令/数据
* 功能: 往DS1302写入数据
* 输入: ucAddr: DS1302地址, ucDa: 要写的数据
***********************************************************************/
void DS1302_W1302(unsigned char ucAddr, unsigned char ucDa)
{
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(ucAddr); /* 地址，命令 */
DS1302_InputByte(ucDa); /* 写1Byte数据*/
T_CLK = 1;
T_RST =0;
} 
/******************************************************************** 
*
* 名称: DS1302_R1302()
* 说明: 先写地址，后读命令/数据
* 功能: 读取DS1302某地址的数据
* 输入: ucAddr: DS1302地址
***********************************************************************/
unsigned char DS1302_R1302(unsigned char ucAddr)
{
unsigned char ucDa;
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(ucAddr); /* 地址，命令 */
ucDa = DS1302_OutputByte(); /* 读1Byte数据 */
T_CLK = 1;
T_RST =0;
return(ucDa);
}
/******************************************************************** 
*
* 名称: DS1302_BurstW1302T()
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年
***********************************************************************/
void DS1302_BurstW1302T(unsigned char *pSecDa)
{
unsigned char i;
DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(0xbe); /* 0xbe:时钟多字节写命令 */
for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
{
DS1302_InputByte(*pSecDa);/* 写1Byte数据*/
pSecDa++;
}
T_CLK = 1;
T_RST =0;
} 
/******************************************************************** 
*
* 名称: DS1302_BurstR1302T()
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 
***********************************************************************/
void DS1302_BurstR1302T(unsigned char *pSecDa)
{
unsigned char i;
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(0xbf); /* 0xbf:时钟多字节读命令 */
for (i=8; i>0; i--) 
{
*pSecDa = DS1302_OutputByte(); /* 读1Byte数据 */
pSecDa++;
}
T_CLK = 1;
T_RST =0;
}
/******************************************************************** 
*
* 名称: DS1302_BurstW1302R()
* 说明: 先写地址，后写数据(寄存器多字节方式)
* 功能: 往DS1302寄存器数写入数据(多字节方式)
* 输入: pReDa: 寄存器数据地址
***********************************************************************/
void DS1302_BurstW1302R(unsigned char *pReDa)
{
unsigned char i;
DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(0xfe); /* 0xbe:时钟多字节写命令 */
for (i=31;i>0;i--) /*31Byte 寄存器数据 */
{
DS1302_InputByte(*pReDa); /* 写1Byte数据*/
pReDa++;
}
T_CLK = 1;
T_RST =0;
} 
/******************************************************************** 
*
* 名称: DS1302_BurstR1302R()
* 说明: 先写地址，后读命令/数据(寄存器多字节方式)
* 功能: 读取DS1302寄存器数据
* 输入: pReDa: 寄存器数据地址
***********************************************************************/
void DS1302_BurstR1302R(unsigned char *pReDa)
{
unsigned char i;
T_RST = 0;
T_CLK = 0;
T_RST = 1;
DS1302_InputByte(0xff); /* 0xbf:时钟多字节读命令 */
for (i=31; i>0; i--) /*31Byte 寄存器数据 */
{
*pReDa = DS1302_OutputByte(); /* 读1Byte数据 */
pReDa++;
}
T_CLK = 1;
T_RST =0;
}
/******************************************************************** 
*
* 名称: DS1302_Set1302()
* 说明: 
* 功能: 设置初始时间 
* 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年 
***********************************************************************/
void DS1302_Set1302(unsigned char *pSecDa) 
{
unsigned char i;
unsigned char ucAddr = 0x80; 
DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
for(i =7;i>0;i--)
{ 
DS1302_W1302(ucAddr,*pSecDa); /* 秒 分 时 日 月 星期 年 */

pSecDa++;
ucAddr +=2;
}
DS1302_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
}
/******************************************************************** 
*
* 名称: DS1302_Get1302()
* 说明: 
* 功能: 读取DS1302当前时间
* 调用: DS1302_R1302() 
* 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 
***********************************************************************/
void DS1302_Get1302(unsigned char ucCurtime[]) 
{
unsigned char i;
unsigned char ucAddr = 0x81;
for (i=0;i<7;i++)
{
ucCurtime[i] = DS1302_R1302(ucAddr);/*格式为: 秒 分 时 日 月 
星期 年 */
ucAddr += 2;
}
}

//-------调用事例----------------------------------------------
/*
unsigned char timenow[7]={32,0,0,1,1,1,06};

void main()
{DS1302_Set1302(timenow);
 while(1)
 {DS1302_Get1302(timenow);
  P1=~timenow[0];
  delay(20000);
 }
}
*/