/***********************************************
* 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 = 2000; //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(0,0,0); // end color (red, green, blue)

var fcontent=new Array();
begintag='<div width="500px;"><h1 style="font-size:35px;font-variant: small-caps;" align="center">'; //set opening tag, such as font declarations

fcontent[0]="Agrenco Chartering & Shipping";
fcontent[1]="AIG";
fcontent[2]="Alandal Tankers BV";
fcontent[3]="Apache Energy Ltd";
fcontent[4]="Beykim Petroleum & Shipping Co";
fcontent[5]="Crystal Pool Ltd";
fcontent[6]="Eagle Bulk Shipping International";
fcontent[7]="Elura Shipping SA";
fcontent[8]="Empresa Maritima Amercana Ltd";
fcontent[9]="Fairfield Bulk Carriers";
fcontent[10]="Fairfield Chemical Carriers";
fcontent[11]="Fertiberia S.A.";
fcontent[12]="GEFO-Chemicals";
fcontent[13]="Hiscox Ins Ltd";
fcontent[14]="Inter-Oel Resourses AG";
fcontent[15]="Jo Tankers";
fcontent[16]="Kerr-McGee Oil Plc";
fcontent[17]="M T Maritime Management";
fcontent[18]="Maersk Oil UK Ltd";
fcontent[19]="Navigators Syndicate";
fcontent[20]="Novae Syndicate";
fcontent[21]="Palmali Shipping Co (Greece)";
fcontent[22]="Pembroke International Corporation";
fcontent[23]="Scottish & Southern Energy Ltd";
fcontent[24]="Seatank Co";
fcontent[25]="Shipowners Protection Ltd";
fcontent[26]="Solvalub Trading (Moscow) Ltd";
fcontent[27]="Star Tankers Ltd";
fcontent[28]="T. Alendal Rederi AS";
fcontent[29]="St Paul Travelers Syndicate Management";
fcontent[30]="SVL Activ Trading Ltd";
fcontent[31]="Targus Seatrade Ltd";
fcontent[32]="Travelers Syndicate 5000";
fcontent[33]="Sunseeker International (Boats) Ltd";
fcontent[34]="Swedish Club";
fcontent[35]="Talbot Syndicate";

closetag='</h1></div>';

var fwidth='800px'; //set scroller width
var fheight='50px'; //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