Files
Pusher_2.0/Starter.bas

39 lines
705 B
QBasic

B4A=true
Group=Default Group
ModulesStructureVersion=1
Type=Service
Version=9.9
@EndOfDesignText@
#Region Service Attributes
#StartAtBoot: False
#ExcludeFromLibrary: True
#End Region
Sub Process_Globals
Public rp As RuntimePermissions
Public FLP As FusedLocationProvider
Dim dentroDeGeocerca As Map
Dim logger As Boolean = False
End Sub
Sub Service_Create
CallSubDelayed(FirebaseMessaging, "SubscribeToTopics")
dentroDeGeocerca.Initialize
End Sub
Sub Service_Start (StartingIntent As Intent)
#if DEBUG
logger = True
#else
Logger = False
#End If
End Sub
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
Return True
End Sub
Sub Service_Destroy
End Sub