REM Start of BASIC!Program

gr.open 0, 0, 0, 0
gr.orientation 1
gr.screen w,h

gr.set.antialias 0
gr.set.stroke 1

x=200
y=400

w=400
h=800

run:

for I=0 to 360 step 30
x=190*sin(I/180*3.14)
y=190*cos(I/180*3.14)
gr.color 255,rnd()*255,rnd()*255,rnd()*255,1
gr.circle nc,w/2+x/2,h/2-y/2,25
next I






gr.render

goto run