iniciar-programa

    define-nueva-instruccion Norte como inicio
        mientras no-orientado-al-norte hacer inicio
            gira-izquierda;
        fin;
    fin;

    define-nueva-instruccion Sur como inicio
        mientras no-orientado-al-sur hacer inicio
            gira-izquierda;
        fin;
    fin;

    define-nueva-instruccion Este como inicio
        mientras no-orientado-al-este hacer inicio
            gira-izquierda;
        fin;
    fin;
                                                       
    define-nueva-instruccion Oeste como inicio
        mientras no-orientado-al-oeste hacer inicio
            gira-izquierda;
        fin;
    fin;

    define-nueva-instruccion Coger como inicio
        mientras junto-a-zumbador hacer inicio
            coge-zumbador;
        fin;
    fin;

    define-nueva-instruccion ChecaColumna como inicio
        Norte;
        mientras junto-a-zumbador hacer inicio
            coge-zumbador;
        fin;
        mientras frente-libre hacer inicio
            avanza;
            si junto-a-zumbador entonces inicio
                coger;
            fin;
        fin;
        Sur;
        mientras frente-libre hacer inicio
            avanza;
        fin;
    fin;

    define-nueva-instruccion Recorrer-Tomar como inicio
        ChecaColumna;
        Este;
        mientras frente-libre hacer inicio
            avanza;
            ChecaColumna;
            Este;
        fin;
    fin;

    define-nueva-instruccion Ir11 como inicio
        Oeste;
        mientras frente-libre hacer inicio
            avanza;
        fin;
        Este;
    fin;

    define-nueva-instruccion Dejar como inicio
        mientras algun-zumbador-en-la-mochila hacer inicio
            deja-zumbador;
        fin;
    fin;



    inicia-ejecucion

        Recorrer-Tomar;
        Ir11;
        Dejar;

        apagate;
    termina-ejecucion
finalizar-programa
