iniciar-programa
 define-nueva-instruccion prometeo como
  inicio
   si frente-libre entonces
    inicio
     avanza;
     prometeo;
     avanza;
    fin
   sino
    inicio
     gira-izquierda;
     gira-izquierda;
     repetir 3 veces
      deja-zumbador;
    fin;
  fin;
 define-nueva-instruccion cou como
  inicio
   mientras no-orientado-al-oeste hacer
       gira-izquierda;
   si frente-libre entonces
    inicio
     avanza;
     cou;
     avanza;
    fin
   sino
    inicio
     gira-izquierda;
     prometeo;
     repetir 3 veces
         gira-izquierda;
    fin;
  fin;
 define-nueva-instruccion a como
  inicio
   coge-zumbador;
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     si junto-a-zumbador entonces
      inicio
       deja-zumbador;
       deja-zumbador;
      fin
     sino
      inicio
       si orientado-al-norte entonces
        inicio
         cou;
         mientras no-orientado-al-norte hacer
             gira-izquierda;
        fin
       sino
        inicio
         si orientado-al-sur entonces
          inicio
           cou;
           mientras no-orientado-al-sur hacer
               gira-izquierda;
          fin
         sino
          inicio
           si orientado-al-este entonces
            inicio
             cou;
             mientras no-orientado-al-este hacer
                 gira-izquierda;
            fin
           sino
            inicio
             cou;
             mientras no-orientado-al-oeste hacer
                 gira-izquierda;
            fin;
          fin;
        fin;
      fin;
    fin;
   repetir 4 veces
    inicio
     si frente-libre entonces
      inicio
       avanza;
       si junto-a-zumbador entonces
        inicio
         coge-zumbador;
         si junto-a-zumbador entonces
          inicio
           coge-zumbador;
           si junto-a-zumbador entonces
            inicio
             deja-zumbador;
             deja-zumbador;
            fin
           sino
            inicio
             deja-zumbador;
             deja-zumbador;
             a;
            fin;
          fin
         sino
          inicio
           deja-zumbador;
           a;
          fin;
        fin;
       gira-izquierda;
       gira-izquierda;
       avanza;
       gira-izquierda;
       gira-izquierda;
      fin;
     gira-izquierda;
    fin;
  fin;
 define-nueva-instruccion cmp como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     avanza;
     gira-izquierda;
     gira-izquierda;
     cmp;
     deja-zumbador;
     si orientado-al-este o orientado-al-norte entonces
      inicio
       si orientado-al-este entonces
        inicio
         gira-izquierda;
         avanza;
        fin
       sino
        inicio
         gira-izquierda;
         gira-izquierda;
         avanza;
         gira-izquierda;
        fin;
      fin
     sino
      inicio
       si orientado-al-oeste entonces
        inicio
         gira-izquierda;
         avanza;
        fin
       sino
        inicio
         gira-izquierda;
         gira-izquierda;
         avanza;
         gira-izquierda;
        fin;
      fin;
    fin
   sino
    inicio
     avanza;
     gira-izquierda;
    fin;
  fin;
 define-nueva-instruccion i como
  inicio
     mientras no-orientado-al-oeste hacer
         gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     mientras frente-libre hacer
         avanza;
     gira-izquierda;
     gira-izquierda;
  fin;
 define-nueva-instruccion mov como
  inicio
   si junto-a-zumbador entonces
    inicio
     coge-zumbador;
     mov;
     deja-zumbador;
    fin
   sino
    inicio
     avanza;
    fin;
  fin;
 define-nueva-instruccion k como
  inicio
   i;
   cmp;
   si orientado-al-oeste entonces
    inicio
     gira-izquierda;
     avanza;
     gira-izquierda;
     gira-izquierda;
     mientras junto-a-zumbador hacer
         coge-zumbador;
    fin
   sino
    inicio
     mientras junto-a-zumbador hacer
         coge-zumbador;
     gira-izquierda;
     gira-izquierda;
     avanza;
     gira-izquierda;
     gira-izquierda;
     mov;
    fin;
  fin;
 define-nueva-instruccion div como
  inicio
   si junto-a-zumbador entonces
    inicio
     repetir 3 veces
         coge-zumbador;
     div;
     deja-zumbador;
    fin;
  fin;
    inicia-ejecucion
     i;
     mientras frente-libre o derecha-libre hacer
      inicio
       si junto-a-zumbador entonces
        inicio
         coge-zumbador;
         si junto-a-zumbador entonces
          inicio
           coge-zumbador;
           si junto-a-zumbador entonces
            inicio
             deja-zumbador;
             deja-zumbador;
            fin
           sino
            inicio
             deja-zumbador;
             deja-zumbador;
             a;
             k;
            fin;
          fin
         sino
          inicio
           deja-zumbador;
           a;
           k;
          fin;
        fin;
       si frente-libre entonces
        inicio
         avanza;
        fin
       sino
        inicio
         si derecha-libre entonces
          inicio
           gira-izquierda;
           gira-izquierda;
           mientras frente-libre hacer
               avanza;
           gira-izquierda;
           avanza;
           gira-izquierda;
          fin;
        fin;
      fin;
     i;
     avanza;
     gira-izquierda;
     gira-izquierda;
     mov;
     gira-izquierda;
     gira-izquierda;
     div;
        apagate;
    termina-ejecucion
finalizar-programa
