iniciar-programa
define-nueva-instruccion gira(n) como
inicio
repetir n veces
gira-izquierda;
fin;
define-nueva-instruccion ubicate como
inicio
si orientado-al-este entonces gira(2);
si orientado-al-sur entonces gira(3);
si orientado-al-oeste entonces gira(4);
si orientado-al-norte entonces gira(1);
mientras frente-libre hacer
inicio
avanza;
fin;
gira(1);
mientras frente-libre hacer
inicio
avanza;
fin;
gira(1);
fin;
define-nueva-instruccion checa como
inicio
si junto-a-zumbador entonces
inicio
coge-zumbador;
fin;
si junto-a-zumbador entonces
inicio
coge-zumbador;
fin
sino
inicio
deja-zumbador;
sal-de-instruccion;
fin;
si junto-a-zumbador entonces
inicio
coge-zumbador;
deja-zumbador;
deja-zumbador;
deja-zumbador;
apagate;
fin
sino
inicio
deja-zumbador;
deja-zumbador;
sal-de-instruccion;
fin;
fin;
define-nueva-instruccion go1 como
inicio
mientras frente-libre hacer
inicio
si junto-a-zumbador entonces
inicio
checa;
fin;
avanza;
fin;
si frente-bloqueado y orientado-al-este entonces
inicio
gira(1);
si junto-a-zumbador entonces
inicio
checa;
fin;
si frente-libre entonces
inicio
avanza;
fin
sino
inicio
sal-de-instruccion
fin;
gira(1);
fin;
fin;
define-nueva-instruccion go2 como
inicio
mientras frente-libre hacer
inicio
si junto-a-zumbador entonces
inicio
checa;
fin;
avanza;
fin;
si frente-bloqueado y orientado-al-oeste entonces
inicio
gira(3);
si junto-a-zumbador entonces
inicio
checa;
fin;
si frente-libre entonces
inicio
avanza;
fin
sino
inicio
sal-de-instruccion;
fin;
gira(3);
fin;
fin;
    inicia-ejecucion
    ubicate;
    mientras frente-libre o (izquierda-libre o derecha-libre) hacer
    inicio
    go1;
    go2;
    fin;
        apagate;
    termina-ejecucion
finalizar-programa
