/*
Fading Scroller- By DynamicDrive.com
For full source code, and usage terms, visit http://www.dynamicdrive.com
This notice MUST stay intact for use
*/

var delay=2000;
var fcontent=new Array();

fcontent[0]="<span class=\"title-1\">Join our SEED Initiative</span><br /><br /><a href=\"http://www.future500.org/seed\">More...</a>"

fcontent[1]="<span class=\"title-2\">Grappling with CSR questionnaire fatigue?</span><br />Learn about our Global Citizenship 360<br /><a href=\"http://future500.org/audit/\">More...</a>"

fcontent[2]="<span class=\"title-1\">Subscribe to the Future 500 mailing list.</span><br /><br /><a href=\"http://oi.vresp.com/?fid=faa9247873\">More...</a>"

fcontent[3]="<span class=\"title-2\">Support Future 500.</span><br /><br /><a href=\"http://future500.org/support/\">More...</a>"

fcontent[4]="<span class=\"title-1\">The Future 500 Methodology:</span><br />Harnessing feedback to drive corporate adaptation, innovation, and sustainability.<br /><a href=\"http://future500.org/services/\">More...</a>"

fcontent[5]="<span class=\"title-2\">Read Our Articles.</span><br />Hydrogen Economy, CSR Standards Fatigue<br /><a href=\"http://future500.org/articles/\">More...</a>"


begintag='' //set opening tag, such as font declarations
closetag=''

var fwidth='350px' //set scroller width
var fheight='65px' //set scroller height

var fadescheme=0 //set 0 to fade text color from (white to black), 1 for (black to white)
var fadelinks=0  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

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

var hex=(fadescheme==0)? 255 : 0
var startcolor=(fadescheme==0)? "rgb(255,255,255)" : "rgb(16,37,106)"
var endcolor=(fadescheme==0)? "rgb(16,37,106)" : "rgb(255,255,255)"

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

if (DOM2)
faderdelay=2000

//function to change content
function changecontent(){
if (index>=fcontent.length)
index=0
if (DOM2){
document.getElementById("fscroller").style.color=startcolor
document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
linksobj=document.getElementById("fscroller").getElementsByTagName("A")
if (fadelinks)
linkcolorchange(linksobj)
colorfade()
}
else if (ie4)
document.all.fscroller.innerHTML=begintag+fcontent[index]+closetag
else if (ns4){
document.fscrollerns.document.fscrollerns_sub.document.write(begintag+fcontent[index]+closetag)
document.fscrollerns.document.fscrollerns_sub.document.close()
}

index++
setTimeout("changecontent()",delay+faderdelay)
}

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

frame=20;

function linkcolorchange(obj){
if (obj.length>0){
for (i=0;i<obj.length;i++)
obj[i].style.color="rgb("+hex+","+hex+","+hex+")"
}
}

function colorfade() {
// 20 frames fading process
if(frame>0) {
hex=(fadescheme==0)? hex-12 : hex+12 // increase or decrease color value depd on fadescheme
document.getElementById("fscroller").style.color="rgb("+hex+","+hex+","+hex+")"; // Set color value.
if (fadelinks)
linkcolorchange(linksobj)
frame--;
setTimeout("colorfade()",60);
}

else{
document.getElementById("fscroller").style.color=endcolor;
frame=20;
hex=(fadescheme==0)? 255 : 0
}
}

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

window.onload=changecontent