This message was posted by dis0wned, posted on September 17, 2000 at 01:21:23 coming from 208.201.202 Mood of this message: Hey all you Doctor PC Jr. owners who have the Basic compiler on their PC Jr. working, enter this into it and tell me how it comes out...
SCREEN 12 CONST PI = 3.1415 WINDOW SCREEN (-1,1)-(1,-1) DO LINE (0,0)-(COS(a% * PI / 180),SIN(a% * PI / 180)), 0 a% = a% + 1 IF a% >= 360 THEN a% = 1 LINE (0,0)-(COS(a% * PI / 180),SIN(a% * PI / 180)), 14 LOOP WHILE INKEY$ = "" END