LunarCalendar.cpp 8.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273
  1. #include "stdafx.h"
  2. #include "LunarCalendar.h"
  3. static const int BEGIN_YEAR = 1901;
  4. static const int NUMBER_YEAR = 199;
  5. //使用比特位记录每年的情况
  6. //0~4 共5bit 春节日份
  7. //5~6 共2bit 春节月份
  8. //7~19 共13bit 13个月的大小月情况(如果无闰月,最后位无效),大月为1,小月为0
  9. //20~23 共4bit 记录闰月的月份,如果没有闰月为0
  10. //0x955ABF
  11. //1001 0101010110101 01 11111
  12. //闰月月份 7-19.13个月 春月 春日;
  13. ////1001 0101010110101 01 11111
  14. //0X252ABF
  15. //1001010010101010111111
  16. static const unsigned int LUNAR_YEARS[199] =
  17. {
  18. 0x04AE53, 0x0A5748, 0x5526BD, 0x0D2650, 0x0D9544, 0x46AAB9, 0x056A4D, 0x09AD42, 0x24AEB6, 0x04AE4A, //1901-1910
  19. 0x6A4DBE, 0x0A4D52, 0x0D2546, 0x5D52BA, 0x0B544E, 0x0D6A43, 0x296D37, 0x095B4B, 0x749BC1, 0x049754, //1911-1920
  20. 0x0A4B48, 0x5B25BC, 0x06A550, 0x06D445, 0x4ADAB8, 0x02B64D, 0x095742, 0x2497B7, 0x04974A, 0x664B3E, //1921-1930
  21. 0x0D4A51, 0x0EA546, 0x56D4BA, 0x05AD4E, 0x02B644, 0x393738, 0x092E4B, 0x7C96BF, 0x0C9553, 0x0D4A48, //1931-1940
  22. 0x6DA53B, 0x0B554F, 0x056A45, 0x4AADB9, 0x025D4D, 0x092D42, 0x2C95B6, 0x0A954A, 0x7B4ABD, 0x06CA51, //1941-1950
  23. 0x0B5546, 0x555ABB, 0x04DA4E, 0x0A5B43, 0x352BB8, 0x052B4C, 0x8A953F, 0x0E9552, 0x06AA48, 0x7AD53C, //1951-1960
  24. 0x0AB54F, 0x04B645, 0x4A5739, 0x0A574D, 0x052642, 0x3E9335, 0x0D9549, 0x75AABE, 0x056A51, 0x096D46, //1961-1970
  25. 0x54AEBB, 0x04AD4F, 0x0A4D43, 0x4D26B7, 0x0D254B, 0x8D52BF, 0x0B5452, 0x0B6A47, 0x696D3C, 0x095B50, //1971-1980
  26. 0x049B45, 0x4A4BB9, 0x0A4B4D, 0xAB25C2, 0x06A554, 0x06D449, 0x6ADA3D, 0x0AB651, 0x093746, 0x5497BB, //1981-1990
  27. 0x04974F, 0x064B44, 0x36A537, 0x0EA54A, 0x86B2BF, 0x05AC53, 0x0AB647, 0x5936BC, 0x092E50, 0x0C9645, //1991-2000
  28. 0x4D4AB8, 0x0D4A4C, 0x0DA541, 0x25AAB6, 0x056A49, 0x7AADBD, 0x025D52, 0x092D47, 0x5C95BA, 0x0A954E, //2001-2010
  29. 0x0B4A43, 0x4B5537, 0x0AD54A, 0x955ABF, 0x04BA53, 0x0A5B48, 0x652BBC, 0x052B50, 0x0A9345, 0x474AB9, //2011-2020
  30. 0x06AA4C, 0x0AD541, 0x24DAB6, 0x04B64A, 0x69573D, 0x0A4E51, 0x0D2646, 0x5E933A, 0x0D534D, 0x05AA43, //2021-2030
  31. 0x36B537, 0x096D4B, 0xB4AEBF, 0x04AD53, 0x0A4D48, 0x6D25BC, 0x0D254F, 0x0D5244, 0x5DAA38, 0x0B5A4C, //2031-2040
  32. 0x056D41, 0x24ADB6, 0x049B4A, 0x7A4BBE, 0x0A4B51, 0x0AA546, 0x5B52BA, 0x06D24E, 0x0ADA42, 0x355B37, //2041-2050
  33. 0x09374B, 0x8497C1, 0x049753, 0x064B48, 0x66A53C, 0x0EA54F, 0x06B244, 0x4AB638, 0x0AAE4C, 0x092E42, //2051-2060
  34. 0x3C9735, 0x0C9649, 0x7D4ABD, 0x0D4A51, 0x0DA545, 0x55AABA, 0x056A4E, 0x0A6D43, 0x452EB7, 0x052D4B, //2061-2070
  35. 0x8A95BF, 0x0A9553, 0x0B4A47, 0x6B553B, 0x0AD54F, 0x055A45, 0x4A5D38, 0x0A5B4C, 0x052B42, 0x3A93B6, //2071-2080
  36. 0x069349, 0x7729BD, 0x06AA51, 0x0AD546, 0x54DABA, 0x04B64E, 0x0A5743, 0x452738, 0x0D264A, 0x8E933E, //2081-2090
  37. 0x0D5252, 0x0DAA47, 0x66B53B, 0x056D4F, 0x04AE45, 0x4A4EB9, 0x0A4D4C, 0x0D1541, 0x2D92B5 //2091-2099
  38. };
  39. //计算这个公历日期是一年中的第几天
  40. static int DayOfSolarYear(int year, int month, int day)
  41. {
  42. //为了提高效率,记录每月一日是一年中的第几天;
  43. static const int NORMAL_YDAY[12] = { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 };
  44. //闰年的情况;
  45. static const int LEAP_YDAY[12] = { 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335 };
  46. const int *t_year_yday_ = NORMAL_YDAY;
  47. //判断是否是公历闰年;
  48. if (year % 4 == 0)
  49. {
  50. if (year % 100 != 0)
  51. t_year_yday_ = LEAP_YDAY;
  52. if (year % 400 == 0)
  53. t_year_yday_ = LEAP_YDAY;
  54. }
  55. return t_year_yday_[month - 1] + day;
  56. }
  57. Date SolarToLuanrDate(int solar_year, int solar_month, int solar_day)
  58. {
  59. Date luanr_date;
  60. luanr_date.year = solar_year;
  61. luanr_date.month = 0;
  62. luanr_date.day = 0;
  63. luanr_date.leap = false;
  64. //越界检查,如果越界,返回无效日期;
  65. if (solar_year <= BEGIN_YEAR || solar_year > BEGIN_YEAR + NUMBER_YEAR - 1)
  66. return luanr_date;
  67. int year_index = solar_year - BEGIN_YEAR;
  68. //计算春节的公历日期;
  69. int spring_ny_month = (LUNAR_YEARS[year_index] & 0x60) >> 5;
  70. int spring_ny_day = (LUNAR_YEARS[year_index] & 0x1F);
  71. //计算今天是公历年的第几天;
  72. int today_solar_yd = DayOfSolarYear(solar_year, solar_month, solar_day);
  73. //计算春节是公历年的第几天;
  74. int spring_ny_yd = DayOfSolarYear(solar_year, spring_ny_month, spring_ny_day);
  75. //计算今天是农历年的第几天 = 农历今天在的公历第几天 - 今年农历春节在公历的第几天;
  76. int today_luanr_yd = today_solar_yd - spring_ny_yd + 1;
  77. //如果今天在春节的前面,重新计算today_luanr_yd;
  78. if (today_luanr_yd <= 0)
  79. {
  80. //农历年比当前公历年小1;
  81. year_index--;
  82. luanr_date.year--;
  83. //越界,返回无效日期;
  84. if (year_index < 0)
  85. return luanr_date;
  86. // 去年农历春节月;
  87. spring_ny_month = (LUNAR_YEARS[year_index] & 0x60) >> 5;
  88. // 去年农历春节日;
  89. spring_ny_day = (LUNAR_YEARS[year_index] & 0x1F);
  90. // 去年公历年共多少天;
  91. int year_total_day = DayOfSolarYear(luanr_date.year, 12, 31);
  92. spring_ny_yd = DayOfSolarYear(solar_year, spring_ny_month, spring_ny_day);
  93. // 计算今天是农历年的第几天;
  94. today_luanr_yd = today_solar_yd + year_total_day - spring_ny_yd + 1;
  95. }
  96. int luanr_month = 1;
  97. //计算月份和日期;
  98. for (; luanr_month <= 13; luanr_month++)
  99. {
  100. int month_day = 29;
  101. if ((LUNAR_YEARS[year_index] >> (7 + 13 - luanr_month)) & 0x1)
  102. month_day = 30;
  103. if (today_luanr_yd <= month_day)
  104. break;
  105. else
  106. today_luanr_yd -= month_day;
  107. }
  108. luanr_date.day = today_luanr_yd;
  109. //处理闰月;
  110. int leap_month = (LUNAR_YEARS[year_index] >> 20) & 0xf;
  111. if (leap_month > 0 && leap_month < luanr_month)
  112. {
  113. luanr_month--;
  114. //如果当前月为闰月,设置闰月标志;
  115. if (luanr_month == leap_month)
  116. luanr_date.leap = true;
  117. }
  118. assert(leap_month <= 12);
  119. luanr_date.month = luanr_month;
  120. return luanr_date;
  121. }
  122. CString GetLunarDate(int solar_year, int solar_month, int solar_day)
  123. {
  124. Date luanr_date;
  125. luanr_date.year = solar_year;
  126. luanr_date.month = 0;
  127. luanr_date.day = 0;
  128. luanr_date.leap = false;
  129. //越界检查,如果越界,返回无效日期;
  130. if (solar_year <= BEGIN_YEAR || solar_year > BEGIN_YEAR + NUMBER_YEAR - 1)
  131. return _T("1900-01-01");
  132. int year_index = solar_year - BEGIN_YEAR;
  133. //计算春节的公历日期;
  134. int spring_ny_month = (LUNAR_YEARS[year_index] & 0x60) >> 5;
  135. int spring_ny_day = (LUNAR_YEARS[year_index] & 0x1F);
  136. //计算今天是公历年的第几天;
  137. int today_solar_yd = DayOfSolarYear(solar_year, solar_month, solar_day);
  138. //计算春节是公历年的第几天;
  139. int spring_ny_yd = DayOfSolarYear(solar_year, spring_ny_month, spring_ny_day);
  140. //计算今天是农历年的第几天 = 农历今天在的公历第几天 - 今年农历春节在公历的第几天;
  141. int today_luanr_yd = today_solar_yd - spring_ny_yd + 1;
  142. //如果今天在春节的前面,重新计算today_luanr_yd;
  143. if (today_luanr_yd <= 0)
  144. {
  145. //农历年比当前公历年小1;
  146. year_index--;
  147. luanr_date.year--;
  148. //越界,返回无效日期;
  149. if (year_index < 0)
  150. return _T("1900-01-01");
  151. // 去年农历春节月;
  152. spring_ny_month = (LUNAR_YEARS[year_index] & 0x60) >> 5;
  153. // 去年农历春节日;
  154. spring_ny_day = (LUNAR_YEARS[year_index] & 0x1F);
  155. // 去年公历年共多少天;
  156. int year_total_day = DayOfSolarYear(luanr_date.year, 12, 31);
  157. spring_ny_yd = DayOfSolarYear(solar_year, spring_ny_month, spring_ny_day);
  158. // 计算今天是农历年的第几天;
  159. today_luanr_yd = today_solar_yd + year_total_day - spring_ny_yd + 1;
  160. }
  161. int luanr_month = 1;
  162. //计算月份和日期;
  163. for (; luanr_month <= 13; luanr_month++)
  164. {
  165. int month_day = 29;
  166. if ((LUNAR_YEARS[year_index] >> (7 + 13 - luanr_month)) & 0x1)
  167. month_day = 30;
  168. if (today_luanr_yd <= month_day)
  169. break;
  170. else
  171. today_luanr_yd -= month_day;
  172. }
  173. luanr_date.day = today_luanr_yd;
  174. //处理闰月;
  175. int leap_month = (LUNAR_YEARS[year_index] >> 20) & 0xf;
  176. if (leap_month > 0 && leap_month < luanr_month)
  177. {
  178. luanr_month--;
  179. //如果当前月为闰月,设置闰月标志;
  180. if (luanr_month == leap_month)
  181. luanr_date.leap = true;
  182. }
  183. assert(leap_month <= 12);
  184. luanr_date.month = luanr_month;
  185. CString strSolarDate;
  186. strSolarDate.Format(_T("%04d-%02d-%02d"), luanr_date.year,luanr_date.month,luanr_date.day);
  187. return strSolarDate;
  188. }
  189. CString LuanrToSolarDate(int lunar_year, int lunar_month, int lunar_day, BOOL bLeap/*=FALSE*/)
  190. {
  191. //越界检查,如果越界,返回无效日期;
  192. if (lunar_year <= BEGIN_YEAR || lunar_year > BEGIN_YEAR + NUMBER_YEAR - 1)
  193. return _T("");
  194. // 1.判断该农历年是否有闰月;
  195. int nYearIndex = lunar_year - BEGIN_YEAR;
  196. int leap_month = (LUNAR_YEARS[nYearIndex] >> 20) & 0xF;
  197. CString strSolarDate = _T("1900-01-01");
  198. COleDateTime Solar;
  199. Solar.SetDateTime(lunar_year, lunar_month, lunar_day, 0, 0, 0);
  200. COleDateTimeSpan Span(1, 0, 0, 0);
  201. Date Luanr_date;
  202. for (int i = 0; i < 120; i++)
  203. {
  204. Luanr_date = SolarToLuanrDate(Solar.GetYear(), Solar.GetMonth(), Solar.GetDay());
  205. if (Luanr_date.year == lunar_year && Luanr_date.month == lunar_month && Luanr_date.day == lunar_day)
  206. {
  207. if (bLeap && leap_month == lunar_month)
  208. {
  209. bLeap = FALSE;
  210. Solar += Span;
  211. continue;
  212. }
  213. else
  214. {
  215. strSolarDate.Format(_T("%4d-%02d-%02d"), Solar.GetYear(), Solar.GetMonth(), Solar.GetDay());
  216. break;
  217. }
  218. }
  219. Solar += Span;
  220. }
  221. // 如果没有找,那么就没有这个农历日期;2012-06-30号,这个是不存在的农历日期.
  222. // 不存在,则返回1900-01-01这个初值:设置strSolarDate = _T("1900-01-01");
  223. return strSolarDate;
  224. }