iniciar-programa
define-nueva-instruccion gira(n) como
inicio
repetir n veces gira-izquierda;
fin;
define-nueva-instruccion busca como
inicio
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;

si junto-a-zumbador entonces inicio
coge-zumbador;
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;
fin;
si frente-libre entonces avanza;
si frente-bloqueado y orientado-al-norte y derecha-libre entonces inicio
gira(3);  si junto-a-zumbador entonces inicio
coge-zumbador;
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;
fin;
avanza;

gira(3);
fin;
si frente-bloqueado y orientado-al-sur y izquierda-libre entonces inicio
gira(1);
si junto-a-zumbador entonces inicio
coge-zumbador;
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;
fin;
avanza;
gira(1);
fin;
si frente-bloqueado y orientado-al-sur y izquierda-bloqueada entonces
inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;
fin;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
fin;
si frente-bloqueado y orientado-al-norte y derecha-bloqueada entonces
inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
si no-junto-a-zumbador entonces
inicio
repetir 100 veces deja-zumbador;
apagate;
fin;
fin;
gira(2);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
fin;
busca;
fin;

    inicia-ejecucion
    mientras no-orientado-al-sur hacer gira(1);
    mientras frente-libre hacer avanza;
    gira(3);
    mientras frente-libre hacer avanza;
    gira(3);

    busca;
        apagate;
    termina-ejecucion
finalizar-programa

