/*  ******************************************************************************
    * This code was created by Jim Young of www.requestcode.com .                *
    * You may use this code at no charge.  All I ask is that you give me         *
    * credit.  Please visit my site for more scripts like this one.              *
    ******************************************************************************
    Enter your links or text in the array below that you want to scroll.  Make sure that
    you use single quotes within the double quotes */

var msg=new Array()
msg[0]='<center><b><font color=\'#800000\' face=\'Verdana,Arial\' size=\'2\'>Books</font></b></center><a href=\'http://www.amazon.com/exec/obidos/ASIN/0789477645/thewildboarnetwo\'><img src=\'books/animal.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Don E. Wilson / David Burnie: Animal - The Definitive Guide to the World\'s Wildlife</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/ASIN/0691113246/thewildboarnetwo\'><img src=\'books/mammals.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>David Attenborough:<br>The Life of Mammals</font></a>';
msg[1]='<a href=\'http://www.amazon.com/exec/obidos/ASIN/0792271807/thewildboarnetwo\'><img src=\'books/national.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>National Geographic Society: National Geographic Animal Encyclopedia</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/ASIN/0753452839/thewildboarnetwo\'><img src=\'books/kingfisher.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>David Burnie: The Kingfisher Illustrated Animal Encyclopedia</font></a>';
msg[2]='<a href=\'http://www.amazon.com/exec/obidos/ASIN/0871137976/thewildboarnetwo\'><img src=\'books/agap.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Tim Flannery / Peter Schouten: A Gap in Nature - Discovering the World\'s Extinct Animals</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/0716738635/qid%3D1076172139/sr%3D1-2\'><img src=\'books/physiology.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Burggren-French-Eckert-Randall: Eckert Animal Physiology</font></a>';
msg[3]='<center><b><font color=\'#800000\' face=\'Verdana,Arial\' size=\'2\'>DVDs</font></b></center><a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/B00008OM6K\'><img src=\'dvds/mammals.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>David Attenborough: The Life of Mammals</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/6305607583/qid%3D1076239192/sr%3D1-9\'><img src=\'dvds/inthewild.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Madacy Entertainment: Animals in the Wild<br>(5-pack)</font></a>';
msg[4]='<a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/B00008MTY4/qid%3D1076240550/sr%3D1-2\'><img src=\'dvds/animals.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Jamie Uys:<br>Animals Are Beautiful People</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/B00009ECCS/qid%3D1076241247/sr%3D1-23\'><img src=\'dvds/wondersofthesea.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Sheryl Brakey:<br>Wonders of the Sea Series</font></a>';
msg[5]='<a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/0970742215/qid%3D1076242461/sr%3D1-20\'><img src=\'dvds/incredible1.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Steve Greisen:<br>Incredible Creatures that Defy Evolution 1</font></a><br><br><a href=\'http://www.amazon.com/exec/obidos/redirect?tag=thewildboarnetwo&path=tg/detail/-/0970742231/qid%3D1076241247/sr%3D1-22\'><img src=\'dvds/incredible2.jpg\'><br><font color=\'#800000\' face=\'Verdana,Arial\' size=\'1\'>Steve Greisen:<br>Incredible Creatures that Defy Evolution 2</font></a>';





/* The variables below are the ones you want to change */
speed=30           // Sets the speed in milliseconds at which the link or text scrolls.
var divwidth=130   // Sets the width of the div or layer in pixels. You will have to play with this to get it set correctly.
var divheight=308  // Sets the height of the div or layer in pixels. Same as above.

/* The variables divincbt, divinctb, divincrl and divinclr set the increment in pixels
   that the div that contains the text or links is moved. Which one is used is determined
   by the direction that you pick in the variable whichscroll. The variable divinctb would
   be used, if you set whichscroll to 1; divinctb, if you set whichscroll to 2; divincrl,
   if you set whichscroll to 3 and divinclr, if you set whichscroll to 4. You can change
   these variables to speed up or slow down the movement of the scroll. */

var divincbt=1
var divinctb=-1
var divincrl=10
var divinclr=-10

var divpause=3000  // Sets how long to pause in milliseconds before scrolling the next link
		   // or text.

var divtop="0"    // divtop and divleft set the top and left positions of the container
var divleft="0"   // div or layer in pixels.

var divcolor="#FFFFE7"  // Sets the background color of the div or layer.

var divname1="scroll2"  // Sets the name of your div or layer for the first link or text that is displayed.
var divname2="scroll3"  // Sets the name of your div or layer for the next link or text to be displayed.

/* The variable whichscroll is used to set the direction of the scrolling. It is currently
   set to 1.
    1 = Bottom to Top
    2 = Top to Bottom
    3 = Right to Left
    4 = Left to Right */

var whichscroll="1"

/* END OF CONFIGURATION VARIABLES */

/* THERE IS NO NEED TO CHANGE THE VARIABLES OR SCRIPTS BELOW */

var divinc
var stopposa
var stopposb
var scrollmsga
var scrollmsgb
var thediva
var thedivb
var posa
var posb
var i=msg.length
var firsttime="y"
var divprop
var whichdiv=divname1

if(whichscroll=="1")
  {
   stopposa=0
   stopposb=divheight*-1
   divprop="top"
   divinc=divincbt
  }
if(whichscroll=="2")
  {
   stopposa=0
   stopposb=divheight
   divprop="top"
   divinc=divinctb
  }
if(whichscroll=="3")
  {
   stopposa=0
   stopposb=divwidth*-1
   divprop="left"
   divinc=divincrl
  }
if(whichscroll=="4")
  {
   stopposa=1
   stopposb=divwidth+2
   divprop="left"
   divinc=divinclr
  }

function Scrollboxa(obja)
     {
         savobja=obja
         posa=posa-divinc
         if(((whichscroll=="1" || whichscroll=="3")&&(posa<=stopposa))||
           ((whichscroll=="2" || whichscroll=="4")&&(posa>=stopposa)))
           {
            clearTimeout(scrollmsga)
            setTimeout("scrollit()",divpause)
           }
         else
             {
              if(document.getElementById) // IE5 and NS6
                {
                 eval("elma.style."+divprop+"=posa")
                 elma.style.visibility="visible"
                }
              if(document.layers)    // NS4+
                {
                 eval("obja."+divprop+"=posa")
                 document.main.visibility="show"
                }
              scrollmsga=setTimeout("Scrollboxa(savobja)",speed)
             }
     }

function Scrollboxb(objb)
     {
         savobjb=objb
         posb=posb-divinc
         if(((whichscroll=="1" || whichscroll=="3")&&(posb<=stopposb))||
            ((whichscroll=="2" || whichscroll=="4")&&(posb>=stopposb)))
           {
            clearTimeout(scrollmsgb)
           }
         else
              {
               if(document.getElementById) // IE5 and NS6
                 {
                  eval("elmb.style."+divprop+"=posb")
                 }
               if(document.layers)  // NS4+
                 {
                  eval("objb."+divprop+"=posb")
                  objb.visibility="show"
                 }
               scrollmsgb=setTimeout("Scrollboxb(savobjb)",speed)
              }
     }

function scrollit()
   {
    i++
    if(i>=msg.length)
      {i=0}
    posa=stopposb*-1
    posb=0
    if(firsttime=="y")
      {
       firsttime= "n"
       if(document.getElementById)      // IE5 and NS6
         {
          elma=document.getElementById(divname1)
          elma.innerHTML=msg[i]
         }
      if(document.layers)   // NS4+
        {
         thediva=eval("document.main.document."+divname1)
         thediva.document.write(msg[i])
         thediva.document.close()
        }
       Scrollboxa(thediva)
      }
    else
      {
       if(whichdiv==divname1)
         {
          if(document.getElementById)  // IE5 and NS6
            {
             elmb=document.getElementById(divname1)
             elma=document.getElementById(divname2)
             elma.innerHTML=msg[i]
            }
          if(document.layers)  //  NS4+
            {
             thedivb=eval("document.main.document."+divname1)
             thediva=eval("document.main.document."+divname2)
             thediva.document.write(msg[i])
             thediva.document.close()
            }
          Scrollboxb(thedivb)
          whichdiv=divname2
          Scrollboxa(thediva)
         }
       else
         {
          if(document.getElementById)   // IE5 and NS6
            {
             elmb=document.getElementById(divname2)
             elma=document.getElementById(divname1)
             elma.innerHTML=msg[i]
             }
          if(document.layers)  // NS4+
            {
             thedivb=eval("document.main.document."+divname2)
             thediva=eval("document.main.document."+divname1)
             thediva.document.write(msg[i])
             thediva.document.close()
             }
          Scrollboxb(thedivb)
          whichdiv=divname1
          Scrollboxa(thediva)
         }
      }
  }