/***********************************************
* Fading Scroller- © Dynamic Drive DHTML code library (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit Dynamic Drive at http://www.dynamicdrive.com/ for full source code
***********************************************/

var delay = 300000000; //set delay between message change (in miliseconds)
var maxsteps=30; // number of steps to take to change from start color to endcolor
var stepdelay=40; // 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(255,255,255); // end color (red, green, blue)

var fcontent=new Array();
begintag='<div style="font: normal 10px Verdana; padding: 5px;">'; //set opening tag, such as font declarations
fcontent[0]="En verder gezien en gekeurd door: <b>Lee Towers</b> (Wat een aparte stem heb jij!), <b>Viola Holt</b> (Zing jij nog maar lekker even door!), <b>Ben Cramer</b> (...Zozo!), <b>Peter Koelewijn</b> (Die gozer kan niet zingen!), <b>Gerard Joling</b> (Gezellig, hoor.), <b>Snowy White</b> (Hey man, I like your sound!), <b>Yvonne Keeley</b> (Wow, lekker zeg!), <b>Jan de Hondt</b> (Kom je nog een keer terug?), <b>Hans Klok</b> (Zoals jij zingt wil ik ook leren zingen! Van jou!), <b>Saskia en Serge</b> (Je hebt een heel mooi vak gekozen!), <b>Felix Meurders</b> (Absolute wereldklasse, wat een stem, daar gaan we hoop ik, nog veel van horen!), <b>Benny Neyman</b> (Dat komt wel goed met jou!), <b>Annie de Reuve</b> (Blijf dicht bij jezelf, dan blijf je sterk.), <b>Lex Bolderdijk</b> (Leer noten lezen en denk niet zoveel na!), <b>David Rodrgues</b> (You got a magnifacent voice comin' out of you!), <b>Jan Akkerman</b> knikte en glimlachte alleen, <b>Edward Niessink</b> (Lekker repertoire!), <b>Margriet Eshuijs</b> (Mag ik van jou alsjeblieft ook een sigaretje?), <b>Ed van Katwijk</b> (Ik vond je echt heel goed toen!), <b>Frank Westrus</b> (leuk hoor, jongens.), <b>Edward Reekers</b> (Ik stuur onze opname naar Andrew Gold! Want daar ben ik fan van.), <b>Bill Hoyer</b> (Bootje, je bent een ras-artiest!), <b>Ton Ten Dam</b> (Oke, ik doe mee.), <b>Leo Fuld</b> (Goed, jij mag een liedje van mijn repertoire kiezen.), <b>Jan Vis</b> (Mooie stem!), <b>Hennie Vrienten</b> (Hoi.), <b>Opstelten</b> (Alweer klaar?), <b>Cohen</b> (*knikje*), <b>Mariska van der Kolk</b> (Dat klinkt hartstikke goed, joh), <b>Slakie Swart</b> (Dus zo doe je dat!), <b>Tjeu la Ling</b> (Sta ik in de weg?), <b>De dochters van Gert en Hermien</b> (Jij zingt ook echt heel hoog, he?), <b>Nada van Nie</b> (Wat een heerlijke zanger! Wat een lekkere stem!), <b>Mark Lennon, Venice</b> (And, did they like your little performance?), <b>Michiel Romeyn</b> (Yesterdaaaayyyy....!)  .........<BR><BR> Bij al deze korte ontmoetingen horen kleine verhaaltjes. Er waren uiteraard ook mensen die geen sjoege gaven. Die verhaaltjes zijn soms ook heel leuk. Die komen nog. <a href=\"javascript:changecontent(1);\">lees verder &raquo;</a>";
fcontent[1]="<b>Hans Klok</b><BR><BR>Een groep artiesten heet in Hilversum een stal. In de stal van de impressario stond ook Hans Klok, evenals enige andere mensen. Hans was net twintig misschien en goochelde en toverde met veel succes. Een erg aardige jongen. We leken een beetje op elkaar toen en snapten elkaar. Hij vertelde over zijn huis in een dorpje aan de zee, de schuur naast het huis waar hij samen met zijn vader bezig was om attributen voor zijn shows te maken. Hij begon net en schoot als een raket omhoog. Samen met een meisje die Sita of Syta heette. We zagen elkaar steeds bij de impresario en raakten bevriend. Hij wilde ook kunnen zingen en ik bood hem aan hem dat te leren. Zo kwam hij naar mijn stad en we zongen de hele dag en ik vertelde hem alles wat ik wist. We verzonnen een oefenlied en zongen dat op vele verschillende manieren. We spraken nog eens af en ik vond echt dat 'ie nu ook kon zingen. Een groot talent. <a href=\"javascript:changecontent(0);\">&laquo; terug</a>";

closetag='</div>';

var fwidth='390px'; //set scroller width
var fheight='310px'; //set scroller height

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 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(index){
  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++
}

function changecontent2(){
  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="margin-left: 20px;background-color: #885200; border: none; width: '+fwidth+'; height: '+fheight+'"></div>');

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