iniciar-programa
    define-nueva-instruccion deja (a) como inicio
        repetir a veces inicio
            deja-zumbador;
        fin;
    fin;
    define-nueva-instruccion gira (s) como inicio
        repetir s veces inicio
            gira-izquierda;
        fin;
    fin;
    define-nueva-instruccion vueltaV como inicio
        si orientado-al-sur entonces inicio
            si izquierda-libre entonces inicio
                gira-izquierda;
                avanza;
                gira-izquierda;
            fin;
        fin
        sino inicio
            si derecha-libre entonces inicio
                gira (3);
                avanza;
                gira (3);
            fin;
        fin;
    fin;
    define-nueva-instruccion vueltaH como inicio
        si orientado-al-este entonces inicio
            si izquierda-libre entonces inicio
                gira-izquierda;
                avanza;
                gira-izquierda;
            fin;
        fin
        sino inicio
            si derecha-libre entonces inicio
                gira (3);
                avanza;
                gira (3);
            fin;
        fin;
    fin;
    define-nueva-instruccion ubica1 como inicio
        mientras no-orientado-al-oeste hacer inicio
            gira-izquierda;
        fin;
        mientras frente-libre hacer inicio
            avanza;
        fin;
        gira-izquierda;
        mientras frente-libre hacer inicio
            avanza;
        fin;
        gira (2);
    fin;
    define-nueva-instruccion comprobar como inicio
        coge-zumbador;
        si junto-a-zumbador entonces inicio
            deja-zumbador;
            sal-de-instruccion;
        fin;
        deja-zumbador;
        gira (2);
        si frente-libre entonces inicio
            avanza;
            si no-junto-a-zumbador entonces inicio
                deja (2);
            fin
            sino inicio
                coge-zumbador;
                si junto-a-zumbador entonces inicio
                    deja (2);
                fin;
                deja-zumbador;
            fin;
            gira (2);
            avanza;
        fin
        sino inicio
            gira (2);
        fin;
        si frente-libre entonces inicio
            avanza;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                si junto-a-zumbador entonces inicio
                    deja (2);
                fin;
                deja-zumbador;
            fin
            sino inicio
                deja (2);
            fin;
            gira (2);
            avanza;
            gira (2);
        fin;
    fin;
    define-nueva-instruccion perimetroH como inicio
        si frente-libre entonces inicio
            avanza;
        fin
        sino inicio
            vueltaH;
            si frente-bloqueado entonces inicio
                sal-de-instruccion;
            fin;
        fin;
        si junto-a-zumbador entonces inicio
            comprobar;
        fin;
        perimetroH;
    fin;
    define-nueva-instruccion perimetroV como inicio
        si frente-libre entonces inicio
            avanza;
        fin
        sino inicio
            vueltaV;
            si frente-bloqueado entonces inicio
                sal-de-instruccion;
            fin;
        fin;
        si junto-a-zumbador entonces inicio
            comprobar;
        fin;
        perimetroV;
    fin;
    define-nueva-instruccion arraza como inicio
        si frente-libre entonces inicio
            avanza;
        fin
        sino inicio
            vueltaV;
            si frente-bloqueado entonces inicio
                ubica1;
                sal-de-instruccion;
            fin;
        fin;
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                si junto-a-zumbador entonces inicio
                    coge-zumbador;
                    coge-zumbador;
                    si junto-a-zumbador entonces inicio
                        coge-zumbador;
                        coge-zumbador;
                        si junto-a-zumbador entonces inicio
                            coge-zumbador;
                            coge-zumbador;
                            arraza;
                            deja (4);
                            sal-de-instruccion;
                        fin
                        sino inicio
                            arraza;
                            deja (3);
                            sal-de-instruccion;
                        fin;
                    fin 
                    sino inicio
                        arraza;
                        deja (2);
                        sal-de-instruccion;
                    fin;
                fin
                sino inicio
                    arraza;
                    deja-zumbador;
                    sal-de-instruccion;
                fin;
            fin;
        fin;
        arraza;
    fin;
    inicia-ejecucion
        ubica1;
        gira (3);
        si junto-a-zumbador entonces inicio
            comprobar;
        fin;
        perimetroH;
        ubica1;
        perimetroV;
        ubica1;
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                si no-junto-a-zumbador entonces inicio
                    deja-zumbador;
                fin;
            fin;
        fin;
        arraza;
        apagate;
    termina-ejecucion
finalizar-programa
