/***********************************************
* 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 = 5000; //set delay between message change (in miliseconds) - default is 2000
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 style="font: normal 14px Arial; padding: 5px;">'; //set opening tag, such as font declarations
//begintag='<span class="box_main_text">'; //set opening tag, such as font declarations
//fcontent[0]="<b>What\'s new?</b><br>New scripts added to the Scroller category!<br><br>The MoreZone has been updated. <a href='../morezone/index.htm'>Click here to visit</a>";
//fcontent[1]="Dynamic Drive has been featured on Jars as a top 5% resource, and About.com as a recommended DHTML destination.";
//fcontent[2]="testing testing.";
//closetag='</div>';
//* OITC - set message

fcontent[0]="<div class='imginside'><img src='/img/callout_img11_exp.jpg' border='0' width='67' height='65' alt='Call Out Image'></div><b>Prix ontariens d'excellence en commerce international</b><br />Le ministère du Développement économique et du Commerce et la Chambre de commerce de l'Ontario s'associent pour rendre hommage aux exportateurs les plus novateurs ayant obtenu un immense succès dans les deux catégories de prix suivantes : Prix de l'innovation et Prix de l'expansion des marchés.<p></p><div align='right'><a class='box_more_navlink' href='/fr/success/fr_gta.asp' title='Pour en savoir plus'>Pour en savoir plus &gt;&gt;</a></div>";
fcontent[1]="<div class='imginside'><img src='/img/callout_img04_exp.jpg' border='0' width='67' height='65' alt='Call Out Image'></div><b>De nouvelles règles assurent la position de l'Ontario en tant que chef de file de l'écologie en Amérique du Nord</b><br />La nouvelle Loi sur l'énergie verte consolide la position de chef de file nord-américain de l'Ontario en matière de production et d'utilisation d'énergie renouvelable. La Loi sur l'énergie verte procure l'environnement stable pour l'investissement dont les entreprises ont besoin pour investir dans les immobilisations et les ressources humaines en Ontario.<p></p><div align='right'><a class='box_more_navlink' href='/fr/media/fr_news_details.asp?id=12' title='Pour en savoir plus'>Pour en savoir plus &gt;&gt;</a></div>";
fcontent[2]="<div class='imginside'><img src='/img/callout_img08_exp.jpg' border='0' width='67' height='65' alt='Call Out Image'></div><b>Les exportateurs de l'Ontario investissent de nouveaux marchés</b><br />Des entreprises de partout en Ontario ont reçu collectivement un million de dollars pour exporter dans les marchés mondiaux. Cette somme provenait de la Chambre de commerce de l'Ontario (CCO).  Le programme à coûts partagés mis en oeuvre par la CCO, Export Market Access (EMA), est conçu pour aider les petites et moyennes entreprises de l'Ontario à diversifier leurs exportations.<p></p><div align='right'><a class='box_more_navlink' href='/fr/media/fr_news_details.asp?id=16' title='Pour en savoir plus'>Pour en savoir plus &gt;&gt;</a></div>";
fcontent[3]="<div class='imginside'><img src='/img/callout_img07_exp.jpg' border='0' width='67' height='65' alt='Call Out Image'></div><b>Fin des négociations sur le libre-échange entre le Canada et Panama</b><br />Les entreprises et les exportateurs canadiens bénéficieront d'un plus grand accès au marché panaméen suite à la signature d'un accord de libre-échange entre le Canada et Panama. Le premier ministre Stephen Harper et le président de Panama, M. Ricardo Martinelli, ont célébré la fin des négociations en vue d'un accord commercial historique ainsi que d'une série de nouvelles ententes de coopération sur la main-d'œuvre et l'environnement.<p></p><div align='right'><a class='box_more_navlink' href='/fr/media/fr_news_details.asp?id=15' title='Pour en savoir plus'>Pour en savoir plus &gt;&gt;</a></div>";

//fcontent[1]="<div class='imginside'><img src='img/callout_img02_exp.jpg' border='0' width='67' height='65' alt='Call Out Image'></div><b>Mission de partenariat de l'Ontario sur les énergies renouvelables avec l'Union européenne<br />Du 11 au 16 juin 2009</b><br />La Direction du commerce international du ministère du Développement économique et du Commerce de l'Ontario vous invite à participer à une mission sur l'énergie renouvelable en Union européenne. La mission est axée sur des services de liaison interentreprises avec des entreprises d'énergie renouvelable des principaux marchés régionaux de l'Europe ainsi qu'avec des investisseurs providentiels prêts à investir dans de jeunes entreprises.<p></p><div align='right'><a class='box_more_navlink' href='/fr/calendarevents/fr_calendarevents_details.asp?id=64' title='Pour en savoir plus'>Pour en savoir plus &gt;&gt;</a></div>";
//* OITC - no need to set the width - will use the spotlight's default size
//var fwidth='150px'; //set scroller width
//var fheight='150px'; //set scroller height

//var fadelinks=1;  //should links inside scroller content also fade like text? 0 for no, 1 for yes.
var fadelinks=0;  //OITC - set to 0 - link not fade.

/***********************************************
///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=fcontent[index]
    if (fadelinks)
      linkcolorchange(1);
    colorfade(1, 15);
  }
  else if (ie4)
    document.all.fscroller.innerHTML=fcontent[index];
  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)
	/* OITC - no need to set width */
//  document.write('<div id="fscroller" style="border:0px;width:'+fwidth+';height:'+fheight+'"></div>');
  document.write('<div id="fscroller"></div>');

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