DS1302的時分秒讀寫程序—STC系列12T單片機

#include

#define uchar unsigned char
#define uint unsigned int

sbit ACC0=ACC^0;
sbit ACC7=ACC^7;
sbit P25=P2^5;
sbit P26=P2^6;
sbit P27=P2^7;
sbit P36=P3^6;



sbit T_CLK = P1^7;
sbit T_IO = P2^3;
sbit T_RST = P1^3;

uchar code tableduan[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90 }; //共陽
uchar code tablewei[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80}; //共陽
uchar xianshishu[8]={0,0,0,0,0,0,0,0};
uchar TableDs1302[7]={0,0,0,0,0,0,0};//秒 分 時

//函數(shù)定義聲明
void Write1302(unsigned char );//向1302寫一個字節(jié)數(shù)據(jù)
void WriteSet1302(unsigned char ,unsigned char );//根據(jù)命令字，向1302寫一個字節(jié)數(shù)據(jù)
unsigned char Read1302(void);//從1302讀一個字節(jié)數(shù)據(jù)
unsigned char ReadSet1302(unsigned char Cmd);//根據(jù)命令字從1302讀取一個字節(jié)數(shù)據(jù)
void InitDS1302(void);//初始化1302
void GetTime(void);//獲取1302的時間

void Delay1Us(uchar n)
{
while (n--)
{
_nop_();
_nop_();

}
}
void delay1(uint z)//這是一個延時，我也不知道準確的延時多少
{

int n = 1000;

while (n--)
{
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
}
}

void Write1302(unsigned char dat)
{
unsigned char i;
T_CLK=0; //拉低T_CLK，為脈沖上升沿寫入數(shù)據(jù)做好準備

for(i=0;i<8;i++) //連續(xù)寫8個二進制位數(shù)據(jù)
{
T_IO=dat&0x01; //取出dat的第0位數(shù)據(jù)寫入1302

T_CLK=0;
T_CLK=1; //上升沿寫入數(shù)據(jù)

T_CLK=0; //重新拉低T_CLK，形成脈沖
dat>>=1; //將dat的各數(shù)據(jù)位右移1位，準備寫入下一個數(shù)據(jù)位
}
}

void WriteSet1302(unsigned char Cmd,unsigned char dat)
{
T_RST=0; //禁止數(shù)據(jù)傳遞
T_CLK=0; //確保寫數(shù)居前T_CLK被拉低
T_RST=1; //啟動數(shù)據(jù)傳輸

Write1302(Cmd); //寫入命令字
Write1302((dat/10<<4)|(dat)); //寫數(shù)據(jù)
T_CLK=1; //將時鐘電平置于已知狀態(tài)
T_RST=0; //禁止數(shù)據(jù)傳遞
}

unsigned char Read1302(void)
{
unsigned char i,dat;

for(i=0;i<8;i++) //連續(xù)讀8個二進制位數(shù)據(jù)
{
dat>>=1; //將dat的各數(shù)據(jù)位右移1位，因為先讀出的是字節(jié)的最低位
if(T_IO==1) //如果讀出的數(shù)據(jù)是1
dat|=0x80; //將1取出，寫在dat的最高位
T_CLK=1; //將T_CLK置于高電平，為下降沿讀出
Delay1Us(2); //稍微等待
T_CLK=0; //拉低T_CLK，形成脈沖下降沿

}
return dat; //將讀出的數(shù)據(jù)返回
}


unsigned char ReadSet1302(unsigned char Cmd)
{
unsigned char temp,dat1,dat2;
T_RST=0; //拉低T_RST
T_CLK=0; //確保寫數(shù)居前T_CLK被拉低
T_RST=1; //啟動數(shù)據(jù)傳輸
Write1302(Cmd); //寫入命令字
temp=Read1302(); //讀出數(shù)據(jù)
T_CLK=1; //將時鐘電平置于已知狀態(tài)
T_RST=0; //禁止數(shù)據(jù)傳遞
dat1=temp/16; //16進制轉(zhuǎn)成BCD
dat2=temp;
temp=dat1*10+dat2; //轉(zhuǎn)換成10進制數(shù)字
return (temp); //將讀出的數(shù)據(jù)返回
}

void InitDS1302(void)
{
unsigned char i,add;
add=0x80;
WriteSet1302(0x8e,0x00); //允許寫入
WriteSet1302(0x80,0x32);
WriteSet1302(0x8e,0x80);//寫秒

WriteSet1302(0x8e,0x00);
WriteSet1302(0x82,0x3b);
WriteSet1302(0x8e,0x80);//寫分

WriteSet1302(0x8e,0x00);
WriteSet1302(0x84,0x18);
WriteSet1302(0x8e,0x80);//寫時

WriteSet1302(0x8e,0x00);
WriteSet1302(0x90,0xa6); //寫充電控制寄存器.
WriteSet1302(0x8e,0x80); //禁止寫入
}

void GetTime()
{
unsigned char i;
WriteSet1302(0x8e,0x00); //允許向DS1302寫入數(shù)據(jù)

TableDs1302[0]=ReadSet1302(0x81); //獲得的數(shù)據(jù)已轉(zhuǎn)換為十進制
WriteSet1302(0x8e,0x80);
WriteSet1302(0x8e,0x00);
TableDs1302[1]=ReadSet1302(0x83);
WriteSet1302(0x8e,0x80);
WriteSet1302(0x8e,0x00);
TableDs1302[2]=ReadSet1302(0x85)
; WriteSet1302(0x8e,0x80);
WriteSet1302(0x8e,0x00);
WriteSet1302(0x8e,0x80); //獲取完一次時間，禁止向DS1302寫入數(shù)據(jù)，提高可靠
}

void duanxuan()
{
P25=1;
P26=1;
P27=1;
P36=1;
}

void weixuan()
{
P25=0;
P26=1;
P27=1;
P36=1;
}

void display()
{
uchar i;
for(i=0;i<8;i++)
{

duanxuan(); //138選通Y7
P36=0; //duan=1;
P0=0xff;
_nop_();
_nop_();
P0=tableduan[xianshishu[i]];
P36=1; //duan=0;

weixuan();//138選通Y6
P36=0;
P0=0xff;
_nop_();
_nop_(); //wela=1;
P0=tablewei[i];
P36=1; //wela=0;
delay1(30);
}
duanxuan();
P36=0; //duan=1;
P0=0xff;
P36=1; //duan=0;
}

void shujuchuli()
{

xianshishu[0]=(TableDs1302[2]&0x3f)/10;
xianshishu[1]=(TableDs1302[2]&0x3f);
xianshishu[3]=TableDs1302[1]/10;
xianshishu[4]=TableDs1302[1];
xianshishu[6]=TableDs1302[0]/10;
xianshishu[7]=TableDs1302[0];
}

void main()
{

InitDS1302();
while(1)
{
GetTime();
shujuchuli();
n=5000000;
while(n)
{

display();
n--;
}
}
}