to yuan  x0 y0 rr
make xx 0 make yy 0 make aa 0
repeat 360 [make aa aa+1 make xx  x0+(cos aa)*rr  make yy  y0+(sin aa)*rr dot xx yy]
end
to yt
cs 
setw 2
repeat  20[ yuan random 200 random 200 random 150]
end