var fwidth = 150 //set scroller width
var fheight = 150 //set scroller height
var fadelinks = 1  //should links inside scroller content also fade like text? 0 for no, 1 for yes.
var HexBorderCol = "#000000"    // was "#344D99"

// Text start RBG values
var rgbstartr = 240;
var rgbstartg = 255;
var rgbstartb = 240;
// Text end RBG values
var rgbendr = 0;
var rgbendg = 128;
var rgbendb = 0;

// Link start RGB values
var rgbstartlinkr = 240;
var rgbstartlinkg = 255;
var rgbstartlinkb = 240;
// Link end RGB values
var rgbendlinkr = 0;
var rgbendlinkg = 128;
var rgbendlinkb = 0;

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

var startcolor = "rgb(" + rgbstartr + "," + rgbstartg + "," + rgbstartb + ")"
var endcolor =  "rgb(" + rgbendr + "," + rgbendg + "," + rgbendb + ")"
var startlinkcolor = "rgb(" + rgbstartlinkr + "," + rgbstartlinkg + "," + rgbstartlinkb + ")"
var endlinkcolor =  "rgb(" + rgbendlinkr + "," + rgbendlinkg + "," + rgbendlinkb + ")"

var difr = Math.floor((rgbstartr - rgbendr)/ConstNumFrames);
var difg = Math.floor((rgbstartg - rgbendg)/ConstNumFrames);
var difb = Math.floor((rgbstartb - rgbendb)/ConstNumFrames);
var diflinkr = Math.floor((rgbstartlinkr - rgbendlinkr)/ConstNumFrames);
var diflinkg = Math.floor((rgbstartlinkg - rgbendlinkg)/ConstNumFrames);
var diflinkb = Math.floor((rgbstartlinkb - rgbendlinkb)/ConstNumFrames);

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

//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(beginNetscapeTag+fcontent[index]+closeNetscapeTag);
		document.fscrollerns.document.fscrollerns_sub.document.close();
	}

	index++
	if (DOM2)
	{
		setTimeout("changecontent()", delay + (ConstNumFrames*ConstFrameTime));
	}
	else
	{
		// with no fade, content is readable for longer, so don't wait as long before next item.
		setTimeout("changecontent()", delay + 0.75*(ConstNumFrames*ConstFrameTime));
	}
}

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

function linkcolorchange(obj)
{
	if (obj.length>0)
	{
	for (i=0;i<obj.length;i++)
		obj[i].style.color = "rgb(" + (rgbstartlinkr-(framenum*diflinkr)) + "," + (rgbstartlinkg-(framenum*diflinkg)) + "," + (rgbstartlinkb-(framenum*diflinkb)) + ")";
	}
}

function colorfade()
{
if (frame > 0) //still frames to go 
{	
	document.getElementById("fscroller").style.color = "rgb(" + (rgbstartr-(framenum*difr)) + "," + (rgbstartg-(framenum*difg)) + "," + (rgbstartb-(framenum*difb)) + ")"; // Set color value.
	if (fadelinks) 
		linkcolorchange(linksobj)
	frame--;
	framenum++;
	setTimeout("colorfade()", ConstFrameTime);
}
else
{
	document.getElementById("fscroller").style.color = endcolor;
	for (i=0;i<linksobj.length;i++)
		linksobj[i].style.color = endlinkcolor;
	resetStartValues();
}   
}

function resetStartValues()
{
	frame = ConstNumFrames;
	framenum = 1;
}

// Start
resetStartValues();

if (ie4||DOM2)
{
	document.write('<div id="fscroller" style="border:1px solid ' + HexBorderCol + ';width:'+fwidth+';height:'+fheight+';padding:4px"></div>');
}
else
{
	document.write('<ilayer id="fscrollerns" bgColor="#20b2aa"; width=' + fwidth + '; height=' + fheight + ';>' + '<layer id="fscrollerns_sub" width=' + (fwidth-5) + '; height=' + (fheight-5) + '; left=5 top=5></layer></ilayer>');
}
// NOTE: set onload TO: = setTimeout('changecontent()', ConstStartDelay);