1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# Moon phases
# SPDX-License-Identifier: GPL-2.0-only
# Localize if we can
IF access($SysInclude + "/translations/" + _("LANGID") + "/moonphases.rem", "r") >= 0
SYSINCLUDE translations/[_("LANGID")]/moonphases.rem
ENDIF
IF $CalMode || $PsCal
REM [moondate(0)] INFO "Url: https://en.wikipedia.org/wiki/New_moon" SPECIAL MOON 0 -1 -1 [moontime(0)]
REM [moondate(1)] INFO "Url: https://en.wikipedia.org/wiki/Lunar_phase" SPECIAL MOON 1 -1 -1 [moontime(1)]
REM [moondate(2)] INFO "Url: https://en.wikipedia.org/wiki/Full_moon" SPECIAL MOON 2 -1 -1 [moontime(2)]
REM [moondate(3)] INFO "Url: https://en.wikipedia.org/wiki/Lunar_phase" SPECIAL MOON 3 -1 -1 [moontime(3)]
ELSE
REM NOQUEUE INFO "Url: https://en.wikipedia.org/wiki/New_moon" [moondatetime(0)] MSG %"%(New Moon) (%2)%" %! %b.
REM NOQUEUE INFO "Url: https://en.wikipedia.org/wiki/Lunar_phase" [moondatetime(1)] MSG %"%(First Quarter) (%2)%" %! %b.
REM NOQUEUE INFO "Url: https://en.wikipedia.org/wiki/Full_moon" [moondatetime(2)] MSG %"%(Full Moon) (%2)%" %! %b.
REM NOQUEUE INFO "Url: https://en.wikipedia.org/wiki/Lunar_phase" [moondatetime(3)] MSG %"%(Last Quarter) (%2)%" %! %b.
ENDIF
|
