Origen
Carpetas de Proyectos
Recursos de Profesores
Recursos de Estudiantes
En INGLÉS
¿Cómo hago?
Lectura
Foro MW
Mapa del Sitio
Búsqueda
Equipo

huesos mágicos 1 2
Huesos Mágicos 1
Pruébalo
41 KB


Meta:   Un hueso mágico responde a tus preguntas con rajaduras de diferente longitud.


Screenshot


Vocabulario:   freezebg, clean, everyone, ht, setpensize, setc (setcolor), setpos, ask, random, pu, pd

Código
Mapa del Proyecto

to startup
clean
everyone [ht setpensize 2 setc 0]
questions, hidetext
text1, hidetext
opaque "text1
ct
setfont "Arial
setfontsize 14
settc 30
end

to ask_a_question
startup
text1, insert textpick "questions
transparent "text1
showtext
end

to crack_the_bone
clean
ask [t1 t2] [pu setpos [0 60]]
ask [t3 t4] [pu setpos [0 30]]
ask [t1 t3] [seth 75 + random 30]
ask [t2 t4] [seth -75 - random 30]
ask [t1 t2 t3 t4] [pd fd random 200]
end

to show_questions
questions, showtext
end

to hide_questions
questions, hidetext
end



Notas

Contexto: Este proyecto se basa en las habilidades de la carpeta Adivina, pero usa un "hueso del oráculo" en lugar de una bola para responder preguntas.   Se huesos de oráculo en la antigua China para hacer predicciones.   Una pregunta era escrita en el omóplato de un animal.   Un lado del hueso era el extremo del "sí" y otro el extremo del "no".   El hueso era calentado hasta que se rajaba.   Las rajaduras más largas apuntaban a la respuesta.

  1. Para hacer preguntas puedes usar la misma caja de texto invisible con preguntas creada en Adivina 4, o escribe nuevas preguntas en una caja de texto invisible.   De la misma manera que en Adivina 4, el proyecto escogerá una pregunta al azar para responder.   En este proyecto, cuatro tortugas dibujarán las "rajaduras" en el hueso de oráculo para determinar la respuesta.  

  2. Dibuja el hueso de oráculo.   Marca un lado con "sí" y el otro con "no".   (Escribe las palabras en caja de texto, hazlas transparentes, estámpalas, y retira las cajas de texto.   O puedes dibujar las palabras con herramientas de dibujo).

  3. Necesitamos una forma de borrar las rajaduras en el hueso sin borrar el hueso.

    Luego de dibujar el hueso, escribe freezebg en el centro de comandos y teclea Enter (o Return).   Freezebg significa "freeze background" (congela el fondo).   Cuando congelamos el fondo, podemos escribir sobre ella y luego borrar las líneas con el comando clean (limpiar) sin borrarse todo el dibujo.

    (Si deseas cambiar el dibujo luego de haber congelado el fondo, entonces escribe unfreezebg en el command center (centro de comandos) y teclea Enter (o Return).   Haz tus cambios y luego congela el fondo nuevamente).

  4. Hay cuatro tortugas invisibles.   Everyone indica a todas las tortugas que realicen los comandos entre corchetes.   Ht significa "hide turtles" y hace invisibles a las tortugas.   (St significa "show turtles" y hace visibles a las tortugas nuevamente).   Las tortugas t1 y t2 harán una rajadura, y las tortugas t3 y t4 harán otra rajadura.   Setpensize 2 fija el grosor de las líneas que las tortugas dibujan.

  5. Ask es una manera de hablar temporalmente a una o más tortugas.   Coloca a los nombres de las tortugas entre corchetes, y coloca sus instrucciones en otro par de corchetes.   Las tortugas t1 y t2 harán una rajadura un poquito más arriba que la rajadura hecha por las tortugas t3 y t4.

  6. Pu significa "pen up" (lápiz arriba).   La tortuga pone su lápiz arriba para no dibujar mientras se mueve.
    Pd significa "pen down" (lápiz abajo), para que la tortuga pueda dibujar.

  7. Setpos significa "set position" (establece posición).   El primer número entre corchetes es la coordenada x e indica cuánto, hacia la izquiera o derecha, ir.   El segundo número es la coordenada y, y dice cúanto, hacia arriba o abajo, ir.

  8. Seth significa "set heading" (fija rumbo).   Seth 0 apunta a la tortuga directamente hacia arriba.   Seth significa "set heading" (fija rumbo).   Seth 0 apunta a la tortuga directamente hacia arriba.

    Seth 75 + random 30 significa, "Si empiezas con rumbo 0, gira 75 grados hacia la derecha, luego suma un número que podrá ser 0 o más, pero menos que 30, y gira a la derecha esa cantidad extra".

    Seth -75 - random 30 significa, "Si empiezas con rumbo 0, gira 75 grados hacia la izquerda y luego sigue girando hacia la izquierda un número al azar que puede ser 0 o mayor, pero menos que 30".

  9. Luego de que las tortugas estén en posiciones adecuadas y hayan escogido sus rumbos,
    Pd fd random 200 significa: "Pon tu lápiz abajo y muévete hacia adelante un número al azar de pequeños pasos de tortuga, 0 o más, pero menos que 200".




¿Qué pasa si?
Intenta diferentes números a continuación de seth y random para cambiar los ángulos de las líneas.
Intenta diferentes números a continuación de fd random.
Coloca tus propias preguntas en la caja de texto questions.


Desafío
¿Puedes cambiar los procedimientos para que el extremo del "sí" tendrá una mejor oportunidad de ganar (pero no siempre)?




© copyright 2001 - 2008  OpenWorld Learning.   All rights reserved.