网站导航： 首页 ＞ 设计参考 ＞ 正文 文章搜索
51单片机万年历优化算法源程序
  
文章编号：
090106145808
 文章分类： 单片机 ＞ 51系列
点 击：
...
关 键 词： 万年历
文章来源：
网络
摘 要：
一、 阳历算法，具体算法见函数void get_solar_day_date(void)，这样阳历日历的星期排法就确定了。二、 阴历算法，200年需要200 × 2 = 400个字节，构成阴历压缩数据表lunar_calendar_month_table[]如下...

 

一、 阳历算法
具体算法见函数void get_solar_day_date(void)，这样阳历日历的星期排法就确定了。
表1：
变量定义：

 
  1. Public:   
  2. Unsigned int temp_total_day;   
  3. Unsigned char gc_solar_calendar_year;   
  4. Unsigned char gc_solar_calendar_month;   
  5. Unsigned char gc_solar_calendar_date;   
  6. Unsigned char gc_lunar_calendar_year;   
  7. Unsigned char gc_lunar_calendar_month;   
  8. Unsigned char gc_lunar_calendar_date;   
  9. Unsigned char start_day_of_week;   

说明：函数get_solar_day_date(void)的输入变量：gc_solar_calendar_year和gc_solar_calendar_month
输出变量：start_day_of_week和temp_total_day

 
  1. Void get_solar_day_date(void)   
  2. {   
  3.     unsigned char temp01;   
  4.     /*------calculate what day is the day of the current month and year. Mon~Sun?---*/  
  5.     /*条件初始化二次，减少运算数据量. temp_total_day 是int型变量*/  
  6.     start_day_of_week = 2; temp_total_day = 0;calculate_temp = 1;   
  7.     if(gc_solar_calendar_year > 99)   
  8.     {   
  9.         start_day_of_week = 6;calculate_temp = 100;   
  10.     }   
  11.     for(temp01 = calculate_temp; temp01<gc_solar_calendar_year; temp01++)   
  12.     {    
  13.         if(temp01%4 == 0){start_day_of_week +=2;temp_total_day += 366;    
  14.         }   
  15.         else {start_day_of_week +=1;temp_total_day += 365;   
  16.         }   
  17.     }   
  18.     for(temp01 = 1;temp01<gc_solar_calendar_month;temp01++)   
  19.     {    
  20.         switch(temp01)   
  21.         {   
  22.         case 1,3,5,7,8,10,12:    
  23.             start_day_of_week +=3;   
  24.             temp_total_day +=31;   
  25.             break;   
  26.         case 2:    
  27.             if(((gc_solar_calendar_year%4) == 0)&&(gc_solar_calendar_year != 200))   
  28.             {   
  29.                 start_day_of_week +=1; temp_total_day +=29;   
  30.             }   
  31.             else {   
  32.                 start_day_of_week +=0;temp_total_day +=28;   
  33.             }    
  34.             break;   
  35.         case 4,6,9,11:    
  36.             start_day_of_week +=2;    
  37.             temp_total_day +=30; break;   
  38.         }   
  39.     }   
  40.     start_day_of_week %=7;   
  41.     /*-end of calculate what day is the day(Mon~Sun?) and total day --*/  
  42. }   

二、 阴历算法
200年需要200 × 2 = 400个字节，构成阴历压缩数据表lunar_calendar_month_table[]如下

 
  1. const char lunar_calendar_month_table[]={ //从阴历年1900年到2100年   
  2.     /*the total day of each month pointer */  
  3.     //月份 1 2 3 4 5 6 7 8 9 10 11 12   
  4.     //闰年 31 29 31 30 31 30 31 31 30 31 30 31   
  5.     //非闰年 31 28 31 30 31 30 31 31 30 31 30 31   
  6.        
  7.     /* from 1901~2100*/  
  8.     /* (0110)110000001001 (0110)leap month,110000001001  
  9.     lunar month total day: 1:29 0:30*/  
  10.     0x00,0x04,0xad,0x08,0x5a,0x01,0xd5,0x54,0xb4,0x09,0x64,0x05,0x59,0x45,   
  11.     0x95,0x0a,0xa6,0x04,0x55,0x24,0xad,0x08,0x5a,0x62,0xda,0x04,0xb4,0x05,   
  12.     0xb4,0x55,0x52,0x0d,0x94,0x0a,0x4a,0x2a,0x56,0x02,0x6d,0x71,0x6d,0x01,   
  13.     0xda,0x02,0xd2,0x52,0xa9,0x05,0x49,0x0d,0x2a,0x45,0x2b,0x09,0x56,0x01,   
  14.     0xb5,0x20,0x6d,0x01,0x59,0x69,0xd4,0x0a,0xa8,0x05,0xa9,0x56,0xa5,0x04,   
  15.     0x2b,0x09,0x9e,0x38,0xb6,0x08,0xec,0x74,0x6c,0x05,0xd4,0x0a,0xe4,0x6a,   
  16.     0x52,0x05,0x95,0x0a,0x5a,0x42,0x5b,0x04,0xb6,0x04,0xb4,0x22,0x6a,0x05,   
  17.     0x52,0x75,0xc9,0x0a,0x52,0x05,0x35,0x55,0x4d,0x0a,0x5a,0x02,0x5d,0x31,   
  18.     0xb5,0x02,0x6a,0x8a,0x68,0x05,0xa9,0x0a,0x8a,0x6a,0x2a,0x05,0x2d,0x09,   
  19.     0xaa,0x48,0x5a,0x01,0xb5,0x09,0xb0,0x39,0x64,0x05,0x25,0x75,0x95,0x0a,   
  20.     0x96,0x04,0x4d,0x54,0xad,0x04,0xda,0x04,0xd4,0x44,0xb4,0x05,0x54,0x85,   
  21.     0x52,0x0d,0x92,0x0a,0x56,0x6a,0x56,0x02,0x6d,0x02,0x6a,0x41,0xda,0x02,   
  22.     0xb2,0xa1,0xa9,0x05,0x49,0x0d,0x0a,0x6d,0x2a,0x09,0x56,0x01,0xad,0x50,   
  23.     0x6d,0x01,0xd9,0x02,0xd1,0x3a,0xa8,0x05,0x29,0x85,0xa5,0x0c,0x2a,0x09,   
  24.     0x96,0x54,0xb6,0x08,0x6c,0x09,0x64,0x45,0xd4,0x0a,0xa4,0x05,0x51,0x25,   
  25.     0x95,0x0a,0x2a,0x72,0x5b,0x04,0xb6,0x04,0xac,0x52,0x6a,0x05,0xd2,0x0a,   
  26.     0xa2,0x4a,0x4a,0x05,0x55,0x94,0x2d,0x0a,0x5a,0x02,0x75,0x61,0xb5,0x02,   
  27.     0x6a,0x03,0x61,0x45,0xa9,0x0a,0x4a,0x05,0x25,0x25,0x2d,0x09,0x9a,0x68,   
  28.     0xda,0x08,0xb4,0x09,0xa8,0x59,0x54,0x03,0xa5,0x0a,0x91,0x3a,0x96,0x04,   
  29.     0xad,0xb0,0xad,0x04,0xda,0x04,0xf4,0x62,0xb4,0x05,0x54,0x0b,0x44,0x5d,   
  30.     0x52,0x0a,0x95,0x04,0x55,0x22,0x6d,0x02,0x5a,0x71,0xda,0x02,0xaa,0x05,   
  31.     0xb2,0x55,0x49,0x0b,0x4a,0x0a,0x2d,0x39,0x36,0x01,0x6d,0x80,0x6d,0x01,   
  32.     0xd9,0x02,0xe9,0x6a,0xa8,0x05,0x29,0x0b,0x9a,0x4c,0xaa,0x08,0xb6,0x08,   
  33.     0xb4,0x38,0x6c,0x09,0x54,0x75,0xd4,0x0a,0xa4,0x05,0x45,0x55,0x95,0x0a,   
  34.     0x9a,0x04,0x55,0x44,0xb5,0x04,0x6a,0x82,0x6a,0x05,0xd2,0x0a,0x92,0x6a,   
  35.     0x4a,0x05,0x55,0x0a,0x2a,0x4a,0x5a,0x02,0xb5,0x02,0xb2,0x31,0x69,0x03,   
  36.     0x31,0x73,0xa9,0x0a,0x4a,0x05,0x2d,0x55,0x2d,0x09,0x5a,0x01,0xd5,0x48,   
  37.     0xb4,0x09,0x68,0x89,0x54,0x0b,0xa4,0x0a,0xa5,0x6a,0x95,0x04,0xad,0x08,   
  38.     0x6a,0x44,0xda,0x04,0x74,0x05,0xb0,0x25,0x54,0x03,   
  39. };   
  40.   

确定阳历日和阴历日的对应关系的算法：
对于其他任何一个阳历日和阴历日的对应关系，都可以通过以下算法求得结果。具体算法由如get_lunar_day(void)实现：
说明：函数get_lunar_day(void)的输入变量：gc_solar_calendar_year和gc_solar_calendar
输出变量：gc_lunar_calendar_year、gc_lunar_calendar_month和gc_lunar_calendar_date

 
  1. void get_lunar_day(void)/*计算出输入阳历年、阳历月，对应该阳历月第一天对应阴历时间年、月、日*/  
  2. {   
  3.     unsigned char temp_leap_month;   
  4.     unsigned char temp_flag;   
  5.     unsigned char calculate_temp;   
  6.     unsigned char mc_tpumenus_temp_loop;   
  7.     unsigned char mc_tpumenus_temp_01;   
  8.     temp_leap_month = 0;temp_flag = 1;   
  9.     //条件初始化二次，减少运算数据量.   
  10.     if(gc_solar_calendar_year > 99)   
  11.     {   
  12.         gc_lunar_calendar_year = 99;gc_lunar_calendar_month = 11;   
  13.         gc_lunar_calendar_date = 25;temp_total_day += 25;calculate_temp = 100;   
  14.     }   
  15.     else  
  16.     {   
  17.         gc_lunar_calendar_year = 0;gc_lunar_calendar_month = 11;   
  18.         gc_lunar_calendar_date = 11;temp_total_day += 11;calculate_temp = 1;   
  19.     }   
  20.     if(gc_solar_calendar_year >calculate_temp||gc_solar_calendar_month>1)   
  21.     {    
  22.         for(mc_tpumenus_temp_loop = 1;mc_tpumenus_temp_loop>0;)   
  23.         {   
  24.             temp_total_day -=calendar_calculate_lunar_month_total_day();   
  25.             temp_leap_month = tpumenus_lunar_calendar_month_table[2*gc_lunar_calendar_year +   
  26.                 temp_leap_month = (temp_leap_month>>4)&0x0F;   
  27.             if(gc_lunar_calendar_month == temp_leap_month)   
  28.             {   
  29.                 switch(gc_lunar_calendar_year)   
  30.                 {   
  31.                     case 6,14,19,25,33,36,38,41,44,52,55,79,117,   
  32.                         136,147,150,155,158,185,193:   
  33.                         if(temp_total_day<31)   
  34.                         {   
  35.                             gc_lunar_calendar_date = temp_total_day;   
  36.                             mc_tpumenus_temp_loop = 0;temp_flag = 0;   
  37.                         }   
  38.                         else temp_total_day -= 30;   
  39.                         break; //current month:temp_leap_month   
  40.                     default:   
  41.                         if(temp_total_day < 30)   
  42.                         {   
  43.                             gc_lunar_calendar_date = temp_total_day;mc_tpumenus_temp_loop = 0;   
  44.                             temp_flag = 0; /*current month:temp_leap_month*/    
  45.                         }   
  46.                         else temp_total_day -= 29;    
  47.                         break;   
  48.                 }   
  49.             }   
  50.             if(temp_flag){gc_lunar_calendar_month++;   
  51.             if(gc_lunar_calendar_month == 13)   
  52.             {   
  53.                 gc_lunar_calendar_month = 1;   
  54.                 gc_lunar_calendar_year++;   
  55.             }   
  56.             if(temp_total_day < 61) //if temp_total_day>60,ignore compare   
  57.             {   
  58.                 mc_tpumenus_temp_01 = calendar_calculate_lunar_month_total_day();   
  59.                 if(temp_total_day < (mc_tpumenus_temp_01 + 1))   
  60.                 {   
  61.                     mc_tpumenus_temp_loop = 0;   
  62.                     gc_lunar_calendar_date = temp_total_day;   
  63.                 }    
  64.             }   
  65.                
  66.         }    
  67.     }   
  68. }   
  69.        

gc_lunar_leap_month = (temp_flag<<4)|temp_leap_month;/*set leap_month flag*/
说明：函数calendar_calculate_lunar_month_total_day(void)根据输入变量gc_lunar_calen和gc_lunar_calendar_month，结合压缩数据表lunar_calendar_month_table计算出对应阴历天数。
 
相关文章:

12 下一页
 
最新开源项目
 
 
  查看更多...  
 
本站相关产品   淘宝网店
 
 
  查看更多...  

 

本站程序由百合电子工作室开发和维护
Copyright @ baihe electric studio
渝ICP备09006681号-4