Condexatedenbay.com


Comment calculer les Angles en QBasic



Dans le cadre d'un programme, vous devez parfois calculer l'angle entre deux points. Trigonométrie vous permet de faire les calculs. Puisque la trigonométrie est issu des triangles rectangles, vous traitez les deux points comme les angles d'un triangle rectangle et vos calculs sur le triangle de base. QBasic est un langage de programmation pour MS-DOS. Il est basé sur BASIC, dont il a hérité ses fonctions de trigonométrie. Vous pouvez calculer l'angle entre deux points en QBasic en utilisant une de ces fonctions, ATN.

Instructions

• Trouver les distances horizontales et verticales entre les deux points. Ces distances forment les côtés du triangle que vous utiliserez pour vos calculs. Pour cet exemple, les coordonnées des deux points sont stockées dans les variables nommées Point1X, Point1Y, Point2X et Point2Y. Pour trouver chaque distance, soustraire coordonnée du premier point de coordonnées correspondant au deuxième point : DIM TriangleWidth AS SINGLE, TriangleWidth TriangleHeight AS SINGLE = Point2X - Point1X TriangleHeight = Point2Y - Point1Y

• Convertir les deux distances aux nombres positifs. TriangleWidth sera négatif si le deuxième point se trouve à gauche du premier point, et que TriangleHeight sera négatif si le deuxième point est inférieure au premier point. Il s'agit d'un problème parce que vous avez besoin des nombres positifs pour les calculs. Utilisez la fonction ABS pour trouver la valeur absolue de chaque distance : TriangleWidth = ABS(TriangleWidth) TriangleHeight = ABS(TriangleHeight)

• Calculer la tangente de l'angle. La tangente d'un angle est la longueur du côté opposé à l'angle divisé par la longueur du côté adjacent à l'angle. Vous essayez de trouver l'angle formé par le premier point, ce qui signifie que la hauteur du triangle est le côté opposé et sa base est le côté adjacent. Diviser la hauteur de la base : tangente tangente AS SINGLE DIM = TriangleHeight / TriangleWidth

• Calculer l'angle à l'aide de la fonction ATN. La fonction ATN (abréviation de "arctangente") trouve l'angle qui correspond à une tangente : Angle Angle AS SINGLE DIM = ATN(Tangent)

• Convertir des radians en degrés. La fonction ATN renvoie l'angle en radians. (Pi radians égale un demi-cercle ou 180 degrés). Pour convertir des radians en degrés, multipliez par 180 et divisez par pi : Angle = Angle * 180 / 3.14159