#include<reg51.h>
/*************************ds1302与at89s52引脚连接********************/
sbit T_RST=P3^5;
sbit T_CLK=P3^6;                
sbit T_IO=P3^7;                
              
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;
unsigned char seg[]={0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09};         //0~~9段码

/******************DS1302：写入操作(上升沿)*********************/
void write_byte(unsigned char da)
{
   unsigned char i;
   ACC=da;
   for(i=8;i>0;i--)
   {
      T_IO=ACC0;
   T_CLK=0;    
      T_CLK=1;
      ACC=ACC>>1;
   }
}

/******************DS1302：读取操作（下降沿）*****************/
unsigned char read_byte(void)
{
   unsigned char i;
   for(i=0;i<8;i++)
   {
      ACC=ACC>>1;
   T_CLK = 1;
   T_CLK = 0;
      ACC7 = T_IO;
   }
   return(ACC);

}

/******************DS1302:写入数据（先送地址，再写数据）***************************/
void write_1302(unsigned char addr,unsigned char da)
{
   T_RST=0;    //停止工作
   T_CLK=0;                                
   T_RST=1;   //重新工作
   write_byte(addr);    //写入地址
  
   write_byte(da);
   T_RST=0;
   T_CLK=1;
}

/******************DS1302:读取数据（先送地址，再读数据）**************************/
unsigned char read_1302(unsigned char addr)
{
   unsigned char temp;
   T_RST=0;                                   //停止工作
   T_CLK=0;
   T_RST=1;                         //重新工作
   write_byte(addr);   //写入地址
   temp=read_byte();
   T_RST=0;
   T_CLK=1;     //停止工作
   return(temp);
}

/***********************延时程序=a*1ms**************************************/
void delay(unsigned char a)
{
   unsigned char i;
   while(a-- !=0)
   {
        for(i=0;i<125;i++);
   }
}

/***********************显示程序**********************************************/
/* 动态扫描条件（单个LED在1秒内）： count >=50次   //点亮次数               */
/*                                   time >=2ms    //持续时间               */
/* DS1302秒，分，时寄存器是BCD码形式： 用16求商和余进行"高4位"和"低4位"分离 */
/* 0x00,0x10,0x30,0x40,0x60,0x70    :   位选                                 */
/****************************************************************************/          
void led_disp(unsigned char *poi)
{
   P0=seg[*poi % 16];                    //第1个数码管：显示秒（个位）;
   delay(2);                             //持续2ms
   P0=0xff;                              //消影

   P0=seg[*poi /16]^0x10;               //第2个数码管：显示秒（十位）；
   delay(2);
   P0=0xff;
   poi++;

   P0=seg[*poi % 16]^0x30;             //第4个数码管：显示分（个位）
   delay(2);
   P0=0xff;

   P0=seg[*poi / 16]^0x40;            //第5个数码管：显示分（十位）
   delay(2);
   poi++;
   P0=0xff;

   P0=seg[*poi % 16]^0x60;             //第7个数码管：显示时（个位）
   delay(2);
   P0=0xff;
  

   P0=seg[*poi /16]^0x70;             //第8个数码管：显示时（十位）
   delay(2);
   P0=0xff;
}
/************************主程序**********************************************/
void main(void)
{
   unsigned char clk_time[3]={0x00,0x00,0x12}; //秒，分，时寄存器初始值
   unsigned char temp=0x80;         
   unsigned char i;
   write_1302(0x8e,0x00);             //WP=0 写操作
   for(i=0;i<3;i++)
   {
   write_1302(temp,clk_time[i]);
   temp+=2;
   }
   write_1302(0x8e,0x80);             //WP=1 写保护
   while(1)
   {
      led_disp(clk_time);
   temp=0x81;                   
      for(i=0;i<3;i++)
    {
      clk_time[i]=read_1302(temp);
   temp+=2;
   }
    }
}