载入中，请稍候……

公农历转换类[C++]

Admin 于 2008-10-26 17:39:09 发表.NET

订阅: http://www.miniboke.com/Feed/Article_82.aspx
引用: http://www.miniboke.com/Trackback/BVKvWvTWAqabOkRupgHI.aspx (UTF-8)
远程进程DLL注入 < 公农历转换类[C++] > Java程序中调用sun包会影响可移植性

头文件:

  1. //xDate.h 
  2. /************************************************************************************************************ 
  3.                Author  :xShandow 
  4.          Dest    :A Date Class For C++ 
  5.          Email   :chenzg@hftd.com 
  6.          HomePage:http://www.hftd.com 
  7.          Dev Env :Visual C++6.0 
  8.          OS.     :Windows 2000 Professinal 
  9.          Date    :2003-NOV-15 
  10.  ************************************************************************************************************/ 
  11. #ifndef XDATE_H 
  12. #define XDATE_H  
  13.  
  14. #include <windows.h> 
  15. extern const WORD START_YEAR; 
  16. extern const WORD END_YEAR ; 
  17.  
  18. class xDate 
  19. { 
  20. private: 
  21.    WORD    m_iYear, m_iMonth, m_iDay; 
  22.    void    l_InitData(); 
  23.    //计算从1901年1月1日过iSpanDays天后的阴历日期    
  24.    static void   l_CalcLunarDate(WORD &iYear, WORD &iMonth ,WORD &iDay,LONG iSpanDays); 
  25.    //计算公历iYear年iMonth月iDay日对应的节气 0-24，0表不是节气 
  26.    static WORD   l_GetLunarHolDay(WORD iYear, WORD iMonth, WORD iDay); 
  27. public:  
  28.    //=====================================================================================// 
  29.    xDate(WORD iYear, WORD iMonth, WORD iDay);  
  30.    xDate(); 
  31.    //=====================================================================================// 
  32.  
  33.    WORD GetYear(){return m_iYear;}  
  34.    WORD GetMonth(){return m_iMonth;} 
  35.    WORD GetDay(){return m_iDay;}  
  36.     
  37.    //=====================================================================================// 
  38.    void GetDate(WORD &iYear, WORD &iMonth, WORD &iDay);  
  39.    BOOL SetDate(WORD iYear , WORD iMonth , WORD iDay); 
  40.    //=====================================================================================// 
  41.    //判断iYear是不是闰年  
  42.     static BOOL IsLeapYear(WORD iYear)  {return !(iYear%4)&&(iYear%100) || !(iYear%400);}  
  43.     
  44.    //计算iYear,iMonth,iDay对应是星期几 1年1月1日 --- 65535年12月31日  
  45.    static WORD WeekDay(WORD iYear, WORD iMonth, WORD iDay); 
  46.     
  47.    //返回iYear年iMonth月的天数 1年1月 --- 65535年12月  
  48.    static WORD MonthDays(WORD iYear, WORD iMonth);  
  49.     
  50.    //返回阴历iLunarYer年阴历iLunarMonth月的天数，如果iLunarMonth为闰月， 
  51.    //高字为第二个iLunarMonth月的天数，否则高字为0  
  52.    // 1901年1月---2050年12月  
  53.    static LONG LunarMonthDays(WORD iLunarYear, WORD iLunarMonth);  
  54.     
  55.    //返回阴历iLunarYear年的总天数 
  56.    // 1901年1月---2050年12月  
  57.    static WORD LunarYearDays(WORD iLunarYear);  
  58.     
  59.    //返回阴历iLunarYear年的闰月月份，如没有返回0  
  60.    // 1901年1月---2050年12月 
  61.    static WORD GetLeapMonth(WORD iLunarYear);  
  62.     
  63.    //把iYear年格式化成天干记年法表示的字符串  
  64.    static void FormatLunarYear(WORD  iYear, char *pBuffer);  
  65.  
  66.    //把iMonth格式化成中文字符串  
  67.    static void FormatMonth(WORD iMonth, char *pBuffer, BOOL bLunar = TRUE);  
  68.     
  69.    //把iDay格式化成中文字符串  
  70.    static void FormatLunarDay(WORD  iDay, char *pBuffer); 
  71.     
  72.    //计算公历两个日期间相差的天数  1年1月1日 --- 65535年12月31日  
  73.    static LONG CalcDateDiff(WORD iEndYear, WORD iEndMonth, WORD iEndDay,WORD iStartYear = START_YEAR,WORD iStartMonth =1, WORD iStartDay =1);  
  74.     
  75.    //计算公历iYear年iMonth月iDay日对应的阴历日期,返回对应的阴历节气 0-24 
  76.    //1901年1月1日---2050年12月31日  
  77.    static WORD GetLunarDate(WORD iYear, WORD iMonth, WORD iDay,WORD &iLunarYear, WORD &iLunarMonth, WORD &iLunarDay); 
  78. };  
  79.  
  80. #endif //XDATE_H  

类实现:

  1. //xDate.cpp 
  2. #include "xDate.h"  
  3. //#include <windows.h> 
  4.  
  5.  
  6. extern WORD gLunarMonthDay[];  
  7. extern BYTE gLunarMonth[];  
  8. extern BYTE gLunarHolDay[];  
  9.  
  10. const  WORD START_YEAR =1901;  
  11. const  WORD END_YEAR   =2050;  
  12. //===========================================================================// 
  13. void xDate::l_InitData()  
  14. {  
  15.    SYSTEMTIME systime;  
  16.    ::GetSystemTime(&systime);  
  17.     
  18.    m_iYear  = systime.wYear;  
  19.    m_iMonth = systime.wMonth;  
  20.    m_iDay   = systime.wDay;  
  21. }  
  22. //===========================================================================// 
  23. xDate::xDate(WORD iYear, WORD iMonth, WORD iDay)  
  24. {  
  25.    if(!SetDate(iYear, iMonth, iDay))  
  26.       l_InitData();  
  27. }  
  28. //===========================================================================// 
  29. xDate::xDate()  
  30. {  
  31.    l_InitData();  
  32. }  
  33. //===========================================================================// 
  34. LONG xDate::CalcDateDiff(WORD iEndYear, WORD iEndMonth, WORD iEndDay,WORD  iStartYear, WORD iStartMonth, WORD iStartDay)  
  35. {  
  36.    WORD monthday[]={0, 31, 59 ,90, 120, 151, 181, 212, 243, 273, 304, 334};  
  37.    //计算两个年份1月1日之间相差的天数  
  38.    LONG iDiffDays =(iEndYear - iStartYear)*365;  
  39.    iDiffDays += (iEndYear-1)/4 - (iStartYear-1)/4;  
  40.    iDiffDays -= ((iEndYear-1)/100 - (iStartYear-1)/100);  
  41.    iDiffDays += (iEndYear-1)/400 - (iStartYear-1)/400;  
  42.    //加上iEndYear年1月1日到iEndMonth月iEndDay日之间的天数  
  43.    iDiffDays += monthday[iEndMonth-1] +  
  44.       (IsLeapYear(iEndYear)&&iEndMonth>2? 1: 0);  
  45.    iDiffDays += iEndDay;  
  46.    //减去iStartYear年1月1日到iStartMonth月iStartDay日之间的天数  
  47.    iDiffDays -= (monthday[iStartMonth-1] +(IsLeapYear(iStartYear)&&iStartMonth>2 ? 1: 0));  
  48.    iDiffDays -= iStartDay;  
  49.    return iDiffDays;  
  50. }  
  51. //===========================================================================// 
  52. void  xDate::l_CalcLunarDate(WORD &iYear, WORD &iMonth ,WORD &iDay, LONG iSpanDays)  
  53. {  
  54.    //阳历1901年2月19日为阴历1901年正月初一  
  55.    //阳历1901年1月1日到2月19日共有49天  
  56.    if(iSpanDays <49) 
  57.    { 
  58.       iYear = START_YEAR-1; 
  59.       if(iSpanDays <19) 
  60.       { 
  61.          iMonth = 11; 
  62.          iDay = 11+WORD(iSpanDays); 
  63.       } 
  64.       else 
  65.       { 
  66.          iMonth = 12; 
  67.          iDay = WORD(iSpanDays) -18; 
  68.       } 
  69.       return ; 
  70.    } 
  71.    //下面从阴历1901年正月初一算起 
  72.    iSpanDays -=49; 
  73.    iYear = START_YEAR; 
  74.    iMonth = 1; 
  75.    iDay = 1; 
  76.    //计算年 
  77.    LONG tmp = LunarYearDays(iYear); 
  78.    while(iSpanDays >= tmp)  
  79.    {  
  80.       iSpanDays -= tmp;  
  81.       tmp = LunarYearDays(++iYear);  
  82.    }  
  83.    //计算月  
  84.    tmp = LOWORD(LunarMonthDays(iYear, iMonth));  
  85.    while(iSpanDays >= tmp)  
  86.    {  
  87.       iSpanDays -= tmp;  
  88.       if(iMonth == GetLeapMonth(iYear))  
  89.       {  
  90.          tmp  = HIWORD(LunarMonthDays(iYear, iMonth));  
  91.          if(iSpanDays < tmp) 
  92.             break; 
  93.          iSpanDays -= tmp; 
  94.       } 
  95.       tmp = LOWORD(LunarMonthDays(iYear, ++iMonth)); 
  96.    } 
  97.    //计算日 
  98.    iDay += WORD(iSpanDays); 
  99. } 
  100. //===========================================================================// 
  101. WORD xDate::GetLunarDate(WORD iYear, WORD iMonth, WORD iDay,WORD &iLunarYear, WORD &iLunarMonth, WORD &iLunarDay) 
  102. { 
  103.    l_CalcLunarDate(iLunarYear, iLunarMonth, iLunarDay,CalcDateDiff(iYear, iMonth, iDay)); 
  104.    return l_GetLunarHolDay(iYear, iMonth, iDay); 
  105. } 
  106. //===========================================================================// 
  107. //根据节气数据存储格式,计算阳历iYear年iMonth月iDay日对应的节气, 
  108. WORD xDate::l_GetLunarHolDay(WORD iYear, WORD iMonth, WORD iDay) 
  109.  
  110.  
  111. { 
  112.    BYTE &flag = gLunarHolDay[(iYear - START_YEAR)*12+iMonth -1]; 
  113.    WORD day; 
  114.    if(iDay <15) 
  115.       day= 15 - ((flag>>4)&0x0f);  
  116.    else  
  117.       day = ((flag)&0x0f)+15;  
  118.    if(iDay == day)  
  119.       return (iMonth-1) *2 + (iDay>15? 1: 0) +1;  
  120.    else  
  121.       return 0;  
  122. }  
  123. //===========================================================================// 
  124. void xDate::GetDate(WORD &iYear, WORD &iMonth, WORD &iDay)  
  125. {  
  126.    iYear  = m_iYear;  
  127.    iMonth = m_iMonth;  
  128.    iDay   = m_iDay;  
  129. }  
  130. //===========================================================================// 
  131. BOOL xDate::SetDate(WORD iYear, WORD iMonth, WORD iDay)  
  132. {  
  133.    if(iYear < START_YEAR || iYear > END_YEAR || iMonth <1 || iMonth >12)  
  134.       return FALSE;  
  135.     
  136.    if(iDay <1 || iDay > MonthDays(iYear, iMonth))  
  137.       return FALSE;  
  138.     
  139.    m_iYear   = iYear;  
  140.    m_iMonth  = iMonth;  
  141.    m_iDay    = iDay;  
  142.     
  143.    return TRUE;  
  144. }  
  145. //===========================================================================// 
  146. WORD xDate::WeekDay(WORD iYear, WORD iMonth, WORD iDay)  
  147. {  
  148.    //数组元素monthday[i]表示第i个月以前的总天数除以7的余数  
  149.    WORD monthday[]={0,3,3,6,1,4,6,2,5,0,3,5};  
  150.    WORD iDays = (iYear-1)%7 + (iYear-1)/4 - (iYear-1)/100 +(iYear-1)/400;  
  151.    iDays += (monthday[iMonth-1] +iDay) ;  
  152.    //如果iYear是闰年  
  153.    if(IsLeapYear(iYear) && iMonth>2)  
  154.       iDays++;  
  155.    //返回:0,1,2,3,4,5,6表日、一、二、三、四、五、六  
  156.    return iDays%7;  
  157. }  
  158. //===========================================================================// 
  159. WORD xDate::MonthDays(WORD iYear, WORD iMonth)  
  160. {  
  161.    switch(iMonth)  
  162.    {  
  163.    case 1: //一  (月) 
  164.    case 3: //三  (月) 
  165.    case 5: //五  (月) 
  166.    case 7: //七  (月) 
  167.    case 8: //八  (月) 
  168.    case 10://十  (月) 
  169.    case 12://十二(月) 
  170.       return 31;  
  171.  
  172.    case 4: //四  (月) 
  173.    case 6: //六  (月) 
  174.    case 9: //九  (月) 
  175.    case 11://十一(月)  
  176.       return 30;  
  177.  
  178.    case 2: //二  (月) 
  179.       //如果是闰年  
  180.       if(IsLeapYear(iYear))  
  181.          return 29;  
  182.       else  
  183.          return 28;  
  184.         
  185.    }  
  186.    return 0;  
  187. }  
  188. //===========================================================================// 
  189. WORD xDate::GetLeapMonth(WORD iLunarYear)  
  190. {  
  191.    BYTE &flag = gLunarMonth[(iLunarYear - START_YEAR)/2];  
  192.    return  (iLunarYear - START_YEAR)%2 ? flag&0x0f : flag>>4;  
  193. }  
  194. //===========================================================================// 
  195. LONG xDate::LunarMonthDays(WORD iLunarYear, WORD iLunarMonth)  
  196. {  
  197.    if(iLunarYear < START_YEAR) 
  198.       return 30L; 
  199.     
  200.    WORD height =0 ,low =29; 
  201.    int iBit = 16 - iLunarMonth; 
  202.     
  203.    if(iLunarMonth > GetLeapMonth(iLunarYear) && GetLeapMonth(iLunarYear))  
  204.       iBit --;  
  205.     
  206.    if(gLunarMonthDay[iLunarYear - START_YEAR] & (1<<iBit)) 
  207.       low ++; 
  208.     
  209.    if(iLunarMonth == GetLeapMonth(iLunarYear)) 
  210.       if(gLunarMonthDay[iLunarYear - START_YEAR] & (1<< (iBit -1))) 
  211.          height =30; 
  212.       else 
  213.          height =29; 
  214.        
  215.       return MAKELONG(low, height); 
  216. } 
  217. //===========================================================================// 
  218. WORD xDate::LunarYearDays(WORD iLunarYear) 
  219. { 
  220. /* 
  221.    WORD days=348 ; //12*29 
  222.    int month = 12 ; 
  223.     
  224.    //如果iYear年有闰月，则为13个月 
  225.    if(gLanarMonth[iYear - START_YEAR]) 
  226.       month ++; 
  227.  
  228.    //如果某月是三十天则days++ 
  229.    while(month >=0 && (gLanarMonthDay[iYear - START_YEAR] & (1 << (16 - month)))) 
  230.    { 
  231.       days ++; 
  232.       month --; 
  233.    } 
  234.    return days; 
  235. */ 
  236.    WORD days =0; 
  237.    for(WORD i=1; i<=12; i++) 
  238.    { 
  239.       LONG tmp = LunarMonthDays(iLunarYear ,i); 
  240.       days += HIWORD(tmp); 
  241.       days += LOWORD(tmp); 
  242.    } 
  243.    return days; 
  244. } 
  245. //===========================================================================// 
  246. void xDate::FormatLunarYear(WORD iYear, char *pBuffer) 
  247. { 
  248.    char szText1[]="甲乙丙丁戊己庚辛壬癸"; 
  249.    char szText2[]="子丑寅卯辰巳午未申酉戌亥"; 
  250.    char szText3[]="鼠牛虎免龙蛇马羊猴鸡狗猪"; 
  251.     
  252.    memcpy(pBuffer  ,szText1+((iYear-4)%10)*2,2); 
  253.    memcpy(pBuffer+2,szText2+((iYear-4)%12)*2,2); 
  254.    pBuffer[4]=' '; 
  255.    memcpy(pBuffer+5,szText3+((iYear-4)%12)*2,2); 
  256.    strcpy(pBuffer+7,"年"); 
  257. } 
  258. //===========================================================================// 
  259. void xDate::FormatMonth(WORD iMonth, char *pBuffer, BOOL bLunar) 
  260.  
  261. { 
  262.    if(!bLunar && iMonth==1) 
  263.    { 
  264.       strcpy(pBuffer, "　一月"); 
  265.       return; 
  266.    } 
  267.    char szText[]="正二三四五六七八九十"; 
  268.    if(iMonth<=10) 
  269.    { 
  270.       memcpy(pBuffer  ,"　", 2); 
  271.       memcpy(pBuffer+2, szText + (iMonth -1)*2, 2); 
  272.       strcpy(pBuffer+4, "月"); 
  273.       return; 
  274.    } 
  275.    if (iMonth == 11) 
  276.       strcpy(pBuffer, "十一"); 
  277.    else 
  278.       strcpy(pBuffer, "十二"); 
  279.    strcpy(pBuffer+4  , "月"); 
  280.     
  281.     
  282. } 
  283. //===========================================================================// 
  284. void xDate::FormatLunarDay(WORD iDay, char *pBuffer) 
  285. { 
  286.    char szText1[]="初十廿三"; 
  287.    char szText2[]="一二三四五六七八九十"; 
  288.    if(iDay != 20 && iDay !=30) 
  289.    { 
  290.       memcpy(pBuffer  , szText1 + (iDay-1)/10*2   ,2); 
  291.       memcpy(pBuffer+2, szText2 + ((iDay-1)%10)*2 ,2); 
  292.       pBuffer[4]='\0'; 
  293.    } 
  294.    else 
  295.    { 
  296.       memcpy(pBuffer  , szText1 + iDay/10*2, 2); 
  297.       strcpy(pBuffer+2, szText2 +18); 
  298.    } 
  299. } 
  300.  
  301.   
  302. /******************************************************************************  
  303. 下面为阴历计算所需的数据,为节省存储空间,所以采用下面比较变态的存储方法.  
  304. *******************************************************************************/  
  305. //数组gLunarDay存入阴历1901年到2100年每年中的月天数信息，  
  306. //阴历每月只能是29或30天，一年用12（或13）个二进制位表示，对应位为1表30天，否则为29天  
  307. WORD gLunarMonthDay[]=  
  308. {  
  309.    //测试数据只有1901.1.1 --2050.12.31  
  310.    0X4ae0, 0Xa570, 0X5268, 0Xd260, 0Xd950, 0X6aa8, 0X56a0, 0X9ad0, 0X4ae8, 0X4ae0,   //1910  
  311.    0Xa4d8, 0Xa4d0, 0Xd250, 0Xd548, 0Xb550, 0X56a0, 0X96d0, 0X95b0, 0X49b8, 0X49b0,   //1920  
  312.    0Xa4b0, 0Xb258, 0X6a50, 0X6d40, 0Xada8, 0X2b60, 0X9570, 0X4978, 0X4970, 0X64b0,   //1930  
  313.    0Xd4a0, 0Xea50, 0X6d48, 0X5ad0, 0X2b60, 0X9370, 0X92e0, 0Xc968, 0Xc950, 0Xd4a0,   //1940  
  314.    0Xda50, 0Xb550, 0X56a0, 0Xaad8, 0X25d0, 0X92d0, 0Xc958, 0Xa950, 0Xb4a8, 0X6ca0,   //1950  
  315.    0Xb550, 0X55a8, 0X4da0, 0Xa5b0, 0X52b8, 0X52b0, 0Xa950, 0Xe950, 0X6aa0, 0Xad50,   //1960  
  316.    0Xab50, 0X4b60, 0Xa570, 0Xa570, 0X5260, 0Xe930, 0Xd950, 0X5aa8, 0X56a0, 0X96d0,   //1970  
  317.    0X4ae8, 0X4ad0, 0Xa4d0, 0Xd268, 0Xd250, 0Xd528, 0Xb540, 0Xb6a0, 0X96d0, 0X95b0,   //1980  
  318.    0X49b0, 0Xa4b8, 0Xa4b0, 0Xb258, 0X6a50, 0X6d40, 0Xada0, 0Xab60, 0X9370, 0X4978,   //1990  
  319.    0X4970, 0X64b0, 0X6a50, 0Xea50, 0X6b28, 0X5ac0, 0Xab60, 0X9368, 0X92e0, 0Xc960,   //2000  
  320.    0Xd4a8, 0Xd4a0, 0Xda50, 0X5aa8, 0X56a0, 0Xaad8, 0X25d0, 0X92d0, 0Xc958, 0Xa950,   //2010  
  321.    0Xb4a0, 0Xb550, 0Xb550, 0X55a8, 0X4ba0, 0Xa5b0, 0X52b8, 0X52b0, 0Xa930, 0X74a8,   //2020  
  322.    0X6aa0, 0Xad50, 0X4da8, 0X4b60, 0X9570, 0Xa4e0, 0Xd260, 0Xe930, 0Xd530, 0X5aa0,   //2030  
  323.    0X6b50, 0X96d0, 0X4ae8, 0X4ad0, 0Xa4d0, 0Xd258, 0Xd250, 0Xd520, 0Xdaa0, 0Xb5a0,   //2040  
  324.    0X56d0, 0X4ad8, 0X49b0, 0Xa4b8, 0Xa4b0, 0Xaa50, 0Xb528, 0X6d20, 0Xada0, 0X55b0,   //2050  
  325.        
  326. };  
  327.  
  328. //数组gLanarMonth存放阴历1901年到2050年闰月的月份，如没有则为0，每字节存两年  
  329. BYTE  gLunarMonth[]=  
  330. {  
  331.    0X00, 0X50, 0X04, 0X00, 0X20,   //1910  
  332.    0X60, 0X05, 0X00, 0X20, 0X70,   //1920  
  333.    0X05, 0X00, 0X40, 0X02, 0X06,   //1930  
  334.    0X00, 0X50, 0X03, 0X07, 0X00,   //1940  
  335.    0X60, 0X04, 0X00, 0X20, 0X70,   //1950  
  336.    0X05, 0X00, 0X30, 0X80, 0X06,   //1960  
  337.    0X00, 0X40, 0X03, 0X07, 0X00,   //1970  
  338.    0X50, 0X04, 0X08, 0X00, 0X60,   //1980  
  339.    0X04, 0X0a, 0X00, 0X60, 0X05,   //1990  
  340.    0X00, 0X30, 0X80, 0X05, 0X00,   //2000  
  341.    0X40, 0X02, 0X07, 0X00, 0X50,   //2010  
  342.    0X04, 0X09, 0X00, 0X60, 0X04,   //2020  
  343.    0X00, 0X20, 0X60, 0X05, 0X00,   //2030  
  344.    0X30, 0Xb0, 0X06, 0X00, 0X50,   //2040  
  345.    0X02, 0X07, 0X00, 0X50, 0X03    //2050  
  346. };  
  347.  
  348. //数组gLanarHoliDay存放每年的二十四节气对应的阳历日期  
  349. //每年的二十四节气对应的阳历日期几乎固定，平均分布于十二个月中  
  350. //   1月          2月         3月         4月         5月         6月  
  351. //小寒 大寒   立春  雨水   惊蛰 春分   清明 谷雨   立夏 小满   芒种 夏至  
  352. //   7月          8月         9月         10月       11月        12月  
  353. //小暑 大暑   立秋  处暑   白露 秋分   寒露 霜降   立冬 小雪   大雪 冬至  
  354. /*********************************************************************************  
  355. 节气无任何确定规律,所以只好存表,要节省空间,所以....  
  356. 下面这种存法实在是太变态了,你就将就着看吧  
  357. **********************************************************************************/  
  358. //数据格式说明:  
  359. //如1901年的节气为  
  360. //  1月     2月     3月   4月    5月   6月   7月    8月   9月    10月  11月     12月  
  361. // 6, 21, 4, 19,  6, 21, 5, 21, 6,22, 6,22, 8, 23, 8, 24, 8, 24, 8, 24 , 8, 23, 8, 22  
  362. // 9, 6,  11,4,   9, 6,  10,6,  9,7,  9,7,  7, 8,  7, 9,  7,  9, 7,  9, 7,  8, 7, 15  
  363. //上面第一行数据为每月节气对应日期,15减去每月第一个节气,每月第二个节气减去15得第二行  
  364. // 这样每月两个节气对应数据都小于16,每月用一个字节存放,高位存放第一个节气数据,低位存放  
  365. //第二个节气的数据,可得下表  
  366.  
  367. BYTE gLunarHolDay[]=  
  368. {  
  369.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1901  
  370.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X87, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1902  
  371.       0X96, 0XA5, 0X87, 0X96, 0X87, 0X87, 0X79, 0X69, 0X69, 0X69, 0X78, 0X78,   //1903  
  372.       0X86, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X78, 0X87,   //1904  
  373.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1905  
  374.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1906  
  375.       0X96, 0XA5, 0X87, 0X96, 0X87, 0X87, 0X79, 0X69, 0X69, 0X69, 0X78, 0X78,   //1907  
  376.       0X86, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1908  
  377.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1909  
  378.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1910  
  379.       0X96, 0XA5, 0X87, 0X96, 0X87, 0X87, 0X79, 0X69, 0X69, 0X69, 0X78, 0X78,   //1911  
  380.       0X86, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1912  
  381.       0X95, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1913  
  382.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1914  
  383.       0X96, 0XA5, 0X97, 0X96, 0X97, 0X87, 0X79, 0X79, 0X69, 0X69, 0X78, 0X78,   //1915  
  384.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1916  
  385.       0X95, 0XB4, 0X96, 0XA6, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X87,   //1917  
  386.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X77,   //1918  
  387.       0X96, 0XA5, 0X97, 0X96, 0X97, 0X87, 0X79, 0X79, 0X69, 0X69, 0X78, 0X78,   //1919  
  388.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1920  
  389.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X87,   //1921  
  390.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X77,   //1922  
  391.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X87, 0X79, 0X79, 0X69, 0X69, 0X78, 0X78,   //1923  
  392.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1924  
  393.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X87,   //1925  
  394.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1926  
  395.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X87, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1927  
  396.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1928  
  397.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1929  
  398.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1930  
  399.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X87, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1931  
  400.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1932  
  401.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1933  
  402.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1934  
  403.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1935  
  404.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1936  
  405.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1937  
  406.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1938  
  407.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1939  
  408.       0X96, 0XA5, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1940  
  409.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1941  
  410.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1942  
  411.       0X96, 0XA4, 0X96, 0X96, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1943  
  412.       0X96, 0XA5, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1944  
  413.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1945  
  414.       0X95, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X77,   //1946  
  415.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1947  
  416.       0X96, 0XA5, 0XA6, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //1948  
  417.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X79, 0X78, 0X79, 0X77, 0X87,   //1949  
  418.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X77,   //1950  
  419.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X79, 0X79, 0X79, 0X69, 0X78, 0X78,   //1951  
  420.       0X96, 0XA5, 0XA6, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //1952  
  421.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1953  
  422.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X78, 0X79, 0X78, 0X68, 0X78, 0X87,   //1954  
  423.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1955  
  424.       0X96, 0XA5, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //1956  
  425.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1957  
  426.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1958  
  427.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1959  
  428.       0X96, 0XA4, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1960  
  429.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1961  
  430.       0X96, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1962  
  431.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1963  
  432.       0X96, 0XA4, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1964  
  433.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1965  
  434.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1966  
  435.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1967  
  436.       0X96, 0XA4, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1968  
  437.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1969  
  438.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1970  
  439.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X79, 0X69, 0X78, 0X77,   //1971  
  440.       0X96, 0XA4, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1972  
  441.       0XA5, 0XB5, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1973  
  442.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1974  
  443.       0X96, 0XB4, 0X96, 0XA6, 0X97, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X77,   //1975  
  444.       0X96, 0XA4, 0XA5, 0XB5, 0XA6, 0XA6, 0X88, 0X89, 0X88, 0X78, 0X87, 0X87,   //1976  
  445.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //1977  
  446.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X78, 0X87,   //1978  
  447.       0X96, 0XB4, 0X96, 0XA6, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X77,   //1979  
  448.       0X96, 0XA4, 0XA5, 0XB5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1980  
  449.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X77, 0X87,   //1981  
  450.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1982  
  451.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X78, 0X79, 0X78, 0X69, 0X78, 0X77,   //1983  
  452.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X87,   //1984  
  453.       0XA5, 0XB4, 0XA6, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //1985  
  454.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1986  
  455.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X79, 0X78, 0X69, 0X78, 0X87,   //1987  
  456.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //1988  
  457.       0XA5, 0XB4, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1989  
  458.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //1990  
  459.       0X95, 0XB4, 0X96, 0XA5, 0X86, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1991  
  460.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //1992  
  461.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1993  
  462.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1994  
  463.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X76, 0X78, 0X69, 0X78, 0X87,   //1995  
  464.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //1996  
  465.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //1997  
  466.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //1998  
  467.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //1999  
  468.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2000  
  469.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2001  
  470.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //2002  
  471.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //2003  
  472.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2004  
  473.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2005  
  474.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2006  
  475.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X69, 0X78, 0X87,   //2007  
  476.       0X96, 0XB4, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X87, 0X78, 0X87, 0X86,   //2008  
  477.       0XA5, 0XB3, 0XA5, 0XB5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2009  
  478.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2010  
  479.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X78, 0X87,   //2011  
  480.       0X96, 0XB4, 0XA5, 0XB5, 0XA5, 0XA6, 0X87, 0X88, 0X87, 0X78, 0X87, 0X86,   //2012  
  481.       0XA5, 0XB3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X87,   //2013  
  482.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2014  
  483.       0X95, 0XB4, 0X96, 0XA5, 0X96, 0X97, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //2015  
  484.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X87, 0X88, 0X87, 0X78, 0X87, 0X86,   //2016  
  485.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X87,   //2017  
  486.       0XA5, 0XB4, 0XA6, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2018  
  487.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //2019  
  488.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X86,   //2020  
  489.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2021  
  490.       0XA5, 0XB4, 0XA5, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2022  
  491.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X79, 0X77, 0X87,   //2023  
  492.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X96,   //2024  
  493.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2025  
  494.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2026  
  495.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //2027  
  496.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X96,   //2028  
  497.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2029  
  498.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2030  
  499.       0XA5, 0XB4, 0X96, 0XA5, 0X96, 0X96, 0X88, 0X78, 0X78, 0X78, 0X87, 0X87,   //2031  
  500.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X96,   //2032  
  501.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X86,   //2033  
  502.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X78, 0X88, 0X78, 0X87, 0X87,   //2034  
  503.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2035  
  504.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X96,   //2036  
  505.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X86,   //2037  
  506.       0XA5, 0XB3, 0XA5, 0XA5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2038  
  507.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2039  
  508.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X96,   //2040  
  509.       0XA5, 0XC3, 0XA5, 0XB5, 0XA5, 0XA6, 0X87, 0X88, 0X87, 0X78, 0X87, 0X86,   //2041  
  510.       0XA5, 0XB3, 0XA5, 0XB5, 0XA6, 0XA6, 0X88, 0X88, 0X88, 0X78, 0X87, 0X87,   //2042  
  511.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2043  
  512.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X88, 0X87, 0X96,   //2044  
  513.       0XA5, 0XC3, 0XA5, 0XB4, 0XA5, 0XA6, 0X87, 0X88, 0X87, 0X78, 0X87, 0X86,   //2045  
  514.       0XA5, 0XB3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X88, 0X78, 0X87, 0X87,   //2046  
  515.       0XA5, 0XB4, 0X96, 0XA5, 0XA6, 0X96, 0X88, 0X88, 0X78, 0X78, 0X87, 0X87,   //2047  
  516.       0X95, 0XB4, 0XA5, 0XB4, 0XA5, 0XA5, 0X97, 0X87, 0X87, 0X88, 0X86, 0X96,   //2048  
  517.       0XA4, 0XC3, 0XA5, 0XA5, 0XA5, 0XA6, 0X97, 0X87, 0X87, 0X78, 0X87, 0X86,   //2049  
  518.       0XA5, 0XC3, 0XA5, 0XB5, 0XA6, 0XA6, 0X87, 0X88, 0X78, 0X78, 0X87, 0X87    //2050  
  519.        
  520. };  

使用方法：

  1. xDate *Date_x=new xDate();//取系统时间初始化-:) 
  2.  
  3. Memo1->Lines->Add("公历"+IntToStr(Date_x->GetYear()) +"年"); 
  4. Memo1->Lines->Add("公历"+IntToStr(Date_x->GetMonth())+"月"); 
  5. Memo1->Lines->Add("公历"+IntToStr(Date_x->GetDay())  +"日"); 
  6. if(Date_x->IsLeapYear(Date_x->GetYear())) 
  7.  
  8.         Memo1->Lines->Add("今年是闰年"); 
  9. else 
  10.         Memo1->Lines->Add("今年不是闰年"); 
  11.  
  12. Memo1->Lines->Add("今天是星期"+IntToStr(Date_x->WeekDay(Date_x->GetYear(),Date_x->GetMonth(),Date_x->GetDay()))); 
  13. Memo1->Lines->Add("公历:本月"+IntToStr(Date_x->MonthDays(Date_x->GetYear(),Date_x->GetMonth()))+" 天"); 
  14. Memo1->Lines->Add("阴历:本月"+IntToStr(Date_x->LunarMonthDays(Date_x->GetYear(),Date_x->GetMonth()))+" 天"); 
  15. Memo1->Lines->Add("阴历今年:"+IntToStr(Date_x->LunarYearDays(Date_x->GetYear()))+"天"); 
  16. //==================================================================// 
  17. char ch0[20]="天干记年法表示:"; 
  18. char Buffer0[8]; 
  19. Date_x->FormatLunarYear(Date_x->GetYear(),Buffer0); 
  20. strcat(ch0,Buffer0); 
  21. Memo1->Lines->Add(ch0); 
  22. //==================================================================// 
  23. char ch1[20]="月份中文表示法:"; 
  24. char Buffer1[8]; 
  25. Date_x->FormatMonth(Date_x->GetMonth(),Buffer1,true); 
  26. strcat(ch1,Buffer1); 
  27. Memo1->Lines->Add(ch1); 
  28. //==================================================================// 
  29. char ch2[20]="Day中文表示法:"; 
  30. char Buffer2[8]; 
  31. Date_x->FormatLunarDay(Date_x->GetDay(),Buffer2); 
  32. strcat(ch2,Buffer2); 
  33. Memo1->Lines->Add(ch2); 
  34. //==================================================================// 
  35. //计算两个日期相差的天数 
  36. Memo1->Lines->Add("距1956,2,21 有:"+IntToStr(Date_x->CalcDateDiff(Date_x->GetYear(),Date_x->GetMonth(),Date_x->GetDay(),1956,2,21))+" 天"); 
  37.  
  38. //节气计算 
  39. WORD iLunarYear,  iLunarMonth,  iLunarDay; 
  40. WORD  n; 
  41. n=Date_x->GetLunarDate(Date_x->GetYear(),Date_x->GetMonth(),Date_x->GetDay(),iLunarYear,iLunarMonth,iLunarDay); 
  42. if(n) 
  43.         Memo1->Lines->Add(IntToStr(n)); 
  44. else 
  45.         Memo1->Lines->Add("不是节气"); 
  46.  
  47. Memo1->Lines->Add("今天阴历是:"+IntToStr(iLunarYear)+"-"+IntToStr(iLunarMonth)+"-"+IntToStr(iLunarDay)); 

 

被阅543次, 0票 投一票农历
  • 看完了要说点啥么？
  • 昵称 (不填说不了话)
  • 信箱地址 (不会被公开，但是不填也说不了话)
  • 网址 (这个不填也成)

Powered by MiniBoke v2.0.0.8 Build 0828

Copyright © 2008 迷你博客. All rights reserved.

粤ICP备07500939号