iniciar-programa
define-nueva-instruccion gira(n) como
inicio
repetir n veces gira-izquierda;
fin;
define-nueva-instruccion acomoda como
inicio
mientras no-orientado-al-norte hacer gira(1);
mientras frente-libre hacer avanza;
gira(1);
mientras frente-libre hacer avanza;
gira(1);
mientras frente-libre hacer avanza;
gira(2);
fin;
define-nueva-instruccion revisaper(n) como
inicio
repetir n veces
inicio
si no-junto-a-zumbador entonces
sal-de-instruccion;
coge-zumbador;
fin;
si no-junto-a-zumbador entonces
inicio
si frente-libre entonces
avanza;
revisaper(n);
acomoda;
deja-zumbador;
fin
sino
si junto-a-zumbador entonces
inicio

mientras junto-a-zumbador hacer coge-zumbador;
sal-de-instruccion;
fin;
fin;
define-nueva-instruccion final(n) como
inicio
si junto-a-zumbador entonces
inicio
coge-zumbador;
final(sucede(n));
fin
sino
inicio
gira(2);
avanza;
repetir n veces deja-zumbador;
apagate;
fin;
fin;

define-nueva-instruccion revisa(n) como
inicio
repetir n veces
inicio
si no-junto-a-zumbador entonces
inicio
si frente-bloqueado entonces
inicio
acomoda;
gira(3);
avanza;
final(0);
fin;
si frente-libre entonces
inicio
mientras junto-a-zumbador hacer coge-zumbador;
avanza;
revisa(n);
sal-de-instruccion;
fin
sino
acomoda;
fin;
si junto-a-zumbador entonces
coge-zumbador;
fin;
si no-junto-a-zumbador entonces
inicio
si frente-libre entonces
avanza;
revisaper(n);
acomoda;
deja-zumbador;
fin
sino
inicio

mientras junto-a-zumbador hacer coge-zumbador;
si frente-libre entonces
avanza;
revisa(n);
fin;
fin;
define-nueva-instruccion compara(n) como
inicio
si junto-a-zumbador entonces
inicio
coge-zumbador;
gira(3);
si frente-bloqueado entonces
inicio
deja-zumbador;
apagate;
fin;
avanza;
si junto-a-zumbador entonces
inicio
coge-zumbador;
acomoda;
compara(sucede(n));
fin
sino
inicio
acomoda;
compara(sucede(n));
fin;
fin
sino
inicio
gira(3);
avanza;
repetir n veces deja-zumbador;
gira(2);
avanza;
gira(3);
avanza;
fin;
fin;






define-nueva-instruccion cuenta(n) como
inicio
si junto-a-zumbador entonces
inicio
coge-zumbador;
cuenta(sucede(n));
fin
sino
inicio
repetir n veces deja-zumbador;
repetir 4 veces avanza;   (* cambiar a 4 antes de subirlo jiji xD *)
gira(3);
revisa(n);
compara(0);
cuenta(0);
fin;
fin;
    inicia-ejecucion
    acomoda;
    avanza;
    cuenta(0);
        apagate;
    termina-ejecucion
finalizar-programa
