iniciar-programa
define-nueva-instruccion apagon(x) como inicio
    si frente-libre entonces inicio
        si derecha-libre entonces inicio
            avanza;
            si orientado-al-norte entonces inicio
                apagon(sucede(x));
            fin
            sino inicio
                si orientado-al-sur entonces inicio
                    apagon(precede(x));
                fin
                sino inicio
                    apagon(x);
                fin;
            fin;
        fin
        sino inicio
            gira-izquierda;
            apagon(x);
        fin;
    fin
    sino inicio
        repetir x veces inicio
            deja-zumbador;
        fin;
    fin;
fin;
    inicia-ejecucion
    apagon(0);
        apagate;
    termina-ejecucion
finalizar-programa
