基于STM32內部RTC的時鐘程序

程序帶有閏年計算與星期計算，基礎年為2001年1月1日0時0分0秒，算法可支持到3200年2月28日23時59分59秒。但由于RTC計數器是32位，所以硬件只能支持到2137年2月7日6時28分15秒，也足夠使用了。

以下為程序代碼：

/****************************************************************************
* 函數名: GetRTCWeek
* 功 能: 計算Week
* 輸 入: 秒時
* 輸 出: 無.
* 返 回: 星期
*/
//u8 GetRTCWeek(RTC_T *_tRtc)
u8 GetRTCWeek(u32 lDay)
{
//u32 lDay;
//lDay = GetSecondFromDateTime(_tRtc)/SECOND_OF_DAY;
lDay /= SECOND_OF_DAY;
lDay += RTC_BASE_WEEK;
lDay %= 7;
return (u8)lDay;
}

/****************************************************************************
* 函數名: GetSecondFromDateTime
* 功 能: 基于2001/1/1/00:00:00的日期計算秒時
* 輸 入: RTC_T 日期時間結構體
* 輸 出: 無.
* 返 回: 秒時
*/
uint32_t GetSecondFromDateTime(RTC_T *_tRtc)
{
u32 y,sec,fy;
const u32 *ptr;
y = (u32)((_tRtc->year - (u16)RTC_BASE_YEAR)&0x0000FFFF);
fy = y / 4;
sec = fy * DAY_OF_FOURYEAR;
if(y/100){//百年不潤
sec -= y/100;
}
if(y/400){//四百年再潤
sec += y/400;
}
y %= 4;
sec += y * DAY_OF_YEAR;
ptr = DayOfCurrentMonthNormal;
if(y == 3 && _tRtc->month > 2 && IsRTCLeapYear(_tRtc->year)){//當前年為潤年，并且月份已過2月，天數加1
ptr = DayOfCurrentMonthLeap;
}
sec += ptr[_tRtc->month];
sec += _tRtc->day - 1;
sec *= 24;
sec += _tRtc->hour;
sec *= 60;
sec += _tRtc->minute;
sec *= 60;
sec += _tRtc->second;
return sec;
}

/****************************************************************************
* 函數名: GetDateTimeFromSecond
* 功 能: 由秒時計算基?001/1/1/00:00:00的日期
* 輸 入: RTC_T 日期時間結構體
* 輸 出: 無.
* 返 回: 無
*/
void GetDateTimeFromSecond(u32 lSec, RTC_T *_tRtc)
{
uint16_t y,m;
u32 lDay;
const u32 *ptr;

lDay = lSec / SECOND_OF_DAY; /* 轉為基于天的時間 */
_tRtc->year = RTC_BASE_YEAR;//基數年份
y = lDay / DAY_OF_FOURYEAR;
y *= 4;
_tRtc->year += y;
lDay %= DAY_OF_FOURYEAR;
if(y/100){//百年不潤
lDay += y/100;
}
if(y/400){//四百年再潤
lDay -= y/400;
}
y = lDay / DAY_OF_YEAR;
_tRtc->year += y; /* 得到年份 */
lDay %= DAY_OF_YEAR;
ptr = DayOfCurrentMonthNormal;
if(y == 3 && IsRTCLeapYear(_tRtc->year)){//當前年為潤年，并且月份已過2月，天數加1
ptr = DayOfCurrentMonthLeap;
}
for(m=12;m>1;m--){ /* 查詢月份 */
if(lDay >= ptr[m]) {
lDay -= ptr[m];
break;
}
}
_tRtc->month = m;
_tRtc->day = lDay+1;
_tRtc->week = GetRTCWeek(lSec);

lSec = lSec % SECOND_OF_DAY;
_tRtc->hour = lSec / SECOND_OF_HOUR;
lSec %= SECOND_OF_HOUR;
_tRtc->minute = lSec / SECOND_OF_MINUTE;
_tRtc->second = lSec % SECOND_OF_MINUTE;
}