8
-
B
it
S
oftware
Online Conversion
Index
8BS17
:2.C.OneLine
:0.$.Circle
Listing
About
:0.$.Circle - Listing
10N=6 20X=600 30Y=400 40R=300 50T=0 60DP=PI/N 70DT=2*DP 80MODE5 90MOVEX+R,Y 100FOR I%=0 TO N 110DRAW X+R*COS(T),Y+R*SIN(T) 120T=T+DT 130NEXT I%