iniciar-programa
define-nueva-instruccion norte como inicio
   mientras no-orientado-al-norte hacer inicio
      gira-izquierda;
   fin;
fin;

define-nueva-instruccion sur como inicio
   mientras no-orientado-al-sur hacer inicio
      gira-izquierda;
   fin;
fin;

define-nueva-instruccion este como inicio
   mientras no-orientado-al-este hacer inicio
      gira-izquierda;
   fin;
fin;

define-nueva-instruccion oeste como inicio
   mientras no-orientado-al-oeste hacer inicio
      gira-izquierda;
   fin;
fin;

define-nueva-instruccion ir_11 como inicio
   sur;
   mientras frente-libre hacer inicio
      avanza;
   fin;
   oeste;
   mientras frente-libre hacer inicio
      avanza
   fin;
   este;
fin;

define-nueva-instruccion marcar como inicio
   si no-junto-a-zumbador entonces inicio
      deja-zumbador;
      norte;
      si frente-libre entonces inicio
         avanza;
         marcar;
         sur;
         avanza;

      fin;

      sur;

       si frente-libre entonces inicio
         avanza;
         marcar;

         norte;
         avanza;
      fin;

       este;
       si frente-libre entonces inicio
         avanza;
         marcar;
         oeste;
         avanza;

      fin;
      oeste;
       si frente-libre entonces inicio
         avanza;
         marcar;
         este;
         avanza;

      fin;

   fin;
fin;

define-nueva-instruccion camina como inicio
   si frente-libre entonces inicio
     avanza;
   fin sino inicio
      si orientado-al-oeste entonces inicio
      norte;
        si frente-libre entonces inicio
        avanza;
        este;
        fin;

      fin sino inicio
         norte;
         si frente-libre entonces inicio
            avanza;
            oeste;
         fin;
      fin;
   fin;
fin;
    inicia-ejecucion
    ir_11;
    marcar;
    oeste;
    mientras no-orientado-al-norte hacer inicio
       mientras junto-a-zumbador y no-orientado-al-norte hacer inicio
       camina;
       fin;
       si no-junto-a-zumbador entonces inicio
          marcar;
          ir_11;
          deja-zumbador;
       fin;
    fin;
    ir_11;
    coge-zumbador;
        apagate;
    termina-ejecucion
finalizar-programa
