WrapAngle

NewAngle# = WrapAngle(Angle#, AngleIncrement#)

Parameters:     Angle# =Current angle value     AngleIncrement#=Value that increments the angle parameter

Returns:     NewAngle# = The resulting angle after it's been wrapped within 0 to 359 degrees

The WrapAngle function adds the Angle and Increment parameter together, returning the resulting angle wrapped to fit within 0 to 359 degrees. Mini Tutorial #1:       Showing the use of the WrapAngle function    ; Set the angle value to 300   Angle = 300    ; increment the angle 6 times by 12 degrees   For i = 1 To 6      Angle = WrapAngle(Angle,12)      Print Angle   Next i    ; Display the Screen and wait for the user to press a key   Sync   WaitKey    This example would output.      312   324   336   348   0   12    Mini Tutorial #2: This example displays the Angle# wrapped to 360 degrees as line on the screen.      // Tell PB to limit to a program to a max of 60   // frames (Syncs) per second   SetFPS 60            // STart of main loop   Do            // Clear the screen      Cls RGB(0,0,0)                  // Draw a line to present ANGLE visually      x#=GetScreenWidth()/2      y#=GetScreenHeight()/2      x2#=CosNewValue(x#,Angle#,100)      y2#=SinNewValue(y#,Angle#,100)      Line x#,y#,x2#,y2#                  // Bump the Angle and wrap it within 360 degrees      Angle#=WrapAngle(Angle#,1)                  // Display the Current angle#      Print "Angle:"+Str$(angle#)                  // draw the screen      Sync   Loop

Related Info:	AngleDifference | ATanFull | Cos | CosNewValue | CosRadius | GetAngle2D | RotateToPoint | Sin | SinNewValue | SinRadius | TurnDirection :

(c) Copyright 2002 - 2024 - Kevin Picone - PlayBASIC.com