iniciar-programa
    define-nueva-instruccion g(n) como inicio
        repetir n veces
            gira-izquierda;
    fin;
    define-nueva-instruccion norte como inicio
        mientras no orientado-al-norte hacer
            g(1);
    fin;
    define-nueva-instruccion sur como inicio
        mientras no orientado-al-sur hacer
            g(1);
    fin;
    define-nueva-instruccion este como inicio
        mientras no orientado-al-este hacer
            g(1);
    fin;
    define-nueva-instruccion oeste como inicio
        mientras no orientado-al-oeste hacer
            g(1);
    fin;
    define-nueva-instruccion verifica como inicio
        si no junto-a-zumbador entonces inicio
            norte;
            si frente-bloqueado y no junto-a-zumbador entonces inicio
                si derecha-bloqueada y izquierda-bloqueada entonces
                    deja-zumbador;
                g(2);
                si frente-bloqueado y junto-a-zumbador entonces coge-zumbador;
                g(2);
            fin;
            este;
            si frente-bloqueado y no junto-a-zumbador entonces inicio
                si derecha-bloqueada y izquierda-bloqueada entonces
                    deja-zumbador;
                g(2);
                si frente-bloqueado y junto-a-zumbador entonces coge-zumbador;
                g(2);
            fin;
            sur;
            si frente-bloqueado y no junto-a-zumbador entonces inicio
                si derecha-bloqueada y izquierda-bloqueada entonces
                    deja-zumbador;
                g(2);
                si frente-bloqueado y junto-a-zumbador entonces coge-zumbador;
                g(2);
            fin;
            oeste;
            si frente-bloqueado y no junto-a-zumbador entonces inicio
                si derecha-bloqueada y izquierda-bloqueada entonces
                    deja-zumbador;
                g(2);
                si frente-bloqueado y junto-a-zumbador entonces coge-zumbador;
                g(2);
            fin;
        fin;
        deja-zumbador;
    fin;
    define-nueva-instruccion cubiculo como inicio
        si no junto-a-zumbador entonces inicio
            verifica;
            cubiculo;
        fin
        sino inicio
            norte;
            si frente-libre entonces inicio
                avanza;
                si no junto-a-zumbador entonces
                    cubiculo;
                sur;
                si frente-libre entonces
                    avanza;
            fin;
            este;
            si frente-libre entonces inicio
                avanza;
                si no junto-a-zumbador entonces
                    cubiculo;
                oeste;
                si frente-libre entonces
                    avanza;
            fin;
            sur;
            si frente-libre entonces inicio
                avanza;
                si no junto-a-zumbador entonces
                    cubiculo;
                norte;
                si frente-libre entonces
                    avanza;
            fin;
            oeste;
            si frente-libre entonces inicio
                avanza;
                si no junto-a-zumbador entonces
                    cubiculo;
                este;
                si frente-libre entonces
                    avanza;
            fin;
        fin;
    fin;
    define-nueva-instruccion verifica2 como inicio
        si junto-a-zumbador entonces inicio
            coge-zumbador;
        fin;
    fin;
    define-nueva-instruccion recoger como inicio
        si junto-a-zumbador entonces inicio
            verifica2;
            norte;
            si frente-libre entonces inicio
                avanza;
                si junto-a-zumbador entonces
                    recoger;
                sur;
                si frente-libre entonces
                    avanza;
            fin;
            este;
            si frente-libre entonces inicio
                avanza;
                si junto-a-zumbador entonces
                    recoger;
                oeste;
                si frente-libre entonces
                    avanza;
            fin;
            sur;
            si frente-libre entonces inicio
                avanza;
                si junto-a-zumbador entonces
                    recoger;
                norte;
                si frente-libre entonces
                    avanza;
            fin;
            oeste;
            si frente-libre entonces inicio
                avanza;
                si junto-a-zumbador entonces
                    recoger;
                este;
                si frente-libre entonces
                    avanza;
            fin;
        fin;
    fin;
    inicia-ejecucion
        cubiculo;
        recoger;
        verifica;
        verifica2;
        apagate;
    termina-ejecucion
finalizar-programa
