12. Procedimento
Olá! Se chegamos até aqui, então já fomos longe, e temos um bom conhecimento de Logo. Na verdade, nós já aprendemos alguns procedimentos na lição "A Tat Aprende".
Vamos começar limpando a tela
A definição de um procedimento básico sem parâmetros é: aprenda NOMEPROC AÇÕES fim. Sendo que NOMEPROC é o nome do procedimento e AÇÕES são os comandos. Na lição "A Tat Aprende", definimos um procedimento chamado 'tracejado' assim: aprenda tracejado repita 5 [mudeespl 1 pf 10 mudeespl 3 pf 10] fim.
Aqui, a parte NOMEPROC é o 'tracejado' e a parte AÇÕES é 'repita 5 [mudeespl 1 pf 10 mudeespl 3 pf 10]'.
Defina um novo procedimento chamado triângulo que desenhe um triângulo de tamanho 100.
Parabéns, você criou um novo procedimento chamado triângulo, agora vamos usá-lo.
Para utilizar um procedimento sem parâmetros, teremos de chamá-lo (escrever o nome dele).
Por favor, chame o triângulo.
Também podemos criar um procedimento que espere parâmetros. A definição será: aprenda NOMEPROC :ENTRADA1 :ENTRADA2 AÇÕES fim. Podemos usar tantos parâmetros de entrada quanto desejarmos (quando definimos 'triângulo', usamos 0 parâmetro de entrada). Podemos usar o parâmetro de entrada em AÇÕES.
Escreva o seguinte: aprenda vai :pfdado pf :pfdado fim
Nós definimos: aprenda vai :pfdado pf :pfdado fim. O sinal ":" indica que temos um parâmetro chamado pfdado. A parte AÇÕES contém pf :pfdado o que significa que vai avançar tanto quanto o parâmetro que foi dado .. confuso? Não se preocupe, basta tentar executar o seguinte. vai 50, vai 100, etc.
Aviso .. Se você executar o comando sem um parâmetro, ocorrerá um erro porque a Tat espera exatamente um parâmetro agora.
Execute o procedimento vai com o valor 150.
Na lição 'polígonos', criamos um monte de formas em que a única diferença entre elas foi o número de vezes que precisávamos repetir e o ângulo que precisávamos girar. Para o triângulo foi repita 3 [pf 100 gd 360/3], para quadrado foi repita 4 [pf 100 gd 360/4] e, em geral, foi repita X [pf 100 gd 360/X].
Crie um procedimento chamado polígono que espere 1 parâmetro chamado :lados, e que cada lado tenha 100 passos de tamanho. Faça a Tat girar a direita.
Agora vai ser muito fácil criarmos um monte de polígonos legais. Vamos ter que chamar o procedimento polígono com o parâmetro desejado.
Crie um quadrado.