iniciar-programa
define-nueva-instruccion re como inicio
si frente-libre y junto-a-zumbador entonces inicio
coge-zumbador;
avanza;
re;
fin;
si no-junto-a-zumbador y frente-libre entonces inicio
avanza;
re;
fin;
si frente-bloqueado y junto-a-zumbador entonces
coge-zumbador;
mientras no-orientado-al-oeste hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
fin;
define-nueva-instruccion deja como inicio
mientras frente-libre hacer
avanza;
mientras no-orientado-al-sur hacer
gira-izquierda;
si no-junto-a-zumbador y frente-libre entonces
avanza;
re;
fin;
define-nueva-instruccion cuenta(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
cuenta(sucede(n));
fin
sino inicio
mientras frente-libre hacer
avanza;
mientras no-orientado-al-sur hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras no-orientado-al-norte hacer
gira-izquierda;
repetir precede(n) veces
avanza;
si algun-zumbador-en-la-mochila entonces
deja-zumbador;
mientras frente-libre hacer
avanza;
mientras no-orientado-al-oeste hacer
gira-izquierda;
si frente-libre entonces
avanza;
mientras no-junto-a-zumbador y frente-libre hacer
avanza;
mientras frente-bloqueado y derecha-bloqueada y no-junto-a-zumbador y algun-zumbador-en-la-mochila hacer inicio
mientras no-orientado-al-sur hacer
gira-izquierda;
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
repetir 2 veces
gira-izquierda;
avanza;
mientras no-orientado-al-este hacer
gira-izquierda;
si frente-libre entonces
avanza;
fin;
mientras no-orientado-al-este hacer
gira-izquierda;
fin;
fin;
define-nueva-instruccion come como inicio
mientras junto-a-zumbador y frente-libre hacer inicio
coge-zumbador;
avanza;
fin;
mientras izquierda-bloqueada y derecha-bloqueada hacer inicio
mientras no-orientado-al-sur hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras no-orientado-al-oeste hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
deja-zumbador;
apagate;
fin;
si frente-bloqueado y junto-a-zumbador entonces
coge-zumbador;
si no-junto-a-zumbador entonces inicio
mientras frente-libre hacer
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
fin;
mientras no-orientado-al-sur hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras no-orientado-al-este hacer
gira-izquierda;
mientras no-junto-a-zumbador y frente-libre hacer
avanza;
mientras junto-a-zumbador hacer inicio
mientras no-orientado-al-norte hacer
gira-izquierda;
come;
fin;
fin;
inicia-ejecucion
mientras no-orientado-al-este hacer
gira-izquierda;
mientras frente-libre y no-junto-a-zumbador hacer
avanza;
mientras no-orientado-al-norte hacer
gira-izquierda;
come;
mientras no-orientado-al-norte hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras no-orientado-al-este hacer
gira-izquierda;
mientras frente-libre hacer
avanza;
mientras junto-a-zumbador hacer
cuenta(0);
deja;
apagate;
termina-ejecucion
finalizar-programa