AT89S52控制DS1302时钟程序

#include


/*************************ds1302与at89s52引脚连接********************/
sbitT_RST=P3^5;
sbitT_CLK=P3^6;

sbitT_IO=P3^7;
sbitACC0=ACC^0;
sbitACC7=ACC^7;
unsignedcharseg[]={0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09};//0~~9段码

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

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

}

/******************DS1302:写入数据（先送地址，再写数据）***************************/
voidwrite_1302(unsignedcharaddr,unsignedcharda)
{
T_RST=0;//停止工作
T_CLK=0;
T_RST=1;//重新工作
write_byte(addr);//写入地址

write_byte(da);
T_RST=0;
T_CLK=1;
}

/******************DS1302:读取数据（先送地址，再读数据）**************************/
unsignedcharread_1302(unsignedcharaddr)
{
unsignedchartemp;
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**************************************/
voiddelay(unsignedchara)
{
unsignedchari;
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:位选*/
/****************************************************************************/
voidled_disp(unsignedchar*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;
}
/************************主程序**********************************************/
voidmain(void)
{
unsignedcharclk_time[3]={0x00,0x00,0x12};//秒，分，时寄存器初始值
unsignedchartemp=0x80;
unsignedchari;
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;
}
}
}