100 DEG ›110 GRAPHICS 7›120 DX=INT(RND(1)*80)›130 DY=INT(RND(1)*40)›140 FOR L=0 TO 360 STEP (140-DX-DY)/20›145 COLOR INT(RND(1)*5)›150 PLOT 80,40›160 DRAWTO 80+DX*SIN(L),40+DY*COS(L)›170 IF RND(1)>0.3 THEN 190›180 SETCOLOR INT(RND(1)*4),INT(RND(1)*16),INT(RND(1)*8)*2›190 NEXT L›200 GOTO 120›210 SETCOLOR I,1,2*(A-48)›220 NEXT I›230 GOTO 180›