/*********************************************************************************
1.本程序能夠顯示年,月,日,時,分,
秒,星期七個參數.
2.時間和日期可調。可分別完成年,月,日,時,分,
秒六個參數的調整。支持平年和閏年天數的自動調整。
實驗名稱:時鐘芯片DS12C887演示程序
晶振:內部? 8M
接線方法:
1.PA0-PA2分別接DS1302的CS,TADA,SLK.
*********************************************************************************/
#include#include#define uchar unsigned char
#define uint unsigned int
#define ds1302_PIN???????????? PINA&BIT(PA1)
#define ds1302_DDR???????????? DDRA
#define ds1302_DDR_OUT???????? ds1302_DDR|=BIT(PA0)|BIT(PA1)|BIT(PA2)
#define ds1302_DDR_IN????????? ds1302_DDR&=~(BIT(PA1)|BIT(PA2))
#define ds1302_PORT??????????? PORTA
#define ds1302_RST_H??? ??? ds1302_PORT|= BIT(PA0)? //片選
#define ds1302_RST_L??? ??? ds1302_PORT&= ~BIT(PA0)
#define ds1302_DAT_H??? ??? ds1302_PORT|= BIT(PA1)? //數據
#define ds1302_DAT_L??? ??? ds1302_PORT&= ~BIT(PA1)
#define ds1302_CLK_H??? ??? ds1302_PORT|= BIT(PA2)? //時鐘
#define ds1302_CLK_L??? ??? ds1302_PORT&= ~BIT(PA2)
const char start_time[]={0x00,0x00,0x00,0x01,0x01,0x07,0x06};?? //初始值;
char month_p[13]={0,31,28,31,30,31,30,31,31,30,31,30,31,};//平年
char month_y[13]={0,31,29,31,30,31,30,31,31,30,31,30,31,};//閏年
uchar second=0;
uchar minute=0;
uchar hour=0;
uchar day=1;
uchar month=1;
uchar year=6;
uchar week=7;
uchar month_max=0;//每月最大天數
/****************DS1302子程序***********************/
void ds1302_inputbyte(uchar CD)? //寫入一字節數據
{
uchar i,mid=0;
for (i=8;i>0;i--)
{
mid=CD&0x01;
if (mid==0)
ds1302_DAT_L;
else
ds1302_DAT_H ;
ds1302_CLK_H ;
ds1302_CLK_L ;
CD=CD>>1;
}
}
uchar ds1302_outputbyte(void)? //讀取一字節數據
{
uchar i,mid=0;
for (i=8;i>0;i--)
{
ds1302_DDR_IN;
mid=mid>>1;
if ((ds1302_PIN)==0)
mid&=~BIT(PB7);
else
mid|=BIT(PB7);
ds1302_DDR_OUT;
ds1302_CLK_H ;
ds1302_CLK_L ;
}
return(mid);
}
void w1302(uchar ucAddr,uchar ucDa)?? //寫入數據
{
ds1302_DDR_OUT ;
ds1302_RST_L;
ds1302_CLK_L;
ds1302_RST_H;
ds1302_inputbyte(ucAddr);
ds1302_inputbyte(ucDa);
ds1302_CLK_H ;
ds1302_RST_L;
}
uchar r1302(uchar ucAddr)??????? //讀取數據
{
uchar ucDa;
ds1302_DDR_OUT ;
ds1302_RST_L;
ds1302_CLK_L ;
ds1302_RST_H ;
ds1302_inputbyte(ucAddr);
ucDa=ds1302_outputbyte();
ds1302_CLK_H ;
ds1302_RST_L;
return(ucDa);
}
//設置初始時間
//格式:秒,分,時,日,月,星期,年
void set1302()
{
uchar i;
uchar ucaddr=0x80;
w1302(0x8e,0x00);//寫允許
w1302(0x90,0xa6);//打開充電功能
for (i=0;i<7;i++)
{
w1302(ucaddr,start_time[i]);
ucaddr+=2;
}
w1302(0x8e,0x80);//寫禁止
}
//讀取當前時間
void get1302()
{
uchar i=0,ucaddr=0x81;
uchar uctimer[6];
char sec1,day1,mon1,year1,min1,hour1;
for (i=0;i<7;i++)
{
uctimer[i]=r1302(ucaddr);
ucaddr+=2;
}
sec1=uctimer[0];//十進制到二進制的調整
second=((sec1&0x70)>>4)*10+(sec1&0x0f);
min1=uctimer[1];
minute=((min1&0x70)>>4)*10+(min1&0x0f);
hour1=uctimer[2];
hour=((hour1&0x30)>>4)*10+(hour1&0x0f);
day1=uctimer[3];
day=((day1&0x30)>>4)*10+(day1&0x0f);
mon1=uctimer[4];
month=((mon1&0x10)>>4)*10+(mon1&0x0f);
week=uctimer[5];
year1=uctimer[6];
year=((year1&0x70)>>4)*10+(year1&0x0f);
}
void second_set()?? //調秒
{
w1302(0x8e,0x00);
w1302(0x80,((second/10)<<4)+(second%10));
w1302(0x8e,0x80);
}
void minute_set()? //調分
{
w1302(0x8e,0x00);
w1302(0x82,((minute/10)<<4)+(minute%10));
w1302(0x8e,0x80);
}
void hour_set()? //調時
{
w1302(0x8e,0x00);
w1302(0x84,((hour/10)<<4)+(hour%10));
w1302(0x8e,0x80);
}
void year_set()? //調年
{
year++;
if (year>69)
year=6;
if (year%4==0)
month_max=month_y[month];
else
month_max=month_p[month];
if (day>month_max)
day=month_max;
day_set();
w1302(0x8e,0x00);
w1302(0x8c,((year/10)<<4)+(year%10));
w1302(0x8e,0x80);
}
void month_set()? //調月
{
month++;
if (month>12)
month=1;
if (year%4==0)
month_max=month_y[month];
else
month_max=month_p[month];
if (day>month_max)
day=month_max;
day_set();
w1302(0x8e,0x00);
w1302(0x88,((month/10)<<4)+(month%10));
w1302(0x8e,0x80);
}
void day_set()? //調日
{
uchar i=0;
uchar j=0;
uchar month_m=0;
uint day_n=0;
day_n=0;
for (i=6;i? {
if (i?? {
if (i%4==0)
day_n=day_n+366;
else
day_n=day_n+365;
}
if (i==year)
{
if (month>1)
{
for (j=1;j???? ?{
if (year%4==0)
month_m=month_y[j];
else
month_m=month_p[j];
day_n=day_n+month_m;
}
}
}
}
if (year%4==0)
month_max=month_y[month];
else
month_max=month_p[month];
if (day>month_max)
day=1;
week=(day_n+day-1)%7;
if (week==0)
week=7;
w1302(0x8e,0x00);
w1302(0x86,((day/10)<<4)+(day%10));
w1302(0x8a,week);
w1302(0x8e,0x80);
}