PHP计算节日、节气、农阳历互换的代码

2. /*
3. * 农历 节气 节日
4. * edit: bbs.it-home.org
5. */
7. class Lunar {
8. var $MIN_YEAR = 1891;
9. var $MAX_YEAR = 2100;
10. var $lunarInfo = array(
11. array(0,2,9,21936),array(6,1,30,9656),array(0,2,17,9584),array(0,2,6,21168),array(5,1,26,43344),array(0,2,13,59728),
12. array(0,2,2,27296),array(3,1,22,44368),array(0,2,10,43856),array(8,1,30,19304),array(0,2,19,19168),array(0,2,8,42352),
13. array(5,1,29,21096),array(0,2,16,53856),array(0,2,4,55632),array(4,1,25,27304),array(0,2,13,22176),array(0,2,2,39632),
14. array(2,1,22,19176),array(0,2,10,19168),array(6,1,30,42200),array(0,2,18,42192),array(0,2,6,53840),array(5,1,26,54568),
15. array(0,2,14,46400),array(0,2,3,54944),array(2,1,23,38608),array(0,2,11,38320),array(7,2,1,18872),array(0,2,20,18800),
16. array(0,2,8,42160),array(5,1,28,45656),array(0,2,16,27216),array(0,2,5,27968),array(4,1,24,44456),array(0,2,13,11104),
17. array(0,2,2,38256),array(2,1,23,18808),array(0,2,10,18800),array(6,1,30,25776),array(0,2,17,54432),array(0,2,6,59984),
18. array(5,1,26,27976),array(0,2,14,23248),array(0,2,4,11104),array(3,1,24,37744),array(0,2,11,37600),array(7,1,31,51560),
19. array(0,2,19,51536),array(0,2,8,54432),array(6,1,27,55888),array(0,2,15,46416),array(0,2,5,22176),array(4,1,25,43736),
20. array(0,2,13,9680),array(0,2,2,37584),array(2,1,22,51544),array(0,2,10,43344),array(7,1,29,46248),array(0,2,17,27808),
21. array(0,2,6,46416),array(5,1,27,21928),array(0,2,14,19872),array(0,2,3,42416),array(3,1,24,21176),array(0,2,12,21168),
22. array(8,1,31,43344),array(0,2,18,59728),array(0,2,8,27296),array(6,1,28,44368),array(0,2,15,43856),array(0,2,5,19296),
23. array(4,1,25,42352),array(0,2,13,42352),array(0,2,2,21088),array(3,1,21,59696),array(0,2,9,55632),array(7,1,30,23208),
24. array(0,2,17,22176),array(0,2,6,38608),array(5,1,27,19176),array(0,2,15,19152),array(0,2,3,42192),array(4,1,23,53864),
25. array(0,2,11,53840),array(8,1,31,54568),array(0,2,18,46400),array(0,2,7,46752),array(6,1,28,38608),array(0,2,16,38320),
26. array(0,2,5,18864),array(4,1,25,42168),array(0,2,13,42160),array(10,2,2,45656),array(0,2,20,27216),array(0,2,9,27968),
27. array(6,1,29,44448),array(0,2,17,43872),array(0,2,6,38256),array(5,1,27,18808),array(0,2,15,18800),array(0,2,4,25776),
28. array(3,1,23,27216),array(0,2,10,59984),array(8,1,31,27432),array(0,2,19,23232),array(0,2,7,43872),array(5,1,28,37736),
29. array(0,2,16,37600),array(0,2,5,51552),array(4,1,24,54440),array(0,2,12,54432),array(0,2,1,55888),array(2,1,22,23208),
30. array(0,2,9,22176),array(7,1,29,43736),array(0,2,18,9680),array(0,2,7,37584),array(5,1,26,51544),array(0,2,14,43344),
31. array(0,2,3,46240),array(4,1,23,46416),array(0,2,10,44368),array(9,1,31,21928),array(0,2,19,19360),array(0,2,8,42416),
32. array(6,1,28,21176),array(0,2,16,21168),array(0,2,5,43312),array(4,1,25,29864),array(0,2,12,27296),array(0,2,1,44368),
33. array(2,1,22,19880),array(0,2,10,19296),array(6,1,29,42352),array(0,2,17,42208),array(0,2,6,53856),array(5,1,26,59696),
34. array(0,2,13,54576),array(0,2,3,23200),array(3,1,23,27472),array(0,2,11,38608),array(11,1,31,19176),array(0,2,19,19152),
35. array(0,2,8,42192),array(6,1,28,53848),array(0,2,15,53840),array(0,2,4,54560),array(5,1,24,55968),array(0,2,12,46496),
36. array(0,2,1,22224),array(2,1,22,19160),array(0,2,10,18864),array(7,1,30,42168),array(0,2,17,42160),array(0,2,6,43600),
37. array(5,1,26,46376),array(0,2,14,27936),array(0,2,2,44448),array(3,1,23,21936),array(0,2,11,37744),array(8,2,1,18808),
38. array(0,2,19,18800),array(0,2,8,25776),array(6,1,28,27216),array(0,2,15,59984),array(0,2,4,27424),array(4,1,24,43872),
39. array(0,2,12,43744),array(0,2,2,37600),array(3,1,21,51568),array(0,2,9,51552),array(7,1,29,54440),array(0,2,17,54432),
40. array(0,2,5,55888),array(5,1,26,23208),array(0,2,14,22176),array(0,2,3,42704),array(4,1,23,21224),array(0,2,11,21200),
41. array(8,1,31,43352),array(0,2,19,43344),array(0,2,7,46240),array(6,1,27,46416),array(0,2,15,44368),array(0,2,5,21920),
42. array(4,1,24,42448),array(0,2,12,42416),array(0,2,2,21168),array(3,1,22,43320),array(0,2,9,26928),array(7,1,29,29336),
43. array(0,2,17,27296),array(0,2,6,44368),array(5,1,26,19880),array(0,2,14,19296),array(0,2,3,42352),array(4,1,24,21104),
44. array(0,2,10,53856),array(8,1,30,59696),array(0,2,18,54560),array(0,2,7,55968),array(6,1,27,27472),array(0,2,15,22224),
45. array(0,2,5,19168),array(4,1,25,42216),array(0,2,12,42192),array(0,2,1,53584),array(2,1,21,55592),array(0,2,9,54560)
46. );
47. /**
48. * 将阳历转换为阴历
49. * @param year 公历-年
50. * @param month 公历-月
51. * @param date 公历-日
52. */
53. function convertSolarToLunar($year,$month,$date){
54. //debugger;
55. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
56. if($year==$this->MIN_YEAR&&$month<=2&&$date<=9){
57. return array(1891,'正月','初一','辛卯',1,1,'兔');
58. }
59. return $this->getLunarByBetween($year,$this->getDaysBetweenSolar($year,$month,$date,$yearData[1],$yearData[2]));
60. }
62. function convertSolarMonthToLunar($year,$month) {
63. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
64. if($year==$this->MIN_YEAR&&$month<=2&&$date<=9){
65. return array(1891,'正月','初一','辛卯',1,1,'兔');
66. }
67. $month_days_ary = array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
68. $dd = $month_days_ary[$month];
69. if($this->isLeapYear($year) && $month == 2) $dd++;
70. $lunar_ary = array();
71. for ($i = 1; $i < $dd; $i++) {
72. $array = $this->getLunarByBetween($year,$this->getDaysBetweenSolar($year, $month, $i, $yearData[1], $yearData[2]));
73. $array[] = $year . '-' . $month . '-' . $i;
74. $lunar_ary[$i] = $array;
75. }
76. return $lunar_ary;
77. }
78. /**
79. * 将阴历转换为阳历
80. * @param year 阴历-年
81. * @param month 阴历-月，闰月处理：例如如果当年闰五月，那么第二个五月就传六月，相当于阴历有13个月，只是有的时候第13个月的天数为0
82. * @param date 阴历-日
83. */
84. function convertLunarToSolar($year,$month,$date){
85. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
86. $between = $this->getDaysBetweenLunar($year,$month,$date);
87. $res = mktime(0,0,0,$yearData[1],$yearData[2],$year);
88. $res = date('Y-m-d', $res+$between*24*60*60);
89. $day = explode('-', $res);
90. $year = $day[0];
91. $month= $day[1];
92. $day = $day[2];
93. return array($year, $month, $day);
94. }
95. /**
96. * 判断是否是闰年
97. * @param year
98. */
99. function isLeapYear($year){
100. return (($year%4==0 && $year%100 !=0) || ($year%400==0));
101. }
102. /**
103. * 获取干支纪年
104. * @param year
105. */
106. function getLunarYearName($year){
107. $sky = array('庚','辛','壬','癸','甲','乙','丙','丁','戊','己');
108. $earth = array('申','酉','戌','亥','子','丑','寅','卯','辰','巳','午','未');
109. $year = $year.'';
110. return $sky[$year{3}].$earth[$year%12];
111. }
112. /**
113. * 根据阴历年获取生肖
114. * @param year 阴历年
115. */
116. function getYearZodiac($year){
117. $zodiac = array('猴','鸡','狗','猪','鼠','牛','虎','兔','龙','蛇','马','羊');
118. return $zodiac[$year%12];
119. }
120. /**
121. * 获取阳历月份的天数
122. * @param year 阳历-年
123. * @param month 阳历-月
124. */
125. function getSolarMonthDays($year,$month){
126. $monthHash = array('1'=>31,'2'=>$this->isLeapYear($year)?29:28,'3'=>31,'4'=>30,'5'=>31,'6'=>30,'7'=>31,'8'=>31,'9'=>30,'10'=>31,'11'=>30,'12'=>31);
127. return $monthHash["$month"];
128. }
129. /**
130. * 获取阴历月份的天数
131. * @param year 阴历-年
132. * @param month 阴历-月，从一月开始
133. */
134. function getLunarMonthDays($year,$month){
135. $monthData = $this->getLunarMonths($year);
136. return $monthData[$month-1];
137. }
138. /**
139. * 获取阴历每月的天数的数组
140. * @param year
141. */
142. function getLunarMonths($year){
143. $yearData = $this->lunarInfo[$year - $this->MIN_YEAR];
144. $leapMonth = $yearData[0];
145. $bit = decbin($yearData[3]);
146. for ($i = 0; $i < strlen($bit);$i ++) {
147. $bitArray[$i] = substr($bit, $i, 1);
148. }
149. for($k=0,$klen=16-count($bitArray);$k<$klen;$k++){
150. array_unshift($bitArray, '0');
151. }
152. $bitArray = array_slice($bitArray,0,($leapMonth==0?12:13));
153. for($i=0; $i $bitArray[$i] = $bitArray[$i] + 29;
154. }
155. return $bitArray;
156. }
157. /**
158. * 获取农历每年的天数
159. * @param year 农历年份
160. */
161. function getLunarYearDays($year){
162. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
163. $monthArray = $this->getLunarYearMonths($year);
164. $len = count($monthArray);
165. return ($monthArray[$len-1]==0?$monthArray[$len-2]:$monthArray[$len-1]);
166. }
167. function getLunarYearMonths($year){
168. //debugger;
169. $monthData = $this->getLunarMonths($year);
170. $res=array();
171. $temp=0;
172. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
173. $len = ($yearData[0]==0?12:13);
174. for($i=0;$i<$len;$i++){
175. $temp=0;
176. for($j=0;$j<=$i;$j++){
177. $temp+=$monthData[$j];
178. }
179. array_push($res, $temp);
180. }
181. return $res;
182. }
183. /**
184. * 获取闰月
185. * @param year 阴历年份
186. */
187. function getLeapMonth($year){
188. $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
189. return $yearData[0];
190. }
191. /**
192. * 计算阴历日期与正月初一相隔的天数
193. * @param year
194. * @param month
195. * @param date
196. */
197. function getDaysBetweenLunar($year,$month,$date){
198. $yearMonth = $this->getLunarMonths($year);
199. $res=0;
200. for($i=1;$i<$month;$i++){
201. $res +=$yearMonth[$i-1];
202. }
203. $res+=$date-1;
204. return $res;
205. }
206. /**
207. * 计算2个阳历日期之间的天数
208. * @param year 阳历年
209. * @param cmonth
210. * @param cdate
211. * @param dmonth 阴历正月对应的阳历月份
212. * @param ddate 阴历初一对应的阳历天数
213. */
214. function getDaysBetweenSolar($year,$cmonth,$cdate,$dmonth,$ddate){
215. $a = mktime(0,0,0,$cmonth,$cdate,$year);
216. $b = mktime(0,0,0,$dmonth,$ddate,$year);
217. return ceil(($a-$b)/24/3600);
218. }
219. /**
220. * 根据距离正月初一的天数计算阴历日期
221. * @param year 阳历年
222. * @param between 天数
223. */
224. function getLunarByBetween($year,$between){
225. //debugger;
226. $lunarArray = array();
227. $yearMonth=array();
228. $t=0;
229. $e=0;
230. $leapMonth=0;
231. $m='';
232. if($between==0){
233. array_push($lunarArray, $year,'正月','初一');
234. $t = 1;
235. $e = 1;
236. }else{
237. $year = $between>0? $year : ($year-1);
238. $yearMonth = $this->getLunarYearMonths($year);
239. $leapMonth = $this->getLeapMonth($year);
240. $between = $between>0?$between : ($this->getLunarYearDays($year)+$between);
241. for($i=0;$i<13;$i++){
242. if($between==$yearMonth[$i]){
243. $t=$i+2;
244. $e=1;
245. break;
246. }else if($between<$yearMonth[$i]){
247. $t=$i+1;
248. $e=$between-(emptyempty($yearMonth[$i-1])?0:$yearMonth[$i-1])+1;
249. break;
250. }
251. }
252. $m = ($leapMonth!=0&&$t==$leapMonth+1)?('闰'.$this->getCapitalNum($t- 1,true)):$this->getCapitalNum(($leapMonth!=0&&$leapMonth+1<$t?($t-1):$t),true);
253. array_push($lunarArray,$year,$m,$this->getCapitalNum($e,false));
254. }
255. array_push($lunarArray,$this->getLunarYearName($year));// 天干地支
256. array_push($lunarArray,$t,$e);
257. array_push($lunarArray,$this->getYearZodiac($year));// 12生肖
258. array_push($lunarArray,$leapMonth);// 闰几月
259. return $lunarArray;
260. }
261. /**
262. * 获取数字的阴历叫法
263. * @param num 数字
264. * @param isMonth 是否是月份的数字
265. */
266. function getCapitalNum($num,$isMonth){
267. $isMonth = $isMonth || false;
268. $dateHash=array('0'=>'','1'=>'一','2'=>'二','3'=>'三','4'=>'四','5'=>'五','6'=>'六','7'=>'七','8'=>'八','9'=>'九','10'=>'十 ');
269. $monthHash=array('0'=>'','1'=>'正月','2'=>'二月','3'=>'三月','4'=>'四月','5'=>'五月','6'=>'六月','7'=>'七月','8'=>'八月','9'=>'九月','10'=>'十月','11'=>'冬月','12'=>'腊月');
270. $res='';
271. if($isMonth){
272. $res = $monthHash[$num];
273. }else{
274. if($num<=10){
275. $res = '初'.$dateHash[$num];
276. }else if($num>10&&$num<20){
277. $res = '十'.$dateHash[$num-10];
278. }else if($num==20){
279. $res = "二十";
280. }else if($num>20&&$num<30){
281. $res = "廿".$dateHash[$num-20];
282. }else if($num==30){
283. $res = "三十";
284. }
285. }
286. return $res;
287. }
289. /*
290. * 节气通用算法
291. */
292. function getJieQi($_year,$month,$day)
293. {
294. $year = substr($_year,-2)+0;
295. $coefficient = array(
296. array(5.4055,2019,-1),//小寒
297. array(20.12,2082,1),//大寒
298. array(3.87),//立春
299. array(18.74,2026,-1),//雨水
300. array(5.63),//惊蛰
301. array(20.646,2084,1),//春分
302. array(4.81),//清明
303. array(20.1),//谷雨
304. array(5.52,1911,1),//立夏
305. array(21.04,2008,1),//小满
306. array(5.678,1902,1),//芒种
307. array(21.37,1928,1),//夏至
308. array(7.108,2016,1),//小暑
309. array(22.83,1922,1),//大暑
310. array(7.5,2002,1),//立秋
311. array(23.13),//处暑
312. array(7.646,1927,1),//白露
313. array(23.042,1942,1),//秋分
314. array(8.318),//寒露
315. array(23.438,2089,1),//霜降
316. array(7.438,2089,1),//立冬
317. array(22.36,1978,1),//小雪
318. array(7.18,1954,1),//大雪
319. array(21.94,2021,-1)//冬至
320. );
321. $term_name = array(
322. "小寒","大寒","立春","雨水","惊蛰","春分","清明","谷雨",
323. "立夏","小满","芒种","夏至","小暑","大暑","立秋","处暑",
324. "白露","秋分","寒露","霜降","立冬","小雪","大雪","冬至");
326. $idx1 = ($month-1)*2;
327. $_leap_value = floor(($year-1)/4);
329. $day1 = floor($year*0.2422+$coefficient[$idx1][0])-$_leap_value;
330. if(isset($coefficient[$idx1][1])&&$coefficient[$idx1][1]==$_year)
331. {
332. $day1 += $coefficient[$idx1][2];
333. }
334. $day2 = floor($year*0.2422+$coefficient[$idx1+1][0])-$_leap_value;
335. if(isset($coefficient[$idx1+1][1])&&$coefficient[$idx1+1][1]==$_year)
336. {
337. $day1 += $coefficient[$idx1+1][2];
338. }
339. //echo __FILE__.'->'.__LINE__.' $day1='.$day1,',$day2='.$day2.'
     '.chr(10);
340. if($day==$day1) return $term_name[$idx1];
341. if($day==$day2) return $term_name[$idx1+1];
342. return '';
343. }
345. /*
346. * 获取节日：特殊的节日只能修改此函数来计算
347. */
348. function getFestival($today, $nl_info = false,$config = 1)
349. {
350. if($config == 1)
351. {
352. $arr_lunar=array('01-01'=>'春节','01-15'=>'元宵节','02-02'=>'二月二','05-05'=>'端午节','07-07'=>'七夕节','08-15'=>'中秋节','09-09'=>'重阳节','12-08'=>'腊八节','12-23'=>'小年');
353. $arr_solar=array('01-01'=>'元旦','02-14'=>'情人节','03-12'=>'植树节','04-01'=>'愚人节','05-01'=>'劳动节','06-01'=>'儿童节','10-01'=>'国庆节','10-31'=>'万圣节','12-24'=>'平安夜','12-25'=>'圣诞节');
354. }//需要不同节日的，用不同的$config,然后配置$arr_lunar和$arr_solar
356. $festivals = array();
358. list($y,$m,$d) = explode('-',$today);
359. if(!$nl_info) $nl_info = $this->convertSolarToLunar($y,intval($m),intval($d));
361. if($nl_info[7]>0&&$nl_info[7]<$nl_info[4]) $nl_info[4]-=1;
362. $md_lunar = substr('0'.$nl_info[4],-2).'-'.substr('0'.$nl_info[5],-2);
363. $md_solar=substr_replace($today,'',0,5);
365. isset($arr_lunar[$md_lunar])?array_push($festivals, $arr_lunar[$md_lunar]):'';
366. isset($arr_solar[$md_solar])?array_push($festivals, $arr_solar[$md_solar]):'';
368. $glweek = date("w",strtotime($today)); //0-6
370. if($m==5&&($d>7)&&($d<15)&&($glweek==0))array_push($festivals, "母亲节");
371. if($m==6&&($d>14)&&($d<22)&&($glweek==0))array_push($festivals,"父亲节");
373. $jieqi = $this->getJieQi($y,$m,$d);
374. if($jieqi)array_push($festivals,$jieqi);
375. return implode('/',$festivals);
376. }
377. }
378. header("Content-Type:text/html;charset=utf-8");
379. $lunar=new Lunar();//
380. $month=$lunar->convertSolarToLunar(2013,07,08);//将阳历转换为阴历
381. echo '

     ';
     print_r($month);

打印结果：