var delay = 1400; //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(222,214,206); // 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: normal 11px Verdana; text-align:center; padding: 5px;">'; //set opening tag, such as font declarations
fcontent[0]="Kodak<br>HP<br>Hormel<br>Hewlett-Packard";
fcontent[1]="Meow Mix<br>Fresh Express<br>Ciba Vision<br>General Motors";
fcontent[2]="Kimberly Clark<br>Fram<br>Schwan’s Foods<br>Georgia-Pacific";
fcontent[3]="Del Monte<br>Coleman<br>Crayola<br>Medallion Foods";
fcontent[4]="Hershey's<br>Alcon Labs<br>Shell Oil<br>Precept Brands";
fcontent[5]="Ring Container<br>Delphi<br>Safeway<br>Mission Bell Winery";
fcontent[6]="ConAgra<br>Sylvania<br>Smitty’s<br>General Mills";
fcontent[7]="Nestle<br>Dole<br>Saputo<br>Kiswel";
fcontent[8]="Dow Chemical<br>Honeywell<br>Great Lakes Cheese<br>Motts";
fcontent[9]="Tyson<br>Grace Baking<br>Medrad";
fcontent[10]="Cargill<br>HJ Heinz<br>Kraft Foods<br>Baldwin Filters";
fcontent[11]="Costco<br>Exxon Mobile<br>Cadbury - Schwepps<br>Colgate";
fcontent[12]="Kellogg's<br>Leclerc<br>Pepsi<br>Whirlpool";
fcontent[13]="Primex Farms<br>BASF<br>PWI Industries";
fcontent[14]="Zep<br>Crystal<br>Cellu Tissue";
fcontent[15]="Unilever<br>Flavorich";



closetag='</div>';

var fwidth='146px'; //set scroller width
var fheight='150px'; //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:0px solid black;width:'+fwidth+';height:'+fheight+'"></div>');