iniciar-programa
define-nueva-instruccion ini como inicio
    mientras no-orientado-al-sur hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras junto-a-zumbador hacer avanza;
    repetir 2 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
fin;

define-nueva-instruccion cuenta como inicio
   si frente-libre entonces inicio

   si no-junto-a-zumbador entonces inicio
        repetir 2 veces gira-izquierda;
        avanza;
        cuenta;
   fin sino inicio
      avanza;
      cuenta;
      deja-zumbador;
    fin;

    fin sino inicio
       gira-izquierda;
       mientras junto-a-zumbador hacer avanza;

    fin;
                             
fin;



define-nueva-instruccion compara1 como inicio
        repetir 3 veces gira-izquierda;
        avanza;
            si junto-a-zumbador entonces inicio
                gira-izquierda;
                avanza;
                    si no-junto-a-zumbador entonces inicio
                        cuenta;
                       fin sino inicio
                       gira-izquierda;
                       avanza;
                       gira-izquierda;
                         mientras frente-libre hacer avanza;
                        repetir 2 veces gira-izquierda;
                        mientras junto-a-zumbador hacer avanza;
                    repetir 2 veces gira-izquierda;
                       avanza;
                        repetir 2 veces gira-izquierda;
                    fin;
                fin sino inicio
                repetir 3 veces gira-izquierda;
                mientras no-junto-a-zumbador hacer avanza;
                repetir 2 veces gira-izquierda;

            fin;
fin;

define-nueva-instruccion compara2 como inicio
        gira-izquierda;
        avanza;
            si junto-a-zumbador entonces inicio
                repetir 3 veces gira-izquierda;
                avanza;
                    si no-junto-a-zumbador entonces inicio
                        cuenta;
                         fin sino inicio
                         repetir 3 veces gira-izquierda;
                         avanza;
                         repetir 3 veces gira-izquierda;
                        mientras frente-libre hacer avanza;
                        repetir 2 veces gira-izquierda;
                         mientras junto-a-zumbador hacer avanza;
                        repetir 2 veces gira-izquierda;
                       avanza;
                        repetir 2 veces gira-izquierda;
                    fin;
            fin sino inicio
                gira-izquierda;
                mientras no-junto-a-zumbador hacer avanza;
                repetir 2 veces gira-izquierda;
            fin;
fin;






define-nueva-instruccion suma1(a) como inicio
     si junto-a-zumbador entonces inicio
         coge-zumbador;
         suma1(sucede(a));
     fin sino inicio
         repetir a veces deja-zumbador;
          repetir a veces inicio
          avanza;
          deja-zumbador;
         fin;
          repetir precede(a) veces deja-zumbador;
     fin;
fin;







   inicia-ejecucion
   ini;
    mientras junto-a-zumbador y no-orientado-al-este hacer inicio
         suma1(0);
            si izquierda-bloqueada entonces inicio
                compara1;
            fin sino inicio
                compara2;
            fin;

    fin;





        apagate;
    termina-ejecucion
finalizar-programa
