//<script type="text/javascript">

/***********************************************
* 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 = 15000; //set delay between message change (in miliseconds)
var maxsteps=30; // number of steps to take to change from start color to endcolor
var stepdelay=60; // 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 14px Arial; padding: 5px;">'; //set opening tag, such as font declarations
fcontent[0]="<b>Sunday 9th August 2009</b> MTEX, a MATLAB toolbox, has been enhanced, it has a stable Windows version and works with numerous pole figures and EBSD data formats.<p>Author: Ralf Hielscher, email: <a href='mailto:ralf.hielscher@gmail.com'>ralf.hielscher@gmail.com</a><p>MTEX is a MATLAB toolbox for:<ul><li>Analysis and visualisation of crystallographic geometries</li><li>Calculations with model ODFs</li><li>Analysis and visualisation of arbitrary diffraction data</li><li>Analysis and visualisation of arbitrary individual orientation mesurements (EBSD)</li><li>Estimation of orientation density functions (ODFs) from pole figures and EBSD data</li><li>ODF comparison</li><li>Calculation of texture characteristics</li><li>Creation of publication ready plots</li><li>Writing scripts to process many data sets</li></ul>The software <a href='http://dx.doi.org/10.1107/S0021889808030112'>(reference)</a> is freely available at <a href='http://code.google.com/p/mtex/'>http://code.google.com/p/mtex/</a> for Windows, Linux and Mac OSX.";
fcontent[1]="Please be aware the funding for CCP14 has ceased and only the minimal requirements will be carried out to keep the site going and make necessary updates. I may not be able to answer all your enquiries and if you do require help with powder diffraction you can ask on the Rietveld mailing list, details are found via this <a href='http://sdpd.univ-lemans.fr/DU-SDPD/nexus/iucr/unige/crystal/stxnews/riet/welcome.htm'>link</a>.";
closetag='</div>';

var fwidth='400px'; //set scroller width
var fheight='300px'; //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(){
  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

//</script>