/***********************************************
* 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 = 5000; //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(255,255,255); // start color (red, green, blue)
var endcolor=new Array(0,0,0); // end color (red, green, blue)

var fcontent=new Array();
begintag='<div style="font-style:italic;">'; //set opening tag, such as font declarations
fcontent[0]="&quot;At $49 per user per year this is significantly cheaper than our previous RIM BlackBerry Enterprise Server solution. Prior to AstraSync we had to purchase a server, purchase Microsoft Server 2003, purchase BES, install and configure. Our per user costs were running right at $354 per person. You just saved us over $300 per seat, thanks!&quot; Keith Wheeler, Triune Technology Consulting, LLC";
fcontent[1]="&quot;Direct IT has compared AstraSync to other similar solutions. Our testing concluded that AstraSync has ticked all the right boxes regarding performance, value for money and first class support. As we supply and support small to medium businesses for varying IT services, we find that the product fits many of our clients requirements perfectly.&quot; Warren Stott, Direct IT Ireland" 
fcontent[2]="&quot;I can't even begin to describe how happy I am that your product has finally come to market! Thank you guys for making the lives of Exchange admins all over the planet much, much easier!&quot; Chris Cashman, Apptrix, LLC";
fcontent[3]="&quot;The software is fast. We typically see incoming messages reflected on our BlackBerry's 5 to 10 seconds before they show up on our Outlook desktops.&quot; &quot;Since we no longer use our BES we can apply Microsoft patches to our Exchange Server again without fear of losing BES functionality unexpectedly (Yeah!)&quot; Keith Wheeler, Triune Technology Consulting, LLC";
fcontent[4]="&quot;I just wanted to contact you to say that AstraSync is the best product on the market and meets the needs of the consumer beyond any comparable product.&quot; Tony Harrington, ABC Financial Services, Inc"
closetag='</div>';

var fwidth='220px'; //set scroller width
var fheight='200px'; //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="border:1px solid black;width:'+fwidth+';height:'+fheight+'"></div>');
  document.write('<div id="fscroller" style="width:'+fwidth+';height:'+fheight+'"></div>');
  //document.write('<div id="fscroller" ></div>');

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