iniciar-programa
define-nueva-instruccion deja como mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
define-nueva-instruccion sur como mientras no orientado-al-sur hacer gira-izquierda;
define-nueva-instruccion norte como mientras no orientado-al-norte hacer gira-izquierda;
define-nueva-instruccion derecha como repetir 3 veces gira-izquierda;
define-nueva-instruccion avanzar como mientras frente-libre hacer avanza;
define-nueva-instruccion avanzar2 como mientras frente-libre y no junto-a-zumbador  hacer avanza;
define-nueva-instruccion regresa como inicio
    sur;
    avanzar;
    derecha;
    avanzar;
    norte;
fin;
define-nueva-instruccion salta como inicio
    si frente-bloqueado y orientado-al-este entonces inicio
        gira-izquierda;
        avanza;
        gira-izquierda;
    fin sino inicio
        derecha;
        avanza;
        derecha;
    fin;
fin;
define-nueva-instruccion recoger2(a) como inicio
    si junto-a-zumbador entonces inicio
        coge-zumbador;
        recoger2(sucede(a));
    fin sino inicio
        si junto-a-zumbador o frente-libre entonces inicio
            avanza;
            recoger2(0);
       fin sino inicio
       fin;
           si no si-es-cero (a) entonces inicio
               regresa;
               derecha;
               repetir precede (a) veces inicio
                   si frente-libre entonces inicio
                       avanza;
                       fin sino inicio
                           salta;
                   fin;
              fin;
              si no junto-a-zumbador entonces inicio
                       deja-zumbador;
              fin;
          fin;
      fin;
fin;
define-nueva-instruccion camina como inicio
    si frente-libre y orientado-al-norte entonces inicio
        avanza;
        si no junto-a-zumbador entonces inicio
            sur;
            avanzar;
            deja;
            gira-izquierda;
            si frente-libre entonces inicio
                avanza;
                norte;
                si no junto-a-zumbador entonces inicio
                regresa;
                derecha;
                recoger2(0);
            fin;
        fin;
    fin sino inicio
    si no junto-a-zumbador entonces inicio
        sur;
        avanzar;
        deja;
        gira-izquierda;
        si frente-libre entonces inicio
            avanza;
            si no junto-a-zumbador entonces inicio
                regresa;
                derecha;
                recoger2(0);
            fin;
        fin;
    fin;
fin;
 fin sino inicio
      si frente-bloqueado entonces inicio
          sur;
          avanzar;
          deja;
          gira-izquierda;
          si frente-libre entonces inicio
              avanza;
              norte;
              si no junto-a-zumbador entonces inicio
                  regresa;
                  derecha;
                  recoger2(0)
              fin;
          fin sino inicio
              si no junto-a-zumbador entonces inicio
                  regresa;
                  derecha;
                  recoger2(0);
              fin;
      fin;
fin;
fin;
fin;
define-nueva-instruccion recoger como inicio
    si junto-a-zumbador entonces inicio
        mientras junto-a-zumbador hacer inicio
            coge-zumbador;
        fin;
        camina;
        fin sino inicio
            si frente-libre o junto-a-zumbador entonces inicio
                recoger;
            fin;
     fin;
fin;
define-nueva-instruccion a como inicio
    mientras no junto-a-zumbador hacer inicio
        si frente-libre entonces inicio
            avanza;
        fin sino inicio
            si frente-bloqueado y orientado-al-oeste entonces inicio
                gira-izquierda;
                si frente-libre entonces inicio
                    avanza;
                    gira-izquierda;
                fin sino inicio
                    norte;
                    sal-de-instruccion;
                fin;
            fin sino inicio
            derecha;
            avanza;
            derecha;
           fin;
      fin;
   fin;
fin;
define-nueva-instruccion verifica(n) como inicio
    si junto-a-zumbador entonces inicio
        coge-zumbador;
        verifica(sucede(n));
    fin sino inicio
        si no orientado-al-norte o izquierda-libre entonces inicio
            a;
            verifica(0);
        fin sino inicio
        fin;
        si no si-es-cero (n) entonces inicio
            repetir n veces inicio
                deja-zumbador;
            fin;
        fin;
fin;
fin;
    inicia-ejecucion
    regresa;
    mientras junto-a-zumbador y orientado-al-norte hacer inicio
        recoger;
    fin;
    si no junto-a-zumbador entonces inicio
        deja-zumbador;
    fin;
    regresa;
    repetir 4 veces inicio
        avanza;
    fin;
    derecha;
    avanzar;
    norte;
    gira-izquierda;
    si junto-a-zumbador entonces inicio
        verifica(0);
    fin sino inicio
        a;
        verifica(0);
    fin;
        apagate;
    termina-ejecucion
finalizar-programa
 