Develop
2013.12.25 00:15
[php] GregorianToJD(), JDToGregorian() 함수 내용
조회 수 10629 댓글 0
어떤 XE플래너 위젯을 쓰다보면 아래 로컬 함수가 구현되지 않아 오류나는 경우가 있다.
class.planner123_widget_main.php 함수의 1
그레고리안(Gregorian) -> 줄리안(Julian) 변환
function GregorianToJD ($month,$day,$year) { if ($month > 2) { $month = $month - 3; } else { $month = $month + 9; $year = $year - 1; } $c = floor($year / 100); $ya = $year - (100 * $c); $j = floor((146097 * $c) / 4); $j += floor((1461 * $ya)/4); $j += floor(((153 * $month) + 2) / 5); $j += $day + 1721119; return $j; }
줄리안(Julian) -> 그레고리안(Gregorian) 변환 (버전1)
function JDToGregorian($julian) { //return planner123_widget_main::fn_calcJDToGregorian($julian); $julian = $julian - 1721119; $calc1 = 4 * $julian - 1; $year = floor($calc1 / 146097); $julian = floor($calc1 - 146097 * $year); $day = floor($julian / 4); $calc2 = 4 * $day + 3; $julian = floor($calc2 / 1461); $day = $calc2 - 1461 * $julian; $day = floor(($day + 4) / 4); $calc3 = 5 * $day - 3; $month = floor($calc3 / 153); $day = $calc3 - 153 * $month; $day = floor(($day + 5) / 5); $year = 100 * $year + $julian; if ($month < 10) { $month = $month + 3; }else{ $month = $month - 9; $year = $year + 1; } if ($day < 10) { $day = "0".$day; } if ($month < 10) { $month = "0".$month; } //return $day."/".$month."/".$year; return $month."/".$day."/".$year; }
줄리안(Julian) -> 그레고리안(Gregorian) 변환 (버전2)
function fn_calcJDToGregorian($julian) { $z = $julian; $f = .5; $f = 0.0; // PHP함수와 결과값 맞추기 위해 0.5일 조정함 if($z < 2299161){ $a = $z; }else{ $alpha = floor(($z - 1867216.25) / 36524.25); $a = $z + 1 + $alpha - floor($alpha / 4); } $b = $a + 1524; $c = floor( ($b - 122.1) / 365.25); $d = floor( 365.25 * $c); $e = floor( ($b - $d) / 30.6001); $dd = floor( $b - $d - floor(30.6001 * $e) + $f); if($e < 13.5) { $mm = $e - 1; }else{ $mm = $e - 13; } if($mm < 2.5 ){ $yy = $c - 4715; }else{ $yy = $c - 4716; } return "$mm/$dd/$yy"; }
[출처] http://flashcafe.org/php_function/8705
번호 | 분류 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|---|
589 | Develop | [c] 단기과정[01/14] 피보나치, 파스칼.. 파일입출력 | hooni | 2003.04.23 | 7107 |
588 | Develop | [c] 단기과정[01/15] 피보나치, 파스칼.. 링크리스트 | hooni | 2003.04.23 | 7256 |
587 | Develop | [c] 단기과정[01/17] 후위연산 스택 계산기.. | hooni | 2003.04.23 | 7248 |
586 | Develop | [c] 단기과정[01/24] 정렬 알고리즘 | hooni | 2003.04.23 | 6972 |
585 | Develop | [c] 단어 입력/수정 프로그램 소스 | hooni | 2003.04.23 | 7045 |
584 | Develop | [c] 달팽이 배열? 인지 먼지.. ㅋㅋ | hooni | 2013.04.23 | 7149 |
583 | Develop | [c] 더블(이중) 연결리스트 예제.. | hooni | 2013.04.23 | 7475 |
582 | Develop | [c] 도메인 소켓(Unix Domain Socket) UDP | hooni | 2013.04.23 | 9306 |
581 | Develop | [c] 도메인(호스트)으로 IP정보 알아오기.. (nslookup과 비슷) | hooni | 2013.04.23 | 6940 |
580 | Develop | [c] 도스 공격(DoS Attack) 프로그램 | hooni | 2013.04.23 | 11596 |
579 | Develop | [c] 디피-헬만 키교환(Diffie–Hellman key exchange) 샘플 코드.. ㅋㄷ | hooni | 2013.04.23 | 9118 |
578 | Develop | [c] 라인수 입력받아 마름모꼴 출력하기.. | hooni | 2003.04.23 | 6897 |