Please enable JavaScript to view this site.


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)
if nComboResult > -1
    nEclipseType = nComboResult div 1000000
    sEclipseTypeName = LunarEclipseTypeName(EclipseType)
    nEclipseTime = nComboResult mod 1000000
    sEclipseTime = FormatTime('hh:nn', EclipseTime, true)
    sResult = EclipseTypeName + ' lunar eclipse at ' + EclipseTime 
    sResult = 'No lunar eclipse today'

See also: LunarEclipseOnDate, LunarOccultationOnDate.


Topic 180060, last updated on 18-Apr-2020