任意年.lst

星期算法,即知道日期,即可知道该天是星期几

C51 COMPILER V7.07   任襙年                                                                06/09/2004 16:33:34 PAGE 1   


C51 COMPILER V7.07, COMPILATION OF MODULE 任襙年
OBJECT MODULE PLACED IN 任意年.OBJ
COMPILER INVOKED BY: C:\KEIL\C51\BIN\C51.EXE 任意年.c BROWSE DEBUG OBJECTEXTEND

stmt level    source

   1          #include <stdio.h>
   2          #define uchar unsigned char
   3          #define uint  unsigned int
   4          
   5          uchar week(uint year,uchar month,uchar day);
   6          code uchar WEEK_BIAO_P[]={4,0,0,3,5,1,3,6,2,4,0,2};     //平年月星期表
   7          code uchar WEEK_BIAO_R[]={3,6,0,3,5,1,3,6,2,4,0,2};     //闰年月星期表
   8          void main(void)
   9          {
  10   1              uchar a;
  11   1              uchar month,day;
  12   1              uint year;
  13   1              year=2004;month=6;day=9;
  14   1              while(1)
  15   1              {
  16   2                a=week(year,month,day);
  17   2               }
  18   1      }
  19          /*********************************************************************
  20            将2004年代入。得(其中百年=20，年=04)
  21            2004某日星期几=(百年%4*5天+年+年/4+月星期表+日+2天)%7
  22          *********************************************************************8*/
  23          uchar week(uint year,uchar month,uchar day)
  24          {
  25   1         uchar return_week;  
  26   1         uchar centry;
  27   1         centry=year/100;
  28   1         year=year%100;
  29   1         //if(
  30   1         return_week=( centry%4*5 + year +year/4 +WEEK_BIAO_P[month-1] + day +2 )%7;
  31   1         return return_week;
  32   1      }


MODULE INFORMATION:   STATIC OVERLAYABLE
   CODE SIZE        =    123    ----
   CONSTANT SIZE    =     24    ----
   XDATA SIZE       =   ----    ----
   PDATA SIZE       =   ----    ----
   DATA SIZE        =   ----       8
   IDATA SIZE       =   ----    ----
   BIT SIZE         =   ----    ----
END OF MODULE INFORMATION.


C51 COMPILATION COMPLETE.  0 WARNING(S),  0 ERROR(S)