iniciar-programa
 define-nueva-instruccion c(cc) como
  inicio
   si frente-libre entonces
    inicio
     avanza;
     c(cc);
     si si-es-cero(cc) entonces
      inicio
       deja-zumbador;
      fin
     sino
      inicio
       si junto-a-zumbador entonces
           coge-zumbador;
      fin;
    fin
   sino
    inicio
     gira-izquierda;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     si si-es-cero(cc) entonces
         deja-zumbador;
    fin;
  fin;
 define-nueva-instruccion d como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     si junto-a-zumbador entonces
         coge-zumbador;
     d;
     deja-zumbador;
    fin;
  fin;
 define-nueva-instruccion a(aa) como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     a(sucede(aa));
    fin
   sino
    inicio
     si no si-es-cero(aa) entonces
      inicio
       repetir 4 veces
        inicio
         repetir 2 veces
          inicio
         repetir aa veces
          inicio
           repetir aa veces
               deja-zumbador;
           deja-zumbador;
           avanza;
          fin;
           fin;
          gira-izquierda;
        fin;
       avanza;
       gira-izquierda;
       avanza;
       repetir 3 veces
           gira-izquierda;
       a(precede(aa));
      fin
     sino
      inicio
       deja-zumbador;
      fin;
    fin;
  fin;
    inicia-ejecucion
     mientras no-orientado-al-norte hacer
         gira-izquierda;
     c(0);
     gira-izquierda;
     c(1);
     si junto-a-zumbador entonces
      inicio
       mientras junto-a-zumbador hacer
           coge-zumbador;
       gira-izquierda;
       gira-izquierda;
      fin
     sino
      inicio
       repetir 3 veces
           gira-izquierda;
      fin;
     c(0);
     d;
     coge-zumbador;
     mientras no-orientado-al-este hacer
         gira-izquierda;
     a(0);
        apagate;
    termina-ejecucion
finalizar-programa
