GPSPointer : Différence entre versions
(Page créée avec « Projet de pointeur GPS pour piloter une caméra vers des coordonnées GPS précises '****** Calcul du cap en degrés ******* If Dist > 0 Then 'Distance précédemment cal… ») |
|||
| (Une révision intermédiaire par le même utilisateur non affichée) | |||
| Ligne 4 : | Ligne 4 : | ||
| + | |||
| + | La mécanique de pilotage de la caméra est la modèle suivant : | ||
| + | http://www.keyhead.net/Pages/KH05.html | ||
| + | |||
| + | |||
| + | |||
| + | |||
| + | formule de cap | ||
| + | ----- | ||
'****** Calcul du cap en degrés ******* | '****** Calcul du cap en degrés ******* | ||
If Dist > 0 Then 'Distance précédemment calculée | If Dist > 0 Then 'Distance précédemment calculée | ||
Version actuelle en date du 27 janvier 2012 à 16:44
Projet de pointeur GPS
pour piloter une caméra vers des coordonnées GPS précises
La mécanique de pilotage de la caméra est la modèle suivant : http://www.keyhead.net/Pages/KH05.html
formule de cap
'****** Calcul du cap en degrés ******* If Dist > 0 Then 'Distance précédemment calculée Cap = (Sin(RadLat2) - Sin(RadLat1) * Cos(Dist)) / (Sin(Dist) * Cos(RadLat1)) 'Lat1 et Lat2 sont en radians If Sin(RadLon1 - RadLon2) < 0 Then 'Lon1 et Lon2 en radians Cap = Atn(-Cap / Sqr(-Cap * Cap + 1)) + 2 * Atn(1) 'équivalent à ArcCos Else If Cap > 1 Then Cap = 0 ElseIf Cap < -1 Then Cap = PI Else Cap = 2 * PI - (Atn(-Cap / Sqr(-Cap * Cap + 1)) + 2 * Atn(1)) End If End If Cap = Cap * cDegré 'conversion en degrés End If '*************************************
