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 ir11 como inicio
    sur;
    mientras frente-libre hacer inicio
        avanza;
    fin;
    oeste;
    mientras frente-libre hacer inicio
        avanza;
    fin;
fin;

define-nueva-instruccion contar2 como inicio
    si frente-libre entonces inicio
        avanza;
        contar2;
        avanza;
    fin sino inicio
        deja-zumbador;
        este;

    fin;

fin;

define-nueva-instruccion contar como inicio
    si frente-libre entonces inicio
        avanza;
        contar;
        avanza;
    fin sino inicio
        oeste;
        contar2;
        norte;
    fin;

fin;

define-nueva-instruccion dejar como inicio
    sur;
    contar;



fin;

define-nueva-instruccion buscar(n) como 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;
      fin sino inicio
          dejar;
      fin;
      norte;
      si frente-libre entonces inicio
          avanza;
          buscar(n);
          sur;
          avanza;
      fin;
      sur;
      si frente-libre entonces inicio
          avanza;
          buscar(n);
          norte;
          avanza;
      fin;
      este;
      si frente-libre entonces inicio
          avanza;
          buscar(n);
          oeste;
          avanza;
      fin;
      oeste;
      si frente-libre entonces inicio
          avanza;
          buscar(n);
          este;
          avanza;
      fin;

  fin;
fin;
    inicia-ejecucion

    buscar(0);
        apagate;
    termina-ejecucion
finalizar-programa
