1ツイートで天文・暦計算スクリプト
正月休みの間に、頭の体操を兼ねてやっていた成果。
どれも里々用です。カッコの半角・全角の区別に注意。
- 月齢計算（±１日程度の誤差あり）
＊月齢計算 ＄加算日＝０ ＞月齢２【タブ】（現在月）＞＝３ ＄加算日＝２ ＞月齢２ ＊月齢２ ＄月齢＝（現在年）＊１１−２１８９０＋（現在月）＋（現在日）＋（加算日） ＄月齢＝（月齢）％３０
- 復活祭計算（西方教会）
＊復活祭計算 ＄Ａ＝(２４＋１９＊(（現在年）％１９))％３０ ＄Ｂ＝（Ａ）−（Ａ）／２８ ＄Ｃ＝（Ｂ）−(（現在年）＋（現在年）／４＋（Ｂ）−１３)％７ ＄祭月＝３＋(（Ｃ）＋４０)／４４ ＄祭日＝（Ｃ）＋２８−３１＊(（祭月）−３)
- ユリウス日計算（世界時12時、1900年3月〜2100年2月で有効）
＊ユリウス日計算 ＄Ａ＝(（現在月）＋９)／１２＋（現在年） ＄Ｘ＝７＊（Ａ）／４ ＄Ｙ＝２７５＊（現在月）／９ ＄ユリウス日＝３６７＊（現在年）−（Ｘ）＋（Ｙ）＋（現在日）＋１７２１０１４
- 修正ユリウス日（世界時00時）の場合は、
＊修正ユリウス日計算 ＄Ａ＝(（現在月）＋９)／１２＋（現在年） ＄Ｘ＝７＊（Ａ）／４ ＄Ｙ＝２７５＊（現在月）／９ ＄修正ユリウス日＝３６７＊（現在年）−（Ｘ）＋（Ｙ）＋（現在日）−６７８９８７
