<Update>
(L:NrstVORSearch, bool)
if{
100 (>C:fs9gps:NearestVorMaximumItems, enum)
200 (>C:fs9gps:NearestVorMaximumDistance, nmiles)
(A:PLANE LATITUDE, degrees) (>C:fs9gps:NearestVorCurrentLatitude, degrees)
(A:PLANE LONGITUDE, degrees) (>C:fs9gps:NearestVorCurrentLongitude, degrees)
(@c:NearestVorItemsNumber) s2 0 !=
if{
:100
(L:LoopCounter, enum) ++ (>L:LoopCounter, enum)
(L:LoopCounter, enum) (>C:fs9gps:NearestVorSelectedVor)
(C:fs9gps:NearestVorSelectedVorFrequency, mHz) (L:DMEFreq, number) ==
(C:fs9gps:NearestVorSelectedVorType) 1 > and
if{
(C:fs9gps:NearestVorSelectedVorLatitude, degrees) (>L:SelVORLat, degrees)
(C:fs9gps:NearestVorSelectedVorLongitude, degrees) (>L:SelVORLon, degrees)
g200
}
(L:LoopCounter, enum) l2 >= if{ g200 }
g100
:200
0 (>L:NrstVORSearch, bool)
}
}
(A:PLANE LATITUDE, degrees) (>C:fs9gps:GeoCalcLatitude1, degrees)
(A:PLANE LONGITUDE, degrees) (>C:fs9gps:GeoCalcLongitude1, degrees)
(L:SelVORLat, degrees) (>C:fs9gps:GeoCalcLatitude2, degrees)
(L:SelVORLon, degrees) (>C:fs9gps:GeoCalcLongitude2, degrees)
(L:DMECycleCounter) ++ (>L:DMECycleCounter)
(L:DMECycleCounter) 36 ==
if{
(L:DMEDistance, number) (>L:DMEDistanceOld, number)
(C:fs9gps:GeoCalcDistance, nmiles) (>L:DMEDistance, number)
(L:DMEDistanceOld, number) (L:DMEDistance, number) - (P:ABSOLUTE TIME, seconds) (L:AbsoluteTimeOld, number) - / 3600 * (>L:DMEGroundSpeed, knots)
(P:ABSOLUTE TIME, seconds) (>L:AbsoluteTimeOld, number)
(L:DMEDistance, number) (L:DMEGroundSpeed, knots) / 60 * (>L:DMEArrivalTime, minutes)
0 (>L:DMECycleCounter)
}
</Update>