Chi fa da se fa per tre...![]()
traducendo questa funzione dal PHP ad ASP ho risolto il problema ottenendo il risultato desiderato
condivido perchè sono certo che tornerà utile a molti.
Saluti![]()
codice:function getRhumbLineBearing(lat1, lon1, lat2, lon2) //difference in longitudinal coordinates dLon = deg2rad(lon2) - deg2rad(lon1) //difference in the phi of latitudinal coordinates dPhi = log(tan(deg2rad(lat2) / 2 + pi / 4) / tan(deg2rad(lat1) / 2 + pi / 4)) //we need to recalculate $dLon if it is greater than pi if(abs(dLon) > pi) THEN if(dLon > 0) THEN dLon = (2 * pi - dLon) * -1 ELSE dLon = 2 * pi + dLon END IF END IF //return the angle, normalized getRhumbLineBearing = (rad2deg(atan2(dLon, dPhi)) + 360) MOD 360 END FUNCTION

Rispondi quotando