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

var intScrollerCurrentPage=1;
var intScrollerTotalPages=1;
var intScrollerScrollerWidth=0;
var intScrollerScrollerContentWidth=0;
var strScrollerID;
var strScrollerContentID;
var bScrollerActive=false;

function scrollerInit(scrollerID, scrollerContentID) {
	strScrollerID = scrollerID;
	strScrollerContentID = scrollerContentID;
	intScrollerScrollerWidth=parseInt(MM_findObj(scrollerID).clientWidth);
	intScrollerScrollerContentWidth=parseInt(MM_findObj(strScrollerContentID).clientWidth);
	MM_findObj(strScrollerContentID).style.marginLeft='0px';
	scrollerSetTotalPages();
	scrollerScrollToPage(1);
}

function scrollerSetTotalPages() {
	intScrollerTotalPages=Math.ceil(intScrollerScrollerContentWidth/intScrollerScrollerWidth);
}

function scrollerScrollToPage(page) {
	intScrollerCurrentPage=page;
	scrollerScrollToPos(Math.abs(parseInt(MM_findObj(strScrollerContentID).style.marginLeft)), intScrollerScrollerWidth*(page-1));
}

function scrollerPreviousPage() {
	if (!bScrollerActive && intScrollerCurrentPage>1) {
		intScrollerCurrentPage--;
		scrollerScrollToPage(intScrollerCurrentPage);
	}
}

function scrollerNextPage() {
	if (!bScrollerActive && intScrollerCurrentPage<intScrollerTotalPages) {
		intScrollerCurrentPage++;
		scrollerScrollToPage(intScrollerCurrentPage);
	}
}

function scrollerScrollToPos(startPos, endPos) {
	var intStep=25;
	var intTimeout=15;
	if (startPos != endPos) {
		bScrollerActive=true;
		newStartPos=startPos;
		if (Math.abs((endPos-newStartPos)) < intStep) {
			newStartPos=endPos;
		} else if (endPos > startPos) {
			newStartPos=newStartPos+intStep;
		} else if (endPos < startPos) {
			newStartPos=newStartPos-intStep;
		}
		MM_findObj(strScrollerContentID).style.marginLeft=-newStartPos+'px';
		setTimeout('scrollerScrollToPos('+newStartPos+', '+endPos+')', intTimeout);
	} else {
		bScrollerActive=false;
	}
}


