iniciar-programa
 define-nueva-instruccion f como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     f;
     deja-zumbador;
    fin
   sino
    inicio
     avanza;
    fin;
  fin;
 define-nueva-instruccion e como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     avanza;
     gira-izquierda;
     gira-izquierda;
     e;
     deja-zumbador;
     avanza;
     gira-izquierda;
     gira-izquierda;
    fin
   sino
    inicio
     si orientado-al-sur entonces
      inicio
       avanza;
       gira-izquierda;
       gira-izquierda;
       f;
       gira-izquierda;
       gira-izquierda;
      fin;
    fin;
  fin;
 define-nueva-instruccion d(m) como
  inicio
   si frente-libre entonces
    inicio
     avanza;
     d(m);
     avanza;
    fin
   sino
    inicio
     gira-izquierda;
     gira-izquierda;
     si si-es-cero(m) entonces
      inicio
       deja-zumbador;
      fin
     sino
      inicio
       e;
       mientras junto-a-zumbador hacer
           coge-zumbador;
      fin;
    fin;
  fin;
 define-nueva-instruccion c(n) como
  inicio
   si frente-libre entonces
    inicio
     avanza;
     c(n);
     avanza;
    fin
   sino
    inicio
     gira-izquierda;
     d(n);
     repetir 3 veces
         gira-izquierda;
    fin;
  fin;
 define-nueva-instruccion a como
  inicio
   deja-zumbador;
   si orientado-al-sur entonces
    inicio
     repetir 3 veces
         gira-izquierda;
     c(0);
     repetir 3 veces
         gira-izquierda;
    fin
   sino
    inicio
     si orientado-al-este entonces
      inicio
       gira-izquierda;
       gira-izquierda;
       c(0);
      fin
     sino
      inicio
       si orientado-al-oeste entonces
        inicio
         c(0);
         gira-izquierda;
         gira-izquierda;
        fin
       sino
        inicio
         gira-izquierda;
         c(0);
         gira-izquierda;
        fin;
      fin;
    fin;
   repetir 4 veces
    inicio
     si frente-libre entonces
      inicio
       avanza;
       si no-junto-a-zumbador entonces
           a;
       gira-izquierda;
       gira-izquierda;
       avanza;
       gira-izquierda;
       gira-izquierda;
      fin;
     gira-izquierda;
    fin;
  fin;
    inicia-ejecucion
     avanza;
     repetir 3 veces
         gira-izquierda;
     avanza;
     gira-izquierda;
     mientras junto-a-zumbador y frente-libre hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
     si no-junto-a-zumbador entonces
         avanza;
     gira-izquierda;
     avanza;
     mientras junto-a-zumbador y frente-libre hacer
      inicio
       repetir 3 veces
           gira-izquierda;
       mientras frente-libre hacer
        inicio
         avanza;
         si frente-libre y no-junto-a-zumbador entonces
          inicio
           a;
           repetir 3 veces
               gira-izquierda;
           c(1);
           repetir 3 veces
               gira-izquierda;
          fin;
        fin;
       gira-izquierda;
       gira-izquierda;
       avanza;
       mientras junto-a-zumbador y frente-libre hacer
           avanza;
       gira-izquierda;
       gira-izquierda;
       si no-junto-a-zumbador entonces
           avanza;
       gira-izquierda;
       avanza;
      fin;
     gira-izquierda;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     mientras no-junto-a-zumbador y frente-libre hacer
         avanza;
     si junto-a-zumbador entonces
         f;
     gira-izquierda;
        apagate;
    termina-ejecucion
finalizar-programa
