php 阴历-农历-转换类代码_PHP
- WBOY原创
- 2016-06-01 12:13:411313浏览
复制代码 代码如下:
/**
* 公农历转换(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', '133 402038', '063466226', // 30
'132901045', '131130035', '042651224', '130605043', '132349032', '023371121', //36
'132709040', 8', '131738047', '132901036', '051333226', '131210044', //42
'132651033', '031111223', '131323042', '082714130', '133733048', '131706038', //48
'062794127', '132741045 ', '131206035', '042734124', '132647043', '131318032', //54
'033878120', '133477039', '071461129', '131386047', '132 413036', '051245126', // 60
'131197045', '132637033', '043405122', '133365041', '083413130', '132900048', //66
'132922037', 7', '132395046', '131179035', '042711124', '132635043', //72
'102855132', '131701050', '131748039', '062804128', '132742047', '132359036', //78
'051199126', '131175045 ', '131611034', '031866122', '133749040', '081717130', //84
'131452049', '132742037', '052413127', '132350046', '133 222035', '043477123', // 90
'133402042', '133493031', '021877121', '131386039', '072747128', '130605048', //96
'132349037', 5', '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 }
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 = 下限($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;
情况 1 ：
$this ->InterMonthDays = 29;
中断;
情况 2 :
$this->InterMonthDays = 30;
中断;
}
$this->SLRangeDay = substr ($magicstr, 7, 2);
}
函数 DaysPerLunarMonth($LYear, $LMonth){
$this->ProcessMagicStr($LYear);
if ($LMonth
return $this->InterMonthDays;
else
return $this->LMDay[$LMonth];
}
function Solar2Lunar($SYear, $SMonth, $SDay){
if( !(1912 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 $day = $day $this->SMDay[$i];
$day = $day $SDay;
}
if ($day SLRangeDay) {
$day = $day - $this->SLRangeDay;
$this->processmagicstr($SYear-1);
for ($i = 12; $i > ;= 1; $i--){
$day = $day $this->LMDay[$i];
if ($day > 0)
中断;
}
$LYear = $SYear - 1;
$LMonth = $i;
$LDay = $day;
}else {
$day = $day - $this->SLRangeDay;
for($i = 1; $i InterMonth-1; $i ){
$ day = $day - $this->LMDay[$i];
if ($day break;
}
if ($day $LYear = $SYear;
$LMonth = $i;
$LDay = $day $this->LMDay[$i];
} else {
$天 = $ day - $this->LMDay[$this->InterMonth];
if ($day $LYear = $SYear;
$LMonth = $this-> $LMonth = $this->月间;
$LDay = $day $day $this->LMDay[$this->InterMonth];
} else {
$this->LMDay[$this->InterMonth] = $ this->InterMonthDays;
for ($i = $this->InterMonth; $i $day = $day - $this->LMDay[$i ];
if ($day 中断;
}
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 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);
复制代码代码如下：
class Lunar {
var $MIN_YEAR = 1891;
var $MAX_YEAR = 2100;
var $lunarInfo = array(
数组(0,2,9,21936),数组(6,1,30,9656),数组(0,2,17,9584),数组(0,2 ,6,21168),数组(5,1,26,43344),数组(0,2,13,59728),
数组(0,2,2,27296),数组(3,1,22, 44368),数组(0,2,10,43856),数组(8,1,30,19304),数组(0,2,19,19168),数组(0,2,8,42352),
数组(5,1,29,21096),数组(0,2,16,53856),数组(0,2,4,55632),数组(4,1,25,27304),数组(0,2, 13,22176),数组(0,2,2,39632),
数组(2,1,22,19176),数组(0,2,10,19168),数组(6,1,30,42200 ),数组(0,2,18,42192),数组(0,2,6,53840),数组(5,1,26,54568),
数组(0,2,14,46400),数组(0,2,3,54944),数组(2,1,23,38608),数组(0,2,11,38320),数组(7,2,1,18872),数组(0,2,20 ,18800),
数组(0,2,8,42160),数组(5,1,28,45656),数组(0,2,16,27216),数组(0,2,5,27968) ,数组(4,1,24,44456),数组(0,2,13,11104),
数组(0,2,2,38256),数组(2,1,23,18808),数组( 0,2,10,18800),数组(6,1,30,25776),数组(0,2,17,54432),数组(0,2,6,59984),
数组(5,1 ,26,27976),数组(0,2,14,23248),数组(0,2,4,11104),数组(3,1,24,37744),数组(0,2,11,37600),数组(7,1,31,51560),
数组(0,2,19,51536),数组(0,2,8,54432),数组(6,1,27,55888),数组(0 ,2,15,46416),数组(0,2,5,22176),数组(4,1,25,43736),
数组(0,2,13,9680),数组(0,2, 2,37584),数组(2,1,22,51544),数组(0,2,10,43344),数组(7,1,29,46248),数组(0,2,17,27808),
数组(0,2,6,46416),数组(5,1,27,21928),数组(0,2,14,19872),数组(0,2,3,42416),数组(3, 1,24,21176),数组(0,2,12,21168),
数组(8,1,31,43344),数组(0,2,18,59728),数组(0,2,8 ,27296),数组(6,1,28,44368),数组(0,2,15,43856),数组(0,2,5,19296),
数组(4,1,25,42352) ,数组(0,2,13,42352),数组(0,2,2,21088),数组(3,1,21,59696),数组(0,2,9,55632),数组(7,1 ,30,23208),
数组(0,2,17,22176),数组(0,2,6,38608),数组(5,1,27,19176),数组(0,2,15, 19152),数组(0,2,3,42192),数组(4,1,23,53864),
数组(0,2,11,53840),数组(8,1,31,54568),数组(0,2,18,46400),数组(0,2,7,46752),数组(6,1,28,38608),数组(0,2,16,38320),
数组(0 ,2,5,18864),数组(4,1,25,42168),数组(0,2,13,42160),数组(10,2,2,45656),数组(0,2,20,27216 ),数组(0,2,9,27968),
数组(6,1,29,44448),数组(0,2,17,43872),数组(0,2,6,38256),数组(5,1,27,18808),数组(0,2,15,18800),数组(0,2,4,25776),
数组(3,1,23,27216),数组(0, 2,10,59984),数组(8,1,31,27432),数组(0,2,19,23232),数组(0,2,7,43872),数组(5,1,28,37736) ,
数组(0,2,16,37600),数组(0,2,5,51552),数组(4,1,24,54440),数组(0,2,12,54432),数组( 0,2,1,55888),数组(2,1,22,23208),
数组(0,2,9,22176),数组(7,1,29,43736),数组(0,2 ,18,9680),数组(0,2,7,37584),数组(5,1,26,51544),数组(0,2,14,43344),
数组(0,2,3, 46240),数组(4,1,23,46416),数组(0,2,10,44368),数组(9,1,31,21928),数组(0,2,19,19360),数组(0 ,2,8,42416),
数组(6,1,28,21176),数组(0,2,16,21168),数组(0,2,5,43312),数组(4,1, 25,29864),数组(0,2,12,27296),数组(0,2,1,44368),
数组(2,1,22,19880),数组(0,2,10,19296 ),数组(6,1,29,42352),数组(0,2,17,42208),数组(0,2,6,53856),数组(5,1,26,59696),
数组(0,2,13,54576),数组(0,2,3,23200),数组(3,1,23,27472),数组(0,2,11,38608),数组(11,1,31 ,19176),数组(0,2,19,19152),
数组(0,2,8,42192),数组(6,1,28,53848),数组(0,2,15,53840) ,数组(0,2,4,54560),数组(5,1,24,55968),数组(0,2,12,46496),
数组(0,2,1,22224),数组( 2,1,22,19160),数组(0,2,10,18864),数组(7,1,30,42168),数组(0,2,17,42160),数组(0,2,6, 43600),
数组(5,1,26,46376),数组(0,2,14,27936),数组(0,2,2,44448),数组(3,1,23,21936),数组(0,2,11,37744),数组(8,2,1,18808),
数组(0,2,19,18800),数组(0,2,8,25776),数组(6 ,1,28,27216),数组(0,2,15,59984),数组(0,2,4,27424),数组(4,1,24,43872),
数组(0,2, 12,43744),数组(0,2,2,37600),数组(3,1,21,51568),数组(0,2,9,51552),数组(7,1,29,54440),数组(0,2,17,54432),
数组(0,2,5,55888),数组(5,1,26,23208),数组(0,2,14,22176),数组(0, 2,3,42704),数组(4,1,23,21224),数组(0,2,11,21200),
数组(8,1,31,43352),数组(0,2,19 ,43344),数组(0,2,7,46240),数组(6,1,27,46416),数组(0,2,15,44368),数组(0,2,5,21920),
数组(4,1,24,42448),数组(0,2,12,42416),数组(0,2,2,21168),数组(3,1,22,43320),数组(0,2 ,9,26928),数组(7,1,29,29336),
数组(0,2,17,27296),数组(0,2,6,44368),数组(5,1,26, 19880),数组(0,2,14,19296),数组(0,2,3,42352),数组(4,1,24,21104),
数组(0,2,10,53856),数组(8,1,30,59696),数组(0,2,18,54560),数组(0,2,7,55968),数组(6,1,27,27472),数组(0,2, 15,22224),
数组(0,2,5,19168),数组(4,1,25,42216),数组(0,2,12,42192),数组(0,2,1,53584 ),数组(2,1,21,55592),数组(0,2,9,54560)
);
/**
* 将阳历转换为阴历
* @param year 公历-年
* @param month 公历-月
* @param date 公历-日
*/
function ConvertSolarToLunar($year,$month,$date){
//调试器;
$yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
if($year==$this->MIN_YEAR&&$monthreturn array(1891,'正月','初一','辛卯',1 ,1,'兔');
}
返回$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&&$monthreturn 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 $array = $this->getLunarByBetween($year,$this->getDaysBetweenSolar($year, $month, $i, $yearData[1], $yearData[2]));
$array[] = $year 。 '-'。 $月。 '-'。 $i;
$lunar_ary[$i] = $array;
}
返回 $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);
$年=$日[0]；
$月= $日[1];
$day = $day[2];
返回数组($年, $月, $日);
}
/**
* 判断是否是闰年
* @param year
*/
function isLeapYear($year){
return (($year%4==0 && $year 0 !=0) || ( $year@0==0));
}
/**
* 获取干支纪年
* @param year
*/
function getLunarYearName($year){
$sky = array('庚','辛','壬','癸','甲','乙','丙','丁','戊','己');
$earth = array('申','酉','戌','亥','子','丑','寅','卯','辰','巳','午','未');
$year = $year。'';
返回$sky[$year{3}].$earth[$year];
}
/**
* 根据阴历年获取生肖
* @param year 阴历年
*/
function getYearZodiac($year){
$zodiac = array('猴','鸡','狗','猪','鼠','牛','虎','兔','龙','蛇','马','羊');
返回$zodiac[$year];
}
/**
* 获取阳历月份的天数
* @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);
返回$monthHash["$month"];
}
/**
* 获取阴历月份的天数
* @param year 阴历-年
* @param month 阴历-月，从一月开始
*/
function getLunarMonthDays($year,$month){
$monthData = $this->getLunarMonths($year);
返回$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 $bitArray[$i] = substr($bit, $i, 1);
}
for($k=0,$klen=16-count($bitArray);$karray_unshift($bitArray, '0');
}
$bitArray = array_slice($bitArray,0,($leapMonth==0?12:13));
for($i=0; $i
}
返回 $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){
//调试器;
$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$temp=0;
for($j=0;$j$temp =$monthData[$j];
}
array_push($res, $temp);
}
返回 $res;
}
/**
* 获取闰月
* @param year 阴历年份
*/
function getLeapMonth($year){
$yearData = $this->lunarInfo[$year-$this->MIN_YEAR];
返回$yearData[0];
}
/**
* 计算阴历日期与正月初一相隔的天数
* @param year
* @param month
* @param date
*/
function getDaysBetweenLunar($year,$month,$date){
$yearMonth = $this->getLunarMonths($year);
$res=0;
for($i=1;$i$res =$yearMonth[$i-1];
}
$res =$date-1;
返回$res;
}
/**
* 计算2个阳历日期之间的天数
* @param year 阳历年
* @param cmonth
* @param cdate
* @param dmonth 阴历正月对应的阳历月份
* @param ddate 阴历初一对应的阳历天数
*/
function getDaysBetweenSolar($year,$cmonth,$cdate,$dmonth,$ddate){
$a = mktime(0,0,0 ,$c月,$c日期,$年);
$b = mktime(0,0,0,$dmonth,$ddate,$year);
返回ceil(($a-$b)/24/3600);
}
/**
* 根据距离正月初一的天数计算阴历日期
* @param year 阳历年
* @param between 天数
*/
function getLunarByBetween($year,$ Between){
//调试器;
$lunarArray = array();
$yearMonth=array();
$t=0;
$e=0;
$leapMonth=0;
$m='';
if($ Between==0){
array_push($lunarArray, $year,'正月','初一');
$t = 1;
$e = 1;
}其他{
$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;$iif($ Between==$yearMonth[$i]){
$t=$i 2;
$e=1;
休息；
}else if($ Between$t=$i 1;
$e=$ Between-(empty($yearMonth[$i-1])?0:$yearMonth[$i-1]) 1;
休息；
}
}
$m = ($leapMonth!=0&&$t==$leapMonth 1)?('闰'.$this->getCapitalNum($t- 1,true)): $this->getCapitalNum(($leapMonth!=0&&$leapMonth 1array_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 ||错误的;
$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$res = '初'.$dateHash[$num];
}else if($num>10&&$num$res = '十'.$dateHash[$num-10];
}else if($num==20){
$res = "二十";
}else if($num>20&&$num$res = "廿".$dateHash[$num-20];
}else if($num==30){
$res = "三十";
}
}
返回 $res;
}
}
$lunar = new Lunar();
$month = $lunar->convertLunarToSolar(2012, 1,1);
print_r($月);
退出；