欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

php 阴历-农历-转换类代码

程序员文章站 2022-05-25 21:11:41
复制代码 代码如下:

复制代码 代码如下:

<?php
/**
* 公农历转换(1912 - 2012)
*
* usage:
*   // 公历1983-10-5转农历
*   $lunar = new lunar();
*   $date = $lunar->getlar('1983-10-5',0);
*   echo date("y-m-d", $date);
*   // 农历1983-8-29转公历
*   $date = $lunar->getlar('1983-8-29',1);
*   echo date("y-m-d", $date);
*
* @param string 日期
* @param int    日期历法
*      - 0 公历
*        1 农历
*
* @return timestamp

  
  这是一个国历与农历互相转的unit.

  其中年份皆用民国年份, 请自行转换 (西元年-1911 = 民国年).
  ***************************************************************************
  *国农历对映表之说明 :                                                     *
  ***************************************************************************
  *  前二数字 = 闰月月份, 如果为 13 则没有闰月                              *
  *  第叁至第六数字 = 12 个月之大小月之2进位码->10进位                      *
  *  例如:                                                                  *
  *       101010101010 = 2730                                               *
  *       1 : 代表大月(30天) 0 : 代表小月(29天) ==> 1月大2月小3月大..    *
  *  第七位数字为闰月天数                                                   *
  *           0 : 没有闰月之天数                                            *
  *           1 : 闰月为小月(29天)                                          *
  *           2 : 闰月为大月(30天)                                          *
  *  最後2位数字代表阳历之1月1日与阴历之1月1日相差天数                      *
  ***************************************************************************
  这对映表只有民国一年至民国一百年, 如不敷您的使用请按照上述之方式自行增加.

  这个程式没有判断您所输入之年,月,日是否正确, 请自行判断.

  如果转换出来之农历的月份是闰月则传给您的值是***负数***
  如果农历要转换国历如果是闰月请输入***负数***

  此版本为freeware   version : 0.1
  您可以自行修改, 但最好可以将修改过之程式mail一份给我.
  如果您要用於商业用途, 请mail给我告知您的用途及原因.

*/
class lunar {
   var $lmday = array();
   var $intermonth = 0;
   var $intermonthdays = 0;
   var $slrangeday = 0;

   var $smday = array(1 => 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
   var $longlife = array( 1 =>
   '132637048', '133365036', '053365225', '132900044', '131386034', '022778122', //6
   '132395041', '071175231', '131175050', '132635038', '052891127', '131701046', //12
   '131748035', '042741223', '130694043', '132391032', '021327122', '131175040', //18
   '061623129', '133402047', '133402036', '051769125', '131453044', '130694034', //24
   '032158223', '132350041', '073213230', '133221049', '133402038', '063466226', //30
   '132901045', '131130035', '042651224', '130605043', '132349032', '023371121', //36
   '132709040', '072901128', '131738047', '132901036', '051333226', '131210044', //42
   '132651033', '031111223', '131323042', '082714130', '133733048', '131706038', //48
   '062794127', '132741045', '131206035', '042734124', '132647043', '131318032', //54
   '033878120', '133477039', '071461129', '131386047', '132413036', '051245126', //60
   '131197045', '132637033', '043405122', '133365041', '083413130', '132900048', //66
   '132922037', '062394227', '132395046', '131179035', '042711124', '132635043', //72
   '102855132', '131701050', '131748039', '062804128', '132742047', '132359036', //78
   '051199126', '131175045', '131611034', '031866122', '133749040', '081717130', //84
   '131452049', '132742037', '052413127', '132350046', '133222035', '043477123', //90
   '133402042', '133493031', '021877121', '131386039', '072747128', '130605048', //96
   '132349037', '053243125', '132709044', '132890033');

   function getlar($date, $islunar = 1){
       list($year, $month, $day) = split("-", $date);
       if($islunar == 1)
           return $this->lunar2solar($year, $month, $day);
       else
           return $this->solar2lunar($year, $month, $day);
   }

   function isleapyear($ayear){
     return ($ayear % 4 == 0) and (($ayear % 100 <> 0) or ($ayear % 400 == 0));
   }

   function covertlunarmonth($magicno){
        $m = $magicno;
        for ($i = 12; $i >= 1; $i--){
            $size = $m % 2;
            if ($size == 0)
               $this->lmday[$i] = 29;
            else
               $this->lmday[$i] = 30;
            $m = floor($m / 2);
        }
    }

    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);
    }
}
?>


使用方法:
复制代码 代码如下:

 $lunar = new lunar();
   $date = $lunar->getlar('1983-10-5',0);
   echo date("y-m-d", $date);
   // 农历1983-8-29转公历
   $date = $lunar->getlar('1983-8-29',1);
   echo date("y-m-d", $date);


复制代码 代码如下:

<?php
class 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),array(0,2,13,59728),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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),
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)
);
/**
* 将阳历转换为阴历
* @param year 公历-年
* @param month 公历-月
* @param date 公历-日
*/
function convertsolartolunar($year,$month,$date){
//debugger;
$yeardata = $this->lunarinfo[$year-$this->min_year];
if($year==$this->min_year&&$month<=2&&$date<=9){
return array(1891,'正月','初一','辛卯',1,1,'兔');
}
return $this->getlunarbybetween($year,$this->getdaysbetweensolar($year,$month,$date,$yeardata[1],$yeardata[2]));
}

function convertsolarmonthtolunar($year,$month) {
$yeardata = $this->lunarinfo[$year-$this->min_year];
if($year==$this->min_year&&$month<=2&&$date<=9){
return array(1891,'正月','初一','辛卯',1,1,'兔');
}
$month_days_ary = array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
$dd = $month_days_ary[$month];
if($this->isleapyear($year) && $month == 2) $dd++;
$lunar_ary = array();
for ($i = 1; $i < $dd; $i++) {
$array = $this->getlunarbybetween($year,$this->getdaysbetweensolar($year, $month, $i, $yeardata[1], $yeardata[2]));
$array[] = $year . '-' . $month . '-' . $i;
$lunar_ary[$i] = $array;
}
return $lunar_ary;
}
/**
* 将阴历转换为阳历
* @param year 阴历-年
* @param month 阴历-月,闰月处理:例如如果当年闰五月,那么第二个五月就传六月,相当于阴历有13个月,只是有的时候第13个月的天数为0
* @param date 阴历-日
*/
function convertlunartosolar($year,$month,$date){
$yeardata = $this->lunarinfo[$year-$this->min_year];
$between = $this->getdaysbetweenlunar($year,$month,$date);
$res = mktime(0,0,0,$yeardata[1],$yeardata[2],$year);
$res = date('y-m-d', $res+$between*24*60*60);
$day = explode('-', $res);
$year = $day[0];
$month= $day[1];
$day = $day[2];
return array($year, $month, $day);
}
/**
* 判断是否是闰年
* @param year
*/
function isleapyear($year){
return (($year%4==0 && $year%100 !=0) || ($year%400==0));
}
/**
* 获取干支纪年
* @param year
*/
function getlunaryearname($year){
$sky = array('庚','辛','壬','癸','甲','乙','丙','丁','戊','己');
$earth = array('申','酉','戌','亥','子','丑','寅','卯','辰','巳','午','未');
$year = $year.'';
return $sky[$year{3}].$earth[$year%12];
}
/**
* 根据阴历年获取生肖
* @param year 阴历年
*/
function getyearzodiac($year){
$zodiac = array('猴','鸡','狗','猪','鼠','牛','虎','兔','龙','蛇','马','羊');
return $zodiac[$year%12];
}
/**
* 获取阳历月份的天数
* @param year 阳历-年
* @param month 阳历-月
*/
function getsolarmonthdays($year,$month){
$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);
return $monthhash["$month"];
}
/**
* 获取阴历月份的天数
* @param year 阴历-年
* @param month 阴历-月,从一月开始
*/
function getlunarmonthdays($year,$month){
$monthdata = $this->getlunarmonths($year);
return $monthdata[$month-1];
}
/**
* 获取阴历每月的天数的数组
* @param year
*/
function getlunarmonths($year){
$yeardata = $this->lunarinfo[$year - $this->min_year];
$leapmonth = $yeardata[0];
$bit = decbin($yeardata[3]);
for ($i = 0; $i < strlen($bit);$i ++) {
$bitarray[$i] = substr($bit, $i, 1);
}
for($k=0,$klen=16-count($bitarray);$k<$klen;$k++){
array_unshift($bitarray, '0');
}
$bitarray = array_slice($bitarray,0,($leapmonth==0?12:13));
for($i=0; $i<count($bitarray); $i++){
$bitarray[$i] = $bitarray[$i] + 29;
}
return $bitarray;
}
/**
* 获取农历每年的天数
* @param year 农历年份
*/
function getlunaryeardays($year){
$yeardata = $this->lunarinfo[$year-$this->min_year];
$montharray = $this->getlunaryearmonths($year);
$len = count($montharray);
return ($montharray[$len-1]==0?$montharray[$len-2]:$montharray[$len-1]);
}
function getlunaryearmonths($year){
//debugger;
$monthdata = $this->getlunarmonths($year);
$res=array();
$temp=0;
$yeardata = $this->lunarinfo[$year-$this->min_year];
$len = ($yeardata[0]==0?12:13);
for($i=0;$i<$len;$i++){
$temp=0;
for($j=0;$j<=$i;$j++){
$temp+=$monthdata[$j];
}
array_push($res, $temp);
}
return $res;
}
/**
* 获取闰月
* @param year 阴历年份
*/
function getleapmonth($year){
$yeardata = $this->lunarinfo[$year-$this->min_year];
return $yeardata[0];
}
/**
* 计算阴历日期与正月初一相隔的天数
* @param year
* @param month
* @param date
*/
function getdaysbetweenlunar($year,$month,$date){
$yearmonth = $this->getlunarmonths($year);
$res=0;
for($i=1;$i<$month;$i++){
$res +=$yearmonth[$i-1];
}
$res+=$date-1;
return $res;
}
/**
* 计算2个阳历日期之间的天数
* @param year 阳历年
* @param cmonth
* @param cdate
* @param dmonth 阴历正月对应的阳历月份
* @param ddate 阴历初一对应的阳历天数
*/
function getdaysbetweensolar($year,$cmonth,$cdate,$dmonth,$ddate){
$a = mktime(0,0,0,$cmonth,$cdate,$year);
$b = mktime(0,0,0,$dmonth,$ddate,$year);
return ceil(($a-$b)/24/3600);
}
/**
* 根据距离正月初一的天数计算阴历日期
* @param year 阳历年
* @param between 天数
*/
function getlunarbybetween($year,$between){
//debugger;
$lunararray = array();
$yearmonth=array();
$t=0;
$e=0;
$leapmonth=0;
$m='';
if($between==0){
array_push($lunararray, $year,'正月','初一');
$t = 1;
$e = 1;
}else{
$year = $between>0? $year : ($year-1);
$yearmonth = $this->getlunaryearmonths($year);
$leapmonth = $this->getleapmonth($year);
$between = $between>0?$between : ($this->getlunaryeardays($year)+$between);
for($i=0;$i<13;$i++){
if($between==$yearmonth[$i]){
$t=$i+2;
$e=1;
break;
}else if($between<$yearmonth[$i]){
$t=$i+1;
$e=$between-(empty($yearmonth[$i-1])?0:$yearmonth[$i-1])+1;
break;
}
}
$m = ($leapmonth!=0&&$t==$leapmonth+1)?('闰'.$this->getcapitalnum($t- 1,true)):$this->getcapitalnum(($leapmonth!=0&&$leapmonth+1<$t?($t-1):$t),true);
array_push($lunararray,$year,$m,$this->getcapitalnum($e,false));
}
array_push($lunararray,$this->getlunaryearname($year));// 天干地支
array_push($lunararray,$t,$e);
array_push($lunararray,$this->getyearzodiac($year));// 12生肖
array_push($lunararray,$leapmonth);// 闰几月
return $lunararray;
}
/**
* 获取数字的阴历叫法
* @param num 数字
* @param ismonth 是否是月份的数字
*/
function getcapitalnum($num,$ismonth){
$ismonth = $ismonth || false;
$datehash=array('0'=>'','1'=>'一','2'=>'二','3'=>'三','4'=>'四','5'=>'五','6'=>'六','7'=>'七','8'=>'八','9'=>'九','10'=>'十 ');
$monthhash=array('0'=>'','1'=>'正月','2'=>'二月','3'=>'三月','4'=>'四月','5'=>'五月','6'=>'六月','7'=>'七月','8'=>'八月','9'=>'九月','10'=>'十月','11'=>'冬月','12'=>'腊月');
$res='';
if($ismonth){
$res = $monthhash[$num];
}else{
if($num<=10){
$res = '初'.$datehash[$num];
}else if($num>10&&$num<20){
$res = '十'.$datehash[$num-10];
}else if($num==20){
$res = "二十";
}else if($num>20&&$num<30){
$res = "廿".$datehash[$num-20];
}else if($num==30){
$res = "三十";
}
}
return $res;
}
}
$lunar = new lunar();
$month = $lunar->convertlunartosolar(2012, 1,1);
print_r($month);
exit;