<!--
// JavaScript Document

// Global variable for Cross-browser AutoScroller 
flevTimeoutID = null;

function MM_findObj(n, d) { //v4.01
	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=MM_findObj(n,d.layers[i].document);
	if(!x && d.getElementById) x=d.getElementById(n); 

	return x;
}

function flevDivPositionValue(sDivID, sPositionProperty) { // v1.0, Marja Ribbers-de Vroed  
	var sPositionValue;
	
	// ***** W3C Compatible DOM (NN6, Mozilla 16, etc.) ***** 
	if (document.getElementById && !document.all) { //W3C DOM compliant 
		var docObj = document.getElementById(sDivID); 

		if (document.defaultView != null) { 
			// NS6+ alike 
			//			sPositionValue = document.defaultView.getComputedStyle(docObj, "").getPropertyValue(sPositionProperty); 

			if (docObj) {
				sPositionValue=docObj.style[sPositionProperty];
			} else {
				sPositionValue="";
			}
		} else {
			// Opera 5 alike 
			if (sPositionProperty == "height") { 
				sPositionValue = docObj.style.pixelHeight; 
			} else if (sPositionProperty == "width") { 
				sPositionValue = docObj.style.pixelWidth; 
			} else { 
				sPositionValue = eval("docObj.style." + sPositionProperty); 
			} 
		} 
		
		sPositionValue = (sPositionValue == "") ? "0" : sPositionValue; 
	} else if (document.layers) { 
		//NS4+ DOM compliant 
		var docObj = eval("MM_findObj('" + sDivID + "')"); 
		if ((sPositionProperty == "width") || (sPositionProperty == "height")) { 
			sPositionValue = eval("docObj.clip." + sPositionProperty); 
		} else { 
			sPositionValue = eval("docObj." + sPositionProperty); 
		} 
		sPositionValue = (sPositionValue == "") ? "0" : sPositionValue; 
	} else if (document.all) { 
		// ***** Internet Explorer 4+ DOM ***** 
		if (sPositionProperty == "width") { 
			sPositionValue = eval(sDivID + ".offsetWidth"); 
		} else if (sPositionProperty == "height") { 
			sPositionValue = eval(sDivID + ".offsetHeight"); 
		} else if (sPositionProperty == "top") {
			sPositionValue = eval(sDivID + ".offsetTop"); 
		}	else if (sPositionProperty == "left") { 
			sPositionValue = eval(sDivID + ".offsetLeft"); 
		} 
		sPositionValue = (sPositionValue == "") ? "0" : sPositionValue; 
	} 

	if (isNaN(sPositionValue)) { 
		if (sPositionValue.indexOf('px') > 0) { 
			sPositionValue = sPositionValue.substring(0,sPositionValue.indexOf('px')); 
		} 
	} 

	return parseInt(sPositionValue); 
}

function flevMoveDiv(sDivID, sLeft, sTop){ // v1.0, Marja Ribbers-de Vroed 
	var	docObj = eval("MM_findObj('" + sDivID + "')"); 

	if (document.layers) { 
		// NS4.x 
		eval("docObj.top = '" + sTop + "'"); 
		eval("docObj.left = '" + sLeft + "'"); 
	} else { 
		// all others 
		docObj.style.top = sTop + "px"; 
		docObj.style.left = sLeft + "px"; 
	} 
}

function flevAutoScrollDivs() { // v1.0, Marja Ribbers-de Vroed   
	var iArgs = flevAutoScrollDivs.arguments.length;   
	var iStartScrolling = (iArgs > 0) ? parseInt(flevAutoScrollDivs.arguments[0]) : 1;  
	var iPixels = (iArgs > 1) ? parseInt(flevAutoScrollDivs.arguments[1]) : 1;   
	var iDelay = (iArgs > 2) ? parseInt(flevAutoScrollDivs.arguments[2]) : 50;   
	var sContainerDivID = (iArgs > 3) ? flevAutoScrollDivs.arguments[3] : 'AutoScrollContainer';
	var sContentDivID = (iArgs > 4) ? flevAutoScrollDivs.arguments[4] : 'AutoScrollContent';   
	var iCurrentTop = flevDivPositionValue(sContentDivID, 'top');   
	var iScrollTop = (-1 * flevDivPositionValue(sContentDivID, 'height'));   
	var iScrollBottom = flevDivPositionValue(sContainerDivID, 'height');   
	var iCurrentLeft = flevDivPositionValue(sContentDivID, 'left');  

	if (iStartScrolling) {   
		if (iCurrentTop != iScrollTop) {
			// Continue scrolling   
			flevMoveDiv(sContentDivID, String(iCurrentLeft), String(iCurrentTop-iPixels));
		}	else {
			// Re-position scrolling layer at bottom of containing layer  
			flevMoveDiv(sContentDivID, String(iCurrentLeft), String(iScrollBottom));
		}	

		flevTimeoutID = setTimeout("flevAutoScrollDivs(" + iStartScrolling + "," + iPixels + "," + iDelay + ",'" + sContainerDivID +"','" + sContentDivID+"')", iDelay);   
	} else if (flevTimeoutID != null) {
		clearTimeout(flevTimeoutID);
	}

}
//-->

