iniciar-programa
    define-nueva-instruccion gira (n) como inicio
        repetir n veces
            gira-izquierda;
    fin;
    define-nueva-instruccion norte como inicio
        mientras no-orientado-al-norte hacer
            gira (1);
    fin;
    define-nueva-instruccion este como inicio
        mientras no-orientado-al-este hacer
            gira (1);
    fin;
    define-nueva-instruccion sur como inicio
        mientras no-orientado-al-sur hacer
            gira (1);
    fin;
    define-nueva-instruccion oeste como inicio
        mientras no-orientado-al-oeste hacer
            gira (1);
    fin;
    define-nueva-instruccion compara (n) como inicio
        si si-es-cero (n) entonces inicio
            mientras junto-a-zumbador hacer
                coge-zumbador;
        fin
        sino inicio
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                compara (precede(n));
                deja-zumbador;
            fin;
        fin;
    fin;
    define-nueva-instruccion busca (n) como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                si junto-a-zumbador entonces inicio
                    compara (n);
                    deja-zumbador;
                    deja-zumbador;
                fin
                sino inicio
                    deja-zumbador;
                    deja-zumbador;
                fin;
            fin
            sino inicio
                repetir n veces
                    deja-zumbador;
                deja-zumbador;
                deja-zumbador;
            fin;
        fin
        sino inicio
            deja-zumbador;
            deja-zumbador;
            norte;
            si frente-libre entonces inicio
                avanza;
                busca (sucede(n));
                sur;
                avanza;
            fin;
            este;
            si frente-libre entonces inicio
                avanza;
                busca (sucede(n));
                oeste;
                avanza;
            fin;
            sur;
            si frente-libre entonces inicio
                avanza;
                busca (sucede(n));
                norte;
                avanza;
            fin;
            oeste;
            si frente-libre entonces inicio
                avanza;
                busca (sucede(n));
                este;
                avanza;
            fin;
            coge-zumbador;
            coge-zumbador;
        fin;
    fin;
    define-nueva-instruccion checa1 (n) como inicio
        si no-junto-a-zumbador entonces inicio
            si frente-libre entonces inicio
                avanza;
                checa1 (sucede(n));
            fin
            sino inicio
                sur;
                avanza;
                checa1 (sucede(n));
            fin;
        fin
        sino inicio
            oeste;
            avanza;
            mientras junto-a-zumbador hacer
                coge-zumbador;
            repetir n veces
                deja-zumbador;
            este;
            avanza;
        fin;
    fin;
    define-nueva-instruccion resta (n) como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            resta (sucede(n));
        fin
        sino inicio
            oeste;
            avanza;
            repetir n veces inicio
                si junto-a-zumbador entonces
                    coge-zumbador;
            fin;
        fin;
    fin;
    define-nueva-instruccion tiempo (n) como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            tiempo (sucede(n));
        fin
        sino inicio
            este;
            avanza;
            repetir n veces
                deja-zumbador;
            apagate;
        fin;
    fin;
    define-nueva-instruccion checa2 (n) como inicio
        si no-junto-a-zumbador entonces inicio
            si frente-libre entonces inicio
                avanza;
                checa2 (sucede(n));
            fin
            sino inicio
                norte;
                avanza;
                checa2 (sucede(n));
            fin;
        fin
        sino inicio
            oeste;
            avanza;
            compara (n);
            este;
            avanza;
            resta (0);
            tiempo (0);
        fin;
    fin;
    define-nueva-instruccion puma como inicio
        norte;
        mientras frente-libre hacer
            avanza;
        este;
        mientras frente-libre hacer
            avanza;
        oeste;
        checa1 (0);
        sur;
        mientras frente-libre hacer
            avanza;
        este;
        mientras frente-libre hacer
            avanza;
        oeste;
        checa2 (0);
    fin;
    define-nueva-instruccion busca2 como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
            si junto-a-zumbador entonces inicio
                coge-zumbador;
                puma;
            fin
            sino inicio
                deja-zumbador;
            fin;
        fin
        sino inicio
            deja-zumbador;
            norte;
            si frente-libre entonces inicio
                avanza;
                busca2;
                sur;
                avanza;
            fin;
            este;
            si frente-libre entonces inicio
                avanza;
                busca2;
                oeste;
                avanza;
            fin;
            sur;
            si frente-libre entonces inicio
                avanza;
                busca2;
                norte;
                avanza;
            fin;
            oeste;
            si frente-libre entonces inicio
                avanza;
                busca2;
                este;
                avanza;
            fin;
        fin;
    fin;
    inicia-ejecucion
        mientras no-orientado-al-este hacer
            gira (1);
        si frente-libre entonces inicio
            avanza;
            si frente-bloqueado y izquierda-libre entonces inicio
                gira (1);
                avanza;
                si frente-libre y derecha-libre y izquierda-bloqueada entonces inicio
                    gira (3);
                    avanza;
                    si junto-a-zumbador entonces inicio
                        deja-zumbador;
                        apagate;
                    fin
                    sino inicio
                        gira (2);
                        avanza;
                        gira (1);
                        avanza;
                        gira (3);
                        avanza;
                    fin;
                fin
                sino inicio
                    gira (2);
                    avanza;
                    gira (3);
                    avanza;
                fin;
            fin
            sino inicio
                gira (2);
                avanza;
            fin;
        fin;
        busca (0);
        busca2;
        apagate;
    termina-ejecucion
finalizar-programa