jueves, 10 de diciembre de 2009

Un regalo para los que egresan

Estaba en Lago Rosario y un par de chicas me pidió que le escribiera algo en el cuaderno que estaban haciendo pasar por terminar la escuela. Después de escribir unas pocas palabras, se me ocurrió hacer algo con el Logo, ya que estabamos trabajando con él.
El resultado es el siguiente:



para iniciar
bp
pongrosor [1 1]
poncolorlapiz [0 0 0]
poncolorrelleno [255 255 255]
bl
tallo
espera 20
florroja
espera 20
txt
fin

para arco
repite 18 [av 5 gd 5]
fin

para florroja
petalorojo
gd 15
petalorojo
fin

para hoja
arco
gd 90
arco
poncolorrelleno [0 128 0]
gd 120
sl
av 15
rellena
re 15
bl
gi 120
gi 270
fin


para petalorojo
pongrosor [1 1]
poncolorlapiz [0 0 0]
repite 4 [arco gd 90 arco
gd 130
sl
av 5
poncolorrelleno [255 0 0]
rellena
retrocede 5
bl
gi 130
]
fin

para tallo
poncolorlapiz [0 128 0]
pongrosor [5 5]
repite 12 [ av 5 gi 1]
hoja
repite 18 [ av 5 gi 1]
pongrosor [1 1]
poncolorlapiz [0 0 0]
fin

para txt
sl
ponpos [-150 -50]
gd 90
rotula [¡¡Felicitaciones para los egresados 2009!!]
ponpos [-50 -60]
rotula [del profe de Tecnología]
ponpos [-130 0]
fin