/*********************************************************************

Script: Scrolling image banner (top to bottom scroll)

**********************************************************************

Scrolling image banner (top to bottom scroll)

© Crossroads Solutions, Inc. (www.crossroads-solutions.com)

Adapted from:
  Conveyor belt slideshow script
    © 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

**********************************************************************

Usage:
  Paste the following script into the header section of the html page 
  and adjust the parameters as desired:

  <script type="text/javascript">

  // set scrolling banner variables
  //  - width (integer - pixels)
  //  - height (integer - pixels)
  //  - time between moves (integer - milliseconds)
  //  - pixels to move (integer - pixels)
  //  - background color "#EAEAEA"
  //  - gap between images (HTML)
  //  - images - load each image into the array 
  //             be sure to set array subscripts

  var sbtb_wid = 250;
  var sbtb_hgt = 100;
  var sbtb_tim = 30;
  var sbtb_spd = 2;
  var sbtb_clr = "#004040";
  var sbtb_gap = "&nbsp;";
  var sbtb_img = new Array();
    sbtb_img[0]='<a href="img1_htm"><img src="img1.jpg" border="0"></a>';
    sbtb_img[1]='<a href="img2.htm"><img src="img2.jpg" border="0"></a>';

  </script>

  In the body of the html where the banner should appear, place:
    <script type="text/javascript" src="scr_ban_lr.js"></script>

  Run the sbtb_Fill() function on window load.

Notes: 

*********************************************************************/


var sbtb_doc = document.getElementById;

var sbtb_img_str;
var sbtb_img_hgt;

var sbtb_spd_cur = sbtb_spd;
var sbtb_div2_ptr, sbtb_div3_ptr;


if (sbtb_doc) {
  // join all images together with line break in between each
  sbtb_img_str = '<nobr>' + sbtb_img.join("<br>") + '</nobr>';
  with (document) {
    write('<span id="sbtb_img_span" ' + 
          'style="visibility:hidden;position:absolute;top:-1000px;left:-1000px;textg-align:center">' +  
          sbtb_img_str + '</span>');
    write('<table border="0" cellspacing="0" cellpadding="0"><tr><td>');
    write('<div style="position:relative' + 
          ';width:' + sbtb_wid + 'px;height:' + sbtb_hgt + 'px' + 
          ';overflow:hidden">');
    if (sbtb_clr != "") {
      write('<div style="position:absolute' + 
            ';width:' + sbtb_wid + 'px;height:' + sbtb_hgt + 'px' + 
            ';background-color:' + sbtb_clr + '"' + 
            ' onMouseover="sbtb_spd_cur=0" onMouseout="sbtb_spd_cur=sbtb_spd">');
    } else {
      write('<div style="position:absolute' + 
            ';width:' + sbtb_wid + 'px;height:' + sbtb_hgt + 'px"' + 
            ' onMouseover="sbtb_spd_cur=0" onMouseout="sbtb_spd_cur=sbtb_spd">');
    }
    write('<div id="sbtb_div2" style="position:absolute;left:0px;top:0px"></div>');
    write('<div id="sbtb_div3" style="position:absolute;left:0px;top:0px"></div>');
    write('</div></div>');
    write('</td></tr></table>');
  }
}

function sbtb_Slide() {
  //   if div2 is still showing, move it up. if it has passed out of the window, move it
  //   below div3. Note the adjustment (- sblr_spd_cur) factor is due to the fact that 
  //   div3 will get moved in the next statement and without the adjustment, a gap will be created.
  //   then do the same for div3.
  if (sbtb_doc) {
    if (parseInt(sbtb_div2_ptr.style.top) > (sbtb_img_hgt * (-1))) {
      sbtb_div2_ptr.style.top = parseInt(sbtb_div2_ptr.style.top) - sbtb_spd_cur + "px";
    } else {
      sbtb_div2_ptr.style.top = parseInt(sbtb_div3_ptr.style.top) + sbtb_img_hgt - sbtb_spd_cur + "px";
    }
    if (parseInt(sbtb_div3_ptr.style.top) > (sbtb_img_hgt * (-1))) {
      sbtb_div3_ptr.style.top = parseInt(sbtb_div3_ptr.style.top) - sbtb_spd_cur + "px";
    } else {
      sbtb_div3_ptr.style.top = parseInt(sbtb_div2_ptr.style.top) + sbtb_img_hgt + "px";
    }
  }
}

function sbtb_Fill() {
  if (sbtb_doc) {
    sbtb_img_hgt = document.getElementById("sbtb_img_span").offsetHeight;
    sbtb_div2_ptr = document.getElementById("sbtb_div2");
    sbtb_div3_ptr = document.getElementById("sbtb_div3");
    sbtb_div2_ptr.innerHTML = sbtb_div3_ptr.innerHTML = sbtb_img_str;
    sbtb_div3_ptr.style.top = sbtb_img_hgt + "px";
  }
  sblt_time=setInterval("sbtb_Slide()",sbtb_tim);
}
