/********************************************************************************
Copyright (C) 1999 Thomas Brattli
*Modified by Digital Studios*
This script is made by and copyrighted to Thomas Brattli at www.bratta.com
Visit for more great scripts. This may be used freely as long as this msg is intact!
I will also appriciate any links you could give me.
********************************************************************************/
//Default browsercheck, added to all scripts!
function checkBrowser(){
        this.ver=navigator.appVersion
        this.dom=document.getElementById?1:0
        this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
        this.ie4=(document.all && !this.dom)?1:0;
        this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
        this.ns4=(document.layers && !this.dom)?1:0;
        this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
        return this
}
bw=new checkBrowser()
/**************************************************************************
Variables to set.
***************************************************************************/
//Updated: Added left and top variables.
sLeft=32 //The left placement of the menu
sTop=435
 //The top placement of the menu

//The height of the menu
sMenuheight=250

//Width of the arrows
sArrowwidth=0

//Scroll speed: (in milliseconds, change this one and the next variable to change the speed)
sScrollspeed=75

//Pixels to scroll per timeout.
sScrollPx=5

/**************************************************************************
Scrolling functions
***************************************************************************/
var tim=0
var noScroll=true
function mLeft(){
        if(!noScroll && oMenu.x<5){
                oMenu.moveBy(sScrollPx,0)
                tim=setTimeout("mLeft()",sScrollspeed)
        }
}
function mRight(){
        if(!noScroll && oMenu.x>-(oMenu.scrollWidth-(pageWidth))-5){
                oMenu.moveBy(-sScrollPx,0)
                tim=setTimeout("mRight()",sScrollspeed)
        }
}
function noMove(){clearTimeout(tim); noScroll=true}
/**************************************************************************
Object part
***************************************************************************/
function makeObj(obj,nest,menu){
        nest=(!nest) ? '':'document.'+nest+'.'                                                                          
        this.css=bw.dom? document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+"document.layers." +obj):0;         
        this.evnt=bw.dom? document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+"document.layers." +obj):0;            
        this.scrollWidth=bw.ns4?this.css.document.width:this.evnt.offsetWidth
        this.x=(bw.ns4 || bw.ns5)? this.css.left:this.css.pixelLeft;
        this.y=(bw.ns4 || bw.ns5)? this.css.top:this.css.pixelTop;              
        this.moveBy=b_moveBy; this.moveIt=b_moveIt;     this.showIt=b_showIt;this.clipTo=b_clipTo;
        return this
}
function b_moveBy(x,y){this.x=this.x+x; this.y=this.y+y; this.css.left=this.x; this.css.top=this.y}
function b_moveIt(x,y){this.x=x; this.y=y; this.css.left=this.x; this.css.top=this.y}
function b_clipTo(t,r,b,l){
        if(bw.ns4){this.css.clip.top=t; this.css.clip.right=r; this.css.clip.bottom=b; this.css.clip.left=l
        }else this.css.clip="rect("+t+","+r+","+b+","+l+")";
}
function b_showIt(){this.css.visibility="visible"}
/**************************************************************************
Object part end
***************************************************************************/

/**************************************************************************
Init function. Set the placements of the objects here.
***************************************************************************/
function sideInit(){
        //Width of the menu, Currently set to the width of the document.
        //If you want the menu to be 500px wide for instance, just 
        //set the the pageWidth=500 in stead.
        pageWidth=380;
        
        oBg=new makeObj('divBg')
        oMenu=new makeObj('divMenu','divBg',1)
        //Placement
        oBg.moveIt(sLeft,sTop) //Main div, holds all the other divs.
        oMenu.moveIt(5,3)
        //setting the width and the visible area of the links.
        if(bw.dom || bw.ie4){ oBg.css.width=pageWidth; oBg.css.overflow="hidden" }
        oBg.clipTo(0,pageWidth,sMenuheight,0)
}

//executing the init function on pageload.
onload=sideInit;