var speed=0 // Sets the speed in milliseconds at which the link or text scrolls.
// var divwidth=890 // Sets the width of the div or layer in pixels. You will have to play with this to get it set correctly.
var divwidth=getWidthDimension()-10;
var divheight=30 // Sets the height of the div or layer in pixels. Same as above.
var divincbt=1
var divinctb=-1
var divincrl=1
var divinclr=-1
var divpause=0 // Sets how long to pause in milliseconds before scrolling the next link or text.
var divtop="8" // divtop and divleft set the top and left positions of the container div or layer in pixels.
var divleft="02"
var divcolor="white" // 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
var whichscroll="3"
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()
{
    if(((msg.length!=0)&&(document.getElementById(divname1))&&(elma=document.getElementById(divname2))) //IE5 and NS6
    ||
    ((msg.length!=0)&&(eval("document.main.document."+divname1))&&(thediva=eval("document.main.document."+divname2)))) // NS4+
    {
        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)
            }
        }
    }
}