// JavaScript Document

/***********************************************
* 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 = 3000; //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 style="font: normal 12px Arial; padding: 10px;">'; //set opening tag, such as font declarations
fcontent[0]="Working with RPT Software was easy and convenient.  Mark was very helpful and patient in making sure the database was exactly what we needed to help streamline our processes.  He was always accessible and dependent during the entire process.  He even continued to provide support and check in with me after the database was completed to make sure everything was functioning properly.  It was a pleasure to work with RPT Software.<br><br>Veranda Adkins<br>Sr. Manager, Sales Administration<br>Travel Impressions<br>";
fcontent[1]="Thank you Mark and RPT Software,<br><br>I am very pleased to say that the database manager you created has turned out perfectly.  I am impressed with your ability to take abstract ideas and information from someone with no programming background and turn them into the finished product that is desired.  The mortgage industry sales process is different than most sales industries, which requires a different style of database tracking.  My office couldn’t be happier with the way you completed this goal for us and have seen production increase already.<br><br>Christopher M Schiele<br>Production Manager/Mortgage Planner<br>Metropolis Funding, Inc";
fcontent[2]="We were extremely pleased with the results of the work we did with Mark/RPT Software. Our complicated database to manage a multi-million dollar US Government-funded community development project in Haiti needed to be revamped and Mark worked with us and really took the time to understand what we needed. We appreciated his attention to detail and the personal attention he gave us.<br><br>Matthew Van Geest<br>International Organization for Migration";
fcontent[3]="RPT Software has been a great asset to our company. Not only has the quality of the work been great but the follow up service has been very quick and efficient.<br><br>Erik<br>Investment Company";
fcontent[4]="Mark redesigned two of our Access 2007 databases.  His work was very professional.  I would recommend him to anyone looking for quality at a low price.<br><br>Beverley Seche<br>Network Administrator<br>Stark & Stark";
fcontent[5]="We use our customer management database on a daily basis to stay in touch with over 825 accounts.  The system is very user-friendly and allows us to have a customer’s complete history at our fingertips.<br><br>Duane McCombs<br>Commodities Manager<br>Poet Biorefining";
fcontent[6]="In a few days Mark built me a system to track our accounts and all aspects of our business from tracking purchases, leases, hardware keys, training, invoicing, payment collection and any interactions with our customers and contacts.  I'm very happy with my investment!  A+<br><br>August Conte<br>Marketing Manager<br>MEPCAD, Inc.";
fcontent[7]="To Anyone with Specialized Database Requirements:<br>RPT software, and Mark Andrews in particular, have been instrumental in automating our business processes.  Mark knows Access.  He has a versatile bag-of-tricks that he quickly tailored to meet our unique needs.  After looking at dozens of software products, some costing more than ten times what we spent with RPT, Mark’s custom application instantly increased our productivity.<br><br>William R. 'Bill' Sturm<br>Operations Manager<br>National Maintenance Systems Inc.<br>";
fcontent[8]="Dear Mark,<br><br>I wanted to thank you for the wonderful work you did building the Access system for us and share with you the positive impact it is having on our Admissions Dept.  In a relatively short time the system has eased our work flow and improved our efficiency.<br><br>Thanks for all the hard work.<br><br>With kind regards,<br>Lisa Sehgal<br>Sr. Manager, Student Recruitment and Admissions<br>Duke-NUS Graduate Medical School Singapore";
fcontent[9]="Working with Mark was easy, fast and produced the results we were looking for.  Not only did he make the changes perfectly to fit our original request, but he also made several suggestions for improvement that have significantly improved the quality of our data.  I would recommend RPT Software to anyone looking for high quality work at affordable prices.<br><br>Tim Gorin<br>Medical Aid to Haiti";
fcontent[10]="Being a MS Office developer working for an Australian client on modifications of RPT Software's CRM Template, I must say that this is definitely amongst the best examples of well and professionally written code I've ever seen.  As about the application, it is easy to use, has everything one would expect from a CRM application and the support provided by Mark is just second to none.<br><br>Svet Batoev<br>MS Office Developer";
fcontent[11]="I contacted Mark Andrews at RPT Software three years literally in the afternoon on Christmas Eve and he responded!  We continue to work with RPT Software and that same level of commitment and service continues to this day. Although we are located on the West Coast and their offices are on the East Coast you would never know there is a difference in time zones.  What an unbelievable company to work with.<br><br>John Busch, Owner<br>Lithtex NW<br>Bellingham, Washington";
fcontent[12]="Unlike most CRM solutions on the market today, the RPT CRM Software gives us full control for customizing it to meet our needs without having to rely on external resources and/or costly upgrades. Your expertise, on-going support, and willingness to help us integrate the CRM Software with our existing print management software made for a seamless transition and second-to-none experience.<br><br>Without hesitation; I <b><i>highly recommend</i></b> RPT Software for a feature-rich, easy-to-use, and easy-to-manage CRM solution backed with unparalleled support!<br><br>Kate Dinsmore<br>Vice President, Plastic Resource";
fcontent[13]="RPT Software does great work at good prices! But what I was most impressed with from them was their extra care they made with moving the process along as quickly and smoothly as possible and overcoming any speed bumps that came up. They communicated with me via phone and email most efficiently, and made my big problem easily solved.  I'll definitely be keeping them in mind for referrals not only for my department but the other departments at The Hanley Center for addiction treatment and our other affilates.  Thank you once again RPT Software!<br><br>Josh Dichkewich<br>Program Coordinator at Hanley Center";
fcontent[14]="We were looking for a CRM but the standard out-of-the-box solutions did not match our requirements and were not flexible enough.<br><br>We purchased the Advanced CRM template from RPT Software. The product is excellent. The template is well written and designed with simplicity but still offers a wide range of advanced functionality.  It is also easy to modify since the fundamental services are provided. I highly recommend the advanced CRM Template!<br><br>Chris Harasty<br>Director<br>Harvest Business Growth Partners";
closetag='</div>';

var fwidth='240px'; //set scroller width
var fheight='320px'; //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:1px 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