var delay = 6000; //set delay between message change (in miliseconds)
var maxsteps=20; // number of steps to take to change from start color to endcolor
var stepdelay=30; // time in miliseconds of a single step
//**Note: maxsteps*stepdelay will be total time in miliseconds of fading effect
var startcolor= new Array(255,255,255); // start color (red, green, blue)
var endcolor=new Array(0,0,0); // end color (red, green, blue)

var fcontent=new Array();
begintag='<div style="font: normal 11px Trebuchet MS; padding: 1px;">'; //set opening tag, such as font declarations
fcontent[0]="<b>Centre de Prévention du Suicide de Québec</b><br><div align=justify>Toutes sortes d\’informations concernant la problématique du suicide.</div><br>Tu as besoin d\'aide?<br><font color=#FF6600>1-866-APPELLE</font><br><br><a href='http://www.cpsquebec.ca/fr/accueil/index.htm' target=blank class=linkb>www.cpsquebec.ca</a>";
fcontent[1]="<b>Chez Senteur Myrtille</b><br><div align=justify>Venez découvrir mes créations sur le théme de Martine, Avatars, Papier à lettres, Cartes Virtuelles, Fonds d\'écrans, Horloges, Calendriers, Blinkies, Tubes PSP, Forum, et bien plus !!!</div><br><a href='http://www.senteurmyrtille.com/ ' target=blank class=linkb>www.senteurmyrtille.com/</a>";
fcontent[2]="<b>Chez Chafran</b><br><div align=justify>Site personnel comprenant de nombreuses sections. Les sujets traités sont: les chats, les midis, les blagues, les jeux, les photos comiques, les services, des créations et une tonne de diaporamas pps.</div><br><a href='http://www.chafran.net' target=blank class=linkb>www.chafran.net</a>";
fcontent[3]="<b>Jeux de maths</b><br><div align=justify>Des activités ludiques pour rendre les maths amusantes ! Des jeux en ligne pour être champion en calcul. Tam et Tamette vous guident au pays des maths.</div><br><a href='http://juliette.hernando.free.fr/' target=blank class=linkb>juliette.hernando.free.fr/</a>";
fcontent[4]="<b>E-stories </b><br><div align=justify>Magnifiques histoires pour enfants agrémentées de super belles illustrations animées . Un p\'tit Ours et une p\'tite abeille racontant des e-stories pour les petits et les plus grands qui ont su garder une âmes d\'enfant.</div><br><a href='http://www.e-stoires.net/vignette/Vignette.htm' target=blank class=linkb>www.e-stoires.net</a>";
fcontent[5]="<b>Protection de l'enfance</b><br><div align=justify>Comment protéger mon enfant sur Internet ? Une protection efficace des enfants au cours de leur utilisation d'\Internet passe nécessairement par la vigilance, la pédagogie et le dialogue.</div><br><a href='http://www.pointdecontact.net/protectiondelenfance.html' target=blank class=linkb>www.pointdecontact.net</a>";
closetag='</div>';

var fwidth='170px'; //set scroller width
var fheight='166px'; //set scroller height

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

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


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


/*Rafael Raposo edited function*/
//function to change content
function changecontent(){
  if (index>=fcontent.length)
    index=0
  if (DOM2){
    document.getElementById("fscroller").style.color="rgb("+startcolor[0]+", "+startcolor[1]+", "+startcolor[2]+")"
    document.getElementById("fscroller").innerHTML=begintag+fcontent[index]+closetag
    if (fadelinks)
      linkcolorchange(1);
    colorfade(1, 15);
  }
  else if (ie4)
    document.all.fscroller.innerHTML=begintag+fcontent[index]+closetag;
  index++
}

// colorfade() partially by Marcio Galli for Netscape Communications.  ////////////
// Modified by Dynamicdrive.com

function linkcolorchange(step){
  var obj=document.getElementById("fscroller").getElementsByTagName("A");
  if (obj.length>0){
    for (i=0;i<obj.length;i++)
      obj[i].style.color=getstepcolor(step);
  }
}

/*Rafael Raposo edited function*/
var fadecounter;
function colorfade(step) {
  if(step<=maxsteps) {	
    document.getElementById("fscroller").style.color=getstepcolor(step);
    if (fadelinks)
      linkcolorchange(step);
    step++;
    fadecounter=setTimeout("colorfade("+step+")",stepdelay);
  }else{
    clearTimeout(fadecounter);
    document.getElementById("fscroller").style.color="rgb("+endcolor[0]+", "+endcolor[1]+", "+endcolor[2]+")";
    setTimeout("changecontent()", delay);
	
  }   
}

/*Rafael Raposo's new function*/
function getstepcolor(step) {
  var diff
  var newcolor=new Array(3);
  for(var i=0;i<3;i++) {
    diff = (startcolor[i]-endcolor[i]);
    if(diff > 0) {
      newcolor[i] = startcolor[i]-(Math.round((diff/maxsteps))*step);
    } else {
      newcolor[i] = startcolor[i]+(Math.round((Math.abs(diff)/maxsteps))*step);
    }
  }
  return ("rgb(" + newcolor[0] + ", " + newcolor[1] + ", " + newcolor[2] + ")");
}

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

if (window.addEventListener)
window.addEventListener("load", changecontent, false)
else if (window.attachEvent)
window.attachEvent("onload", changecontent)
else if (document.getElementById)
window.onload=changecontent