iniciar-programa



define-nueva-instruccion cuenta como inicio
mientras junto-a-zumbador hacer inicio
mientras junto-a-zumbador hacer coge-zumbador;
mientras no-orientado-al-sur hacer gira-izquierda;
si frente-libre entonces avanza;
mientras no orientado-al-este hacer gira-izquierda;
si no junto-a-zumbador entonces inicio
mientras no-orientado-al-este hacer gira-izquierda;
mientras frente-libre y no-junto-a-zumbador  hacer avanza;
mientras junto-a-zumbador hacer coge-zumbador;
 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;
 mientras no-orientado-al-norte hacer gira-izquierda;
 si frente-libre entonces avanza;
mientras frente-libre y no-junto-a-zumbador hacer avanza;
 mientras no-orientado-al-sur hacer gira-izquierda;
 si frente-libre entonces avanza;
 mientras no orientado-al-este hacer gira-izquierda;
 mientras frente-libre y no-junto-a-zumbador hacer avanza;
 fin
 sino inicio
 si junto-a-zumbador entonces sal-de-instruccion;
 fin;
 fin;
 fin;



define-nueva-instruccion   tor(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
tor(sucede(n));
fin
sino inicio
 si frente-libre entonces avanza ;
 si frente-libre entonces avanza ;
 mientras no-orientado-al-este hacer gira-izquierda;
 mientras frente-libre y no junto-a-zumbador hacer avanza;
 mientras junto-a-zumbador hacer coge-zumbador;
 repetir n veces deja-zumbador;
 fin;
 fin;
define-nueva-instruccion   conejo(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
conejo(sucede(n));
fin
sino inicio
 si frente-libre entonces avanza ;
 si frente-libre entonces avanza ;
 repetir n veces deja-zumbador;
 mientras no orientado-al-este hacer gira-izquierda;
 fin;
 fin;
define-nueva-instruccion   paso(n) como inicio
si frente-libre entonces inicio
  si junto-a-zumbador entonces inicio
  coge-zumbador;
  paso(sucede(n));
  fin
  sino inicio
  si no junto-a-zumbador  entonces inicio
   repetir n veces deja-zumbador;
   fin;
   repetir n veces inicio
   si frente-libre entonces avanza;
   fin;
si no junto-a-zumbador  entonces inicio
   repetir n veces deja-zumbador;
   fin;
   paso(0);
   fin;
      fin;
      fin;
    inicia-ejecucion
    mientras frente-libre y no junto-a-zumbador hacer avanza;
    tor(0);
    mientras no orientado-al-oeste hacer gira-izquierda;
    mientras frente-libre hacer avanza;
      mientras no orientado-al-sur hacer gira-izquierda;
    mientras frente-libre y no junto-a-zumbador hacer avanza;
    mientras no orientado-al-norte hacer gira-izquierda;
       conejo(0);
       paso(0);
         mientras no orientado-al-sur hacer gira-izquierda;
         si frente-libre entonces avanza;
         mientras no orientado-al-oeste hacer gira-izquierda;
    mientras frente-libre y no junto-a-zumbador hacer avanza;
    mientras no orientado-al-este hacer gira-izquierda;
    paso(0);
    mientras no orientado-al-oeste hacer gira-izquierda;
       mientras frente-libre y  junto-a-zumbador hacer avanza;
       mientras no orientado-al-norte hacer gira-izquierda;
       si frente-libre entonces avanza;
       mientras no orientado-al-oeste hacer gira-izquierda;
       mientras frente-libre hacer  avanza;
        mientras no orientado-al-norte hacer gira-izquierda;
       si frente-libre entonces avanza;
       deja-zumbador;
        mientras no orientado-al-sur hacer gira-izquierda;
       si frente-libre entonces avanza;
       mientras no orientado-al-este hacer gira-izquierda;
       cuenta;
        apagate;
    termina-ejecucion
finalizar-programa
