Reto 2

RETO # 2

Pasos para la resolución.

Este sí fue todo un reto, ya que requerí de mucho tiempo y de mucha investigación para entender algunos de los procesos, como por ejemplo vestir a la tortuga con ocho trajes diferentes, asociándolo a la vez con un tema curricular.

Los primeros procedimientos como las cajas de dialogo al principio,  constituyen conocimientos básicos, sin embargo lo complejo empezó luego, cuando había que buscar la manera correcta de utilizar el procedimiento cumplelista para alcanzar el objetivo planteado, así también aprendimos a utilizar un procedimiento repetir y su función.

Por dicha, obtuve la totalidad de los puntos, pero siempre le hice unos cambios con el propósito de mejorarlo un poquito más.

Ejecutable
sites.google.com/site/microparadigma/reto-2-progra

Procedimiento.


para iniciar
t1, 
mt espera 60 et
pregunta [¿Desea ver la tortuga disfrazada? si respuesta es si escriba "S" si respuesta es no escriba "N"]
si respuesta = "S [vestir]
si respuesta = "N [anuncia [Nos vemos luego]]
fin

para vestir
t2,
fpos [-90 10]
ftamaño 60
da "let ítemtexto 1 "vestidos
cumplelista [encubrir [t2]] [dile :encubrir repite 8[ ffig :let mt espera 20 da "let :let + 1 ffig 0] espera 20]
repetir
fin

para repetir
pregunta [¿Desea volver a ver las letras? si respuesta es si escriba "S" si respuesta es no escriba "N"]
si respuesta = "S [vestir]
si respuesta = "N [adios]
fin  

para adios
Textonuevo "Despedida [-320 -50] [150 100]
Ftamañoletra 16
Fletra "|Arial|
Festilo "negrita
Fcolortexto "magenta
Es [Nos vemos luego con más letras]
espera 30
Remueve "despedida
fin