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;
	if (!this.el) {
		return this;
	}
	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.scrollWidth=bw.ns4?this.css.document.width:this.el.offsetWidth 
	this.clipWidth=bw.ns4?this.css.clip.width:this.el.offsetWidth 
	
	//this.up=MoveAreaUp;this.down=MoveAreaDown; 

	this.up=MoveAreaLeft;this.down=MoveAreaRight; 

	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 + "px"
	this.css.top=this.y + "px" 
} 
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 MoveAreaRight(move){
	if(this.x>-this.scrollWidth+objContainer.clipWidth){ 
	this.MoveArea(this.x-move,0) 
	if(loop) setTimeout(this.obj+".down("+move+")",speed) 
	} 
} 
function MoveAreaLeft(move){
	if(this.x<0){ 
	this.MoveArea(this.x-move, 0)
	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('scroll_container') 
	objScroller=new ConstructObject('scroll_content','scroll_container') 
	if (objContainer.el == null || objScroller.el == null) {
		initialised=false;
		return;
	}
	objScroller.MoveArea(0,0)
	objContainer.css.visibility='visible' 
	initialised=true; 
} 

function findObj(n, d) {
	var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
		d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
	if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
	for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=findObj(n,d.layers[i].document); return x;
}