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 k=0 n=0 p=0 run: for a=1 to 3 step 1 for I=0 to 360 step 30 x=190*sin(I/180*3.14) y=190*cos(I/180*3.14) if a=1 then gr.color 255,255,0,0,1 if a=2 then gr.color 255,0,255,0,1 if a=3 then gr.color 255,0,0,255,1 gr.circle nc,w/2+x/2,h/2-y/2,25 gr.render next I next a goto run