儒略日日期
程式可以計算一個儒略日的日期。
程式編寫日期:2006年7月16日
程式 (118 bytes, 使用記憶為A, B, C, D及M):
Dec: ?→M: 32044 M+:
146097→D: 4M + 3: Ans ÷ D→C: DC ÷4 M-: 4M + 3:
Ans ÷ 1461→B: 1461B ÷ 4 M-: 5M + 2: Ans ÷ 153→A:
B + 100C - 4800 + A ÷ 10◢ 3 + A - A ÷ 10 × 12◢
153A + 2: M + 1 - Ans ÷ 5
例題: 若儒略日為2452259,求所代表的格林威治時間。
按 Prog 1 2452259 EXE (顯示2001年) EXE (顯示12月) EXE (顯示15日)
計算完結後按 MODE 1 返回正常計算模式。