iniciar-programa
 define-nueva-instruccion a(m) como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     a(sucede(m));
    fin
   sino
    inicio
     avanza;
     avanza;
     repetir 3 veces
         gira-izquierda;
     mientras no-junto-a-zumbador hacer
         avanza;
     mientras frente-libre hacer
      inicio
       repetir precede(m) veces
           si frente-libre entonces
               avanza;
       si frente-libre entonces
        inicio
         avanza;
         deja-zumbador;
        fin;
      fin;
    fin;
  fin;
 define-nueva-instruccion b(n) como
  inicio
   si junto-a-zumbador entonces
    inicio
     repetir n veces
         deja-zumbador;
     si frente-libre entonces
      inicio
       avanza;
       b(sucede(n));
      fin;
    fin
   sino
    inicio
     si frente-libre entonces
      inicio
       avanza;
       b(n);
      fin;
    fin;
  fin;
 define-nueva-instruccion c(p) como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     c(sucede(p));
    fin
   sino
    inicio
     avanza;
     deja-zumbador;
     repetir p veces
         si junto-a-zumbador entonces
             coge-zumbador;
     si junto-a-zumbador entonces
      inicio
       coge-zumbador;
       si no-junto-a-zumbador entonces
        inicio
         avanza;
         avanza;
         avanza;
         repetir 3 veces
             gira-izquierda;
         mientras frente-libre hacer
             avanza;
         gira-izquierda;
         gira-izquierda;
         repetir p veces
             deja-zumbador;
         coge-zumbador;
         apagate;
        fin;
      fin;
    fin;
  fin;
    inicia-ejecucion
     avanza;
     a(0);
     gira-izquierda;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
     b(0);
     gira-izquierda;
     avanza;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     deja-zumbador;
     avanza;
     avanza;
     gira-izquierda;
     gira-izquierda;
     a(0);
     gira-izquierda;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
     b(0);
     gira-izquierda;
     gira-izquierda;
     mientras frente-libre hacer
      inicio
       mientras no-junto-a-zumbador hacer
           avanza;
       gira-izquierda;
       c(0);
       gira-izquierda;
       gira-izquierda;
       avanza;
       gira-izquierda;
      fin;
        apagate;
    termina-ejecucion
finalizar-programa
