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};//秒 分 时

//函数定义声明
void Write1302(unsigned char );//向1302写一个字节数据
void WriteSet1302(unsigned char ,unsigned char );//根据命令字，向1302写一个字节数据
unsigned char Read1302(void);//从1302读一个字节数据
unsignedcharReadSet1302(unsigned char Cmd);//根据命令字从1302读取一个字节数据
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，为脉冲上升沿写入数据做好准备

for(i=0;i<8;i++)//连续写8个二进制位数据
{
T_IO=dat&0x01;//取出dat的第0位数据写入1302

T_CLK=0;
T_CLK=1;//上升沿写入数据

T_CLK=0;//重新拉低T_CLK，形成脉冲
dat>>=1;//将dat的各数据位右移1位，准备写入下一个数据位
}
}

void WriteSet1302(unsigned char Cmd,unsigned char dat)
{
T_RST=0;//禁止数据传递
T_CLK=0;//确保写数居前T_CLK被拉低
T_RST=1;//启动数据传输

Write1302(Cmd);//写入命令字
Write1302((dat/10<<4)|(dat));//写数据
T_CLK=1;//将时钟电平置于已知状态
T_RST=0;//禁止数据传递
}

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

for(i=0;i<8;i++)//连续读8个二进制位数据
{
dat>>=1;//将dat的各数据位右移1位，因为先读出的是字节的最低位
if(T_IO==1)//如果读出的数据是1
dat|=0x80;//将1取出，写在dat的最高位
T_CLK=1;//将T_CLK置于高电平，为下降沿读出
Delay1Us(2);//稍微等待
T_CLK=0;//拉低T_CLK，形成脉冲下降沿

}
return dat;//将读出的数据返回
}


unsigned charReadSet1302(unsigned char Cmd)
{
unsigned char temp,dat1,dat2;
T_RST=0;//拉低T_RST
T_CLK=0;//确保写数居前T_CLK被拉低
T_RST=1;//启动数据传输
Write1302(Cmd);//写入命令字
temp=Read1302();//读出数据
T_CLK=1;//将时钟电平置于已知状态
T_RST=0;//禁止数据传递
dat1=temp/16;//16进制转成BCD
dat2=temp;
temp=dat1*10+dat2;//转换成10进制数字
return (temp);//将读出的数据返回
}

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写入数据

TableDs1302[0]=ReadSet1302(0x81); //获得的数据已转换为十进制
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写入数据，提高可靠
}

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--;
}
}
}