iniciar-programa
Define-Nueva-Instruccion GiraDerecha Como
Inicio
    Repetir 3 Veces
        Gira-Izquierda;
Fin;

Define-Nueva-Instruccion MediaVuelta Como
Inicio
    Repetir 2 Veces
        Gira-Izquierda;
Fin;

Define-Nueva-Instruccion Acomoda Como
Inicio
    Avanza;
    Repetir 3 veces
        Gira-Izquierda;
    Repetir 8 veces
        Avanza;
    Gira-Izquierda;
Fin;

Define-Nueva-Instruccion Cuenta Como
Inicio
    Mientras junto-a-Zumbador Hacer
     Inicio
         Repetir 10 veces
          Si Junto-a-Zumbador Entonces
             Coge-Zumbador
          Sino
           Inicio
            Si Algun-Zumbador-en-la-Mochila Entonces
             Inicio
               Mientras Algun-Zumbador-en-la-Mochila Hacer Deja-Zumbador;
               MediaVuelta;
               Avanza;
               Avanza;
             Fin;
           Fin;
         Si No-Junto-a-Zumbador y Orientado-al-Sur Entonces
          Inicio
              MediaVuelta;
              Avanza;
              Mientras Algun-Zumbador-en-la-Mochila Hacer Deja-Zumbador;
              Coge-Zumbador;
              MediaVuelta;
              Avanza;
              GiraDerecha;
              Avanza;
              Deja-Zumbador;
              MediaVuelta;
              Avanza;
              GiraDerecha;
          Fin;

         Si No-Junto-a-Zumbador y Orientado-al-Norte Entonces
          Inicio
              MediaVuelta;
              Avanza;
              Avanza;
              GiraDerecha;
              Avanza;
              Gira-Izquierda;
          Fin;

         Si No-Junto-a-Zumbador Entonces
          Inicio
            Mientras Algun-Zumbador-en-la-Mochila Hacer
                  Deja-Zumbador;
              GiraDerecha;
              Avanza;
              Gira-Izquierda;
          Fin
           Sino
            Inicio
             MediaVuelta;
             Avanza;
             Mientras Algun-Zumbador-en-la-Mochila Hacer
                 Deja-Zumbador;
             Si Junto-a-Zumbador Entonces Coge-Zumbador;
             MediaVuelta;
             avanza;
             GiraDerecha;
             Avanza;
             Si Algun-Zumbador-en-la-Mochila Entonces Deja-Zumbador;
             MediaVuelta;
             Avanza;
             GiraDerecha;
            Fin;
     Fin;
Fin;

Define-Nueva-Instruccion Suma como
Inicio
  Mientras Junto-a-Zumbador Hacer
   Inicio
    Mientras Junto-a-Zumbador Hacer
        Avanza;
    MediaVuelta;
    Mientras Frente-Libre Hacer
     Inicio
         Mientras Junto-a-Zumbador Hacer
             Coge-Zumbador;
         Avanza;
     Fin;
    Mientras Algun-Zumbador-en-la-Mochila Hacer
        Deja-Zumbador;
    GiraDerecha;
    Avanza;
    GiraDerecha;
   Fin;
   GiraDerecha;
   Avanza;
   Mientras Junto-a-Zumbador Hacer
       Avanza;
   MediaVuelta;
   Avanza;
   Gira-Izquierda;
Fin;

    inicia-ejecucion
    Acomoda;
    Suma;
    Cuenta;
        apagate;
    termina-ejecucion
finalizar-programa
