PureBasic Forums - English

Posted: **Tue Oct 08, 2002 7:27 am**

Restored from previous forum. Originally posted by WolfgangS.

Hi !

Question 1:
Why do have my angle to reach 6.3 !?!?!? Until it will close the full 'circle' ? (e.g. 0...1...0...-1...0)

Question 2:
Is it possible to use a long variable with Sinus ?
Similar to:
Sin(90) = 1 ????
Sin(270)=-1 ????

MFG
:)WolfgangS

InitKeyboard()
angle.f=0
Repeat
angle+0.03
Debug Sin(angle)
ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape) Or angle>6.3

Posted: **Tue Oct 08, 2002 8:28 am**

Restored from previous forum. Originally posted by Danilo.

What you want is sinus of an angle (degree):

Code: Select all

Procedure.f GSin(Angle.f)   ; Input : Angle ( 0 - 360 )
   ProcedureReturn Sin(Angle*(2*3.14159265/360))
EndProcedure 
  
Procedure.f GCos(Angle.f) 
   ; Input : Angle ( 0 - 360 )
   ProcedureReturn Cos(Angle*(2*3.14159265/360))
EndProcedure

For examples that use it, see: viewtopic.php?t=2091 and viewtopic.php?t=2016

cya,
...Danilo

(registered PureBasic user)

Posted: **Tue Oct 08, 2002 11:26 am**

Restored from previous forum. Originally posted by Stan.

Hi,

That because angles are in radian, so 360Â° = 2*Pi radians, (as
implied by Danilo's post) where Pi = 3.141592...,
so 2 * Pi = 6.2832... and your program use the values 6.27 then
6.3 ...

BTW Fred, having double (long float), would help there ...

Bests.

Stan.

Since I attended an MS course, my programs no longer have bugs ... just hidden "features" !! [ PB. registered user ]

PureBasic Forums - English

Poor man Sin() question