c51上跑smallrtos 之ds1302 存取日期

ds1302 存取日期

/**********************************************************************
* *
* Ds1302 *
* *
***********************************************************************/
sbit SCK=P3^4; //时钟
sbit SDA=P3^3; //数据
sbit RST = P3^2;// DS1302复位

//bit ReadRTC_Flag;//定义读DS1302标志

OS_Q_MEM_SEL unsigned char l_tmpdate[7]={0,0,12,1,1,2,13};//秒分时日月周年13-01-01 12:00:00

code unsigned char write_rtc_address[7]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //秒分时日月周年 最低位读写位
code unsigned char read_rtc_address[7]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};

/******************************************************************/
/* 写一个字节 */
/******************************************************************/
void Write_Ds1302_Byte(unsigned char temp)
{
unsigned char i;
for (i=0;i<8;i++) //循环8次 写入数据
{
SCK=0;
SDA=temp&0x01; //每次传输低字节
temp>>=1; //右移一位
SCK=1;
}
}
/******************************************************************/
/* 写入DS1302 */
/******************************************************************/
void Write_Ds1302( unsigned char address,unsigned char dat )
{
RST=0;
_nop_();
SCK=0;
_nop_();
RST=1;
_nop_(); //启动
Write_Ds1302_Byte(address); //发送地址
Write_Ds1302_Byte(dat); //发送数据
RST=0; //恢复
}
/******************************************************************/
/* 读出DS1302数据 */
/******************************************************************/
unsigned char Read_Ds1302 ( unsigned char address )
{
unsigned char i,temp=0x00;
RST=0;
_nop_(); _nop_();
SCK=0;
_nop_(); _nop_();
RST=1;
_nop_(); _nop_();
Write_Ds1302_Byte(address);
for (i=0;i<8;i++) //循环8次 读取数据
{
if(SDA)
temp|=0x80; //每次传输低字节
SCK=0;
temp>>=1; //右移一位
_nop_(); _nop_(); _nop_();
SCK=1;
}
RST=0; //以下为DS1302复位的稳定时间
_nop_(); _nop_();
RST=0;
SCK=0;
_nop_(); _nop_(); _nop_(); _nop_();
SCK=1;
_nop_(); _nop_();
SDA=0;
_nop_(); _nop_();
SDA=1;
_nop_(); _nop_();
return (temp); //返回
}
/******************************************************************/
/* 读时钟数据 */
/******************************************************************/
void Read_RTC(void) //读取 日历
{
unsigned char i,*p;
OS_ENTER_CRITICAL();
b120
p=read_rtc_address; //地址传递
for(i=0;i<7;i++) //分7次读取 秒分时日月周年
{
l_tmpdate[i]=Read_Ds1302(*p);
p++;
}
OS_EXIT_CRITICAL();
}
/******************************************************************/
/* 设定时钟数据 */
/******************************************************************/
void Set_RTC(void) //设定 日历
{
unsigned char i,*p,tmp;
OS_ENTER_CRITICAL();
for(i=0;i<7;i++){ //BCD处理
tmp=l_tmpdate[i]/10;
l_tmpdate[i]=l_tmpdate[i]%10;
l_tmpdate[i]=l_tmpdate[i]+tmp*16;
}
Write_Ds1302(0x8E,0X00);

p=write_rtc_address; //传地址
for(i=0;i<7;i++) //7次写入 秒分时日月周年
{
Write_Ds1302(*p,l_tmpdate[i]);
p++;
}
Write_Ds1302(0x8E,0x80);
OS_EXIT_CRITICAL();
}

void Ds1302Run(void)
{

Read_RTC();

}

unsigned char Ds1302Save(void)
{
//使用了l_tmpdate，disStr优先级应在 LCD1602Show,Ds1302Run读时间前

//输入格式130321*4*235958
if(disStr[6]!='*'||disStr[8]!='*'){return 0;}
//unsigned char l_tmpdate[7]={58,59,23,21,3,4,13};//秒分时日月周年

l_tmpdate[0]=disStr[14]-'0';
l_tmpdate[0]+=(disStr[13]-'0')*10;
if(l_tmpdate[0]>59){return 0;}
l_tmpdate[0]%=60;
l_tmpdate[1]=disStr[12]-'0';
l_tmpdate[1]+=(disStr[11]-'0')*10;
if(l_tmpdate[1]>59){return 0;}
l_tmpdate[1]%=60;
l_tmpdate[2]=disStr[10]-'0';
l_tmpdate[2]+=(disStr[9]-'0')*10;
if(l_tmpdate[2]>23){return 0;}
l_tmpdate[2]%=24;
l_tmpdate[3]=disStr[5]-'0';
l_tmpdate[3]+=(disStr[4]-'0')*10;

l_tmpdate[3]%=32;
l_tmpdate[4]=disStr[3]-'0';
l_tmpdate[4]+=(disStr[2]-'0')*10;
if(l_tmpdate[4]>12||l_tmpdate[4]<=0){return 0;}

l_tmpdate[4]%=13;
l_tmpdate[5]=(disStr[7]-'0');
if(l_tmpdate[5]>7||l_tmpdate[5]<=0){return 0;}
l_tmpdate[5]%=8;
l_tmpdate[6]=disStr[1]-'0';
l_tmpdate[6]+=(disStr[0]-'0')*10;
l_tmpdate[6]%=100;

if(l_tmpdate[3]<=0){return 0;}
//2月
if(l_tmpdate[4]==2){
if(l_tmpdate[6] % 4 !=0){
//非闰年 2月
if(l_tmpdate[3]>28){return 0;}
}else{
if(l_tmpdate[3]>29){return 0;}
}
}else if(l_tmpdate[4]==1
||l_tmpdate[4]==3
||l_tmpdate[4]==5
||l_tmpdate[4]==7
||l_tmpdate[4]==8
||l_tmpdate[4]==12){
if(l_tmpdate[3]>31){return 0;}

}else{
if(l_tmpdate[3]>30){return 0;}
}

//保存
Set_RTC();
return 1;

}