免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2892 | 回复: 1
打印 上一主题 下一主题

阴历-农历-转换类 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2012-03-19 21:45 |只看该作者 |倒序浏览
阴历-农历-转换类
  1. <?phpclass Lunar { var $MIN_YEAR = 1891; var $MAX_YEAR = 2100; var $lunarInfo = array( 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...
复制代码
  1.      <?php
  2. class Lunar {
  3.     var $MIN_YEAR = 1891;
  4.     var $MAX_YEAR = 2100;
  5.     var $lunarInfo = array(
  6.         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),
  7.         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),
  8.         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),
  9.         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),
  10.         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),
  11.         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),
  12.         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),
  13.         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),
  14.         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),
  15.         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),
  16.         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),
  17.         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),
  18.         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),
  19.         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),
  20.         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),
  21.         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),
  22.         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),
  23.         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),
  24.         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),
  25.         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),
  26.         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),
  27.         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),
  28.         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),
  29.         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),
  30.         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),
  31.         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),
  32.         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),
  33.         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),
  34.         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),
  35.         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),
  36.         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),
  37.         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),
  38.         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),
  39.         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),
  40.         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)
  41.     );
  42.     /**
  43.      * 将阳历转换为阴历
  44.      * @param year 公历-年
  45.      * @param month 公历-月
  46.      * @param date 公历-日
  47.      */
  48.     function convertSolarToLunar($year,$month,$date){
  49.         //debugger;
  50.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  51.         if($year==$this->MIN_YEAR&&$month<=2&&$date<=9){
  52.             return array(1891,'正月','初一','辛卯',1,1,'兔');
  53.         }
  54.         return $this->getLunarByBetween($year,$this->getDaysBetweenSolar($year,$month,$date,$yearData[1],$yearData[2]));
  55.     }
  56.    
  57.     function convertSolarMonthToLunar($year,$month) {
  58.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  59.         if($year==$this->MIN_YEAR&&$month<=2&&$date<=9){
  60.             return array(1891,'正月','初一','辛卯',1,1,'兔');
  61.         }
  62.         $month_days_ary = array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
  63.         $dd = $month_days_ary[$month];
  64.         if($this->isLeapYear($year) && $month == 2) $dd++;
  65.         $lunar_ary = array();
  66.         for ($i = 1; $i < $dd; $i++) {
  67.             $array = $this->getLunarByBetween($year,$this->getDaysBetweenSolar($year, $month, $i, $yearData[1], $yearData[2]));
  68.             $array[] = $year . '-' . $month . '-' . $i;
  69.             $lunar_ary[$i] = $array;
  70.         }
  71.         return $lunar_ary;
  72.     }
  73.     /**
  74.     * 将阴历转换为阳历
  75.     * @param year 阴历-年
  76.     * @param month 阴历-月,闰月处理:例如如果当年闰五月,那么第二个五月就传六月,相当于阴历有13个月,只是有的时候第13个月的天数为0
  77.     * @param date 阴历-日
  78.     */
  79.     function convertLunarToSolar($year,$month,$date){
  80.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  81.         $between = $this->getDaysBetweenLunar($year,$month,$date);
  82.         $res = mktime(0,0,0,$yearData[1],$yearData[2],$year);
  83.         $res = date('Y-m-d', $res+$between*24*60*60);
  84.         $day    = explode('-', $res);
  85.         $year    = $day[0];
  86.         $month= $day[1];
  87.         $day    = $day[2];
  88.         return array($year, $month, $day);
  89.     }
  90.     /**
  91.      * 判断是否是闰年
  92.      * @param year
  93.      */
  94.     function isLeapYear($year){
  95.         return (($year%4==0 && $year%100 !=0) || ($year%400==0));
  96.     }
  97.     /**
  98.      * 获取干支纪年
  99.      * @param year
  100.      */
  101.     function getLunarYearName($year){
  102.          $sky = array('庚','辛','壬','癸','甲','乙','丙','丁','戊','己');
  103.          $earth = array('申','酉','戌','亥','子','丑','寅','卯','辰','巳','午','未');
  104.          $year = $year.'';
  105.          return $sky[$year{3}].$earth[$year%12];
  106.     }
  107.     /**
  108.      * 根据阴历年获取生肖
  109.      * @param year 阴历年
  110.      */
  111.     function getYearZodiac($year){
  112.          $zodiac = array('猴','鸡','狗','猪','鼠','牛','虎','兔','龙','蛇','马','羊');
  113.          return $zodiac[$year%12];
  114.     }
  115.     /**
  116.      * 获取阳历月份的天数
  117.      * @param year 阳历-年
  118.      * @param month 阳历-月
  119.      */
  120.     function getSolarMonthDays($year,$month){
  121.          $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);
  122.          return $monthHash["$month"];
  123.     }
  124.     /**
  125.      * 获取阴历月份的天数
  126.      * @param year 阴历-年
  127.      * @param month 阴历-月,从一月开始
  128.      */
  129.     function getLunarMonthDays($year,$month){
  130.          $monthData = $this->getLunarMonths($year);
  131.          return $monthData[$month-1];
  132.     }
  133.     /**
  134.      * 获取阴历每月的天数的数组
  135.      * @param year
  136.      */
  137.     function getLunarMonths($year){
  138.         $yearData = $this->lunarInfo[$year - $this->MIN_YEAR];
  139.         $leapMonth = $yearData[0];
  140.         $bit = decbin($yearData[3]);
  141.         for ($i = 0; $i < strlen($bit);$i ++) {
  142.             $bitArray[$i] = substr($bit, $i, 1);
  143.         }
  144.         for($k=0,$klen=16-count($bitArray);$k<$klen;$k++){
  145.             array_unshift($bitArray, '0');
  146.         }
  147.         $bitArray = array_slice($bitArray,0,($leapMonth==0?12:13));
  148.         for($i=0; $i<count($bitArray); $i++){
  149.             $bitArray[$i] = $bitArray[$i] + 29;
  150.         }
  151.         return $bitArray;
  152.     }
  153.     /**
  154.      * 获取农历每年的天数
  155.      * @param year 农历年份
  156.      */
  157.     function getLunarYearDays($year){
  158.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  159.         $monthArray = $this->getLunarYearMonths($year);
  160.         $len = count($monthArray);
  161.         return ($monthArray[$len-1]==0?$monthArray[$len-2]:$monthArray[$len-1]);
  162.     }
  163.     function getLunarYearMonths($year){
  164.          //debugger;
  165.         $monthData = $this->getLunarMonths($year);
  166.         $res=array();
  167.         $temp=0;
  168.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  169.         $len = ($yearData[0]==0?12:13);
  170.         for($i=0;$i<$len;$i++){
  171.             $temp=0;
  172.             for($j=0;$j<=$i;$j++){
  173.                 $temp+=$monthData[$j];
  174.             }
  175.             array_push($res, $temp);
  176.         }
  177.          return $res;
  178.     }
  179.     /**
  180.      * 获取闰月
  181.      * @param year 阴历年份
  182.      */
  183.     function getLeapMonth($year){
  184.         $yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
  185.         return $yearData[0];
  186.     }
  187.     /**
  188.      * 计算阴历日期与正月初一相隔的天数
  189.      * @param year
  190.      * @param month
  191.      * @param date
  192.      */
  193.     function getDaysBetweenLunar($year,$month,$date){
  194.         $yearMonth = $this->getLunarMonths($year);
  195.         $res=0;
  196.         for($i=1;$i<$month;$i++){
  197.             $res +=$yearMonth[$i-1];
  198.         }
  199.         $res+=$date-1;
  200.         return $res;
  201.     }
  202.     /**
  203.      * 计算2个阳历日期之间的天数
  204.      * @param year 阳历年
  205.      * @param cmonth
  206.      * @param cdate
  207.      * @param dmonth 阴历正月对应的阳历月份
  208.      * @param ddate 阴历初一对应的阳历天数
  209.      */
  210.     function getDaysBetweenSolar($year,$cmonth,$cdate,$dmonth,$ddate){
  211.         $a = mktime(0,0,0,$cmonth,$cdate,$year);
  212.         $b = mktime(0,0,0,$dmonth,$ddate,$year);
  213.         return ceil(($a-$b)/24/3600);
  214.     }
  215.     /**
  216.      * 根据距离正月初一的天数计算阴历日期
  217.      * @param year 阳历年
  218.      * @param between 天数
  219.      */
  220.     function getLunarByBetween($year,$between){
  221.         //debugger;
  222.         $lunarArray = array();
  223.         $yearMonth=array();
  224.         $t=0;
  225.         $e=0;
  226.         $leapMonth=0;
  227.         $m='';
  228.         if($between==0){
  229.             array_push($lunarArray, $year,'正月','初一');
  230.             $t = 1;
  231.             $e = 1;
  232.         }else{
  233.             $year = $between>0? $year : ($year-1);
  234.             $yearMonth = $this->getLunarYearMonths($year);
  235.             $leapMonth = $this->getLeapMonth($year);
  236.             $between = $between>0?$between : ($this->getLunarYearDays($year)+$between);
  237.             for($i=0;$i<13;$i++){
  238.                 if($between==$yearMonth[$i]){
  239.                     $t=$i+2;
  240.                     $e=1;
  241.                     break;
  242.                 }else if($between<$yearMonth[$i]){
  243.                     $t=$i+1;
  244.                     $e=$between-(empty($yearMonth[$i-1])?0:$yearMonth[$i-1])+1;
  245.                     break;
  246.                 }
  247.             }
  248.             $m = ($leapMonth!=0&&$t==$leapMonth+1)?('闰'.$this->getCapitalNum($t- 1,true)):$this->getCapitalNum(($leapMonth!=0&&$leapMonth+1<$t?($t-1):$t),true);
  249.             array_push($lunarArray,$year,$m,$this->getCapitalNum($e,false));
  250.         }
  251.         array_push($lunarArray,$this->getLunarYearName($year));// 天干地支
  252.         array_push($lunarArray,$t,$e);
  253.         array_push($lunarArray,$this->getYearZodiac($year));// 12生肖
  254.         array_push($lunarArray,$leapMonth);// 闰几月
  255.         return $lunarArray;
  256.     }
  257.     /**
  258.      * 获取数字的阴历叫法
  259.      * @param num 数字
  260.      * @param isMonth 是否是月份的数字
  261.      */
  262.     function getCapitalNum($num,$isMonth){
  263.         $isMonth = $isMonth || false;
  264.         $dateHash=array('0'=>'','1'=>'一','2'=>'二','3'=>'三','4'=>'四','5'=>'五','6'=>'六','7'=>'七','8'=>'八','9'=>'九','10'=>'十 ');
  265.         $monthHash=array('0'=>'','1'=>'正月','2'=>'二月','3'=>'三月','4'=>'四月','5'=>'五月','6'=>'六月','7'=>'七月','8'=>'八月','9'=>'九月','10'=>'十月','11'=>'冬月','12'=>'腊月');
  266.         $res='';
  267.         if($isMonth){
  268.             $res = $monthHash[$num];
  269.         }else{
  270.             if($num<=10){
  271.                 $res = '初'.$dateHash[$num];
  272.             }else if($num>10&&$num<20){
  273.                 $res = '十'.$dateHash[$num-10];
  274.             }else if($num==20){
  275.                 $res = "二十";
  276.             }else if($num>20&&$num<30){
  277.                 $res = "廿".$dateHash[$num-20];
  278.             }else if($num==30){
  279.                 $res = "三十";
  280.             }
  281.         }
  282.         return $res;
  283.     }
  284. }
  285. $lunar = new Lunar();
  286. $month = $lunar->convertLunarToSolar(2012, 1,1);
  287. print_r($month);
  288. exit;
复制代码

论坛徽章:
0
2 [报告]
发表于 2012-03-19 21:45 |只看该作者
谢谢分享
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP