計算2000～2099年任一天星期幾 SDCC源代碼

// 計算2000～2099年任一天星期幾 
// year    : 00-99 
// month: 01-12 
// day     : 01-31 
unsigned char GetWeekFromDay(unsigned char year,unsigned char month,unsigned char day) 
{ 
    if( month == 1 || month == 2 )   
    { 
        month += 12; 
        if( year> 0 ) 
            year--; 
        else 
            year = 4; 
    } 

    // 返回星期幾(星期一用1表示，而星期天用7表示) 
    return 1+(( day + 2*month + 3*(month+1)/5 + year + year/4 ) %7); 
}