var spIntervalAr = new Array();
var cats = new Array();
var spDisplayAds = new Array();

function spMove(divId){
		clearInterval(spIntervalAr[divId]);
		divObj = document.getElementById("itemDiv"+divId);
		if(divObj.scrollWidth - divObj.offsetWidth > 4){
			spIntervalAr[divId] = setInterval(function() { spScroll(divId);},20);
		}
}

function spMoveBack(divId){
		clearInterval(spIntervalAr[divId]);
		spIntervalAr[divId] = setInterval(function() { spScrollBack(divId);},20);
}

function spScrollBack(divId){
	divObj = document.getElementById("itemDiv"+divId);
	if(divObj.scrollLeft <= 0){
		clearInterval(spIntervalAr[divId]);
		spIntervalAr[divId] = null;
		divObj.scrollLeft = 0;
	}
	divObj.scrollLeft -=5;
}

function spScroll(divId){
	divObj = document.getElementById("itemDiv"+divId);
	if(divObj.scrollLeft >= divObj.scrollWidth - divObj.offsetWidth){
		clearInterval(spIntervalAr[divId]);
	}
	divObj.scrollLeft +=1;
}

function spReset(divId){
	spMoveBack(divId);
}

function spPrepareItem(itemId, itemCount, affiliate, affid, append, colCount){
    if (append.indexOf ('?')!=0) {
        append='?'+append.substring(1);
    }
	var itemLink = cats[itemId][5] + append;
	var itemTitle = unescape(escape(cats[itemId][1]));
	spWriteItem(itemTitle, itemLink, itemCount, colCount);
}

function spWriteItem(itemTitle, itemLink, itemId, colCount){
	cls = "";
	if(itemId > 0 && (itemId+ colCount) % 2 == 1){
		cls=" class='bgColor'";
	} else{
		cls = " class='white'";
	}
	text = "<b>" + itemTitle + "</b>"
	document.write("<tr><td" + cls + " onmouseout=\"spReset(" + itemId + ");\" valign='top' onmouseover=\"spMove(" + itemId + ");\"><div onmouseout=\"spReset(" + itemId + ");\" onmouseover=\"spMove(" + itemId + ");\" class=\"itemDiv\" id=\"itemDiv" + itemId +"\">");
	document.write("<a onmouseout=\"spReset(" + itemId + ");\" onmouseover=\"spMove(" + itemId + ");\" href=\"" + itemLink + "\" target=\"_blank\">" + text + "<\/a><\/div><\/td><\/tr>");
}

function spWriteAdItem(itemTitle, itemLink, itemId, colCount){
	cls=" class='bgFullColor'";
	text = "<b>" + itemTitle + "</b>"
	document.write("<tr><td" + cls + " onmouseout=\"spReset(" + itemId + ");\" valign='top' onmouseover=\"spMove(" + itemId + ");\"><div onmouseout=\"spReset(" + itemId + ");\" onmouseover=\"spMove(" + itemId + ");\" class=\"itemDiv\" id=\"itemDiv" + itemId +"\">");
	document.write("<a onmouseout=\"spReset(" + itemId + ");\" onmouseover=\"spMove(" + itemId + ");\" href=\"" + itemLink + "\" target=\"_blank\">" + text + "<\/a><\/div><\/td><\/tr>");
}

function spDec2hex(val){
	return val.toString(16);
}

function spHex2dec(hex){
	return parseInt(hex,16);
}
		
function spCalculateColor(color){
			
	var r = color.substring(0,2);
	var g = color.substring(2,4);
	var b = color.substring(4,6);
	
	r = spHex2dec(r);
	g = spHex2dec(g);
	b = spHex2dec(b);
	
	r +=255;
	g +=255;
	b +=255;
	
	r = Math.round(r/2);
	g = Math.round(g/2);
	b = Math.round(b/2);
	
	r = spDec2hex(r);
	g = spDec2hex(g);
	b = spDec2hex(b);
	
	return '' + r + g + b;
	
}

function spGetRandom(itemCount){
	var loopCount = spDisplayAds.length - itemCount;
	
	for(b=0;b<loopCount;b++){
		var r = Math.round(Math.random() * (spDisplayAds.length-1));	
		var tempAr = new Array();
		var found = false;
		for(var a=0;a<spDisplayAds.length;a++){
			if(r==a){
				found = true;
			}
			else{
				if(found){
					tempAr[a-1] = spDisplayAds[a];
				}
				else{
					tempAr[a] = spDisplayAds[a];
				}
			}
		}
		spDisplayAds = tempAr;
	}
}

function spWriteBanner(width, itemCount, rowCount, title, color, url, affiliate, affid, append, altLogo, placeAd){
    oldBanner=0;
    if (altLogo=='new') {
        oldBanner=0;
    }

	document.write("<style type=\"text/css\">");
	document.write("#speurders td.logo{border:0px;height:60px;width:78px;padding:0px 0px 0px 0px;cursor:hand;background-color:#" + color + ";}");
	document.write("#speurders td.item{border-right: 2px solid;border-color:#" + color + ";padding: 0px 2px 2px 2px;font-family:Arial, Helvetica, sans-serif;font-size:11px;}");
	document.write("#speurders td.bgColor{border-right: 2px solid;border-color:#" + color + ";padding: 0px 2px 2px 2px;font-family:Arial, Helvetica, sans-serif;font-size:11px;background-color:#" + spCalculateColor(color) + ";}");
	document.write("#speurders td.white{border-right: 2px solid;border-color:#" + color + ";padding: 0px 2px 2px 2px;font-family:Arial, Helvetica, sans-serif;font-size:11px;background-color:#FFFFFF;}");
	document.write("#speurders td.bgFullColor{border-right: 2px solid;border-color:#" + color + ";padding: 0px 2px 2px 2px;font-family:Arial, Helvetica, sans-serif;font-size:11px;background-color:#" + color + ";}");
	document.write("#speurders td.holder{border-top: 2px solid;border-bottom: 2px solid;border-color:#" + color + ";}");
	document.write("#speurders .itemDiv{position:relative;overflow:hidden;width:126px;white-space:nowrap;height:12px;}");
	document.write("#speurders a {text-decoration:none;color:#000000;display: block;}");
	document.write("#speurders a:hover {text-decoration:underline;color:#000000;}");
	document.write("#speurders a:visited{color:#000000;}");
	document.write("#speurders a:active{color:#000000;}");
	document.write("</style>");

    if (oldBanner==0) {
        document.write("<table id=\"speurders\" width=\"468\" height=\"60\" class=\"table\" cellspacing=\"0\" cellpadding=\"0\">");
        //if(altLogo.length>0){
         //   document.write("<tr><td class=\"logo\" onclick=\"javascript:window.open('http://www.speurders.nl');\" align='center' valign='middle'><img src=\"" + url + "images/" + altLogo + "\"></td>");
        //}else{
            document.write("<tr><td class=\"logo\" onclick=\"javascript:window.open('http://www.speurders.nl');\" align='center' valign='middle'><img id='spBannerLogo' src=\"" + url + "images/banner468logo.png\"></td>");
        //}
    }
    
	if(cats.length>0){
	//generate array for randomfunction
		for(var a=0;a<cats.length;a++){
			spDisplayAds[a] = a;
		}
		spGetRandom(12-placeAd);
	//---- write Items ---
		var colCount = 0;
		for(var a=0;a<spDisplayAds.length;a++){
			if(a % 4 == 0 ){
				document.write("<td width='126' class='holder'><table border=0 cellspacing=0 cellpadding=0>");
			}
			spPrepareItem(spDisplayAds[a], a, affiliate, affid, append, colCount);
			if(a % 4 == 3 ){
				document.write("</table></td>");
				colCount++;
			}
		}
		if(placeAd==1){
			spWriteAdItem("Plaats advertentie", "http://www.speurders.nl/new_ad_form.php", 11, colCount)
		}
	}
    
    if (oldBanner==0) {
        document.write("</tr></table>");
    }
    if (document.getElementById && document.all){
		var logo = document.getElementById("spBannerLogo");
		var $ALPHA_IMAGE_LOADER = "DXImageTransform.Microsoft.AlphaImageLoader";
		var $FILTER = "progid:" + $ALPHA_IMAGE_LOADER + "(src='%1',sizingMethod='scale')";
		var image = new Image();
		image.onload = function() {
			logo.width = image.width;
			logo.height = image.height;
			image = null;
		}; 
		image.src = logo.src;
		logo.runtimeStyle.filter = $FILTER.replace(/%1/, logo.src);
		logo.src = url + "images/blank.gif";
	}
}