单片机控制ds1302的时钟C程序

/**************************************************/
/* ds1302实时时钟C程序 */
/*51hei.com会员经典作品已经测试成功/
/**************http://www.51hei.com/ziliao/file/ds1302c.rar 点此链接下载本例的代码*****/

#include < reg52.h>
#include

#define uchar unsigned char

sbit T_CLK = P3^4; /*实时时钟时钟线引脚 */
sbit T_IO = P3^3; /*实时时钟数据线引脚 */
sbit T_RST = P3^2; /*实时时钟复位线引脚 */
//sbit OE=P3^6;
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;

uchar time[8]="  :  :  ";
uchar min,hou,day,mon,yea;

void Init1302(void);
void v_W1302(uchar ucAddr, uchar ucDa);
uchar uc_R1302(uchar ucAddr);
void v_BurstW1302T(uchar *pSecDa);
void v_BurstR1302T(uchar *pSecDa);
void v_BurstW1302R(uchar *pReDa);
void v_BurstR1302R(uchar *pReDa);
void v_Set1302(uchar *pSecDa);
void v_Get1302(uchar ucCurtime[]);
void donetime(void);
void bcd_int(uchar i);
void bcdtoInt(void);
void SetTime(void);
/****************************************
*
* 名称: v_RTInputByte
* 说明:
* 功能: 往DS1302写入1Byte数据
* 调用:
* 输入: ucDa 写入的数据
* 返回值: 无
****************************************************/
void v_WTInputByte(uchar ucDa)
 {
  uchar i;
  //OE=0;
  ACC= ucDa;
  for(i=8; i>0; i--)
   {
    T_IO = ACC0; //*相当于汇编中的 RRC
    T_CLK = 1;
    T_CLK = 0;
    ACC =ACC>> 1;
   }
 // OE=1; 
 }
/***************************************************
*
* 名称: uchar uc_RTOutputByte
* 说明:
* 功能: 从DS1302读取1Byte数据
* 调用:
* 输入:
* 返回值: ACC
****************************************************/
uchar uc_RTOutputByte(void)
 {
  uchar i;
  //OE=0;
  for(i=8; i>0; i--)
   {
    ACC = ACC>>1; //*相当于汇编中的 RRC
    ACC7 = T_IO;
    T_CLK = 1;        
    T_CLK = 0;
   } 
  //OE=1;   
  return(ACC);
 }
/***************************************************
*
* 名称: v_W1302
* 说明: 先写地址，后写命令/数据
* 功能: 往DS1302写入数据
* 调用: v_RTInputByte()
* 输入: ucAddr: DS1302地址, ucDa: 要写的数据
* 返回值: 无
*******************************************************/
void v_W1302(uchar ucAddr, uchar ucDa)
 {
  //OE=0;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(ucAddr); /* 地址，命令 */
  v_WTInputByte(ucDa); /* 写1Byte数据*/
  T_CLK = 1;
  T_RST =0;
  //OE=1; 
 } [page]
/**************************************************
*
* 名称: uc_R1302
* 说明: 先写地址，后读命令/数据
* 功能: 读取DS1302某地址的数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: ucAddr: DS1302地址
* 返回值: ucDa :读取的数据
****************************************************/
uchar uc_R1302(uchar ucAddr)
 {
  uchar ucDa;
  //OE=0;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(ucAddr); /* 地址，命令 */
  ucDa = uc_RTOutputByte(); /* 读1Byte数据 */
  T_CLK = 1;
  T_RST =0;
 // OE=1;
  return(ucDa);
 }
/***********************************************
*
* 名称: v_BurstW1302T
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 调用: v_RTInputByte()
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
******************************************************/
/*void v_BurstW1302T(uchar *pSecDa)
 {
  uchar i;
  v_W1302(0x8e,0x00); //* 控制命令,WP=0,写操作?
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xbe); //* 0xbe:时钟多字节写命令
  for (i=8;i>0;i--) //*8Byte = 7Byte 时钟数据 + 1Byte 控制
   {
    v_WTInputByte(*pSecDa);//* 写1Byte数据
    pSecDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */      
/*******************************************
*
* 名称: v_BurstR1302T
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :读取的数据
***********************************************/
/*void v_BurstR1302T(uchar *pSecDa)
 {
  uchar i;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xbf); //* 0xbf:时钟多字节读命令
  for (i=8; i>0; i--)
   {
    *pSecDa = uc_RTOutputByte(); //* 读1Byte数据
    pSecDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */    
/******************************************
*
* 名称: v_BurstW1302R
* 说明: 先写地址，后写数据(寄存器多字节方式)
* 功能: 往DS1302寄存器数写入数据(多字节方式)
* 调用: v_RTInputByte()
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
**********************************************/
/*void v_BurstW1302R(uchar *pReDa)
 {
  uchar i;
  v_W1302(0x8e,0x00); //* 控制命令,WP=0,写操作?
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xfe); //* 0xbe:时钟多字节写命令
  for (i=31;i>0;i--) //*31Byte 寄存器数据
   {
    v_WTInputByte(*pReDa); //* 写1Byte数据
    pReDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }   */    [page]
/************************************************
*
* 名称: uc_BurstR1302R
* 说明: 先写地址，后读命令/数据(寄存器多字节方式)
* 功能: 读取DS1302寄存器数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***************************************************/
/*void v_BurstR1302R(uchar *pReDa)
 {
  uchar i;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xff); //* 0xbf:时钟多字节读命令
  for (i=31; i>0; i--) //*31Byte 寄存器数据
   {
    *pReDa = uc_RTOutputByte(); //* 读1Byte数据
    pReDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */ 
/************************************************
*
* 名称: v_Set1302
* 说明:
* 功能: 设置初始时间
* 调用: v_W1302()
* 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
*****************************************************/
/*void v_Set1302(uchar *pSecDa)
 {
  uchar i;
  uchar ucAddr = 0x80;
  v_W1302(0x8e,0x00); // 控制命令,WP=0,写操作?
  for(i =7;i>0;i--)
   {
    v_W1302(ucAddr,*pSecDa);  //秒 分 时 日 月 星期 年
    pSecDa++;
    ucAddr +=2;
   }
  v_W1302(0x8e,0x80); // 控制命令,WP=1,写保护?
 }  */
/**********************************************
*
* 名称: v_Get1302
* 说明:
* 功能: 读取DS1302当前时间
* 调用: uc_R1302()
* 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
*****************************************************/
/*void v_Get1302(uchar ucCurtime[])
 {
  uchar i;
  uchar ucAddr = 0x81;
  for (i=0;i<7;i++)
   {
    ucCurtime[i] = uc_R1302(ucAddr);//*格式为: 秒 分 时 日 月 星期 年
    ucAddr += 2;
   }
 } */ 
/**************************************************
* 名称: Init1302
* 说明:
* 功能: 初始化DS1302
* 调用: 
* 输入: 
* 返回值: 无
*********************************************************/
void Init1302(void)
 {
  v_W1302(0x8e,0x00);  //控制写入WP=0
  v_W1302(0x90,0xa5);
  v_W1302(0x80,0x00);  //秒
  v_W1302(0x82,0x59);  //分
  v_W1302(0x84,0x10);  //时
  v_W1302(0x86,0x01);  //日
  v_W1302(0x88,0x08);  //月
  v_W1302(0x8a,0x03);  //星期
  v_W1302(0x8c,0x07);  //年 */ 
  v_W1302(0x8e,0x80);
 }
/******************************************************
* 名称: donetime
* 说明:
* 功能: 时间处理
* 调用: 
* 输入: 
* 返回值: 无
**************************************************************/
void donetime(void)
 {
  uchar d;
  d=uc_R1302(0x81);
  time[6]=d/16+48;
  time[7]=d%16+48;
  d=uc_R1302(0x83);
  time[3]=d/16+48;
  time[4]=d%16+48;
  d=uc_R1302(0x85);
  time[0]=d/16+48;
  time[1]=d%16+48;
  //bcd_int(d);    
 }   

 //
/*void bcd_int(uchar i)
  {
  uchar j;  
  time[0]=(i&0x0f)+48;
  j=i>>4;
  time[1]=(j&0x0f)+48;
 }  */
//
/*void bcdtoInt(void)
 {
  uchar i;
  for(i=0;i<7;i++)
   bcd_int(ucCurtm[i]);
 }  */
//
void SetTime(void)
 {
   v_W1302(0x8e,0x00);
   v_W1302(0x80,0x80);
   v_W1302(0x82,min);
   v_W1302(0x84,hou);
   v_W1302(0x86,day);
   v_W1302(0x88,mon);
   v_W1302(0x8c,yea);
   v_W1302(0x80,0x00);
   v_W1302(0x8e,0x80);
 }