function Fusiona(nLetra, nKey)
    {
        var nRet;
        nRet = nLetra + nKey;
        if (nRet > 255)
        {
            nRet = 256 - nRet;
        }
        nRet = nRet + '';

        if (nRet.length == 1)
            nRet = '00' + nRet;

        if (nRet.length == 2)
            nRet = '0' + nRet;
        return nRet;
    }

    function Encripta1(sTexto)
    {
        var EncText;
        var TextoEncriptado;
        var Fecha = new Date();
        var Dia = Fecha.getDate();
        var Mes = Fecha.getMonth();
        var Anio = Fecha.getYear();
        var FechaYYYYMMAA;

        if (Dia < 10)
            Dia = '0' + Dia + '';
        else
            Dia = Dia + '';

        if (Mes < 10)
            Mes = '0' + Mes + '';
        else
            Mes = Mes + '';

        if (Anio < 2000)
            Anio = 1900 + Anio + '';

        g = 0;
        FechaYYYYMMAA = Anio + Mes + Dia;

        TextoEncriptado = '';
        for (i = 0; i < sTexto.length; i++)
        {
            TextoEncriptado+= Fusiona(sTexto.charCodeAt(i), parseInt(FechaYYYYMMAA.substring(g,g+1)));
            g++;
            if (g >= FechaYYYYMMAA.length)
                g = 0;
        }
        EncText = FechaYYYYMMAA + TextoEncriptado;
        return EncText;
    }

    function Encripta2(sTexto)
    {
        var EncText;
        var TextoEncriptado;
        var Semilla;
        var SemLength;

        Semilla = parseInt((2000)*Math.random()); // Random de 0 a 2000
        Semilla = Semilla + '';                   // Lo paso a caracter

        g = 0;
        TextoEncriptado = '';
        for (i = 0; i < sTexto.length; i++)
        {
            TextoEncriptado+= Fusiona(sTexto.charCodeAt(i), parseInt(Semilla.substring(g,g+1)));
            g++;
            if (g >= Semilla.length)
                g = 0;
        }

        SemLength = Semilla.length + '';
        EncText = SemLength + Semilla + TextoEncriptado;
//        document.write('Encript2 = ' + EncText + '<BR>');
        return EncText;
    }

    function Encripta(sTexto)
    {
        var sEnc;
        sEnc = Encripta1(sTexto);
        sEnc = Encripta2(sEnc);
        return sEnc;
    }