Bon voila j'ai passé 3h à trouver ce code et à le tester il fonctionne: Pour ceux qui se lancent dans la 3D voici une fonction pour retrouver un vector3 à partir d'une position 3D, d'une longitude, d'une latitude et d'un rayon.
Source / Exemple :
Function retrouver_xyz(ByVal origine As Vector3, ByVal longitude As Single, ByVal latitude As Single, ByVal rayon As Single)
latitude = Math.PI * latitude / 180
longitude = Math.PI * longitude / 180
Dim x, y, z As Decimal
x = origine.X + rayon * Math.Cos(latitude) * Math.Cos(longitude)
y = origine.Y + rayon * Math.Sin(latitude)
z = origine.Z + rayon * Math.Cos(latitude) * Math.Sin(longitude)
Return New Vector3(x, y, z)
End Function
Conclusion :
Je rappelle que le moteur XNA 3D est parfaitement utilisable en Vbnet voir les cours d'Alan Phipps:
http://www.alanphipps.com/VisualBasicdotNET-XNA.html
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.