/*
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=8000 //set delay between message change (in miliseconds)
var fcontent=new Array()
begintag='<span class="quotes">' //set opening tag, such as font declarations
fcontent[0]="He that saith he is in the light, and hateth his brother, is in darkness even until now. 1John 2:9"
fcontent[1]="He that loveth his brother abideth in the light, and there is none occasion of stumbling in him 1John 1:10."
fcontent[2]="But he that hateth his brother is in darkness, and walketh in darkness, and knoweth not whither he goeth, because that darkness hath blinded his eyes. 1John 1:11"
fcontent[3]="He that saith, I know him, and keepeth not his commandments, is a liar, and the truth is not in him. 1John 1:4"
fcontent[4]="But whoso keepeth his word, in him verily is the love of God perfected: hereby know we that we are in him. 1John 1:5"
fcontent[5]="He that saith he abideth in him ought himself also so to walk, even as he walked. 1John 1:6"
fcontent[6]="Love not the world, neither the things that are in the world. If any man love the world, the love of the Father is not in him. 1John 1:15" 
fcontent[7]="For all that is in the world, the lust of the flesh, and the lust of the eyes, and the pride of life, is not of the Father, but is of the world. 1John 1:16"
fcontent[8]="I write unto you, little children, because your sins are forgiven you for his name’s sake. 1 John 1:12"
fcontent[9]="Click <a href=\"http://www.revivalsermons.org/witnessing/index.shtml\" target=\"_blank\">here</a> to learn about <I>New Words for Witnessing</I>. It provides excellent witnessing information."
closetag='</span>'

var fwidth='350px' //set scroller width
var fheight='55px' //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=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()",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:1px #C8B8A8;width:'+fwidth+';height:'+fheight+';padding:2px"></div>')

window.onload=changecontent