Você pode criar seu próprio procedimento para criar polígonos; assim, não é necessário definir os controles toda vez. Faça esta tentativa:

aprenda polígono :passo :ângulo
repita 360 / :ângulo [parafrente :passo paradireita :ângulo]
fim

O polígono tem 2 entradas :passo e :ângulo. O sinal de dois-pontos precedente em :passo e :ângulo significa que esses são os nomes para um valor. Para tentar criar um polígono, digite polígono seguido de dois números no Centro de Comandos. Por exemplo:

polígono 50 120

cria um triângulo..

Crie um desenho usando polígonos!