iniciar-programa
define-nueva-instruccion gato(a) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
gato(sucede(a));
si no junto-a-zumbador entonces inicio
mientras no orientado-al-oeste hacer gira-izquierda;
mientras frente-libre hacer avanza;
mientras no orientado-al-sur hacer gira-izquierda;
mientras frente-libre hacer avanza;
 gira-izquierda;
si frente-libre entonces repetir a veces avanza;
deja-zumbador;
repetir 2 veces gira-izquierda;
fin;
fin;
fin;

define-nueva-instruccion g2 como inicio
si frente-libre o junto-a-zumbador entonces inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
si junto-a-zumbador entonces inicio
coge-zumbador;
si frente-libre entonces avanza;
g2;

fin sino inicio
si frente-libre entonces avanza;
g2;
mientras no orientado-al-oeste hacer gira-izquierda;
mientras frente-libre hacer avanza;
deja-zumbador;
fin;
fin;
si no junto-a-zumbador entonces inicio
si frente-libre entonces avanza;
g2;
fin;
fin;
fin;







    inicia-ejecucion
    mientras no orientado-al-norte hacer gira-izquierda;
    si frente-libre entonces avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 2 veces gira-izquierda;
    mientras frente-libre o junto-a-zumbador hacer inicio
    si junto-a-zumbador entonces inicio
    si junto-a-zumbador entonces gato(0);
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    si frente-libre entonces avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 2 veces gira-izquierda;
    fin;
    si frente-libre entonces avanza;
    si junto-a-zumbador entonces inicio
    si junto-a-zumbador entonces gato(0);
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    si frente-libre entonces avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 2 veces gira-izquierda;
    fin;
    si frente-bloqueado entonces inicio
    repetir 3 veces gira-izquierda;
    si frente-libre entonces inicio
    si frente-libre entonces avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 2 veces gira-izquierda;
    fin;
    fin;
    fin;
    repetir 2 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    g2;







        apagate;
    termina-ejecucion
finalizar-programa
