window.onload = startSlides;

var slideCurrent = 1;
var slidesStatus = "play";
var timeoutId;



function startSlides() {
	
	buildArrows();
	
	timeoutId = setTimeout("slideNext()",8000);
}



function buildArrows() {
	
	var arrowsDiv = document.getElementById("arrows_projprog");
	
	var leftArrow = "<a href=\"#\" onclick=\"slidesPause(); slidePrevious(); return false\"><img src=\"http://siteresources.worldbank.org/EXTAFRRES/Images/3506894-1180094694430/arrow-lft-projprog.gif\" alt=\"arrow left\" width=\"7\" height=\"7\" border=\"0\" /></a> ";
	
	var slidesCount = slidesGetCount();
	
	var arrowSquares = "";
	for (var i = 0; i < slidesCount; i++) {
		arrowSquares = arrowSquares + "<a href=\"#\" onclick=\"slidesPause(); showSlide('" + (i + 1) + "'); return false\"><img src=\"box-open-projprog.gif\" border=\"0\" id=\"sq" + (i + 1) + "\" name=\"sq_projprog\" /></a> "
	}
	
	var rightArrow = "<a href=\"#\" onclick=\"slidesPause(); slideNext(); return false\"><img src=\"http://siteresources.worldbank.org/EXTAFRRES/Images/3506894-1180094694430/arrow-rgt-projprog.gif\" alt=\"arrow right\" width=\"7\" height=\"7\" border=\"0\" /></a>";
	
	var arrowsHtml = leftArrow + arrowSquares + rightArrow;
	arrowsDiv.innerHTML = arrowsHtml;
	
	changeSq(1);
}



function slideNext() {
	
	var slidesCount = slidesGetCount();
	
	if (slideCurrent >= slidesCount) {
		slideCurrent = 1;
	} else {
		slideCurrent++;
	}
	
	hideSlidesAll();
	
	var slideCurrentName = "slide" + slideCurrent;
	var slideToShow = document.getElementById(slideCurrentName);
	slideToShow.style.display = "block";	
	
	changeSq(slideCurrent);	
	
	if (slidesStatus == "play") {
		timeoutId = setTimeout("slideNext()",8000);
	}	
}



function slidePrevious() {
		
	var slidesCount = slidesGetCount();
	
	if (slideCurrent <= 1) {
		slideCurrent = slidesCount;
	} else {
		slideCurrent--;
	}
	
	hideSlidesAll();
	
	var slideCurrentName = "slide" + slideCurrent;
	var slideToShow = document.getElementById(slideCurrentName);
	slideToShow.style.display = "block";	

	changeSq(slideCurrent);	
}



function showSlide(slide) {
	
	hideSlidesAll();
	
	var slideName = "slide" + slide;
	var slideToShow = document.getElementById(slideName);
	slideToShow.style.display = "block";	
	
	slideCurrent = slide;
	
	changeSq(slide);
}



function slidesGetCount() {
	
	var slidesWrapper = document.getElementById("slidesWrapper_projprog");
	var slideDivs = slidesWrapper.getElementsByTagName("div");
	var slidesCount = 0;
	for (var i = 0; i < slideDivs.length; i++) {
		var className = slideDivs[i].getAttribute("name");
		if (className == "slides_projprog") {
			slidesCount++;
		}
	}
	return slidesCount;
}



function hideSlidesAll() {
	var slidesWrapper = document.getElementById("slidesWrapper_projprog");
	
	var slideDivs = slidesWrapper.getElementsByTagName("div");
	for (var j = 0; j < slideDivs.length; j++) {
		var className = slideDivs[j].getAttribute("name");
		if (className == "slides_projprog") {
			slideDivs[j].style.display = "none";
		}
	}
}



function slidesPause() {
	
	slidesStatus = "pause";
	clearTimeout(timeoutId);
}



function changeSq(sqId) {
		
	var slidesWrapper = document.getElementById("slidesWrapper_projprog");
	var sqImgs = slidesWrapper.getElementsByTagName("img");
	for (var i = 0; i < sqImgs.length; i++) {
		var className = sqImgs[i].getAttribute("name");
		if (className == "sq_projprog") {
			sqImgs[i].src = "http://siteresources.worldbank.org/EXTAFRRES/Images/3506894-1180094694430/box-open-projprog.gif";
		}
	}
	
	var currentSqName = "sq" + sqId;
	var currentSq = document.getElementById(currentSqName);
	currentSq.src = "http://siteresources.worldbank.org/EXTAFRRES/Images/3506894-1180094694430/box-closed-projprog.gif";
}