// begin absolutely positioned scrollable area object scripts 

	/*

	Extension developed by David G. Miles (www.z3roadster.net/dreamweaver)

	Original Scrollable Area code developed by Thomas Brattli 

	To add more shock to your site, visit www.DHTML Shock.com

	*/



	function verifyCompatibleBrowser(){ 

	    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 verifyCompatibleBrowser() 

	 

	var speed=50 

 

	var loop, timer 

 	

	function ConstructObject(obj,nest){ 

	    nest=(!nest) ? '':'document.'+nest+'.' 

	    this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;

		

		this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0; 

    	this.scrollHeight=bw.ns4?this.css.document.height:this.el.offsetHeight 

	    this.clipHeight=bw.ns4?this.css.clip.height:this.el.offsetHeight 

	    this.up=MoveAreaUp;this.down=MoveAreaDown; 

	    this.MoveArea=MoveArea; this.x; this.y; 

	    this.obj = obj + "Object" 

	    eval(this.obj + "=this") 

	    return this 

	} 

	function MoveArea(x,y){ 

	    this.x=x;this.y=y 

	    this.css.left=this.x 

	    this.css.top=this.y 

	} 

 

	function MoveAreaDown(move){ 

		if(this.y>-this.scrollHeight+objContainer.clipHeight){ 

	    this.MoveArea(0,this.y-move) 

	    if(loop) setTimeout(this.obj+".down("+move+")",speed) 

		} 

	} 

	function MoveAreaUp(move){ 

		if(this.y<0){ 

	    this.MoveArea(0,this.y-move) 

	    if(loop) setTimeout(this.obj+".up("+move+")",speed) 

		} 	

	} 

 

	function PerformScroll(speed){ 

		if(initialised){ 

			loop=true; 

			if(speed>0) objScroller.down(speed) 

			else objScroller.up(speed) 

		} 

	} 

 

	function CeaseScroll(){ 

	    loop=false 

	    if(timer) clearTimeout(timer) 

	} 

	var initialised; 

	function InitialiseScrollableArea(){ 

	    objContainer=new ConstructObject('divContainer') 

	    objScroller=new ConstructObject('divContent','divContainer') 

	    objScroller.MoveArea(0,0) 

	    objContainer.css.visibility='visible' 

	    initialised=true; 

	} 

	// end absolutely positioned scrollable area object scripts 



	arrup = new Image;

	arrupr = new Image;

	arrdown = new Image;

	arrdownr = new Image;

	arrup.src = "images/scrollarrow-up.gif";

	arrupr.src = "images/scrollarrow-up-on.gif";

	arrdown.src = "images/scrollarrow-down.gif";

	arrdownr.src = "images/scrollarrow-down-on.gif";