str = LunarEclipseTypeName(nEclipseType)
This macro function returns the name of the type of eclipse nEclipseType.
This function is used after a call to LunarEclipseOnDate, as shown in the code below.
nComboResult = LunarEclipseOnDate(n_TokenDate, 1, false)
if nComboResult >= 0
nEclipseType = nComboResult div 1000000
sEclipseTypeName = LunarEclipseTypeName(nEclipseType)
nEclipseTime = nComboResult mod 1000000
sEclipseTime = FormatTime('hh:nn', nEclipseTime, true)
sResult = sEclipseTypeName + ' lunar eclipse at ' + sEclipseTime
else
sResult = 'No lunar eclipse today'
endif
See also: LunarEclipseOnDate, LunarOccultationOnDate, Lunar Eclipse Types.
Topic 180060, last updated on 11-Oct-2026