iniciar-programa
    define-nueva-instruccion gira-derecha como
        repetir 3 veces gira-izquierda;

    define-nueva-instruccion vuelta como
        repetir 2 veces gira-izquierda;

    define-nueva-instruccion orientar-al-norte como
        mientras no-orientado-al-norte hacer gira-izquierda;

    define-nueva-instruccion orientar-al-sur como
        mientras no-orientado-al-sur hacer gira-izquierda;

    define-nueva-instruccion orientar-al-oeste como
        mientras no-orientado-al-oeste hacer gira-izquierda;

    define-nueva-instruccion orientar-al-este como
        mientras no-orientado-al-este hacer gira-izquierda;

    define-nueva-instruccion divide como inicio
        si algun-zumbador-en-la-mochila entonces inicio
            repetir 2 veces deja-zumbador;
            divide;
            coge-zumbador;
        fin;
    fin;

    define-nueva-instruccion compara(p) como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            compara(sucede(p));
            sal-de-instruccion;
        fin
        sino inicio
            gira-izquierda;
            avanza;
            gira-izquierda;
            avanza;
            si junto-a-zumbador entonces inicio
                repetir p veces inicio
                    si junto-a-zumbador entonces inicio
                        coge-zumbador;
                    fin
                    sino inicio
                        orientar-al-norte;
                        avanza;
                        deja-zumbador;
                        vuelta;
                        avanza;
                        vuelta;
                    fin;
                fin;
                si junto-a-zumbador entonces inicio
                    mientras junto-a-zumbador hacer coge-zumbador;
                    repetir p veces deja-zumbador;
                    orientar-al-norte;
                    avanza;
                    mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
                    compara(0);
                fin
                sino
                    si orientado-al-norte entonces inicio
                        divide;
                        avanza;
                        mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
                        compara(0);
                    fin
                    sino
                        si no-junto-a-zumbador entonces inicio
                            repetir p veces deja-zumbador;
                            orientar-al-norte;
                            avanza;
                            mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
                            compara(0);
                        fin;
                    fin;
            fin;
            fin;


    inicia-ejecucion
        mientras junto-a-zumbador hacer coge-zumbador;
        orientar-al-norte;
        avanza;
        mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
        orientar-al-sur;
        avanza;
        orientar-al-este;
        avanza;
        avanza;
        mientras junto-a-zumbador hacer avanza;
        vuelta;
        avanza;
        mientras junto-a-zumbador hacer coge-zumbador;
        orientar-al-norte;
        avanza;
        mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
        mientras junto-a-zumbador hacer inicio
            compara(0);
            gira-izquierda;
            avanza;
            mientras junto-a-zumbador hacer avanza;
            mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
            vuelta;
            avanza;
            mientras junto-a-zumbador hacer coge-zumbador;
            orientar-al-norte;
            avanza;
            mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
        fin;
        apagate;
    termina-ejecucion
finalizar-programa
