/*
	Fading Scroller- By DynamicDrive.com
	For full source code, and usage terms, visit http://www.dynamicdrive.com
	This notice MUST stay intact for use
	colorfade() partially by Marcio Galli for Netscape Communications. 
	Modified by Dynamicdrive.com
	Modified by Paul R. Dahlen 7/2004 - chesapeakecove.com
	*/

var strings=new Array()

	// Strings to Display One at a Time
	strings[0] = 'Alcoholics Anonymous';
	strings[1] = 'Narcotics Anonymous';
	strings[2] = 'Overeaters Anonymous';
	strings[3] = 'Gamblers Anonymous';
	strings[4] = 'Emotions Anonymous';
	strings[5] = 'Debtors Anonymous';
	strings[6] = 'Nicotine Anonymous';// End Strings

begintag='<font face="Arial" size=7 color=#"003399"><i><b><br>' //set opening tag, such as font declarations
closetag='</i></b></font>'

var fwidth='640px' //set scroller width
var fheight='150px' //set scroller height

var fadelinks=0  //should links inside scroller content also fade like text? 0 for no, 1 for yes.

var faderdelay=0

var delay=3000 	//set delay between message change (in miliseconds)
var frame=64 	//Frames between color change also set in function in fader.js

var startcolor="#FFFFFF"
var endcolor="#000080"

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

var index=Math.round(6*Math.random())

var rb = HexToR(startcolor);
var gb = HexToG(startcolor);
var bb = HexToB(startcolor);

var rf = HexToR(endcolor);
var gf = HexToG(endcolor);
var bf = HexToB(endcolor);

var r=rb	//PRD
var g=gb	//PRD
var b=bb	//PRD

var rstep = Math.round((r)/frame)	//PRD number of steps between beginning and end colors
var gstep = Math.round((g)/frame)
var bstep = Math.round((b)/frame)

function HexToR(h) { return parseInt((cutHex(h)).substring(0,2),16) }
function HexToG(h) { return parseInt((cutHex(h)).substring(2,4),16) }
function HexToB(h) { return parseInt((cutHex(h)).substring(4,6),16) }
function cutHex(h) { return (h.charAt(0)=="#") ? h.substring(1,7) : h}

if (DOM2) {faderdelay=delay} //PRD was 3000

//function to change content
function changecontent()
	{
	if (index>=strings.length)
		index=Math.round(6*Math.random());

	index=Math.round(6*Math.random());
	//		window.alert(index)  //DEBUG
	if (DOM2)
		{
		document.getElementById("fscroller").style.color=startcolor
		document.getElementById("fscroller").innerHTML=begintag+strings[index]+closetag
		linksobj=document.getElementById("fscroller").getElementsByTagName("A")
		if (fadelinks)
			linkcolorchange(linksobj)
		colorfade()
		}
	else if (ie4)
		document.all.fscroller.innerHTML=begintag+strings[index]+closetag
	else if (ns4)
		{
		document.fscrollerns.document.fscrollerns_sub.document.write(begintag+strings[index]+closetag)
		document.fscrollerns.document.fscrollerns_sub.document.close()
		}
	index=Math.round(6*Math.random())

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

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

function colorfade() 
	{	         	
	// 64 frames fading process
	if(frame>0) 
		{
		if (r >= rf){r=r-rstep}	//PRD 		
		if (g >= gf){g=g-gstep} 
		if (b >= bf){b=b-bstep}
		document.getElementById("fscroller").style.color="rgb("+r+","+g+","+b+")"; 	//PRD Set color value.
		if (fadelinks){linkcolorchange(linksobj)}
		frame--;
		setTimeout("colorfade()",20);
		}
	else
		{
		document.getElementById("fscroller").style.color=endcolor;
		frame=64;
		r=rb	//PRD
		g=gb	//PRD
		b=bb	//PRD
		}   
	}
	
function colorfadeout() 
	{		
	// 64 frames fading process
	if(frame<64) 
		{
		if (r <= rb){r=r+rstep}	//PRD 		
		if (g <= gb){g=g+gstep} 
		if (b <= bb){b=b+bstep}

		document.getElementById("fscroller").style.color="rgb("+r+","+g+","+b+")"; 	//PRD Set color value.
		if (fadelinks){linkcolorchange(linksobj)}
		frame++;
		setTimeout("colorfadeout()",20);
		}
	else
		{
		document.getElementById("fscroller").style.color=endcolor;
		frame=0;
		r=rb	//PRD
		g=gb	//PRD
		b=bb	//PRD
		}   
	}

if (ie4||DOM2)	//PRD Writes to DOM2
document.write('<center><div id="fscroller" style=width:'+fwidth+';height:'+fheight+';"></div></center>')
//from initialize.js - allows more than one function for window.onload - use instead of window.onload
initializeMe(changecontent, "1", "");
//window.onload=changecontent