[MWForum]MIA, Ask an Expert: polygon procedures

[Tony Wilson]

Try this

to polygon
question [How many sides do you want in your polygon ?] 
announce [We are now going to draw the polygon]
poly answer
end

to poly :sides
pu setpos [-176 -38] 
pd repeat :sides [fd 60 rt (360 / :sides)] 
melody2
end

---
Tony Wilson
Computer Coordinator
Holy Eucharist School
St Albans South
ph:  (03) 9366 2899
fax: (03) 9366 8192