to polygon
pu
rt 90
bk 300
lt 90
lt 270
pd
repeat 3[fd 50 rt 120]
pu
fd 100
pd
repeat 4[fd 50 rt 90]
pu
fd 110
pd
repeat 5[fd 50 rt 72]
pu
fd 120
pd
repeat 6[fd 50 rt 60]
pu
fd 140
pd
repeat 7[fd 50 rt 52]
pu
fd 140
lt 4
pd
repeat 8[fd 50 rt 45]
pu
home
rt 180
fd 200
lt 90
lt 90
lt 90
fd 100
fd 100
fd 100
pd
repeat 9[fd 50 rt 40]
pu
end

to windmill
repeat 5[repeat 3[fd 100 lt 120]lt 72.5]
end