#include

sbit SDA=P2^2;
sbit SCL=P2^1;
void start(void); // I2C起始
void stop(void); // I2C結(jié)束
void ACK(void); // CPU應答
void NACK(void); // CPU非應答
bit Sendbyte(unsigned char data0); // 向pcf8563發(fā)送1字節(jié)數(shù)據(jù)或地址
unsigned char Receivebyte(void); // 讀取pcf8563 1字節(jié)數(shù)據(jù)
void Set8563(unsigned char *p2); // 設(shè)置pcf8563初始時間
void Get8563(void); // 讀取pcf8563當前時間
void delaynms(unsigned char k); // ms延時
void delay1s(); // 延時子程序 1s
void leddisplay(); // 數(shù)碼管顯示
unsigned char ledxs[8]; // 年-月-日 時-分-秒 輪流顯示緩沖區(qū)
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); // 設(shè)置初始時間
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產(chǎn)生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產(chǎn)生I2C結(jié)束信號，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產(chǎn)生應答信號（CPU接收數(shù)據(jù)后）接收方產(chǎn)生應答或非應答信號
//24c64自動產(chǎn)生，cpu需要調(diào)用程序
//---------------------------------------------------------------------------------------
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產(chǎn)生非應答信號 （CPU接收數(shù)據(jù)后）
//-------------------------------------------------------
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發(fā)送一個字節(jié)數(shù)據(jù)或地址，并檢查pcf8563發(fā)回的確認信號
//返回標志位flag，0應答，1非應答。
//-------------------------------------------------------------------------------------------
bit Sendbyte(unsigned char data0)
{
unsigned char i,j;
bit flag;
for(j=0;j<8;j++) //發(fā)送一個字節(jié) （1次發(fā)送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; //數(shù)據(jù)線拉高
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發(fā)送來的一個字節(jié)
//--------------------------------------------------
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; //接收數(shù)據(jù)存在最低位
i=2;while(--i);
SCL=0;
i=2;while(--i);
}
return data0; //返回接收的數(shù)據(jù)
}

//---------------------------------------------------------------------------------
// 功能: 設(shè)置初始時間
// 初始時間格式為: 秒 分 時 日 星期 月 年
// 向pcf8563寫入9個字節(jié)，前2個為控制字，后7個為初始時間
//---------------------------------------------------------------------------------
void Set8563(unsigned char *p1)
{
unsigned char flag,count=9,addr=0x00;
start(); // CPU發(fā)起始信號
flag=Sendbyte(0xa2); // CPU發(fā)器件地址
while(flag) {Sendbyte(0xa2);} // 檢查確認信號，不正確則重發(fā)
flag=Sendbyte(addr); // CPU發(fā)起始單元地址
while(flag) {Sendbyte(addr);} // 檢查確認信號，不正確則重發(fā)
while(count--)
{
flag=Sendbyte(*p1); // 發(fā)送1個數(shù)據(jù)
while(flag) {Sendbyte(*p1);} // 檢查確認信號，不正確則重發(fā)
p1++; // 修改指針
}
stop(); //CPU發(fā)結(jié)束信號
delaynms(10);
}
//------------------------------------------------------------------------
// 功能: 讀取DS1302當前時間
// 時間格式為: 秒 分 時 日 星期 月 年
// 讀取7個字節(jié)
//------------------------------------------------------------------------
void Get8563(void)
{
unsigned char i,flag,addr=0x02;
//以下是偽寫
start(); // CPU發(fā)起始信號
flag=Sendbyte(0xa2); // CPU發(fā)器件地址
while(flag) {Sendbyte(0xa2);} // 檢查確認信號，不正確則重發(fā)
flag=Sendbyte(addr); // CPU發(fā)起始單元地址
while(flag) {Sendbyte(addr);} // 檢查確認信號，不正確則重發(fā)
//以下是讀n個字節(jié)
start(); // CPU發(fā)起始信號
flag=Sendbyte(0xa3); // CPU發(fā)器件地址
while(flag) {Sendbyte(0xa3);}
for(i=0;i<6;i++) // 讀取前6個字節(jié)
{
time[i]=Receivebyte(); // 讀取1個字節(jié)
ACK(); // cpu發(fā)應答信號
addr++; // 修改地址
}
time[6]=Receivebyte(); // 讀取最后1個字節(jié)
NACK(); // cpu發(fā)送非應答信號
stop(); // CPU發(fā)結(jié)束信號
}
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--);
}