O programa foi dividido em
partes para sua montagem, PORÉM, tem como base os seguintes procedimento:
1)
Para
construir quadrado para a direita
aprenda
qua :l
repita 4 [pf :l
pd 90]
fim
2)
Para construir
quadrado para a esquerda.
aprenda
qua1 :l
repita 4 [pf :l
pe 90]
fim
Na elaboração do procedimento BONECO, montou-se
A)
Corpo com quadrado de lado l
B)
Pés com quadrados de lados l/3
C)
Bico do pé com quadrados de lados l/6
D)
Braços com quadrados de lados l/4
E)
Cabeça com quadrado de lado l /2
Comandos usados
repita,
mudexy, un,
ul pd, pe, pf, mudecp e pinte,
|
PROGRAMA
aprenda
qua :l
repita 4 [pf :l
pd 90]
fim
aprenda
qua1 :l
repita 4 [pf :l
pe 90]
fim
aprenda
boneco :l
;
construir corpo
qua :l
pe 90
;
construir pé direito
repita 2 [qua
:l/3 pf :l/3 ]
pd 90 pf 40
qua :l/6
;construir
pé esquerdo
un mudexy :l
0 ul
pd 90
repita 2 [qua1
:l/3 pf :l/3 ]
pe 90 pf :l/3
qua1 :l/6
;construir
braço direito
pe 90
un mudexy 0
:l*3/4
ul
qua :l/4
un mudexy
-:l/4 :l ul
qua :l/4
un mudexy -:l*2/4
:l*5/4 ul
qua :l/6
;construir
braço esquerdo
un mudexy :l
:l*3/4
pe 180
ul qua1 :l/4
un mudexy
:l*5/4 :l ul
qua1 :l/4
un mudexy :l*6/4
:l*5/4 ul
qua1 :l/6
|
;construir cabeça
; usar 2 *:L / 4 = :L /2
un mudexy :l/4 :l
pe 90
ul qua :l*/2
;construir
olhos e boca
; dividir :l/2 em 6 partes
; uma parte = :l/12
; boca usar :l*2/12 mais :l/4 mais (:l/12)/2 = 11*:l/24
un mudexy :l*11/24
:l*13/12
ul qua :l/12
;olho
direito
;usar :l +
4:l/12 = 16:l/12
;usar :l/4 + ;l/12 =
4:l/12
un mudexy :l*4/12
:l*16/12
ul qua :l/12
;olho
esquerdo
; usar
:l + 4:l/12 = 16:l/12
;usar :l/4 + 4*:l/12 =
7:l/12
un mudexy :l*7/12
:l*16/12
ul qua :l/12
;capacete
; usar 6:l/12 = :l/2
;usar :l + :l/2 = :l*3/2 e em
qua :l/8
un mudexy :l/4
:l*3/2
ul qua :l/8
un mudexy :l*3/4
:l*3/2
ul qua1 :l/8
un pc
;
emblema no peito
mudexy :l/4 :l/4
pd 90
ul repita 3 [ pf :l*2/4 pe 120]
;pintar
emblema
un mudexy
:l*2/4 :l*2/4
mudecp 9
pinte
mudexy :l/6
:l/6
mudecp 10
pinte
un pc
fim
|
Nenhum comentário:
Postar um comentário