JDToYMD関数
本ページには広告が含まれています。
- 日付
- グレゴリオ暦
- ユリウス日
ユリウス日をグレゴリオ暦に変換します。
- 構文
- JDToYMD( JD )
- 引数
- JD
必須
- ユリウス日
- 戻り値
- グレゴリオ暦を格納した配列（0 : 年, 1 : 月, 2 : 日, 3 : 時, 4 : 分, 5 : 秒）
プログラム
プログラム実行例
今年の春分の日の日付を求める
春分の日は太陽黄経が0度なので、翌年1月1日の直前の太陽黄経0度の日付を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- （7行目）
- 指定したユリウス日の直前の二至二分の日時を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- PRINT文 （15行目）
- UWSC.LOGにログを出力します。
- JOIN関数 (スクリプト関数) （15行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- 特殊文字 （2行目）
今年の秋分の日の日付を求める
秋分の日は太陽黄経が180度なので、翌年1月1日の直前の太陽黄経180度の日付を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- （7行目）
- 指定したユリウス日の直前の二至二分の日時を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- PRINT文 （15行目）
- UWSC.LOGにログを出力します。
- JOIN関数 (スクリプト関数) （15行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- 特殊文字 （2行目）
今年の夏至の日付を求める
夏至は太陽黄経が90度なので、翌年1月1日の直前の太陽黄経90度の日付を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- （7行目）
- 指定したユリウス日の直前の二至二分の日時を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- PRINT文 （15行目）
- UWSC.LOGにログを出力します。
- JOIN関数 (スクリプト関数) （15行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- 特殊文字 （2行目）
今年の冬至の日付を求める
夏至は太陽黄経が270度なので、翌年1月1日の直前の太陽黄経270度の日付を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- （7行目）
- 指定したユリウス日の直前の二至二分の日時を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- PRINT文 （15行目）
- UWSC.LOGにログを出力します。
- JOIN関数 (スクリプト関数) （15行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- 特殊文字 （2行目）
指定した日付の直前の朔の日時を求める
今年の穀雨の日付を求める
穀雨は太陽黄経30度なので、翌年1月1日から直前の中気を太陽黄経が30度になるまで繰り返す。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- ROUND関数 (スクリプト関数) （12行目）
- 指定した位置で偶数丸めした値を返します。
- chuki関数 (自作関数) （7行目）
- 指定したユリウス日の直前の中気を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- PRINT文 （14行目）
- UWSC.LOGにログを出力します。
- 特殊文字 （2行目）
今年の十五夜の日付を求める
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8, 12行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12, 13行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- saku関数 （7行目）
- 指定したユリウス日の直前の朔を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- getKyureki関数 (自作関数) （12行目）
- 西暦から旧暦を求めます。
- RESIZE関数 (スクリプト関数) （15行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- （16行目）
- 指定した配列の要素にコールバック関数を適用する。
- JOIN関数 (スクリプト関数) （17行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- PRINT文 （18行目）
- UWSC.LOGにログを出力します。
- dateAdd関数 (自作関数) （18行目）
- 日時に、指定した単位の時間を加算して返します。
- 特殊文字 （2行目）
今年の春彼岸の日付を求める
翌年1月1日の直前の太陽黄経0度の日付（春分の日）を求め、その日を中日とする前後3を合わせた7日間を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- normalizeAngle関数 (自作関数) （12行目）
- 度単位の角度を0～360度に正規化します。
- ROUND関数 (スクリプト関数) （12行目）
- 指定した位置で偶数丸めした値を返します。
- chuki関数 (自作関数) （7行目）
- 指定したユリウス日の直前の中気を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- （15行目）
- 指定した配列の要素にコールバック関数を適用する。
- JOIN関数 (スクリプト関数) （16行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- PRINT文 （17, 18, 19行目）
- UWSC.LOGにログを出力します。
- dateAdd関数 (自作関数) （17, 19行目）
- 日時に、指定した単位の時間を加算して返します。
- 特殊文字 （2行目）
今年の秋彼岸の日付を求める
翌年1月1日の直前の太陽黄経180度の日付（秋分の日）を求め、その日を中日とする前後3日を合わせた7日間を求める。
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 7, 8行目）
- ローカル変数を宣言します。
- REPEAT文 （6, 7, 8, 9, 10, 11, 12行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- normalizeAngle関数 (自作関数) （12行目）
- 度単位の角度を0～360度に正規化します。
- ROUND関数 (スクリプト関数) （12行目）
- 指定した位置で偶数丸めした値を返します。
- chuki関数 (自作関数) （7行目）
- 指定したユリウス日の直前の中気を求めます。
- YMDToJD関数 (自作関数) （7行目）
- グレゴリオ暦をユリウス日に変換します。
- JDToYMD関数 (自作関数) （8行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （14行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- （15行目）
- 指定した配列の要素にコールバック関数を適用する。
- JOIN関数 (スクリプト関数) （16行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- PRINT文 （17, 18, 19行目）
- UWSC.LOGにログを出力します。
- dateAdd関数 (自作関数) （17, 19行目）
- 日時に、指定した単位の時間を加算して返します。
- 特殊文字 （2行目）
次の満月の日付を求める
使用関数
- GETTIME関数 （1行目）
- 日付、時間を取得します。
- DIM （2, 3, 4, 5, 8, 9, 10, 11, 12行目）
- ローカル変数を宣言します。
- YMDToJD関数 (自作関数) （5行目）
- グレゴリオ暦をユリウス日に変換します。
- REPEAT文 （7, 8, 9, 10, 11, 12, 13, 14行目）
- ループ処理を行います。ループの終わりに条件判定を行うので、最低1度は処理が実行されます。後判定。
- ABS関数 (スクリプト関数) （12, 13, 14行目）
- 引数の絶対値（\(|x|\)）を返します。
- （10行目）
- ユリウス世紀から太陽黄経を求めます。
- （11行目）
- ユリウス世紀から月黄経を求めます。
- JDToYMD関数 (自作関数) （16行目）
- ユリウス日をグレゴリオ暦に変換します。
- RESIZE関数 (スクリプト関数) （18行目）
- 配列の上限値を取得または変更します。配列の上限値を変更する場合は第二引数に値を指定します。
- PRINT文 （19行目）
- UWSC.LOGにログを出力します。
- JOIN関数 (スクリプト関数) （19行目）
- 配列の中身を区切り文字で結合し、文字列として返します。
- 特殊文字 （2, 3, 4行目）
- コメント （13, 14行目）
- プログラムの動作に影響しない注釈を残すことができます。プログラムの内容を説明したり、デバッグや修正のために一時的にコードを無効化ときにも使えます。
公開日:
更新日:
関連記事
- YMDToJD関数 (自作関数)
- グレゴリオ暦をユリウス日に変換します。
- saku関数 (自作関数)
- 指定したユリウス日の直前の朔を求めます。
- chuki関数 (自作関数)
- 指定したユリウス日の直前の中気を求めます。
- getKyureki関数 (自作関数)
- 西暦から旧暦を求めます。
- GETTIME関数 (スクリプト関数)
- 日付、時間を取得します。
- getWeekdayName関数 (自作関数)
- 引数で指定した曜日番号に対応する曜日名を返します。
- getYear関数 (自作関数)
- 指定された日付の年を返します。
- getMonth関数 (自作関数)
- 指定された日付の月を返します。
- getDay関数 (自作関数)
- 指定された日付の日を返します。
- getWeekday関数 (自作関数)
- 引数に指定された日付の曜日番号（0：日曜〜6：土曜）を返します。
