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