(12C) Full Moon

[Gamo]

This program compute the next date of full moon.
Date format used D,MY (Day Month Year)
Input any date range from 15 January 1900 through 25 November 4046

Example: "Make sure to set date format to g > D.MY"

Today Date is 22.012018 press R/S
Result is 31.01 next full moon is on January 31st

To see full date digits: Press 0 > g > DATE

Result in full is 31,01,2018 [3]
31 January 2018 on Wednesday

1=Monday
2=Tuesday
3=Wednesday to 7=Sunday


Remark: Some month will be late or early by ± one day.

Code:


15,011900
ΔDYS
CHS
LSTx
X<>Y
147653
ENTER
5
EEX
3
÷
÷
LSTx
X<>Y
INTG
1
+
x
,5
+
INTG
DATE
GTO 00

Gamo