reset make "s 25 make "a 1 setxy 150 300 repeat 7000[ color[rand 250 100 20] fw :s rt :a make "a :a +0.1 make "s :a +2 penwidth 20 arc 50 50 penwidth 1 ] home setxy 150 300 make "a 1 make "s 25 repeat 7000[ color[20 rand 250 100] fw :s rt :a make "a :a +0.1 make "s :a +2 penwidth 15 arc 40 50 penwidth 1 ] home setxy 150 300 make "a 1 make "s 25 repeat 7000[ color[100 20 rand 250] fw :s rt :a make "a :a +0.1 make "s :a +2 penwidth 10 arc 30 50 penwidth 1 ]