/*
Fading Scroller- By DynamicDrive.com
For full source code, 100's more DHTML scripts, and TOS,
visit http://www.dynamicdrive.com
*/

var delay=7000 //set delay between message change (in miliseconds)
var fcontent=new Array()
begintag='<font face="verdana" size=2>' //set opening tag, such as font declarations
// EDIT YOUR CONTENT HERE //
fcontent[0]="All Craypoe.com WebSites have been meticulously handcrafted in the United States with a certain sense of pride, malice, forethought and arrogance by Craypoe Creations, a small, disgruntled division of Craypoe.com"
fcontent[1]="Craypoe.com Websites consist of Countless pages of content that provide a variety of topics and items of interest. Possibly even some items that don't interest you at all."
fcontent[2]="<center><strong><u>DrPsychotic.com</u></strong></center><br>A Website geared towards Humor Arts & Entertainment by some very nutty but creative people. <a HREF=\"http://www.DrPsychotic.com/\">www.DrPsychotic.com</a>"
fcontent[3]="<center><strong><u>ToolBag Online Magazine</u></strong></center><br>An online magazine aimed at people trying to succeed in a career in the Arts. Providing the tools you need to succeed. <a HREF=\"http://www.toolbagmag.com/mag/\">www.ToolBagMag.com</a>"
fcontent[4]="<center><strong><u>LocalNJ.com</u></strong></center><br>A guide to the Northern New Jersey, Eastern Pa. and Southern New York area. <a HREF=\"http://www.localnj.com/\">www.LocalNJ.com</a>"
fcontent[5]="<center><strong><u>ChristAndCountry.net</u></strong></center><br>A Conservative Christian site that proudly acknowledges America's Christian Roots. <a HREF=\"http://www.christandcountry.net/\">www.ChristAndCountry.net</a>"
fcontent[6]="<center><strong><u>Bob Craypoe</u></strong></center><br>Be sure to check out Bob Craypoe's Website <a HREF=\"http://www.craypoe.com/bob/\">www.craypoe.com/bob</a> if you have nothing better to do with your life."


// DO NOT EDIT BELOW HERE //
closetag='</font>'

var fwidth=710 //set scroller width
var fheight=45 //set scroller height

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

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

if (DOM2)
faderdelay=2500

//function to change content
function changecontent(){
if (index>=fcontent.length)
index=0
if (DOM2){
document.getElementById("fscroller").style.color="rgb(255,255,255)"
document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
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;
hex=255  // Initial color value.

function colorfade() {	         	
// 20 frames fading process
if(frame>0) {	
hex-=12; // increase color value
document.getElementById("fscroller").style.color="rgb("+hex+","+hex+","+hex+")"; // Set color value.
frame--;
setTimeout("colorfade()",20);	
}
else{
document.getElementById("fscroller").style.color="rgb(0,0,0)";
frame=20;
hex=255
}   
}

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

window.onload=changecontent