/***********************************************
* Fading Ticker Tape Script- © Dynamic Drive (www.dynamicdrive.com)
* This notice must stay intact for use
* Visit http://www.dynamicdrive.com/ for full source code
***********************************************/

//default speed is 4.5 seconds, Change that as desired
var speed=8000

var news=new Array()
/*news[0]="<a href='http://www.dynamicdrive.com'>Click here to go to Dynamic Drive's front page</a>"
news[1]="<a href='http://www.javascriptkit.com'>Visit JavaScript Kit for free JavaScripts!</a>"
news[2]="<a href='http://freewarejava.com'>Looking for free java applets? Click here.</a>"*/
//expand or shorten this list of messages as desired

var fadescheme=0 //set 0 to fade bgcolor from (white to black), 1 for (black to white)
var hex=(fadescheme==0)? 255 : 0
var startcolor="white";
var endcolor="white";
/*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 frame=20;
var contFading=0;
var ie=document.all
var ns6=document.getElementById
var ns4=document.layers

//tickerobject=ie? subtickertape: ns6? document.getElementById("subtickertape") : document.tickertape.document
//hack: control de temps
var t=null;

function regenerate(){
	window.location.reload()
}
function regenerate2(){
	if (document.layers)
	setTimeout("window.onresize=regenerate",450)
}

function bgcolorfade() {	         	
	// 20 frames fading process
	if(frame>0) {	
		hex=(fadescheme==0)? hex-12 : hex+12 // increase or decrease color value depd on fadescheme
		tickerobject.style.backgroundColor="rgb("+hex+","+hex+","+hex+")"; // Set color value.
		frame--;
		setTimeout("bgcolorfade()",20);	
	}
	else{
		tickerobject.style.backgroundColor=endcolor;
		frame=20;
		hex=(fadescheme==0)? 255 : 0
	}   
}

function updatecontent(){

	if(t!=null) clearTimeout(t)
	if(news.length!=0){
		tickerobject=ie? subtickertape: ns6? document.getElementById("subtickertape") : document.tickertape.document
		//if (ie||ns6)bgcolorfade()
		if (ns4){
			tickerobject.subtickertape.document.write('<span class="subtickertapefont">'+news[contFading]+'</span>')
			tickerobject.subtickertape.document.close()
		}else tickerobject.innerHTML=news[contFading]

		if (contFading<news.length-1)contFading++
		else contFading=0
		//hack: Evitar que es crein nous threads.
		t=setTimeout("updatecontent()",speed)
	}
}