/***********************************************
* Fading Scroller- © Dynamic Drive DHTML code library (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit Dynamic Drive at http://www.dynamicdrive.com/ for full source code
***********************************************/

var delay = 5500; //set delay between message change (in miliseconds)
var maxsteps = 30; // number of steps to take to change from start color to endcolor
var stepdelay = 40; // time in miliseconds of a single step
//**Note: maxsteps*stepdelay will be total time in miliseconds of fading effect
var startcolor = new Array(192, 206, 255); // start color (red, green, blue)
var endcolor = new Array(0, 0, 0); // end color (red, green, blue)

var fcontent = new Array();
begintag = '<div>'; //set opening tag, such as font declarations
fcontent[0] = "<img src='images/quotes.png' /> . . . We have realized significant value from DeepTarget and an extremely high ROI about which we are particularly pleased.<p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Jeremy Nelson, AVP Marketing<br />Mountain America Credit Union, West Jordan, UT</p>";
fcontent[1] = "<img src='images/quotes.png' /> With DeepTarget, we have been able to very effectively reach out to our membership 24X7 with products individual members are interested in. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Melinda Amori, Marketing Manager<br />Deer Valley Credit Union, Phoenix, AZ</p>";
fcontent[2] = "<img src='images/quotes.png' /> Every day, we're presented the dual challenge of offering our members only the products and services that match their specific financial needs and tracking those efforts. With DeepTarget, this process is automatic and highly effective. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Kim York, Vice President of Marketing<br />Ascend Federal Credit Union, Tullahoma, TN</p>";
fcontent[3] = "<img src='images/quotes.png' /> DeepTarget allows us to reach our members with information on products and promotions that is relevant and timely - in a cost effective<br>manner. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Brenda Covrett, AVP of Marketing<br />Directions Credit Union, Sylvania, OH</p>";
fcontent[4] = "<img src='images/quotes.png' /> I am totally impressed with DeepTarget Email - it is rich in features and has everything one would need in an email marketing solution, yet is also incredibly easy to use. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Ben Boles, Director of Digital Media<br />Damson Automotive Group, Huntsville, AL</p>";
fcontent[5] = "<img src='images/quotes.png' /> [DeepTarget Email is] a one stop shop for managing all email contacts, creating professional email messages, delivering them and finally for monitoring their effectiveness using robust campaign statistics. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Mike Harden, COO<br />F&A Federal Credit Union, Monterey, CA</p>";
fcontent[6] = "<img src='images/quotes.png' /> Thanks for all you do and for the great software that you have, not to mention your exceptional customer support!. . . <p style='font-size:12px;font-weight:bold;text-align:right;color:#003384;'>Melissa Martin, Director of Seminars<br />Alabama Bankers Association, Montgomery, AL</p>";
closetag = '</div>';

var fwidth = ''; //set scroller width
var fheight = ''; //set scroller height

var fadelinks = 1;  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

///No need to edit below this line/////////////////


var ie4 = document.all && !document.getElementById;
var DOM2 = document.getElementById;
var faderdelay = 0;
var index = 0;


/*Rafael Raposo edited function*/
//function to change content
function changecontent() {
    if (index >= fcontent.length)
        index = 0
    if (DOM2) {
        document.getElementById("fscroller").style.color = "rgb(" + startcolor[0] + ", " + startcolor[1] + ", " + startcolor[2] + ")"
        document.getElementById("fscroller").innerHTML = begintag + fcontent[index] + closetag
        if (fadelinks)
            linkcolorchange(1);
        colorfade(1, 15);
    }
    else if (ie4)
        document.all.fscroller.innerHTML = begintag + fcontent[index] + closetag;
    index++
}

// colorfade() partially by Marcio Galli for Netscape Communications.  ////////////
// Modified by Dynamicdrive.com

function linkcolorchange(step) {
    var obj = document.getElementById("fscroller").getElementsByTagName("A");
    if (obj.length > 0) {
        for (i = 0; i < obj.length; i++)
            obj[i].style.color = getstepcolor(step);
    }
}

/*Rafael Raposo edited function*/
var fadecounter;
function colorfade(step) {
    if (step <= maxsteps) {
        document.getElementById("fscroller").style.color = getstepcolor(step);
        if (fadelinks)
            linkcolorchange(step);
        step++;
        fadecounter = setTimeout("colorfade(" + step + ")", stepdelay);
    } else {
        clearTimeout(fadecounter);
        document.getElementById("fscroller").style.color = "rgb(" + endcolor[0] + ", " + endcolor[1] + ", " + endcolor[2] + ")";
        setTimeout("changecontent()", delay);

    }
}

/*Rafael Raposo's new function*/
function getstepcolor(step) {
    var diff
    var newcolor = new Array(3);
    for (var i = 0; i < 3; i++) {
        diff = (startcolor[i] - endcolor[i]);
        if (diff > 0) {
            newcolor[i] = startcolor[i] - (Math.round((diff / maxsteps)) * step);
        } else {
            newcolor[i] = startcolor[i] + (Math.round((Math.abs(diff) / maxsteps)) * step);
        }
    }
    return ("rgb(" + newcolor[0] + ", " + newcolor[1] + ", " + newcolor[2] + ")");
}

if (ie4 || DOM2)
    document.write('<div id="fscroller" style="width:' + fwidth + ';height:' + fheight + '"></div>');

if (window.addEventListener)
    window.addEventListener("load", changecontent, false)
else if (window.attachEvent)
    window.attachEvent("onload", changecontent)
else if (document.getElementById)
    window.onload = changecontent