fill blue

set x 10

loop 10
set y cos|x
do * 10 to y
do + 10 to y
circle x y 20 20 
do + 12 to x