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

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


define-nueva-instruccion linea como
inicio
mientras frente-libre hacer
inicio
mientras junto-a-zumbador hacer
coge-zumbador;
si frente-libre entonces
avanza;
fin;
si frente-bloqueado entonces
mientras junto-a-zumbador hacer
coge-zumbador;
si orientado-al-norte entonces
inicio
gira-derecha;
si frente-libre entonces
inicio
avanza;
gira-derecha;

fin;
fin
sino
inicio
gira-izquierda;
si frente-libre entonces
inicio
avanza;
gira-izquierda;
fin;
fin;
fin;

define-nueva-instruccion todo como
inicio
mientras no-orientado-al-este hacer
linea;
fin;

define-nueva-instruccion esquina como
inicio
gira-derecha;
mientras frente-libre hacer
avanza;
si frente-bloqueado entonces
gira-derecha;
mientras frente-libre hacer
avanza;
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
fin;

inicia-ejecucion
todo;
esquina;
        apagate;
    termina-ejecucion
finalizar-programa
