var delay=3000 //set delay between message change (in miliseconds)
var fcontent=new Array()
begintag='' //set opening tag, such as font declarations
fcontent[0]="Buenos Días Asturias
Titulares de la Prensa Asturiana
31 de Julio de 2010";
fcontent[1]="El Comercio - Concejos
'Arte solidario con India', en Villaviciosa";
fcontent[2]="El Comercio - Concejos
Medio Rural firma un convenio con la Fundación Ronzón para aprovechar una finca en Priesca";
fcontent[3]="El Comercio - Política
Villaviciosa reúne a 300 personas para pedir a Cascos «que saque a Asturias de la crisis»";
closetag=''
var fwidth=150 //set scroller width
var fheight=75 //set scroller height
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="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('')
window.onload=changecontent