/*******************************************************************************
*                                                                             
* 函 數 名：tosec                                                            
* 原   型：ulong tosec(uchar hour,uchar min,uchar sec,uchar date,uchar mon,uint year)                    
* 功能描述：將年月日時分秒，轉換為距1980年1月1日0時0分0秒的絕對時間           
* 輸   入：非符號字符型 hour時，min分，sec秒，date日，mon月；非符號短整型 year年                                               
* 輸   出：無                                                                
* 返   回：非符號長整型 距1980年1月1日0時0分0秒的時間差值，秒級              
*******************************************************************************/
extern unsigned long tosec(unsigned char hour, unsigned char min, unsigned char sec, unsigned char date, unsigned char mon, unsigned int year)
{
// 月份日期總數表
    unsigned int code mon_days[] = {0,0,31,59,90,120,151,181,212,243,273,304,334}; 
    unsigned long tday;
    year -= 1900;
    tday  = 365*(year-70) + mon_days[mon] + date - 1;
    tday += (year-69)/4;
    if ((mon > 1) && ((year % 4) == 0)) 
    {
        tday++;
    }
    tday =sec + 60*min + 3600*(hour + 24*tday)- 315532800;
   return tday;
}