📄 1302.c
字号:
#include "1302.h"
#include "lcd.h"
#include "Serial.h"
#ifdef _USE_1302
//时间显示
Time SysTime;//系统时间。
Time NewTime;//更新使用的缓冲区,在设置时间是使用
const unsigned long SECPERDAY= 86400;
const unsigned char DAYS[12]={31,28,31,30,31,30,31,31,30,31,30,31};
const unsigned char *WEEKDAY="一二三四五六日";
/*
*************************************************************************************
*描述： 根据从2000年1月1日开始的累计天数，日期为2000年1月1日对应0
*说明： 计算起始日期为2000年1月1日，最多到2099年,2000年为润年
* 对于润年，没有考虑被100整除的问题
* 返回结果不超过 366*100=36600
*************************************************************************************
*/
unsigned int GetTimeDays(Time* tm)
{
unsigned int day=0;
unsigned char idx, y,m;
y = (unsigned char)(((tm->Year>>4)&0xF)*10+(tm->Year&0xF));
m = (unsigned char)(((tm->Month>>4)&0x1)*10+(tm->Month&0xF));
if (m==0) m=1;
day = (unsigned char)(((tm->Date>>4)&0x3)*10+(tm->Date&0xF));
if (day==0) day =1;
day = day + y*365 + (y+3)/4;
for (idx=0;idx<m-1;idx++)
{
day += DAYS[idx];
}
if (m>2 && (y&0x3)==0 )
day+=1;//润年过了2月
return day;
}
/*
*************************************************************************************
*描述： 根据时间，计算当日为星期几
*说明： 计算起始为2000年一月一日星期六，最多到2099年
* 对于润年，没有考虑被100整除的问题
* 返回结果 1，2，、、、，7
*************************************************************************************
*/
unsigned char GetTimeWeek(Time* tm)
{
unsigned int days = GetTimeDays(tm);
days = (days+5)%7;
if (days==0) days = 7;
return ((unsigned char)days);
}
/*
*************************************************************************************
*描述： 计算从当日的0：0：0开始的累计秒数，
*说明： 最大值为24*3600=86400
*
*************************************************************************************
*/
unsigned int GetTimeSeconds(Time* tm)
{
unsigned long m_t;
m_t = (unsigned long)(((tm->Hour>>4)&0x3)*10+(tm->Hour&0xF))*3600;
m_t = m_t + (unsigned long)(((tm->Minute>>4)&0x7)*10+(tm->Minute&0xF))*60;
m_t = m_t + (unsigned long)(((tm->Second>>4)&0x7)*10+(tm->Second&0xF));
return m_t;
}
/*
*************************************************************************************
*描述：实时时钟初始化程序
*参数：无
*说明：完成时钟的初始化工作
*************************************************************************************
*/
void Init1302()
{
RTC1302RSTOUT;//复位为输出
RTC1302SCLKOUT;//时钟为输出
RTC1302RSTL;//复位
NOP; // NOP;// NOP;
RTC1302SCLKL;//拉低时钟
NOP; // NOP;// NOP;
RTCWrite(0X8E,0);//复位结束时，RST AND SCLK ARE LOW
RTCWrite(0X80,0);
}
/*
*************************************************************************************
*描述：实时时钟写入程序
*参数：which指定写入地址，value是要写入的值
*说明：写入时，RST为高。在时钟的上升沿数据锁存
*************************************************************************************
*/
void RTCWrite(char which,char value)
{
char i;
DINT;
RTC1302SDATAOUT;
RTC1302SCLKL;
NOP; //NOP;NOP;
RTC1302RSTH;
for (i=0;i<8;i++)
{
NOP;//NOP;NOP;
if ( which & (1<<i)) RTC1302SDATAH;
else RTC1302SDATAL;
NOP;//NOP;NOP;
RTC1302SCLKH;
NOP;//NOP;NOP;
RTC1302SCLKL;
}
for(i=0;i<8;i++)
{
NOP;//NOP;
if (value & (1<<i)) RTC1302SDATAH;
else RTC1302SDATAL;
NOP; //NOP;NOP;
RTC1302SCLKH;
NOP;//NOP;NOP;
RTC1302SCLKL;
}
RTC1302RSTL;
EINT;
}
/*
*************************************************************************************
*描述：实时时钟读出程序
*参数：which指定读出地址
*说明：写入时，RST为高。在时钟的上升沿数据锁存
*************************************************************************************
*/
char RTCRead(char which)
{
char i;
DINT;
RTC1302SDATAOUT;
RTC1302SCLKL;
NOP;//NOP;NOP;
RTC1302RSTH;
for (i=0;i<8;i++)
{
RTC1302SCLKL;
//NOP;NOP;NOP;
if (which & (1<<i)) RTC1302SDATAH;
else RTC1302SDATAL;
//NOP;NOP;
NOP;
RTC1302SCLKH;
NOP;//NOP;NOP;
}
which =0;
RTC1302SDATAIN;
for(i=0;i<8;i++)
{
NOP;//NOP;NOP;
RTC1302SCLKL;
NOP;
if (RTC1302SDATA) which += (1<<i);
NOP;//NOP;NOP;
RTC1302SCLKH;
}
RTC1302RSTL;
NOP;
RTC1302SCLKL;
EINT;
return which;
}
/*
*************************************************************************************
*描述：清除时间缓冲
*参数：无
*说明：
*************************************************************************************
*/
void RTCClearTimeBuffer()
{
SysTime.Year=0x99;
SysTime.Month=0x12;
SysTime.Date=0x31;
SysTime.Hour=0x23;
SysTime.Minute=0x59;
SysTime.Second=0x59;
}
/*
*************************************************************************************
*描述：更新系统时间
*参数：无
*说明：
*************************************************************************************
*/
void RTCReadTime()
{
SysTime.Year=RTCRead(RTCRDYEAR);
SysTime.Month=RTCRead(RTCRDMON);
SysTime.Date=RTCRead(RTCRDDATE);
SysTime.Hour=RTCRead(RTCRDHOUR);
SysTime.Minute=RTCRead(RTCRDMIN);
SysTime.Second=RTCRead(RTCRDSEC);
}
/*
*************************************************************************************
*描述：显示系统实时时钟程序
*参数：无
*说明：
*************************************************************************************
*/
void RTCShowTime(uchar row)
{
/* uchar wk;
RTCReadTime();
wk = (GetTimeWeek(&SysTime)-1)<<1;
Lcd_Hex(row,0,SysTime.Year);
Lcd_Char(row,14,'-');
Lcd_Hex(row,0,SysTime.Month & 0x1F);
Lcd_Char(row,16,'-');
Lcd_Hex(row,24,SysTime.Date & 0x3F);
Lcd_Hz(row,44,(*(WEEKDAY+wk)<<8)+(*(WEEKDAY+wk+1)));
Lcd_Hex(row,64,SysTime.Hour & 0x3F);
Lcd_Char(row,80,':');
Lcd_Hex(row,88,SysTime.Minute & 0x7F);
Lcd_Char(row,104,':');
Lcd_Hex(row,112,SysTime.Second & 0x7F);
*/
RTCReadTime();
Lcd_Hex(row,0,SysTime.Year);
Lcd_Char(row,16,'-');
Lcd_Hex(row,22,SysTime.Month & 0x1F);
Lcd_Char(row,38,'-');
Lcd_Hex(row,44,SysTime.Date & 0x3F);
Lcd_Char(row,84,':');
Lcd_Hex(row,70,SysTime.Hour & 0x3F);
Lcd_Char(row,105,':');
Lcd_Hex(row,91,SysTime.Minute & 0x7F);
Lcd_Hex(row,112,SysTime.Second & 0x7F);
}
void RTCGetTime(char com)
{
RTCReadTime();
UARTSendCharHex(com,SysTime.Year);
UARTSendCharHex(com,SysTime.Month & 0x1F);
UARTSendCharHex(com,SysTime.Date & 0x3F);
UARTSendCharHex(com,SysTime.Hour & 0x3F);
UARTSendCharHex(com,SysTime.Minute & 0x7F);
UARTSendCharHex(com,SysTime.Second & 0x7F);
UARTSendChar(com,'(');
UARTSendChar(com,0x30+ GetTimeWeek(&SysTime));
UARTSendLine(com,")");
}
/*
*************************************************************************************
*描述：显示系统实时时钟程序
*参数：无
*说明：要写入的时间保存在系统变量SysTime中，在设置时间的时候，先设置该变量然后调用
* 本程序
*************************************************************************************
*/
void RTCSetTime(const char *tstr)
{
if (tstr!=0 && *tstr!=0)
{
NewTime.Year = ((*tstr&0xF)<< 4) + (*(tstr+1)&0xF);
NewTime.Month = ((*(tstr+2)&0xF)<< 4) + (*(tstr+3)&0xF);
NewTime.Date = ((*(tstr+4)&0x3)<< 4) + (*(tstr+5)&0xF);
NewTime.Hour = ((*(tstr+6)&0x1)<< 4) + (*(tstr+7)&0xF);
NewTime.Minute = ((*(tstr+8)&0x7)<< 4) + (*(tstr+9)&0xF);
NewTime.Second = ((*(tstr+10)&0x7)<< 4) + (*(tstr+11)&0xF);
}
//防止错误
if (NewTime.Month==0) NewTime.Month=1;
if (NewTime.Date == 0) NewTime.Date = 1;
RTCWrite(RTCWRWK,GetTimeWeek(&NewTime));
RTCWrite(RTCWRYEAR,NewTime.Year);
RTCWrite(RTCWRMON,NewTime.Month);
RTCWrite(RTCWRDATE,NewTime.Date);
RTCWrite(RTCWRHOUR,NewTime.Hour);
RTCWrite(RTCWRMIN,NewTime.Minute);
RTCWrite(RTCWRSEC,NewTime.Second);
}
#else
void Init1302(){};//DS1302初始化
char RTCRead(char datum){return 0;};//read data
void RTCWrite(char which,char value){};//Write data
void RTCSetTime(const char *tstr){};//设置时钟
void RTCShowTime(){};//显示时间
void RTCReadTime(){};//读取系统时钟
void RTCClearTimeBuffer(){};//清除缓冲时间
void RTCGetTime(char com){};
#endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -