reset
penwidth 500
fw 250
home
bw 250
home
color[255 255 0]
; penwidth 145
; setheading 125
; arc 75 260
make "radius 75
make "heading 113
make "center_x 125
make "center_y 250
penwidth 3
repeat 314[
setx :center_x
sety :center_y
setheading :heading
fw :radius
make "heading :heading +1
]
home
penwidth 16
color[255 182 193]
circle 8
setx 300
circle 8
setx 350
circle 8
setx 400
circle 8
setx 450
circle 8
setx 500
circle 8