iniciar-programa
 define-nueva-instruccion b(bb) como
  inicio
   repetir bb veces
       si junto-a-zumbador entonces
           coge-zumbador;
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     si junto-a-zumbador entonces
      inicio
       avanza;
      fin
     sino
      inicio
       avanza;
       deja-zumbador;
      fin;
    fin
   sino
    inicio
     avanza;
    fin;
  fin;
 define-nueva-instruccion c como
  inicio
   mientras junto-a-zumbador y orientado-al-oeste hacer
    inicio
     coge-zumbador;
     si frente-libre entonces
      inicio
       avanza;
       mientras junto-a-zumbador y frente-libre hacer
           avanza;
       si junto-a-zumbador entonces
           gira-izquierda;
       mientras no-junto-a-zumbador y frente-libre y orientado-al-oeste hacer
           avanza;
      fin;
    fin;
   mientras no-orientado-al-sur hacer
       gira-izquierda;
   repetir 4 veces
       avanza;
   gira-izquierda;
   deja-zumbador;
   mientras frente-libre hacer
       avanza;
   gira-izquierda;
   repetir 4 veces
       avanza;
   gira-izquierda;
   mientras no-junto-a-zumbador y frente-libre hacer
       avanza;
  fin;
 define-nueva-instruccion a(aa) como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     a(sucede(aa));
    fin
   sino
    inicio
     mientras no-junto-a-zumbador hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
     mientras izquierda-libre hacer
      inicio
       b(aa);
       gira-izquierda;
       avanza;
       gira-izquierda;
       avanza;
       gira-izquierda;
       gira-izquierda;
      fin;
     b(aa);
     repetir 3 veces
         gira-izquierda;
     mientras no-junto-a-zumbador y frente-libre hacer
         avanza;
     mientras junto-a-zumbador hacer
         c;
    fin;
  fin;
    inicia-ejecucion
     mientras no-orientado-al-norte hacer
         gira-izquierda;
     repetir 8 veces
         si frente-libre entonces
             avanza;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
     avanza;
     coge-zumbador;
     a(0);
        apagate;
    termina-ejecucion
finalizar-programa
