D Deleted member 103 Guest Nov 4, 2014 #1 How do I convert the code? The "GPSSatellite" function I can not find. Code: Sub GPS1_GpsStatus (Satellites As List) Dim Set As Int Set=0 For i = 0 To Satellites.Size -1 Dim GPSSat As GPSSatellite GPSSat = Satellites.Get(i) If GPSSat.UsedInFix Then Set = Set + 1 Next If Set < 3 Then Log("OK") Else Log("KO") End If End Sub
How do I convert the code? The "GPSSatellite" function I can not find. Code: Sub GPS1_GpsStatus (Satellites As List) Dim Set As Int Set=0 For i = 0 To Satellites.Size -1 Dim GPSSat As GPSSatellite GPSSat = Satellites.Get(i) If GPSSat.UsedInFix Then Set = Set + 1 Next If Set < 3 Then Log("OK") Else Log("KO") End If End Sub
Erel B4X founder Staff member Licensed User Longtime User Nov 5, 2014 #2 This information is not available in iOS. Upvote 0
D Deleted member 103 Guest Nov 5, 2014 #3 Erel said: This information is not available in iOS. Click to expand... That's a shame! But it does not look very much. Upvote 0
Erel said: This information is not available in iOS. Click to expand... That's a shame! But it does not look very much.