时钟芯片DS1302驱动程序

芯片介绍
DS1302 是 DALLAS 公司推出的串行接口实时时钟芯片。芯片使用简单，外部连线少，在智能化仪表及自动控制领域具有广泛用途。其主要特点为简单的三线串行 I/O 接口；   2.5～5.5V 的电压工作范围（在 2.5V工作时耗电小于 300nA）；   与 TTL 兼容（Vcc=5V）时；   实时时钟包括秒、分、小时、日、月、星期和年（闰年）等信息；   31*8 静态 RAM 可供用户使用；   可选的涓流充电方式；   工作电源和备份电源双引脚输入；   备份电源可由大容量电容来替代。
2脚和3脚接32768Khz晶振，1脚接主电源，8脚接备用电池（亦可用大电容代替）。5、6、7脚与单片机连接。

#include<reg51.h>
#include<intrins.h>
#define  uint    unsigned  int
#define  uchar   unsigned  char
#define  nop()   _nop_()
sbit  RST = P1^5;
sbit  CK  = P1^6;
sbit  IO  = P1^7;
uchar Z10BCD( uchar date)  //十进制转BCD码
{
   uchar i,j;
   i=date/10;
   j=date-(i*10);
    i=(i<<4)|j; 
   return (i);
}
uchar BCDTO10( uchar date )   //BCD码转10进制
{
 uchar i,j;
 i=(date & 0xf0)>>4 ;
 j=date & 0x0f ;
 i=i*10+j;
 return i;
}
void  MCs()   //上升沿
{
 CK=0;
 nop();
 CK=1;
}
void  MCx()  //下降沿
{
 CK=1;
 nop();
 CK=0;
}
void WRdate( uchar date )  //写一个字节，由低到高
{
 uchar i;
 for(i=0;i<8;i++)
 {
     IO = date & 0x01 ;  //数据在上升沿以前准备好
     MCs();  //上升沿时刻写入
     date>>=1;   
 }
}
uchar REdate()
{
 uchar i,date=0;
 for(i=0;i<8;i++)
 {
  if(IO)
  {
   date|=0x80;
  }
  MCx();  //下降沿读出数据
  date>>=1;     
 }
 return date;
}
uchar  RE1302( uchar addr )
{
 uchar Date;
 RST=0;
    CK=0;
 RST=1; //CK为0时，RST才能为1，然后才能读写
 WRdate(addr); //写地址
 Date=REdate(); //读数据
 CK=1;
 RST=0;
 return (Date);
}
void  WR1302( uchar addr,uchar Date ) //给某地址写数据
{
 RST=0;
 CK=0;
 RST=1; //CK为0时，RST才能为1，然后才能读写
 WRdate(addr); //写地址
 WRdate(Date); //写数据
 CK=1;
 RST=0;
}

void  Initime(uchar sec,uchar min,uchar hor,uchar day,uchar yue,uchar week,uchar year)
{
 WR1302(0x8E,0X00);  // 0X8E是WP写保护地址，最高位赋0表示可以写
 
 WR1302( 0x80, Z10BCD( sec ) );  //向秒单元赋初值
 WR1302( 0x82, Z10BCD( min ) );  //向分单元赋初值
 WR1302( 0x84, Z10BCD( hor ) );  //向时单元赋初值
 WR1302( 0x86, Z10BCD( day ) );  //向日单元赋初值
 WR1302( 0x88, Z10BCD( yue ) );  //向月单元赋初值
 WR1302( 0x8a, Z10BCD( week) );  //向周单元赋初值
 WR1302( 0x8c, Z10BCD( year) );  //向年单元赋初值
}
main()
{
 uchar  Sec,Min,Hor,Day; 
 uchar  Yue,Week,Year;
 
 WR1302(0x8E,0X00);  // 0X8E是WP写保护地址，最高位赋0表示可以写操作
 Initime(5,20,14,18,6,3,10);    //设置初始值
 //顺序：秒、分、时、日、月、星期、年(只写00~99) 2010-6-18 14:20:05 周三
 WR1302(0x8E,0X80);  // 0X8E是WP写保护地址，最高位赋1表示写保护，只能读
    WR1302(0x90,0XA7);  //0x90是充电设置地址，0XA7表示一个二极管串联一个8K电阻
 // WR1302(0x90,0XA6); //一个二极管加一个4K电阻   
 // WR1302(0x90,0XA5); //一个二极管加一个2K电阻
 // WR1302(0x90,0XA4); //一个二极管不加电阻
 // WR1302(0x90,0XA8); //两个二极管不加电阻
 // WR1302(0x90,0XA9); //两个二极管加一个2K电阻
 // WR1302(0x90,0XAA); //两个二极管加一个4K电阻
 // WR1302(0x90,0XAB); //两个二极管加一个8K电阻
 
   while(1)
 {
 
 Sec  = BCDTO10( RE1302(0x81) ); //0x81读秒数据,读出来的是BCD码,还要转换成十进制数
 Min  = BCDTO10( RE1302(0x83) ); //0x83读分数据
 Hor  = BCDTO10( RE1302(0x85) ); //0x85读时数据
 Day  = BCDTO10( RE1302(0x87) ); //0x87读日数据
 Yue  = BCDTO10( RE1302(0x89) ); //0x89读月数据
 Week = BCDTO10( RE1302(0x8B) ); //0x8b读星期数据
 Year = BCDTO10( RE1302(0x8D) ); //0x8d读年数据
 nop();
  
 P2=Sec;   //仿真时方便查看
 }
}