Sub Process_Globals
Public manager As BleManager2
Public Parser As BeaconParser
Public beacons As Map
Public const TIME_TO_LIVE_SECONDS As Int = 5
End Sub
Sub Service_Create
manager.Initialize("manager")
beacons.Initialize
Parser.Initialize
Globals.IniDB
Globals.CreateTables
End Sub
Sub Service_Start (StartingIntent As Intent)
manager.Scan2(Null, True)
End Sub
Public Sub Scan
manager.Scan2(Null, True)
scanning = True
End Sub