var current = 0;
var captionId = "i0";
var width = 730;
var target = 0;
var timer = 0;

function step(){
	if (target < current - 1 || target > current + 1){
		moveTo(current + (target-current)/5);
		window.setTimeout(step, 50);
		timer = 1;
	} else {
		if (target > current - 1 || target < current + 1){
			current = target;
			moveTo(target);
	}		
		timer = 0;
	}
}

function checksiteTo(x){
	if (x < current+10 && x > current-10) {
		newId = "i" + (-x/100);
		var newDiv = document.getElementById(newId);
		var newAnchor = newDiv.href;
		window.open (newAnchor, '_self');
	}
	slideTo(x);
}

function dragTo(x){
	if (navigator.appName == "Microsoft Internet Explorer"){
		if (event.button == 1){
		slideTo(x);
		}
	}
}

function glideTo(x){
	if (x < current+10 && x > current-10) {
		newId = "i" + (-x/100);
		var newDiv = document.getElementById(newId).getElementsByTagName("span");
		var newAnchor = "/web/environ.nsf/files/" + newDiv[0].innerHTML + ".pdf/$FILE/" + newDiv[0].innerHTML + ".pdf";
		window.open (newAnchor, '_blank');
	}
	slideTo(x);
}

function slideTo(x){
	var div = document.getElementById("images").getElementsByTagName("img");
	var movemax = (100 + (div.length * (-100)));
	if (x < movemax){
		x = movemax;
	}
	if (x > 0){
		x = 0;
	}
	target = x;
	if (timer == 0){
		window.setTimeout(step, 50);
		timer = 1;
	}
	captionId = "i" + (-x/100);
	for (index = 0; index < (div.length); index = index + 1) {
		var scrollbarnode = "s" + index;
		var scroll = document.getElementById(scrollbarnode);
		if (index == (-x/100)) {
			scroll.style.borderTopColor = "#55aa55";
			scroll.style.backgroundColor = "#339933";
			scroll.style.borderBottomColor = "#116611";
		} else {
			scroll.style.borderTopColor = "#99bb99";
			scroll.style.backgroundColor = "#aaccaa";
			scroll.style.borderBottomColor = "#99bb99";
		}
	}
	var caption = document.getElementById(captionId);
	var captionTarget = document.getElementById("captionTarget");
	captionTarget.innerHTML = caption.innerHTML;
}

function moveTo(x){
	current = x;
	var div = document.getElementById("images");
	var top = div.offsetParent.offsetTop;
	var center = 365;
	var zoom = 300;
	var zIndex = div.childNodes.length;
	for (index = 0; index < div.childNodes.length; index = index + 1) {
		var image = div.childNodes.item(index);
		if (image.nodeType == 1){
			var z = Math.sqrt(10000 + x * x) + 100;
			var xs = x / z * center + center;
			image.style.left = xs - 32 / z * zoom + "px";
			image.style.top = 1 / z * zoom + top + "px";
			image.style.width = 64 / z * zoom + "px";
			image.style.height = 125 / z * zoom + "px";
			image.style.zIndex = zIndex;
			if ( x < 0 ){
				zIndex = zIndex + 1;
			} else {
				zIndex = zIndex - 1;
			}
			if ( image.lang === "es" ) {
				if ( x == 0 ) {image.title = "Click para abrir.";
				} else {image.title = "Click para selección.";}
			} else if ( image.lang === "fr" ) {
				if ( x == 0 ) {image.title = "Click to open. - Cliquez pour ouvrir.";
				} else {image.title = "Click to select. - Cliquez pour sélectionner."}
			} else {
				if ( x == 0 ) {image.title = "Click to open.";
				} else {image.title = "Click to select.";}
			}
			x = x + 100;
		}
	}
}

function refresh(){
	var images = document.getElementById("images");
	images.style.height = 140 + "px";
	var captionTarget = document.getElementById("captionTarget");
	var caption = document.getElementById(captionId);
	captionTarget.style.top = images.offsetParent.offsetTop + "px";
	captionTarget.style.height = 50 + "px";
	captionTarget.style.zIndex = 300;
	captionTarget.innerHTML = caption.innerHTML;
	var scroll = document.getElementById("scrollbar");
	var div = document.getElementById("images").getElementsByTagName("img");
	var Remainder = (520 % Math.ceil(div.length));
		for (index = 0; index < (div.length); index = index + 1) {
			scroll.innerHTML = scroll.innerHTML + "<li id=\"s" + index + "\" onmousemove = \"dragTo(-" + index*100 + ")\;\" onclick = \"slideTo(-" + index*100 + ")\;\"></li>";
			var segments = scroll.childNodes.item(index);
			if (index < Remainder){
				segments.style.width = Math.ceil(520 / Math.ceil(div.length)) + "px";
			} else {
				segments.style.width = Math.floor(520 / Math.ceil(div.length)) + "px";
			}
		}
	slideTo(current);
}

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

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

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 MM_SI() { //v3.0
	var i,j=0,x,a=MM_SI.arguments;
	document.MM_sr=new Array;
	for(i=0;i<(a.length-2);i+=3)
	if ((x=MM_findObj(a[i]))!=null){
		document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];
	}
}