iniciar-programa
define-nueva-instruccion a como
inicio
    si junto-a-zumbador entonces
    inicio
        si frente-libre entonces
        inicio
        avanza;
        repetir 3 veces gira-izquierda;
        avanza;
        gira-izquierda;
        si junto-a-zumbador entonces
        inicio
        a;
        fin
        sino
        inicio
        gira-izquierda;
        avanza;
        gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
        fin;
        fin;
    fin;
fin;
define-nueva-instruccion rellena como
inicio
    si frente-libre entonces
    inicio
        si junto-a-zumbador entonces
        inicio
            avanza;
            rellena;
            avanza;
        fin
        sino
        inicio
            si algun-zumbador-en-la-mochila entonces deja-zumbador;
            rellena;
        fin;
    fin
    sino
    inicio
        si no-junto-a-zumbador y algun-zumbador-en-la-mochila entonces deja-zumbador;
        repetir 2 veces gira-izquierda;
    fin;
fin;
define-nueva-instruccion muevete como
inicio
    si frente-libre entonces
    inicio
        si junto-a-zumbador entonces
        inicio
            avanza;
            rellena;
            repetir 3 veces gira-izquierda;
            avanza;
            repetir 3 veces gira-izquierda;
            muevete;
        fin
        sino
        inicio
            si algun-zumbador-en-la-mochila entonces deja-zumbador;
            muevete;
        fin;
    fin
    sino
    inicio
        si no-junto-a-zumbador y algun-zumbador-en-la-mochila entonces deja-zumbador;
    fin;
fin;
define-nueva-instruccion d(n) como
inicio
    si algun-zumbador-en-la-mochila entonces
    inicio
        repetir n veces avanza;
        repetir 3 veces gira-izquierda;
        repetir n veces avanza;
        repetir 3 veces gira-izquierda;
        muevete;
        repetir 3 veces gira-izquierda;
        mientras frente-libre hacer avanza;
        repetir 3 veces gira-izquierda;
        d(sucede(n));
    fin;
fin;
    inicia-ejecucion
        mientras no orientado-al-norte hacer gira-izquierda;
        d(0);
        a;
        apagate;
    termina-ejecucion
finalizar-programa

