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