iniciar-programa
define-nueva-instruccion gira(n) como inicio
repetir n veces gira-izquierda;
fin;
define-nueva-instruccion erosiona(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
erosiona(sucede(n));
fin
sino inicio
repetir n veces inicio
mientras algun-zumbador-en-la-mochila hacer inicio
si orientado-al-oeste entonces inicio
mientras no-junto-a-zumbador hacer inicio
avanza;
fin;
gira(3);
fin;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
si no-junto-a-zumbador entonces inicio
gira(1);
avanza;
si junto-a-zumbador entonces inicio
gira(2);
avanza;
gira(1);
fin
sino inicio
gira(2);
avanza;
deja-zumbador;
gira(1);
fin;
fin
sino inicio
gira(1);
avanza;
gira(1);
avanza;
si junto-a-zumbador entonces inicio
gira(1);
avanza;
gira(1);
fin
sino inicio
gira(1);
avanza;
gira(2);
fin;
fin;

fin
sino inicio
gira(1);
mientras no-junto-a-zumbador y frente-libre hacer inicio
avanza;
fin;
gira(3);
fin;

si no-junto-a-zumbador y izquierda-libre entonces inicio
gira(2);
avanza;
gira(3);
mientras junto-a-zumbador hacer inicio
avanza;
fin;
gira(1);
avanza;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
gira(3);
mientras frente-libre hacer inicio
avanza;
fin;
gira(1);
avanza;
deja-zumbador;
gira(2);
avanza;
coge-zumbador;
avanza;
gira(3);

fin;
fin;
si no-junto-a-zumbador entonces inicio
mientras no-orientado-al-este hacer inicio
gira(1);
fin;
avanza;
gira(3);
mientras no-junto-a-zumbador hacer inicio
avanza;
fin;
si junto-a-zumbador entonces inicio
coge-zumbador;
fin;

gira(1);
avanza;
gira(3);
mientras frente-libre hacer inicio
avanza;
fin;
deja-zumbador;
gira(3);
avanza;
avanza;
gira(3);
fin;

fin;
si orientado-al-este entonces inicio

si junto-a-zumbador entonces inicio
gira(1);
avanza;
si junto-a-zumbador entonces inicio
gira(2);
avanza;
gira(1);
fin
sino inicio
gira(2);
avanza;
gira(1);
coge-zumbador;
fin;
si no-junto-a-zumbador entonces inicio
gira(1);
avanza;
gira(1);
mientras no-junto-a-zumbador y frente-libre hacer inicio
avanza;
fin;

gira(1);
avanza;
gira(1);
avanza;
gira(1);
fin;
si no-junto-a-zumbador entonces inicio
gira(1);
avanza;
gira(3);
fin;
si orientado-al-este entonces inicio
gira(1);
fin;
mientras junto-a-zumbador hacer inicio
avanza;
fin;
gira(1);
si frente-libre entonces inicio
avanza;
fin;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
gira(3);
mientras no-junto-a-zumbador y frente-libre hacer inicio
avanza;
fin;
gira(2);
si junto-a-zumbador entonces inicio
avanza;
fin;
deja-zumbador;
gira(2);
mientras frente-libre hacer inicio
avanza;
fin;
coge-zumbador;
gira(3);
avanza;
gira(3);
fin;
fin;

fin;
si no-junto-a-zumbador entonces inicio
mientras no-orientado-al-este hacer inicio
gira(1);
fin;
avanza;
gira(3);
mientras frente-libre hacer inicio
avanza;
fin;
gira(3);
avanza;
gira(3);
fin;

fin;
si orientado-al-norte y junto-a-zumbador y izquierda-libre entonces inicio
avanza;
si no-junto-a-zumbador entonces inicio
gira(2);
avanza;
gira(2);
mientras junto-a-zumbador hacer inicio
avanza;
fin;
gira(1);
si frente-libre entonces inicio
avanza;
fin;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
si junto-a-zumbador entonces inicio
gira(3);
avanza;
gira(3);
mientras no-junto-a-zumbador y frente-libre hacer inicio
avanza;
fin;
gira(2);
si junto-a-zumbador entonces inicio
avanza;
fin;
deja-zumbador;
gira(2);
mientras frente-libre hacer inicio
avanza;
fin;
coge-zumbador;
gira(3);
avanza;
gira(3);
fin
sino inicio
gira(2);
mientras frente-libre hacer inicio
avanza;                                                             
fin;
gira(2);
fin;
fin
sino inicio
gira(1);
avanza;
gira(2);
fin;
fin
sino inicio
gira(2);
avanza;
gira(2);
fin;
fin;
si no-junto-a-zumbador y izquierda-libre entonces inicio
gira(1);
avanza;
gira(3);
fin;
si izquierda-bloqueada entonces inicio
deja-zumbador;
gira(3);
mientras frente-libre hacer inicio
avanza;
fin;
gira(2);
fin;
fin;

fin;

fin;
fin;





    inicia-ejecucion
    gira(3);
    mientras frente-libre hacer inicio
    avanza;
    fin;
    gira(2);
    mientras algun-zumbador-en-la-mochila hacer inicio
    deja-zumbador;
    fin;
    erosiona(0);
    mientras frente-libre hacer inicio
    avanza;
    fin;
    mientras junto-a-zumbador hacer inicio
    coge-zumbador;
    fin;
        apagate;
    termina-ejecucion
finalizar-programa

