/***********************************************
* 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 = 5500; //set delay between message change (in miliseconds)
var maxsteps=50; // 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 16px Trebuchet MS; padding: 2px; margin-left: 30; margin-top: -20">'; //set opening tag, such as font declarations
fcontent[0]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'>   On this Mega-Website,<br> you are given direct access to<font color='#0066cc'> All Possible MLS Listings </font><br>in Asheville and the Western North Carolina Area.";
fcontent[1]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   And, I can personally show and represent you as your Agent <br>for any and all properties listed on this Website which are located in<br> Asheville and Western North Carolina.</b>";
fcontent[2]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   All Listings includes properties in all 13 Counties surrounding Asheville,:<br><font color='#0066cc'><b>Buncombe, Haywood, Henderson, Madison, McDowell,<br> Polk, Rutherford, Transylvania, Yancey Counties, plus 4 more in NC.</font></b>"; 
fcontent[3]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   And, all Listings are updated and refreshed<br> <b>Every 24 hrs, <br>Every day of the week!</b>";
fcontent[4]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   That means you have immediate and direct access <br>to the latest MLS Listings available for all MLS properties available in Asheville and Western North Carolina.";
fcontent[5]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   Besides <i><font color='#0066cc'>Keller-Williams</font>,</i> this Website <br>conveniently also includes Listings from other Professional Real Estate Agencies in Asheville and Western North Carolina...."; 
fcontent[6]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   Other listings include: <b><i><font color='#0066cc'>Coldwell Banker, Century 21, RE/MAX,<br>Realty Executive, Beverly-Hanks, Realty World, Prudential</i></b></font><br> and all others who list with the Asheville Board of Realtors.";
fcontent[7]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   So you can examine any available house or property you want, <br>---And I am licensed to show you any of these that you want, <br>---No matter who lists it!";
fcontent[8]="<p align='center'><img border='0' src='images/Red-Button1.gif' width='18' height='18'><align='center'>   One-Stop Home Shopping!<br>One Broker/Realtor that takes care of all the details!<BR>One Broker/Realtor for All Your Shopping Needs!";
closetag='</div>';

var fwidth='600px'; //set scroller width
var fheight='20px'; //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=5;
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, 150);
  }
  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 grey;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