@ Zotoaster: I think, it's faster, using this array... look at this example:
dim _Sin(359)
dim _Cos(359)
for angle = 0 to 359
_Sin(angle) = sin(angle)
_Cos(angle) = cos(angle)
next angle
input "Should the programm use Commands(Type '1') or the Array(Type '0')?", value
do
cls
text 0,0,str$(screen fps())
for X = 0 to 9999
angle = rnd(359)
if value = 0
My_Sin = _Sin(angle)
My_Cos = _Cos(angle)
else
My_Sin = sin(angle)
My_Sin = cos(angle)
endif
next X
loop
On my computer, the way using commands comes to ~160 fps, and the array-method to ~500 fps. I think, the commands need more time, because they are also made for Floats, but if you don't need floats, this way is even faster.