PCF8563的51程序

sbit SDA=P2^2;
sbit SCL=P2^1;
void start(void);                     // I2C起始
void stop(void);                     // I2C结束
void ACK(void);                     // CPU应答
void NACK(void);                   // CPU非应答
bit Sendbyte(unsigned char data0); // 向pcf8563发送1字节数据或地址
unsigned char Receivebyte(void);   // 读取pcf8563 1字节数据
void Set8563(unsigned char *p2);   // 设置pcf8563初始时间
void Get8563(void);                        // 读取pcf8563当前时间
void delaynms(unsigned char k);    // ms延时
void delay1s();                                // 延时子程序 1s
void leddisplay();                            // 数码管显示
unsigned char ledxs[8];                  // 年-月-日  时-分-秒  轮流显示缓冲区
unsigned char time[7];                   // 当前时间,格式: 秒 分 时 日  星期  月  年
unsigned char settime[9]={0x00,0x1f,0x00,0x28,0x09,0x27,0x02,0x04,0x10};
           //时间初始值: 控制1 控制2  秒   分   时   日 星期   月   年
unsigned char code tab[]={0xb7,0x12,0x67,0x76,0xd2,0xf4,0xf5,0x16,0xf7,0xf6,0xd7,0xf1,0xa5,0x73,0xe5,0xc5,0,0xff,0x40};
                          //共阴极代码 0-F，  全灭，全亮，‘-’
void main()
{
  unsigned char i,j,k;
  delaynms(200);
  Set8563(settime); // 设置初始时间
  while(1)
  {
    k=3;
    while(k>0)   // 年-月-日  显示3秒   （ 10-04-27 ）
    {
      Get8563();    //取得当前时间
      ledxs[0]=time[6]>>4;
      ledxs[1]=time[6]&0x0f;  // 年
      ledxs[2]=18;        // -
      ledxs[3]=(time[5]&0x1f)>>4;
      ledxs[4]=(time[5]&0x1f)&0x0f; // 月
      ledxs[5]=18;       // -
      ledxs[6]=(time[3]&0x3f)>>4;
      ledxs[7]=(time[3]&0x3f)&0x0f; // 日
      for(i=0;i<8;i++) //显示
      {
        SBUF=tab[ledxs[i]];
        while(TI==0);
        TI=0;
      }
      k--;
      delay1s();
     }
     k=100;
     while(k>0)    // 时-分-秒   显示10秒    （ 09-28-00 ）
     {
       Get8563();    //取得当前时间
       ledxs[0]=(time[2]&0x3f)>>4;
       ledxs[1]=(time[2]&0x3f)&0x0f;//  时
       ledxs[2]=18;
       ledxs[3]=(time[1]&0x7f)>>4;
       ledxs[4]=(time[1]&0x7f)&0x0f; //  分
       ledxs[5]=18;
       ledxs[6]=(time[0]&0x7f)>>4;
       ledxs[7]=(time[0]&0x7f)&0x0f; //  秒
       for(i=0;i<8;i++)  //显示
       {
         SBUF=tab[ledxs[i]];
         while(TI==0);
         TI=0;
       }
       k--;
       delaynms(100);
     }
   }
}

//-------------------------------------------------------------------
//CPU产生I2C起始信号，SCL高电平期间，SDA由1到0
//------------------------------------------------------------------
void start()
{
  unsigned char i;
  SDA=1;            //SDA置1
  i=2;while(--i);
  SCL=1;            //SCL置为高电平
  i=2;while(--i);
  SDA=0;            //SDA清0
  i=2;while(--i);
  SCL=0;            //SCL恢复低电平
}
//---------------------------------------------------------------------
//CPU产生I2C结束信号，SCL高电平期间，SDA由0到1
//--------------------------------------------------------------------
void stop()
{
  unsigned char i;
  SDA=0;            //SDA清0
  i=2;while(--i);
  SCL=1;            //SCL置为高电平
  i=2;while(--i);
  SDA=1;            //SDA置1
  i=2;while(--i);
  SCL=0;            //SCL恢复低电平
}
//--------------------------------------------------------------------------------------
//CPU产生应答信号（CPU接收数据后）接收方产生应答或非应答信号
//24c64自动产生，cpu需要调用程序
//---------------------------------------------------------------------------------------
void ACK()
{
  unsigned char i;
  SDA=0;            //SDA清0
  i=2;while(--i);
  SCL=1;
  i=2;while(--i);
  SCL=0;
  i=2;while(--i);
  SDA=1;
}
//-------------------------------------------------------
//CPU产生非应答信号 （CPU接收数据后）
//-------------------------------------------------------
void NACK()
{
  unsigned char i;
  SDA=1;            //SDA置1
  i=2;while(--i);
  SCL=1;
  i=2;while(--i);
  SCL=0;
  i=2;while(--i);
}
//-------------------------------------------------------------------------------------------
//CPU向pcf8563发送一个字节数据或地址，并检查pcf8563发回的确认信号
//返回标志位flag，0应答，1非应答。
//-------------------------------------------------------------------------------------------
bit Sendbyte(unsigned char data0)
{
  unsigned char i,j;
  bit flag;
  for(j=0;j<8;j++)    //发送一个字节 （1次发送1位）
  {
    SCL=0;
    i=2;while(--i);
    if(data0&0x80)   //取data0最高位
       SDA=1;
    else
       SDA=0;
    i=2;while(--i);
    SCL=1;
    i=2;while(--i);
    data0=data0<<1;  //data0左移1位
  }
//以下为检查pcf8563应答信号
  SCL=0;
  i=2;while(--i);
  SDA=1;           //数据线拉高
  i=2;while(--i);
  SCL=1;
  i=2;while(--i);
  flag=SDA;       //读应答信号
  SCL=0;
  i=2;while(--i);
  return flag;  //pcf8563正确接收，返回0(ACK)；不正确接收，返回1(NOACK)。
}
//--------------------------------------------------
//CPU接收pcf8563发送来的一个字节
//--------------------------------------------------
unsigned char Receivebyte()
{
  unsigned i,j,data0;
  SCL=0;
  i=2;while(--i);
  SDA=1;
  for(j=0;j<8;j++)   //1次接收1位
  {
    data0=data0<<1;
    SCL=1;
    i=2;while(--i);
    if(SDA) data0=data0+1;  //接收数据存在最低位
    i=2;while(--i);
    SCL=0;
    i=2;while(--i);
  }
  return data0;      //返回接收的数据
}

//---------------------------------------------------------------------------------
// 功能: 设置初始时间
// 初始时间格式为: 秒 分 时 日  星期 月 年
// 向pcf8563写入9个字节，前2个为控制字，后7个为初始时间
//---------------------------------------------------------------------------------
void Set8563(unsigned char *p1)
{        
  unsigned char flag,count=9,addr=0x00;
  start();                      // CPU发起始信号
  flag=Sendbyte(0xa2);          // CPU发器件地址
  while(flag) {Sendbyte(0xa2);} // 检查确认信号，不正确则重发
  flag=Sendbyte(addr);          // CPU发起始单元地址
  while(flag) {Sendbyte(addr);} // 检查确认信号，不正确则重发
  while(count--)
  {
    flag=Sendbyte(*p1);            // 发送1个数据
    while(flag) {Sendbyte(*p1);}   // 检查确认信号，不正确则重发
    p1++;                          // 修改指针
  }
  stop();                          //CPU发结束信号
  delaynms(10);
}
//------------------------------------------------------------------------
// 功能: 读取DS1302当前时间
// 时间格式为: 秒 分 时 日 星期 月 年
// 读取7个字节
//------------------------------------------------------------------------
void Get8563(void)
{
  unsigned char i,flag,addr=0x02;
  //以下是伪写
  start();                       // CPU发起始信号
  flag=Sendbyte(0xa2);           // CPU发器件地址
  while(flag) {Sendbyte(0xa2);}  // 检查确认信号，不正确则重发
  flag=Sendbyte(addr);           // CPU发起始单元地址
  while(flag) {Sendbyte(addr);}  // 检查确认信号，不正确则重发
  //以下是读n个字节
  start();                       // CPU发起始信号
  flag=Sendbyte(0xa3);           // CPU发器件地址
  while(flag) {Sendbyte(0xa3);}
  for(i=0;i<6;i++)               // 读取前6个字节
  {
    time[i]=Receivebyte();       // 读取1个字节
    ACK();                       // cpu发应答信号
    addr++;                      // 修改地址
  }
  time[6]=Receivebyte();         // 读取最后1个字节
  NACK();                        // cpu发送非应答信号
  stop();                        // CPU发结束信号
}
void delaynms(unsigned char k)  //延时 n ms
{
  while(k)
  {
  int i;
  i=110;
  while(i--);
  k=k-1;
  }
}
void delay1s()         //延时 1 s
{
  int i;
  i=56000;
  while(i--);
  i=56000;
  while(i--);
}