function init_screen() 
{
	if (navigator.appName == "Netscape") 
	{
    no_chrome_width = window.innerWidth;
	document.divSContainer.width = no_chrome_width 
	document.divSContainer.clip.width = no_chrome_width 
    }
	else 
	{
    no_chrome_width=document.body.clientWidth;
	document.all.divSContainer.style.width = no_chrome_width +"px"
	document.all.divSContainer.style.clip.width = no_chrome_width +"px"
	} 
}

// begin absolutely positioned scrollable area object scripts 
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 scrollerwidth=581
var totalwidth = 590
var end_point = totalwidth
var anchor_slide = 0

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.scrollWidth=bw.ns4?this.css.document.width:this.el.offsetWidth 
    this.clipHeight=bw.ns4?this.css.clip.height:this.el.offsetHeight 
    this.clipWidth=bw.ns4?this.css.clip.width:this.el.offsetWidth 
    this.left=MoveAreaLeft;this.right=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 
    this.css.top=this.y 
} 
 
function MoveAreaRight(move){
    //objLeft.css.visibility='visible'
	if(this.x>-this.scrollWidth+objSContainer.clipWidth){ 
    this.MoveArea(this.x-move,0) 
    if(loop) setTimeout(this.obj+".right("+move+")",speed) 
	} else
	{//objRight.css.visibility='hidden'
	}
} 
function MoveAreaLeft(move){ 
    //objRight.css.visibility='visible'
	if(this.x<0){ 
    this.MoveArea(this.x-move,0) 
    if(loop) setTimeout(this.obj+".left("+move+")",speed) 
	}  else
	{//objLeft.css.visibility='hidden'
	}
} 

function SlideRight(move)
{
	if (totalwidth >0)
	{
			objSlider.css.left = parseInt(objSlider.css.left) - move 
			objSlider2.css.left = parseInt(objSlider2.css.left) - move 
			objSlider3.css.left = parseInt(objSlider3.css.left) - move 
			objSlider4.css.left = parseInt(objSlider4.css.left) - move 
		
		totalwidth -=move
		if(loop)
		{
			setTimeout("SlideRight("+move+")",speed)
		}
	}
	else
	{
	CeaseScroll();
	}
}

function SlideLeft(move)
{
	if (totalwidth <end_point)
	{
			objSlider.css.left = parseInt(objSlider.css.left) - move 
			objSlider2.css.left = parseInt(objSlider2.css.left) - move 
			objSlider3.css.left = parseInt(objSlider3.css.left) - move 
			objSlider4.css.left = parseInt(objSlider4.css.left) - move 
		
		totalwidth -=move
		if(loop)
		{
			setTimeout("SlideLeft("+move+")",speed)
		}
	}
	else
	{
	CeaseScroll();
	}
}

function PerformSlideNS(speed){ 
	if(initialised){ 
		loop=true; 
		if(speed>0) SlideRight(speed) 
		else SlideLeft(speed)
	} 
} 
 
function CeaseScroll(){ 
    loop=false 
    if(timer) clearTimeout(timer) 
} 
var initialised; 
function InitialiseScrollableArea(){ 
    objSContainer=new ConstructObject('divSContainer') 
    objSlider=new ConstructObject('divSlider','divSContainer') 
    objSlider2=new ConstructObject('divSlider2','divSContainer') 
    objSlider3=new ConstructObject('divSlider3','divSContainer') 
    objSlider4=new ConstructObject('divSlider4','divSContainer') 
    objSlider.MoveArea(0,0)
    objSlider2.MoveArea(objSlider.scrollWidth,0)
    objSlider3.MoveArea(objSlider.scrollWidth + objSlider2.scrollWidth,0)
    objSlider4.MoveArea(objSlider.scrollWidth + objSlider2.scrollWidth + objSlider3.scrollWidth,0)
	
    objSContainer.css.visibility='visible'
    initialised=true;
	anchor_slide = (anchor_slide -1) * 78;
	if (anchor_slide > 590) 
	anchor_slide = 590;
	if (anchor_slide > 0) 
	SlideRight(anchor_slide);
} 
// end absolutely positioned scrollable area object scripts
