iniciar-programa
define-nueva-instruccion derecha como
repetir 3 veces
gira-izquierda;

define-nueva-instruccion vuelta como
repetir 2 veces
gira-izquierda;

define-nueva-instruccion reco como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
reco;
fin
sino inicio
si frente-libre entonces inicio
avanza;
reco;
fin
sino inicio
vuelta;
mientras frente-libre hacer
avanza;
gira-izquierda;
si frente-libre entonces inicio
avanza;
gira-izquierda;
reco;
fin
sino inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
fin;
fin;
fin;
fin;

define-nueva-instruccion div como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
coge-zumbador;
div;
deja-zumbador;
fin;
fin;

define-nueva-instruccion compara(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
compara(sucede(n));
fin
sino inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
avanza;
gira-izquierda;
repetir 6 veces
avanza;
gira-izquierda;
avanza;
repetir n veces
si junto-a-zumbador entonces inicio
coge-zumbador;
fin
sino inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
repetir 4 veces
sal-de-instruccion;
mientras no orientado-al-norte hacer
gira-izquierda;
fin;
si junto-a-zumbador entonces inicio
si junto-a-zumbador y orientado-al-sur entonces inicio
    derecha;
    avanza;
    mientras algun-zumbador-en-la-mochila hacer
    deja-zumbador;
    vuelta;
    avanza;
    derecha;
    mientras junto-a-zumbador hacer
    coge-zumbador;
    vuelta;
    avanza;
    gira-izquierda;
    mientras frente-libre hacer
    avanza;
    gira-izquierda;
    mientras frente-libre hacer
    avanza;
    mientras algun-zumbador-en-la-mochila hacer
    deja-zumbador;
    div;
    apagate;
    fin;
fin
sino inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
apagate;
fin;
fin;
fin;


define-nueva-instruccion paracom(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
paracom(sucede(n));
fin
sino inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
avanza;
derecha;
repetir 6 veces
avanza;
derecha;
avanza;
repetir n veces
si junto-a-zumbador entonces inicio
coge-zumbador;
fin;
si junto-a-zumbador y orientado-al-sur entonces inicio
derecha;
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
vuelta;
avanza;
derecha;
mientras junto-a-zumbador hacer
coge-zumbador;
vuelta;
avanza;
gira-izquierda;
mientras frente-libre hacer
avanza;
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
div;
apagate;
fin;
fin;
fin;



    inicia-ejecucion
    repetir 5 veces
    avanza;
    derecha;
    avanza;
    derecha;
    avanza;
    vuelta;
    reco;
    gira-izquierda;
    avanza;
    derecha;
    repetir 3 veces
    avanza;
    derecha;
    avanza;
    vuelta;
    reco;

    gira-izquierda;
    compara(0);
    mientras no orientado-al-norte hacer
    gira-izquierda;
    paracom(0);



        apagate;
    termina-ejecucion
finalizar-programa
