 iniciar-programa
  define-nueva-instruccion recoge(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
recoge(sucede(n));
fin
sino inicio
si no junto-a-zumbador y frente-libre entonces inicio
mientras no junto-a-zumbador y frente-libre hacer avanza;
recoge(0);
fin;
si frente-bloqueado y derecha-libre entonces inicio
mientras no orientado-al-sur hacer gira-izquierda;
si frente-libre entonces avanza;
mientras no orientado-al-oeste hacer gira-izquierda;
mientras frente-libre hacer avanza;
mientras no orientado-al-este hacer gira-izquierda;
recoge(0);
fin;
si frente-bloqueado y derecha-bloqueada entonces inicio
mientras no orientado-al-oeste hacer gira-izquierda;
mientras frente-libre hacer avanza;
mientras no orientado-al-sur hacer gira-izquierda;
mientras frente-libre hacer avanza;
mientras no orientado-al-este hacer gira-izquierda;
   si frente-libre entonces avanza;
  fin;
   si algun-zumbador-en-la-mochila entonces inicio
  repetir n veces inicio
  si algun-zumbador-en-la-mochila entonces deja-zumbador;
  fin;
si junto-a-zumbador y frente-libre entonces avanza;
   fin;
   fin;
 fin;

      define-nueva-instruccion par(n) como inicio
      si frente-libre entonces inicio
     si no junto-a-zumbador entonces inicio
     avanzA;
      par (sucede(n)) ;
      fin
      sino inicio
      si junto-a-zumbador entonces inicio
      coge-zumbador;
      si no junto-a-zumbador entonces par(n);
      si junto-a-zumbador entonces inicio
      si frente-libre entonces avanzA;
      par (n);
      fin;
      fin;
      fin;
      fin
      sino inicio
      si orientado-al-oeste entonces inicio
      repetir 3 veces gira-izquierda;
      si frente-libre entonces avanza;
      si si-es-cero (precede(n)) entonces inicio
      deja-zumbador;
          fin;
      fin;
      fin;
      fin;

     define-nueva-instruccion acomoda como inicio

    mientras frente-libre hacer inicio
mientras frente-libre y no-junto-a-zumbador hacer avanza;
si junto-a-zumbador entonces inicio
mientras no orientado-al-oeste hacer gira-izquierda;
mientras junto-a-zumbador hacer coge-zumbador;
mientras frente-libre hacer avanza;
mientras no orientado-al-este hacer gira-izquierda;
si frente-libre entonces avanza;
si no-junto-a-zumbador  entonces inicio
mientras algun-zumbador-en-la-mochila hacer deja-zumbador
fin;
mientras frente-libre y junto-a-zumbador hacer avanza;
si no-junto-a-zumbador  entonces inicio
mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
si frente-libre entonces avanza;
fin;
fin;
fin;
fin;
    define-nueva-instruccion  busca como inicio
    mientras orientado-al-oeste y junto-a-zumbador hacer inicio
    par (0);
    mientras frente-libre hacer avanza;
    mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
    gira-izquierda;
    gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;

    acomoda;
    mientras no orientado-al-oeste hacer gira-izquierda;
    mientras frente-libre y no junto-a-zumbador hacer avanza;
    busca;
fin;
fin;


    inicia-ejecucion
    mientras no orientado-al-norte hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    mientras no orientado-al-este hacer gira-izquierda;
 recoge (0);
 gira-izquierda;
 gira-izquierda;
 avanza;
   busca;
  mientras no orientado-al-norte hacer gira-izquierda;
  avanza;
  gira-izquierda;
  gira-izquierda;
  mientras junto-a-zumbador hacer coge-zumbador;
  avanza;
  mientras algun-zumbador-en-la-mochila hacer deja-zumbador;


        apagate;
    termina-ejecucion
finalizar-programa
