Qbasic4.5 Codes 01: high speed Cosine and Sine

NeonAmd64 · Post by **NeonAmd64** » Wed Apr 05, 2006 10:49 pm

Here is a code for Qbasic4.5 Programmers to increase the speed of cosine and sine in your program:

The Code

DIM SHARED Cose!&#40;360&#41;, Sine!&#40;360&#41;



SUB cosine.table
RA = &#40;180 / &#40;22 / 7&#41;&#41;
FOR i = 0 TO 359
Cose!&#40;i&#41; = COS&#40;i / RA&#41;
Sine!&#40;i&#41; = SIN&#40;i / RA&#41;
NEXT i
END SUB

I had created lots of codes during my life. I will share it with you If anyone is interested then take it ...

My apology again for what I had done ..