/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

var speed=60
var initialised; 
var loop, timer;

var objContainer,objScroller;
 
/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

function initScroller(ix,iy)
{
	if (hs = document.getElementById("h_s"))
		if (hs.value > 0)
		{
			func = "slide_kick('" + document.getElementById("h_form").value + "','" + document.getElementById("h_act").value + "')";
			t = setTimeout(func, speed=3000);
			//hs.value = 0;
			//slide_click(document.getElementById("h_form").value, document.getElementById("h_act").value);
		}

	//alert(document.getElementById("h_y").value);
	if (hy = document.getElementById("h_y"))
		iy = hy.value;
	InitialiseScrollableArea(ix,iy);
	//preloadImages('images/arrow_up.gif','images/arrow_down.gif')
}

/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

function slide_click(dform, act)
{
	if (hs = document.getElementById("h_s"))
		if (hs.value > 0)	//running?
		{
			hs.value = 0;	//stop
		}
		else
		{
			hs.value = 1;	//start
		}
	scroller_submit(dform, act);
}
		
/////////////////////////////////////////////////////////////////////////

function slide_kick(dform, act)
{
	//alert(hy.value);
	if (hy = document.getElementById("h_y"))
		hy.value -= 90;
	MoveAreaUp(90);
	
	scroller_submit(dform, act);
}
		
/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

function scroller_submit(dform, act)
{
	if (form = document.getElementById(dform))
	{
		form.method = 'post';
		form.action = act;
		form.submit();
	}
}
		
/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

function doMouseOver(delta, btn, src)
{
	if (!loop)
	{
		PerformScroll(delta);
		msg=(delta < 0)?'Scroll Up':'Scroll Down';
		displayStatusMsg(msg);
		swapImage(btn,'',src,1);
		return document.returnValue
	}
}

/////////////////////////////////////////////////////////////////////////

function doMouseOut()
{
	CeaseScroll();
	swapImgRestore()
}

/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

/* Extension written by David G. Miles (http://www.z3roadster.net/dreamweaver/) 
based in part on code written by Thomas Brattli (http://www.bratta.com)*/
// Courtesy of SimplytheBest.net (http://simplythebest.net/info/dhtml_scripts.html)
<!--
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)?0:0; 
    this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5) 
    return this 
} 
bw=new verifyCompatibleBrowser() 
  
/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

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)
{ 
	//alert(x + ':' + y);
	this.x = x; this.y = y;
	this.css.left = this.x;
	this.css.top = this.y;
	document.getElementById("h_y").value = this.y;
	//alert(document.getElementById("h_y").value);
} 
function MoveAreaDown(move)
{ 
	//alert(this.y);
	if (this.y > -this.scrollHeight + objContainer.clipHeight)
	{ 
    this.MoveArea(0, this.y-move) 
    if(loop) setTimeout(this.obj+".down("+move+")",speed) 
	} 
} 
function MoveAreaUp(move)
{ 
	//alert(this.y);
	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) 
} 

/////////////////////////////////////////////////////////////////////////

function InitialiseScrollableArea(ix,iy)
{ 
	ner = document.getElementById('divContainer');
	if (ner)
	{
		objContainer = new ConstructObject('divContainer') 
		objScroller = new ConstructObject('divContent','divContainer') 
		objScroller.MoveArea(ix,iy) 
		objContainer.css.visibility='visible' 
		initialised=true; 
	}
} 

/////////////////////////////////////////////////////////////////////////

function displayStatusMsg(msgStr)
{ 
  status=msgStr;
  document.returnValue = true;
}

/////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////

function preloadImages() { 
  var d=document; if(d.images){ if(!d.p) d.p=new Array();
    var i,j=d.p.length,a=preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.p[j]=new Image; d.p[j++].src=a[i];}}
}

function swapImgRestore() { 
  var i,x,a=document.sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

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;
}

function swapImage() { 
  var i,j=0,x,a=swapImage.arguments; document.sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=findObj(a[i]))!=null){document.sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
		
/////////////////////////////////////////////////////////////////////////