iniciar-programa
define-nueva-instruccion recuerda(n) como
inicio
si no si-es-cero (n) entonces
inicio
    si no-junto-a-zumbador entonces
    inicio
        si orientado-al-norte entonces
        inicio
            avanza;
            recuerda(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(sucede(n)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
        fin;
        si orientado-al-sur entonces
        inicio
            avanza;
            recuerda(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(n)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
        fin;
        si orientado-al-este entonces
        inicio
            avanza;
            recuerda(sucede(n))
        fin;
        si orientado-al-oeste entonces
        inicio
            avanza;
            recuerda(precede(n))
        fin;
    fin
    sino
    inicio
        coge-zumbador;
        gira-izquierda;
        recuerda(n)
    fin;
fin
sino
inicio
    apagate;
fin;
fin;
    inicia-ejecucion
    si orientado-al-norte entonces
    inicio
        avanza;
        recuerda(100)
    fin
    sino
    inicio
        si orientado-al-sur entonces
        inicio
            avanza;
            recuerda(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(precede(0)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
        fin
        sino
        inicio
            si orientado-al-este entonces
            inicio
                avanza;
                recuerda(1)
            fin
            sino
            inicio
                avanza;
                recuerda(precede(0))
            fin;
        fin;
    fin;
        apagate;
    termina-ejecucion
finalizar-programa
