iniciar-programa
define-nueva-instruccion comienza como inicio
    mientras no-orientado-al-norte hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 2 veces gira-izquierda;
fin;

define-nueva-instruccion salto como inicio
    repetir 3 veces gira-izquierda;
    si frente-libre entonces inicio
        avanza;
        repetir 3 veces gira-izquierda;
        mientras frente-libre hacer avanza;
        repetir 2 veces gira-izquierda;
    fin sino inicio
        apagate;
    fin;
fin;

define-nueva-instruccion comp2 como inicio

    si junto-a-zumbador entonces inicio
        coge-zumbador;
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                 si junto-a-zumbador entonces inicio
                    coge-zumbador;
                    si junto-a-zumbador entonces inicio
                        coge-zumbador;
                        si junto-a-zumbador entonces inicio
                            coge-zumbador;
                            si junto-a-zumbador entonces inicio
                                coge-zumbador;
                                si junto-a-zumbador entonces inicio
                                    coge-zumbador;
                                    si junto-a-zumbador entonces inicio
                                       repetir 8 veces deja-zumbador;
                                    fin;
                                fin sino inicio
                                    repetir 8 veces deja-zumbador;
                                fin;
                            fin sino inicio
                                repetir 7 veces deja-zumbador;
                            fin;
                        fin sino inicio
                            repetir 6 veces deja-zumbador;
                        fin;
                    fin sino inicio
                        repetir 5 veces deja-zumbador;
                    fin;
                fin sino inicio
                    repetir 4 veces deja-zumbador;
                fin;
            fin sino inicio
                repetir 3 veces deja-zumbador;
            fin;
        fin sino inicio
            repetir 2 veces deja-zumbador;
        fin;
    fin sino inicio
        deja-zumbador;
    fin;

fin;

define-nueva-instruccion mina como inicio
repetir 2 veces gira-izquierda;

si frente-libre entonces inicio
    avanza;
    comp2;
    gira-izquierda;
    si frente-libre entonces inicio
        avanza;
        comp2;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
    fin;
    repetir 2 veces gira-izquierda;
    si frente-libre entonces inicio
        avanza;
        comp2;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
    fin;
    repetir 3 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
fin;

repetir 3 veces gira-izquierda;
si frente-libre entonces inicio
    avanza;
    comp2;
    repetir 2 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
fin;
repetir 2 veces gira-izquierda;

si frente-libre entonces inicio
    avanza;
    comp2;
    repetir 2 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
fin;

gira-izquierda;
si frente-libre entonces inicio
    avanza;
    comp2;
    gira-izquierda;
    si frente-libre entonces inicio
        avanza;
        comp2;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
    fin;
    repetir 2 veces gira-izquierda;
    si frente-libre entonces inicio
        avanza;
        comp2;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
    fin;
    repetir 3 veces gira-izquierda;
    avanza;
    repetir 2 veces gira-izquierda;
fin;



fin;

define-nueva-instruccion comp como inicio

    si junto-a-zumbador entonces inicio
        coge-zumbador;
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                 si junto-a-zumbador entonces inicio
                    coge-zumbador;
                    si junto-a-zumbador entonces inicio
                        coge-zumbador;
                        si junto-a-zumbador entonces inicio
                            coge-zumbador;
                            si junto-a-zumbador entonces inicio
                                coge-zumbador;
                                si junto-a-zumbador entonces inicio
                                    coge-zumbador;
                                    si junto-a-zumbador entonces inicio
                                       repetir 8 veces deja-zumbador;
                                       mina;
                                    fin;
                                fin sino inicio
                                    repetir 7 veces deja-zumbador;
                                fin;
                            fin sino inicio
                                repetir 6 veces deja-zumbador;
                            fin;
                        fin sino inicio
                            repetir 5 veces deja-zumbador;
                        fin;
                    fin sino inicio
                        repetir 4 veces deja-zumbador;
                    fin;
                fin sino inicio
                    repetir 3 veces deja-zumbador;
                fin;
            fin sino inicio
                repetir 2 veces deja-zumbador;
            fin;
        fin sino inicio
            repetir 1 veces deja-zumbador;
        fin;
    fin;

fin;

define-nueva-instruccion buscar como inicio
    si no-junto-a-zumbador entonces inicio
       si frente-libre entonces inicio
           avanza;
           buscar;
       fin sino inicio
           salto;
           buscar;
       fin;
    fin sino inicio
       comp;
       si frente-libre entonces inicio
           avanza;
       fin sino inicio
           salto;
           buscar;
       fin;
       buscar;
    fin;
fin;

    inicia-ejecucion
    comienza;
    buscar;
        apagate;
    termina-ejecucion
finalizar-programa
