/*
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=7000 //set delay between message change (in miliseconds)
var quotes=new Array()
begintag='<p class="comments">' //set opening tag, such as font declarations
quotes[0]="I never expected to be able to download so many useful tools for my marketing needs. Thank you guys!<br><i> ~ David Harvey<br>Affiliate Program Director</i>"
quotes[1]="You have saved me many hours in research time with some of the information I read in your members area.<br><i> ~ Linda Steadman<br>Affiliate Marketer</i>"
quotes[2]="I would like to thank your team for organizing this great website for marketers.<br><i> ~ Christopher A.<br>Affiliate Marketer</i>"
quotes[3]="I never expected to be able to download so many useful tools for my marketing needs. Thank you guys!<br><i> ~ David Harvey<br>Affiliate Program Director</i>"
quotes[4]="You have saved me many hours in research time with some of the information I read in your members area.<br><i> ~ Linda Steadman<br>Affiliate Marketer</i>"
quotes[5]="I would like to thank your team for organizing this great website for marketers.<br><i> ~ Christopher A.<br>Affiliate Marketer</i>"
quotes[6]="I never expected to be able to download so many useful tools for my marketing needs. Thank you guys!<br><i> ~ David Harvey<br>Affiliate Program Director</i>"
quotes[7]="You have saved me many hours in research time with some of the information I read in your members area.<br><i> ~ Linda Steadman<br>Affiliate Marketer</i>"
quotes[8]="I would like to thank your team for organizing this great website for marketers.<br><i> ~ Christopher A.<br>Affiliate Marketer</i>"
closetag='</p>'
var fwidth='150px' //set scroller width
var fheight='200px' //set scroller height
var fadescheme=0 //set 0 to fade text color from (white to black), 1 for (black to white)
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 hex=(fadescheme==0)? 255 : 0
var startcolor=(fadescheme==0)? "rgb(255,255,255)" : "rgb(0,0,0)"
var endcolor=(fadescheme==0)? "rgb(0,0,0)" : "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=7000
//function to change content
function changecontent(){
var whichquote=Math.floor(Math.random()*(quotes.length))
if (DOM2){
document.getElementById("fscroller").style.color=startcolor
document.getElementById("fscroller").innerHTML=begintag+quotes[whichquote]+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()",20);	
}
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 solid #000000;width:'+fwidth+';height:'+fheight+';padding:2px"></div>')
window.onload=changecontent