{"id":613,"date":"2002-10-09T02:02:14","date_gmt":"2002-10-09T02:02:14","guid":{"rendered":"http:\/\/dev.jblove.net\/?p=613"},"modified":"2002-10-09T02:02:14","modified_gmt":"2002-10-09T02:02:14","slug":"%ec%96%91%ec%9d%8c%eb%a0%a5-%eb%8b%ac%eb%a0%a5%eb%b3%80%ed%99%98%ed%95%a8%ec%88%98%eb%9d%a0-%ec%9a%94%ec%9d%bc-%ea%b0%84%ec%a7%80-%ed%8f%ac%ed%95%a8","status":"publish","type":"post","link":"https:\/\/jblove.net\/?p=613","title":{"rendered":"\uc591\uc74c\ub825 \ub2ec\ub825\ubcc0\ud658\ud568\uc218(\ub760, \uc694\uc77c, \uac04\uc9c0 \ud3ec\ud568)"},"content":{"rendered":"<p><?<br \/>\n\/***********************************************************************<br \/>\n*<br \/>\n*  \uc791\uc740\ub2ec:1, \ud070\ub2ec:2, \ud3c9\ub2ec(\uc18c)+\uc724\ub2ec(\uc18c):3, \ud3c9\ub2ec(\uc18c)+\uc724\ub2ec(\ub300):4,<br \/>\n*  \ud3c9\ub2ec(\ub300)+\uc724\ub2ec(\uc18c):5, \ud3c9\ub2ec(\ub300)+\uc724\ub2ec(\ub300):6<br \/>\n*    <br \/>\n*  \ud638\ucd9c\ubc95: soltolun(2002,01,11) \ub610\ub294 luntosol(2001,02,15,true)<br \/>\n************************************************************************\/<br \/>\n$startyear    = 1841;<br \/>\n$endyear    = 2043;<\/p>\n<p>$hganarray    = array(&#8220;\u7532&#8221;,&#8221;\u4e59&#8221;,&#8221;\u4e19&#8221;,&#8221;\u4e01&#8221;,&#8221;\u620a&#8221;,&#8221;\u5df1&#8221;,&#8221;\u5e9a&#8221;,&#8221;\u8f9b&#8221;,&#8221;\u58ec&#8221;,&#8221;\u7678&#8221;);<br \/>\n$hjiarray    = array(&#8220;\u5b50&#8221;,&#8221;\u4e11&#8221;,&#8221;\u5bc5&#8221;,&#8221;\u536f&#8221;,&#8221;\u8fb0&#8221;,&#8221;\u5df3&#8221;,&#8221;\u5348&#8221;,&#8221;\u672a&#8221;,&#8221;\u7533&#8221;,&#8221;\u9149&#8221;,&#8221;\u620c&#8221;,&#8221;\u4ea5&#8221;);<br \/>\n$kganarray    = array(&#8220;\uac11&#8221;,&#8221;\uc744&#8221;,&#8221;\ubcd1&#8221;,&#8221;\uc815&#8221;,&#8221;\ubb34&#8221;,&#8221;\uae30&#8221;,&#8221;\uacbd&#8221;,&#8221;\uc2e0&#8221;,&#8221;\uc784&#8221;,&#8221;\uacc4&#8221;);<br \/>\n$kjiarray    = array(&#8220;\uc790&#8221;,&#8221;\ucd95&#8221;,&#8221;\uc778&#8221;,&#8221;\ubb18&#8221;,&#8221;\uc9c4&#8221;,&#8221;\uc0ac&#8221;,&#8221;\uc624&#8221;,&#8221;\ubbf8&#8221;,&#8221;\uc2e0&#8221;,&#8221;\uc720&#8221;,&#8221;\uc220&#8221;,&#8221;\ud574&#8221;);<br \/>\n$kddiarray    = array(&#8220;\uc950&#8221;,&#8221;\uc18c&#8221;,&#8221;\ud638\ub791\uc774&#8221;,&#8221;\ud1a0\ub07c&#8221;,&#8221;\uc6a9&#8221;,&#8221;\ubc40&#8221;,&#8221;\ub9d0&#8221;,&#8221;\uc591&#8221;,&#8221;\uc6d0\uc22d\uc774&#8221;,&#8221;\ub2ed&#8221;,&#8221;\uac1c&#8221;,&#8221;\ub3fc\uc9c0&#8221;);<br \/>\n$kweekarray    = array(&#8220;\uc77c&#8221;,&#8221;\uc6d4&#8221;,&#8221;\ud654&#8221;,&#8221;\uc218&#8221;,&#8221;\ubaa9&#8221;,&#8221;\uae08&#8221;,&#8221;\uc77c&#8221;);<br \/>\n$moflastday    = array(31, 0, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);<br \/>\n$yeararray    = array(12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11);<br \/>\n$dbarray    = array (<br \/>\n1,2,4,1,1,2,1,2,1,2,2,1,    2,2,1,2,1,1,2,1,2,1,2,1,    2,2,2,1,2,1,4,1,2,1,2,1,    2,2,1,2,1,2,1,2,1,2,1,2,    1,2,1,2,2,1,2,1,2,1,2,1,<br \/>\n2,1,2,1,5,2,1,2,2,1,2,1,    2,1,1,2,1,2,1,2,2,2,1,2,    1,2,1,1,2,1,2,1,2,2,2,1,    2,1,2,3,2,1,2,1,2,1,2,2,    2,1,2,1,1,2,1,1,2,2,1,2,<br \/>\n2,2,1,2,1,1,2,1,2,1,5,2,    2,1,2,2,1,1,2,1,2,1,1,2,    2,1,2,2,1,2,1,2,1,2,1,2,    1,2,1,2,1,2,5,2,1,2,1,2,    1,1,2,1,2,2,1,2,2,1,2,1,<br \/>\n2,1,1,2,1,2,1,2,2,2,1,2,    1,2,1,1,5,2,1,2,1,2,2,2,    1,2,1,1,2,1,1,2,2,1,2,2,    2,1,2,1,1,2,1,1,2,1,2,2,    2,1,6,1,1,2,1,1,2,1,2,2,<br \/>\n1,2,2,1,2,1,2,1,2,1,1,2,    2,1,2,1,2,2,1,2,2,3,1,2,    1,2,2,1,2,1,2,2,1,2,1,2,    1,1,2,1,2,1,2,2,1,2,2,1,    2,1,1,2,4,1,2,2,1,2,2,1,<br \/>\n2,1,1,2,1,1,2,2,1,2,2,2,    1,2,1,1,2,1,1,2,1,2,2,2,    1,2,2,3,2,1,1,2,1,2,2,1,    2,2,2,1,1,2,1,1,2,1,2,1,    2,2,2,1,2,1,2,1,1,5,2,1,<br \/>\n2,2,1,2,2,1,2,1,2,1,1,2,    1,2,1,2,2,1,2,1,2,2,1,2,    1,1,2,1,2,4,2,1,2,2,1,2,    1,1,2,1,2,1,2,1,2,2,2,1,    2,1,1,2,1,1,2,1,2,2,2,1,<br \/>\n2,2,1,1,5,1,2,1,2,2,1,2,    2,2,1,1,2,1,1,2,1,2,1,2,    2,2,1,2,1,2,1,1,2,1,2,1,    2,2,4,2,1,2,1,1,2,1,2,1,    2,1,2,2,1,2,2,1,2,1,1,2,<br \/>\n1,2,1,2,1,2,5,2,2,1,2,1,    1,2,1,2,1,2,1,2,2,1,2,2,    1,1,2,1,1,2,1,2,2,2,1,2,    2,1,1,2,3,2,1,2,2,1,2,2,    2,1,1,2,1,1,2,1,2,1,2,2,<br \/>\n2,1,2,1,2,1,1,2,1,2,1,2,    2,2,1,5,2,1,1,2,1,2,1,2,    2,1,2,2,1,2,1,1,2,1,2,1,    2,1,2,2,1,2,1,2,1,2,1,2,    1,5,2,1,2,2,1,2,1,2,1,2,<br \/>\n1,2,1,2,1,2,1,2,2,1,2,2,    1,1,2,1,1,5,2,2,1,2,2,2,    1,1,2,1,1,2,1,2,1,2,2,2,    1,2,1,2,1,1,2,1,2,1,2,2,    2,1,2,1,5,1,2,1,2,1,2,1,<br \/>\n2,2,2,1,2,1,1,2,1,2,1,2,    1,2,2,1,2,1,2,1,2,1,2,1,    2,1,5,2,2,1,2,1,2,1,2,1,    2,1,2,1,2,1,2,2,1,2,1,2,    1,2,1,1,2,1,2,5,2,2,1,2,<br \/>\n1,2,1,1,2,1,2,1,2,2,2,1,    2,1,2,1,1,2,1,2,1,2,2,2,    1,2,1,2,3,2,1,1,2,2,1,2,    2,2,1,2,1,1,2,1,1,2,2,1,    2,2,1,2,2,1,1,2,1,2,1,2,<br \/>\n1,2,2,4,1,2,1,2,1,2,1,2,    1,2,1,2,1,2,2,1,2,1,2,1,    2,1,1,2,2,1,2,1,2,2,1,2,    1,5,1,2,1,2,1,2,2,2,1,2,    1,2,1,1,2,1,2,1,2,2,2,1,<br \/>\n2,1,2,1,1,5,1,2,2,1,2,2,    2,1,2,1,1,2,1,1,2,2,1,2,    2,2,1,2,1,1,2,1,1,2,1,2,    2,2,1,2,5,1,2,1,2,1,1,2,    2,1,2,2,1,2,1,2,1,2,1,2,<br \/>\n1,2,1,2,1,2,2,1,2,1,2,1,    2,3,2,1,2,2,1,2,2,1,2,1,    2,1,1,2,1,2,1,2,2,2,1,2,    1,2,1,1,2,1,5,2,2,1,2,2,    1,2,1,1,2,1,1,2,2,1,2,2,<br \/>\n2,1,2,1,1,2,1,1,2,1,2,2,    2,1,2,2,3,2,1,1,2,1,2,2,    1,2,2,1,2,1,2,1,2,1,1,2,    2,1,2,1,2,2,1,2,1,2,1,1,    2,1,2,5,2,1,2,2,1,2,1,2,<br \/>\n1,1,2,1,2,1,2,2,1,2,2,1,    2,1,1,2,1,2,1,2,2,1,2,2,    1,5,1,2,1,1,2,2,1,2,2,2,    1,2,1,1,2,1,1,2,1,2,2,2,    1,2,2,1,1,5,1,2,1,2,2,1,<br \/>\n2,2,2,1,1,2,1,1,2,1,2,1,    2,2,2,1,2,1,2,1,1,2,1,2,    1,2,2,1,6,1,2,1,2,1,1,2,    1,2,1,2,2,1,2,2,1,2,1,2,    1,1,2,1,2,1,2,2,1,2,2,1,<br \/>\n2,1,4,1,2,1,2,1,2,2,2,1,    2,1,1,2,1,1,2,1,2,2,2,1,    2,2,1,1,2,1,4,1,2,2,1,2,    2,2,1,1,2,1,1,2,1,2,1,2,    2,2,1,2,1,2,1,1,2,1,2,1,<br \/>\n2,2,1,2,2,4,1,1,2,1,2,1,    2,1,2,2,1,2,2,1,2,1,1,2,    1,2,1,2,1,2,2,1,2,2,1,2,    1,1,2,4,1,2,1,2,2,1,2,2,    1,1,2,1,1,2,1,2,2,2,1,2,<br \/>\n2,1,1,2,1,1,2,1,2,2,1,2,    2,5,1,2,1,1,2,1,2,1,2,2,    2,1,2,1,2,1,1,2,1,2,1,2,    2,2,1,2,1,2,3,2,1,2,1,2,    2,1,2,2,1,2,1,1,2,1,2,1,<br \/>\n2,1,2,2,1,2,1,2,1,2,1,2,    1,2,1,2,4,2,1,2,1,2,1,2,    1,2,1,1,2,2,1,2,2,1,2,2,    1,1,2,1,1,2,1,2,2,1,2,2,    2,1,4,1,1,2,1,2,1,2,2,2,<br \/>\n1,2,1,2,1,1,2,1,2,1,2,2,    2,1,2,1,2,1,1,5,2,1,2,2,    1,2,2,1,2,1,1,2,1,2,1,2,    1,2,2,1,2,1,2,1,2,1,2,1,    2,1,2,1,2,5,2,1,2,1,2,1,<br \/>\n2,1,2,1,2,1,2,2,1,2,1,2,    1,2,1,1,2,1,2,2,1,2,2,1,    2,1,2,3,2,1,2,1,2,2,2,1,    2,1,2,1,1,2,1,2,1,2,2,2,    1,2,1,2,1,1,2,1,1,2,2,1,<br \/>\n2,2,5,2,1,1,2,1,1,2,2,1,    2,2,1,2,2,1,1,2,1,2,1,2,    1,2,2,1,2,1,5,2,1,2,1,2,    1,2,1,2,1,2,2,1,2,1,2,1,    2,1,1,2,2,1,2,1,2,2,1,2,<br \/>\n1,2,1,1,5,2,1,2,2,2,1,2,    1,2,1,1,2,1,2,1,2,2,2,1,    2,1,2,1,1,2,1,1,2,2,2,1,    2,2,1,5,1,2,1,1,2,2,1,2,    2,2,1,2,1,1,2,1,1,2,1,2,<br \/>\n2,2,1,2,1,2,1,5,2,1,1,2,    2,1,2,2,1,2,1,2,1,2,1,1,    2,2,1,2,1,2,2,1,2,1,2,1,    2,1,1,2,1,6,1,2,2,1,2,1,    2,1,1,2,1,2,1,2,2,1,2,2,<br \/>\n1,2,1,1,2,1,1,2,2,1,2,2,    2,1,2,3,2,1,1,2,2,1,2,2,    2,1,2,1,1,2,1,1,2,1,2,2,    2,1,2,2,1,1,2,1,1,5,2,2,    1,2,2,1,2,1,2,1,1,2,1,2,<br \/>\n1,2,2,1,2,2,1,2,1,2,1,1,    2,1,2,2,1,5,2,2,1,2,1,2,    1,1,2,1,2,1,2,2,1,2,2,1,    2,1,1,2,1,2,1,2,2,1,2,2,    1,2,1,1,5,1,2,1,2,2,2,2,<br \/>\n1,2,1,1,2,1,1,2,1,2,2,2,    1,2,2,1,1,2,1,1,2,1,2,2,    1,2,5,2,1,2,1,1,2,1,2,1,    2,2,2,1,2,1,2,1,1,2,1,2,    1,2,2,1,2,2,1,5,2,1,1,2,<br \/>\n1,2,1,2,2,1,2,1,2,2,1,2,    1,1,2,1,2,1,2,2,1,2,2,1,    2,1,1,2,3,2,2,1,2,2,2,1,    2,1,1,2,1,1,2,1,2,2,2,1,    2,2,1,1,2,1,1,2,1,2,2,1,<br \/>\n2,2,2,3,2,1,1,2,1,2,1,2,    2,2,1,2,1,2,1,1,2,1,2,1,    2,2,1,2,2,1,2,1,1,2,1,2,    1,5,2,2,1,2,1,2,2,1,1,2,    1,2,1,2,1,2,2,1,2,2,1,2,<br \/>\n1,1,2,1,2,1,5,2,2,1,2,2,    1,1,2,1,1,2,1,2,2,2,1,2,    2,1,1,2,1,1,2,1,2,2,1,2,    2,2,1,1,5,1,2,1,2,1,2,2,    2,1,2,1,2,1,1,2,1,2,1,2,<br \/>\n2,1,2,2,1,2,1,1,2,1,2,1,    2,1,6,2,1,2,1,1,2,1,2,1,    2,1,2,2,1,2,1,2,1,2,1,2,    1,2,1,2,1,2,1,2,5,2,1,2,    1,2,1,1,2,1,2,2,2,1,2,2,<br \/>\n1,1,2,1,1,2,1,2,2,1,2,2,    2,1,1,2,3,2,1,2,1,2,2,2,    1,2,1,2,1,1,2,1,2,1,2,2,    2,1,2,1,2,1,1,2,1,2,1,2,    2,1,2,5,2,1,1,2,1,2,1,2,<br \/>\n1,2,2,1,2,1,2,1,2,1,2,1,    2,1,2,1,2,2,1,2,1,2,1,2,    1,5,2,1,2,1,2,2,1,2,1,2,    1,2,1,1,2,1,2,2,1,2,2,1,    2,1,2,1,1,5,2,1,2,2,2,1,<br \/>\n2,1,2,1,1,2,1,2,1,2,2,2,    1,2,1,2,1,1,2,1,1,2,2,2,    1,2,2,1,5,1,2,1,1,2,2,1,    2,2,1,2,2,1,1,2,1,1,2,2,    1,2,1,2,2,1,2,1,2,1,2,1,<br \/>\n2,1,5,2,1,2,2,1,2,1,2,1,    2,1,1,2,1,2,2,1,2,2,1,2,    1,2,1,1,2,1,5,2,2,2,1,2,    1,2,1,1,2,1,2,1,2,2,2,1,    2,1,2,1,1,2,1,1,2,2,1,2,<br \/>\n2,2,1,2,1,4,1,1,2,1,2,2,    2,2,1,2,1,1,2,1,1,2,1,2,    2,2,1,2,1,2,1,2,1,1,2,1,    2,2,1,2,5,2,1,2,1,2,1,1,    2,1,2,2,1,2,2,1,2,1,2,1,<br \/>\n2,1,1,2,1,2,2,1,2,2,1,2,    1,5,1,2,1,2,1,2,2,2,1,2,    1,2,1,1,2,1,1,2,2,1,2,2);<\/p>\n<p>function febdays($smonth) {<br \/>\n    if(($smonth%100 != 0 &#038;&#038; $smonth%4 ==0) || $smonth%400 ==0) $moflastday[1] = 29;<br \/>\n    else $moflastday[1] = 28;<br \/>\n    return $moflastday[1];<br \/>\n}<\/p>\n<p>function alltoday($syear) {<br \/>\n    global $moflastday;<br \/>\n    global $startyear;<br \/>\n    $totalday -= 22;<br \/>\n    for($step=$startyear;$step<=$syear-1;$step++) {<br \/>\n        $moflastday[1] = febdays($step);<br \/>\n        $totalmonthday = array_sum($moflastday);<br \/>\n        $totalday += $totalmonthday;<br \/>\n    }<br \/>\n    return $totalday;<br \/>\n}<\/p>\n<p>function numformat($integer) {<br \/>\n    return sprintf(&#8220;%02d&#8221;, $integer);<br \/>\n}<\/p>\n<p>function soltolun($syear, $smonth, $sday) {<\/p>\n<p>    global $startyear,$endyear,$hganarray,$hjiarray,$kganarray,$kjiarray;<br \/>\n    global $kddiarray,$kweekarray,$moflastday,$yeararray,$dbarray;<\/p>\n<p>    if($syear < 1842 || $syear > 2040) return false;<\/p>\n<p>    $totaldate = $syear.numformat($smonth).numformat($sday);<br \/>\n    if($totaldate > 20440130 || $totaldate < 18410123) return false;\n\n\n<br \/>\n    $totalday = alltoday($syear);<br \/>\n    $moflastday[1] = febdays($syear);<\/p>\n<p>    for($tempmonth=0;$tempmonth<$smonth-1;$tempmonth++) $totalday += $moflastday[$tempmonth];<br \/>\n    $totalday += $sday;<\/p>\n<p>    $dbindex = 0;<br \/>\n    $temptotalday = $totalday;<\/p>\n<p>    while(1) {<br \/>\n        if($dbarray[$dbindex] == 1) {<br \/>\n            $moflastdaylun = 29;<br \/>\n            $leap = false;<br \/>\n        }<br \/>\n        else if($dbarray[$dbindex] == 2) {<br \/>\n            $moflastdaylun = 30;<br \/>\n            $leap = false;<br \/>\n        }<br \/>\n        else if($dbarray[$dbindex] == 3) {<br \/>\n            $moflastdaylun = 29;<br \/>\n            $moflastdayleap = 29;<br \/>\n            $leap = true;<br \/>\n            if($temptotalday > 29) $temptotalday -= 29;<br \/>\n        }<br \/>\n        else if($dbarray[$dbindex] == 4) {<br \/>\n            $moflastdaylun = 29;<br \/>\n            $moflastdayleap = 30;<br \/>\n            $leap = true;<br \/>\n            if($temptotalday > 30) $temptotalday -= 30;<br \/>\n        }<br \/>\n        else if($dbarray[$dbindex] == 5) {<br \/>\n            $moflastdaylun = 30;<br \/>\n            $moflastdayleap = 29;<br \/>\n            $leap = true;<br \/>\n            if($temptotalday > 29) $temptotalday -= 29;<br \/>\n        }<br \/>\n        else if($dbarray[$dbindex] == 6) {<br \/>\n            $moflastdaylun = 30;<br \/>\n            $moflastdayleap = 30;<br \/>\n            $leap = true;<br \/>\n            if($temptotalday > 30) $temptotalday -= 30;<br \/>\n        }<br \/>\n        $temptotalday -= $moflastdaylun;<br \/>\n        $dbindex++;<br \/>\n        $lyear = floor($dbindex\/12);<br \/>\n        if($temptotalday <= 0) break;<br \/>\n    }<br \/>\n    if($leap) $temptotalday += $moflastdayleap;<br \/>\n    else $temptotalday +=$moflastdaylun;<\/p>\n<p>    $lyear    += $startyear;<br \/>\n    $lmonth = $yeararray[$dbindex%12];<br \/>\n    $lday = $temptotalday;<br \/>\n    $a = ($lyear + 6) % 10;<br \/>\n    $b = ($lyear + 8) % 12;<br \/>\n    $c = ($totalday + 2) % 10;<br \/>\n    $d = ($totalday + 10) % 12;<br \/>\n    $e = ($totalday + 5) % 7;<\/p>\n<p>    \/* output *\/<br \/>\n    $myarray[&#8220;year&#8221;]    = $lyear;<br \/>\n    $myarray[&#8220;month&#8221;]    = $lmonth;<br \/>\n    $myarray[&#8220;day&#8221;]        = $lday;<br \/>\n    $myarray[&#8220;yhgan&#8221;]    = $hganarray[$a];<br \/>\n    $myarray[&#8220;ykgan&#8221;]    = $kganarray[$a];<br \/>\n    $myarray[&#8220;yhji&#8221;]    = $hjiarray[$b];<br \/>\n    $myarray[&#8220;ykji&#8221;]    = $kjiarray[$b];<br \/>\n    $myarray[&#8220;kddi&#8221;]    = $kddiarray[$b];<br \/>\n    $myarray[&#8220;dhgan&#8221;]    = $hganarray[$c];<br \/>\n    $myarray[&#8220;dkgan&#8221;]    = $kganarray[$c];<br \/>\n    $myarray[&#8220;dhji&#8221;]    = $hjiarray[$d];<br \/>\n    $myarray[&#8220;dkji&#8221;]    = $kjiarray[$d];<br \/>\n    $myarray[&#8220;week&#8221;]    = $kweekarray[$e];<br \/>\n    $myarray[&#8220;leap&#8221;]    = $leap;<br \/>\n    return $myarray;<br \/>\n}<\/p>\n<p>function luntosol($lyear, $lmonth, $lday, $leap=&#8221;) {<\/p>\n<p>    global $startyear,$endyear,$hganarray,$hjiarray,$kganarray,$kjiarray;<br \/>\n    global $kddiarray,$kweekarray,$moflastday,$yeararray,$dbarray;<\/p>\n<p>    if($lyear < 1842 || $lyear > 2040) return false;<\/p>\n<p>    if($lyear > $endyear || $lyear < $startyear) return false;\n\n\n    $temptotalday = 0;<br \/>\n    $dbindex = ($lyear &#8211; $startyear) * 12 + ($lmonth &#8211; 1) &#8211; 1;<br \/>\n    for($step=$dbindex;$step>=0;$step&#8211;) {<br \/>\n        if($dbarray[$step] == 1) $temptotalday += 29;<br \/>\n        else if($dbarray[$step] == 2) $temptotalday += 30;<br \/>\n        else if($dbarray[$step] == 3) $temptotalday += 58;<br \/>\n        else if($dbarray[$step] == 4) $temptotalday += 59;<br \/>\n        else if($dbarray[$step] == 5) $temptotalday += 59;<br \/>\n        else if($dbarray[$step] == 6) $temptotalday += 60;<br \/>\n    }<\/p>\n<p>\n    $dbindex = ($lyear &#8211; $startyear) * 12 + ($lmonth) -1;<br \/>\n    if($leap) {<br \/>\n        if($dbarray[$dbindex] == 3 || $dbarray[$dbindex] == 4) $temptotalday += 29;<br \/>\n        else if($dbarray[$dbindex] == 5 || $dbarray[$dbindex] == 6) $temptotalday += 30;<br \/>\n    }<\/p>\n<p>    $temptotalday += $lday + 22;<br \/>\n    $totalday = $temptotalday;<br \/>\n    $tempyear = $startyear;<\/p>\n<p>    while(1) {<br \/>\n        $moflastday[1] = febdays($tempyear);<br \/>\n        for($tempmonth=0;$tempmonth<12;$tempmonth++) {<br \/>\n            $temptotalday -= $moflastday[$tempmonth];<br \/>\n            if($temptotalday <= 0) {<br \/>\n                $temptotalday += $moflastday[$tempmonth];<br \/>\n                $tempday = $temptotalday;<br \/>\n                break 2;<br \/>\n            }<br \/>\n        }<br \/>\n        $tempyear++;<br \/>\n    }<\/p>\n<p>    $syear = $tempyear;<br \/>\n    $smonth = $tempmonth + 1;<br \/>\n    $sday = $tempday;<br \/>\n    $a = ($lyear+6) % 10;<br \/>\n    $b = ($lyear+8) % 12;<br \/>\n    $c = $totalday % 10;<br \/>\n    $d = $totalday % 12;<br \/>\n    $e = ($totalday+4) % 7;<\/p>\n<p>    \/* output *\/<br \/>\n    $myarray[&#8220;year&#8221;]    = $syear;<br \/>\n    $myarray[&#8220;month&#8221;]   = $smonth;<br \/>\n    $myarray[&#8220;day&#8221;]     = $sday;<br \/>\n    $myarray[&#8220;yhgan&#8221;]    = $hganarray[$a];<br \/>\n    $myarray[&#8220;ykgan&#8221;]    = $kganarray[$a];<br \/>\n    $myarray[&#8220;yhji&#8221;]    = $hjiarray[$b];<br \/>\n    $myarray[&#8220;ykji&#8221;]    = $kjiarray[$b];<br \/>\n    $myarray[&#8220;kddi&#8221;]    = $kddiarray[$b];<br \/>\n    $myarray[&#8220;dhgan&#8221;]    = $hganarray[$c];<br \/>\n    $myarray[&#8220;dkgan&#8221;]    = $kganarray[$c];<br \/>\n    $myarray[&#8220;dhji&#8221;]    = $hjiarray[$d];<br \/>\n    $myarray[&#8220;dkji&#8221;]    = $kjiarray[$d];<br \/>\n    $myarray[&#8220;week&#8221;]    = $kweekarray[$e];<br \/>\n    $myarray[&#8220;leap&#8221;]    = $leap;<br \/>\n    return $myarray;<br \/>\n}<br \/>\n?><\/p>\n","protected":false},"excerpt":{"rendered":"","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[51],"tags":[],"class_list":["post-613","post","type-post","status-publish","format-standard","hentry","category-papa-php"],"aioseo_notices":[],"_links":{"self":[{"href":"https:\/\/jblove.net\/index.php?rest_route=\/wp\/v2\/posts\/613","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/jblove.net\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/jblove.net\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/jblove.net\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/jblove.net\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=613"}],"version-history":[{"count":0,"href":"https:\/\/jblove.net\/index.php?rest_route=\/wp\/v2\/posts\/613\/revisions"}],"wp:attachment":[{"href":"https:\/\/jblove.net\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=613"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jblove.net\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=613"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jblove.net\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=613"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}