This commit is contained in:
2024-04-23 22:20:44 -06:00
parent e1219c5050
commit 8524dcd75e
2 changed files with 3 additions and 3 deletions

View File

@@ -106,7 +106,7 @@ Public Sub StartFLP
Private cont As Int = 0
Do While flp.IsConnected = False
Sleep(500)
if starter.logger then Log($"FLP Sleeping - ${cont}"$)
If Starter.logger Then Log($"FLP Sleeping - ${cont}"$)
Subs.bitacora($"Sleeping - ${cont}"$)
cont = cont + 1
If cont > 70 Then
@@ -162,7 +162,7 @@ Sub flp_LocationChanged (Location1 As Location)
Starter.UUC = Location1
If Starter.logger Then LogColor("FLP_LocationChanged", Colors.Red)
If Starter.logger Then Log(Location1.Accuracy&" - "&Location1.AccuracyValid)
If minsTranscurridos > 1 Then
If minsTranscurridos > 1 Then ' Para que no mande mensajes constantes, minimo 1 minuto entre mensajes.
flp.RequestLocationUpdates(CreateLocationRequest)
'Solo mandamos la ubicacion si la precision es dentro de XX mts
el_texto = $"LocChange - Coords NO enviadas (Acc:${Location1.Accuracy})."$