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
repetir a veces deja-zumbador;
avanza;
mientras junto-a-zumbador hacer avanza;
repetir a veces deja-zumbador;
repetir 2 veces gira-izquierda;
mientras frente-libre hacer avanza;
repetir 3 veces gira-izquierda;
mientras frente-libre hacer avanza;
repetir 2 veces gira-izquierda;
fin;
fin;
fin;
define-nueva-instruccion pasa(a) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
pasa(sucede(a));
si no junto-a-zumbador entonces inicio
mientras frente-libre hacer avanza;
repetir a veces deja-zumbador;
repetir 2 veces gira-izquierda;
fin;
fin;
fin;
define-nueva-instruccion pasa1(a) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
pasa1(sucede(a));
si no junto-a-zumbador entonces inicio
repetir a veces deja-zumbador;
mientras frente-libre hacer avanza;
repetir a veces deja-zumbador;
repetir 2 veces gira-izquierda;
fin;
fin;
fin;
define-nueva-instruccion ultima(a) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
ultima(sucede(a));
si no junto-a-zumbador entonces inicio
repetir a veces deja-zumbador;
mientras frente-libre hacer avanza;
gira-izquierda;
avanza;
repetir a veces deja-zumbador;

fin;
fin;
fin;




    inicia-ejecucion
    mientras no orientado-al-sur hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
    avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);

     mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
    avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
    mientras frente-libre hacer inicio
    si junto-a-zumbador entonces inicio                     
    coge-zumbador;
    avanza;
    si junto-a-zumbador entonces inicio
    coge-zumbador;
    repetir 2 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
    fin sino inicio
     mientras no orientado-al-norte hacer gira-izquierda;
     repetir 2 veces avanza;
     repetir 2 veces gira-izquierda;
     pasa(1);
     avanza;
     repetir 2 veces gira-izquierda;
     pasa1(1);
     gira-izquierda;
     avanza;
     repetir 3 veces gira-izquierda;
     mientras junto-a-zumbador hacer coge-zumbador;
     repetir 2 veces avanza;
     repetir 2 veces gira-izquierda;
     pasa(1);
     gira-izquierda;
     mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
    avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
     fin;
     fin sino inicio
     avanza;
     si junto-a-zumbador entonces inicio
     repetir 2 veces gira-izquierda;
     avanza;
      repetir 3 veces gira-izquierda;
      repetir 2 veces avanza;
     repetir 2 veces gira-izquierda;
     pasa(1);
     avanza;
     repetir 2 veces gira-izquierda;
     pasa1(1);
     repetir 3 veces gira-izquierda;
     avanza;
      gira-izquierda;
     mientras junto-a-zumbador hacer coge-zumbador;
     repetir 2 veces avanza;
     repetir 2 veces gira-izquierda;
     pasa(1);
     mientras no orientado-al-oeste hacer gira-izquierda;
     avanza;
     repetir 2 veces gira-izquierda;
     mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
    avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
    gato(1);
     fin sino inicio
     mientras no orientado-al-norte hacer gira-izquierda;
     repetir 2 veces avanza;
     repetir 2 veces gira-izquierda;
     ultima(1);
     apagate;
     fin;
     fin;
     fin;






















        apagate;
    termina-ejecucion
finalizar-programa
