iniciar-programa
define-nueva-instruccion gira(t) como inicio
repetir t veces gira-izquierda;
fin;
define-nueva-instruccion prepara como inicio
mientras no orientado-al-norte hacer gira-izquierda;
mientras frente-libre hacer avanza;
gira(3);
fin;

 define-nueva-instruccion resta(n) como inicio
 si junto-a-zumbador entonces inicio
 si si-es-cero(n) entonces inicio
 mientras no orientado-al-norte hacer gira-izquierda;
si junto-a-zumbador entonces coge-zumbador;
 apagate;
 fin
 sino inicio
  mientras no orientado-al-sur hacer gira-izquierda;
  si junto-a-zumbador entonces coge-zumbador;
  apagate;
  fin;
  fin;



 si izquierda-libre entonces inicio
 gira(1);
 avanza;
 resta(precede(n));
 fin;
 si frente-bloqueado entonces  inicio
 gira(3);
 resta(precede(n));
 fin;

 si izquierda-bloqueada y frente-libre entonces inicio
 avanza;
 resta(precede(n));
 fin;
 fin;


define-nueva-instruccion simetria(n) como inicio
si junto-a-zumbador entonces inicio
prepara;
resta(n);
fin;

si derecha-libre entonces inicio
gira(3);
avanza;
simetria(sucede(n));
fin;
si frente-bloqueado entonces inicio
gira(1);
simetria(sucede(n));
fin;
si derecha-bloqueada y frente-libre entonces inicio
avanza;
simetria(sucede(n));
fin;
fin;

define-nueva-instruccion lml  como inicio
si ningun-zumbador-en-la-mochila entonces apagate;
si algun-zumbador-en-la-mochila entonces deja-zumbador;

 mientras frente-libre hacer avanza;
 gira(1);
 fin;


    inicia-ejecucion
    lml;
    simetria(0);
        apagate;
    termina-ejecucion
finalizar-programa
