Meta: La tortuga realiza las matemáticas necesarias para hacer polígonos.
Vocabulario: / (division sign), setpensize
to polygon
pd
setc whatcolor
setpensize howthick
repeat #sides [fd howbig rt 360 / #sides]
end
to reset
cg
end
Notas En este proyecto, la tortuga siempre girará exactamente la cantidad correcta para hacer polígonos regulares de lados iguales y ángulos iguales.
- Crea un nuevo control llamado #howthick. Fija su mínimo en 1 y su máximo en 100 (u otro número a tu elección, menor que 100).
Modifica el procedimiento polygon como se indica.
- La tortuga necesita girar 360 grados en total para dibujar un polígono.
Rt 360 / #sides significa, "Gira a la derecha 360 grados divididos entre el número en el control #sides".
Nota que el procedimiento polygon usa #sides dos veces en un solo comando.
- Setpensize howthick significa, "Pon el grosor del lápiz de la tortuga en el número del control howthick". Cada tortuga empieza con un lápiz de tamaño 1. Puedes escoger cualquier tamaño de lápiz hasta 100.
- Ya no necesitamos el control angle. La tortuga realizará las operaciones matemáticas por nosotros para calcular los ángulos que necesitamos. Puedes quitar este control (Haciendo clic derecho/ctrl-click y seleccionando Cut).
¿Qué pasa si?
Pon los controles #sides y howbig para que dibujen una variedad de polígonos. ¿Qué números dibujan el polígono más grande que no se pasa del borde de la página del proyecto?
Desafío
¿En cuánto tiene que estar el control #sides para que el polígono empiece a parecerse a un círculo más que a un polígono? (Llamémos a esto la configuración del "primer círculo"). Cambia la configuración de los controles howbig y howthick para ver el efecto del "primer círculo".
|