n.Initialize
title=TotalEvents & " incoming events"
body="Next Event : " & currentEvent
n.SetInfo(title,body,Main)
If TotalEvents>1 Then
n.Number=TotalEvents
End If
n.Light=True
n.AutoCancel=True
n.Icon="logo32" ' 32x32 png file
n.OnGoingEvent=False
n.Sound=True
n.Vibrate=True
n.Notify(1)