Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Dim nNotify As Notification
End Sub
Sub Service_Create
nNotify.Initialize
nNotify.Icon = ""
nNotify.Sound=False
nNotify.Vibrate=False
nNotify.Light=False
nNotify.OnGoingEvent=True
nNotify.SetInfo("", "", "")
End Sub
Sub Service_Start (StartingIntent As Intent)
Service.StartForeground(1,nNotify)
'.......