iniciar-programa

define-nueva-instruccion norte como inicio
   mientras no-orientado-al-norte hacer inicio
     gira-izquierda;
   fin;
fin;

define-nueva-instruccion este como inicio
   mientras no-orientado-al-este hacer inicio
     gira-izquierda;
   fin;
fin;

define-nueva-instruccion oeste como inicio
   mientras no-orientado-al-oeste hacer inicio
     gira-izquierda;
   fin;
fin;

define-nueva-instruccion sur como inicio
   mientras no-orientado-al-sur hacer inicio
     gira-izquierda;
   fin;
fin;

define-nueva-instruccion sube(kk) como inicio
    repetir kk veces inicio
        norte;
        avanza;
        este;
        avanza;
    fin;
fin;


define-nueva-instruccion pon-zumbador como inicio
    si no-junto-a-zumbador entonces deja-zumbador;
fin;

define-nueva-instruccion bajar(x) como inicio
    repetir x veces inicio
        pon-zumbador;
        sur;
        avanza;
        pon-zumbador;
        este;
        avanza;
     fin;
     pon-zumbador;
fin;

define-nueva-instruccion ir11 como inicio
    sur;
    mientras frente-libre hacer avanza;
    oeste;
    mientras frente-libre hacer avanza;
fin;

define-nueva-instruccion dibujar(k) como inicio
    sube(k);
    bajar(K);
    ir11;
fin;


define-nueva-instruccion piramide(n) como inicio
    si algun-zumbador-en-la-mochila entonces inicio
       dibujar(n);
       piramide(sucede(n));

    fin;
fin;

define-nueva-instruccion punta como inicio
    mientras junto-a-zumbador hacer inicio
        sube(1);
    fin;
    sur;
    avanza;
    oeste;
    avanza;
    norte;
fin;




    inicia-ejecucion
    ir11;
    pon-zumbador;
    piramide(1);
    punta;
        apagate;
    termina-ejecucion
finalizar-programa
  