PHP公历农历转换（阴历阳历转换）阴历和阳历转换

  1<?php
  2/**
  3* 公农历转换(1912 - 2012) 
  4* 
  5* Usage:
  6*   // 公历1983-10-5转农历
  7*   $lunar = new Lunar();
  8*   $date = $lunar->getLar('1983-10-5',0);
  9*   echo date("Y-m-d", $date);
 10*   // 农历1983-8-29转公历
 11*   $date = $lunar->getLar('1983-8-29',1);
 12*   echo date("Y-m-d", $date);
 13*
 14* @param string 日期
 15* @param int    日期历法
 16*      - 0 公历
 17*        1 农历
 18*
 19* @return timestamp
 20
 21    
 22   这是一个国历与农历互相转的Unit.
 23
 24   其中年份皆用民国年份, 请自行转换 (西元年-1911 = 民国年).
 25   ***************************************************************************
 26   *国农历对映表之说明 :                                                     *
 27   ***************************************************************************
 28   *  前二数字 = 闰月月份, 如果为 13 则没有闰月                              *
 29   *  第叁至第六数字 = 12 个月之大小月之2进位码->10进位                      *
 30   *  例如:                                                                  *
 31   *       101010101010 = 2730                                               *
 32   *       1 : 代表大月(30天) 0 : 代表小月(29天) ==> 1月大2月小3月大..    *
 33   *  第七位数字为闰月天数                                                   *
 34   *           0 : 没有闰月之天数                                            *
 35   *           1 : 闰月为小月(29天)                                          *
 36   *           2 : 闰月为大月(30天)                                          *
 37   *  最後2位数字代表阳历之1月1日与阴历之1月1日相差天数                      *
 38   ***************************************************************************
 39   这对映表只有民国一年至民国一百年, 如不敷您的使用请按照上述之方式自行增加.
 40
 41   这个程式没有判断您所输入之年,月,日是否正确, 请自行判断.
 42
 43   如果转换出来之农历的月份是闰月则传给您的值是***负数***
 44   如果农历要转换国历如果是闰月请输入***负数***
 45
 46   此版本为FreeWare   Version : 0.1
 47   您可以自行修改, 但最好可以将修改过之程式Mail一份给我.
 48   如果您要用於商业用途, 请mail给我告知您的用途及原因.
 49    
 50*/
 51
 52class Lunar {
 53    var $LMDay = array();
 54    var $InterMonth = 0;
 55    var $InterMonthDays = 0;
 56    var $SLRangeDay = 0;
 57
 58    var $SMDay = array(1 => 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
 59    var $LongLife = array( 1 =>
 60    '132637048', '133365036', '053365225', '132900044', '131386034', '022778122', //6
 61    '132395041', '071175231', '131175050', '132635038', '052891127', '131701046', //12
 62    '131748035', '042741223', '130694043', '132391032', '021327122', '131175040', //18
 63    '061623129', '133402047', '133402036', '051769125', '131453044', '130694034', //24
 64    '032158223', '132350041', '073213230', '133221049', '133402038', '063466226', //30
 65    '132901045', '131130035', '042651224', '130605043', '132349032', '023371121', //36
 66    '132709040', '072901128', '131738047', '132901036', '051333226', '131210044', //42
 67    '132651033', '031111223', '131323042', '082714130', '133733048', '131706038', //48
 68    '062794127', '132741045', '131206035', '042734124', '132647043', '131318032', //54
 69    '033878120', '133477039', '071461129', '131386047', '132413036', '051245126', //60
 70    '131197045', '132637033', '043405122', '133365041', '083413130', '132900048', //66
 71    '132922037', '062394227', '132395046', '131179035', '042711124', '132635043', //72
 72    '102855132', '131701050', '131748039', '062804128', '132742047', '132359036', //78
 73    '051199126', '131175045', '131611034', '031866122', '133749040', '081717130', //84
 74    '131452049', '132742037', '052413127', '132350046', '133222035', '043477123', //90
 75    '133402042', '133493031', '021877121', '131386039', '072747128', '130605048', //96
 76    '132349037', '053243125', '132709044', '132890033');
 77    
 78    function getLar($date, $isLunar = 1){
 79        list($year, $month, $day) = split("-", $date);
 80        if($isLunar == 1)
 81            return $this->Lunar2Solar($year, $month, $day);
 82        else
 83            return $this->Solar2Lunar($year, $month, $day);
 84    }
 85    
 86    function IsLeapYear($AYear){
 87      return ($AYear % 4 == 0) and (($AYear % 100 <> 0) or ($AYear % 400 == 0));
 88    }
 89    
 90    function CovertLunarMonth($magicno){
 91         $m = $magicno;
 92         for ($i = 12; $i >= 1; $i--){
 93             $size = $m % 2;
 94             if ($size == 0)
 95                $this->LMDay[$i] = 29;
 96             else
 97                $this->LMDay[$i] = 30;
 98             $m = floor($m / 2);
 99         }
    }
    
    function ProcessMagicStr($yy){
         $yy = $yy - 1911;
         $magicstr = $this->LongLife[$yy];
         $this->InterMonth = substr($magicstr, 0, 2);
         $LunarMonth = substr($magicstr, 2, 4);
         $this->CovertLunarMonth($LunarMonth);
         $dsize = substr($magicstr, 6, 1);
         switch ($dsize) {
              case 0 : 
                $this->InterMonthDays = 0;
                break;
              case 1 : 
                $this->InterMonthDays = 29;
                break;
              case 2 : 
                $this->InterMonthDays = 30;
                break;
         }
         $this->SLRangeDay = substr($magicstr, 7, 2);
    }
    
    function DaysPerLunarMonth($LYear, $LMonth){
         $this->;ProcessMagicStr($LYear);
         if ($LMonth < 0)
            return $this->InterMonthDays;
         else
            return $this->LMDay[$LMonth];
    }
    
    function Solar2Lunar($SYear, $SMonth, $SDay){
         if( !(1912 <= $SYear && $SYear <= 2012) ){
            return false;
         }
         $day = 0;
         if ($this->isLeapYear($SYear))
            $this->SMDay[2] = 29;
         $this->;ProcessMagicStr($SYear);
         if ($SMonth == 1)
            $day = $SDay;
         else {
            for($i = 1; $i <= $SMonth-1; $i++)
                $day = $day + $this->SMDay[$i];
            $day = $day + $SDay;
         }
         if ($day <= $this->SLRangeDay) {
            $day = $day - $this->SLRangeDay;
            $this->processmagicstr($SYear-1);
            for ($i = 12; $i >= 1; $i--){
                $day = $day + $this->LMDay[$i];
                if ($day > 0)
                   break;
            }
            $LYear = $SYear - 1;
            $LMonth = $i;
            $LDay = $day;
         } else {
            $day = $day - $this->SLRangeDay;
            for($i = 1; $i <= $this->InterMonth-1; $i++){
                $day = $day - $this->LMDay[$i];
                if ($day <= 0)
                   break;
            }
            if ($day <= 0) {
               $LYear = $SYear;
               $LMonth = $i;
               $LDay = $day + $this->LMDay[$i];
            } else {
               $day = $day - $this->LMDay[$this->InterMonth];
               if ($day <= 0) {
                  $LYear = $SYear;
                  $LMonth = $this->InterMonth;
                  $LDay = $day + $this->LMDay[$this->InterMonth];
               } else {
                  $this->LMDay[$this->InterMonth] = $this->InterMonthDays;
                  for ($i = $this->InterMonth; $i <= 12; $i++){
                      $day = $day - $this->LMDay[$i];
                      if ($day <= 0)
                         break;
                  }
                  if ($i == $this->InterMonth)
                     $LMonth = 0 - $this->InterMonth;
                  else
                     $LMonth = $i;
                  $LYear = $SYear;
                  $LDay = $day + $this->LMDay[$i];
               }
            }
         }
         return mktime(0, 0, 0, $LMonth, $LDay, $LYear);
    }
    
    function Lunar2Solar($LYear, $LMonth, $LDay){
         if( !(1912 <= $LYear && $LYear <= 2012) ){
            return false;
         }
         $day = 0;
         $SYear = $LYear;
         if ($this->isLeapYear($SYear))
            $this->SMDay[2] = 29;
         $this->processmagicstr($SYear);
         if ($LMonth < 0)
            $day = $this->LMDay[$this->InterMonth];
         if ($LMonth <> 1)
            for ($i = 1; $i <= $LMonth-1; $i++)
                $day = $day + $this->LMDay[$i];
         $day = $day + $LDay + $this->SLRangeDay;
         if (($this->InterMonth <> 13) and ($this->InterMonth < $LMonth))
            $day = $day + $this->InterMonthDays;
         for ($i = 1; $i <= 12; $i++){
             $day = $day - $this->SMDay[$i];
             if ($day <= 0)
                break;
         }
         if ($day > 0) {
            $SYear = $SYear + 1;
            if ($this->isLeapYear($SYear))
               $this->SMDay[2] = 29;
            for ($i = 1; $i <= 12; $i++){
                $day = $day - $this->SMDay[$i];
                if ($day <= 0)
                   break;
            }
         }
         $day = $day + $this->SMDay[$i];
         $SMonth = $i;
         $SDay = $day;
         return mktime(0, 0, 0, $SMonth, $SDay, $SYear);
    }
}
?>