Curva de Peano
Para dibujar este curva, la tortuga se desplaza por un "tablero" dividido en 9 cuadrados.
Empezando de la esquina inferior izquierda, primero gira a la izquierda y luego
tres veces seguidas a la derecha, otras 3 a la izquierda, y al final una a la
derecha. La tortuga sale del cuadrado por el vértice superior derecho después de haberse movido diagonalmente por cada uno de los 9 cuadrados. |
![]() |
para empezar :nivel # Inicializamos papel, lapiz y tortuga reponetodo pontamañopantalla [400 400] poncolorpapel negro poncolorlapiz verde subelapiz ocultatortuga # haz "celltam (potencia 2 0.5)*(120/(potencia 3 :nivel)) subelapiz ponposicion [-180 -180] ponrumbo 45 bajalapiz curva :nivel fin para curva :nivel si :nivel < 0 [avanza :celltam alto] curva :nivel-1 giraizquierda 90 curva :nivel-1 repite 3 [giraderecha 90 curva :nivel-1] repite 3 [giraizquierda 90 curva :nivel-1] giraderecha 90 curva :nivel-1 fin |