d=document;
preloader('img/','foto_ff.gif','foto_rw.gif');

pagina_pos   = 1;
pagina_scroll= 0;
posX         = 0;
deel         = 0;
geheel       = 0;
playertimer  = 0;
afbeeldingnr = 0;
function scroll(richting,snelheid) {
//alert(frames['main'].location.href);
//scroll_laag = eval(doc + '"scroll"' + sty);
//alert(scroll_laag.left);
//scroll_laag.left = 100;

	if ( typeof(player) !=  'undefined' && richting != 'play' ) { clearTimeout(player) }

	if ( richting == 'r' && pagina_pos < pagina_aant ) {
		pagina_pos= Math.floor(pagina_pos+1);
		posX      = -1*(scroll_breedte*(pagina_pos-1));
		deel = 0; playertimer = 0; afbeeldingnr = (pagina_pos-1)*scroll_stap;
	}
	else if ( richting == 'l' && pagina_pos > 1 ) {
		pagina_pos= Math.ceil(pagina_pos-1);
		posX      = -1*(scroll_breedte*(pagina_pos-1)); // scroll_stap_breedte * 1;
		deel = 0; playertimer = 0; afbeeldingnr = (pagina_pos-1)*scroll_stap;
	}
	else if ( richting == 'play' ) { // nog niet volledig gecontroleerd!!!!!!!
		if ( typeof(snelheid) !=  'undefined' ) { playertimer-=snelheid }
//		parent.document.title = snelheid+' '+playertimer;
		if ( typeof(snelheid) !=  'undefined' && playertimer != -snelheid ) { return }
		if ( typeof(afb_array['.'+afb_dir_nu]) == 'undefined' ) { setTimeout("scroll('play')",2500);return }
		groot(afbeeldingnr);
//		parent.document.title = afb_array['.'+afb_dir_nu][afbeeldingnr]+' '+parent.document.title+'|'+afbeeldingnr+'== '+afb_array['.'+afb_dir_nu].length;
		if (pagina_aant > 1
		&& afbeeldingnr > Math.floor(scroll_stap/2)
		&& afbeeldingnr-Math.floor(scroll_stap/2) < afb_array['.'+afb_dir_nu].length-1 ) {
			geheel = Math.floor((afbeeldingnr-Math.floor(scroll_stap/2))/scroll_stap);
			deel   = (afbeeldingnr-Math.floor(scroll_stap/2))-geheel*scroll_stap;
			posX      = -1*(scroll_breedte*geheel + scroll_stap_breedte*deel); // scroll_stap_breedte * 1;
			pagina_pos= 1+geheel+deel/scroll_stap;// 1/scroll_stap * 1;
		}
		if ( afbeeldingnr == afb_array['.'+afb_dir_nu].length-1 ) {
			deel = 0; playertimer = 0; afbeeldingnr = (pagina_pos-1)*scroll_stap;
		} else {
			preloader(afb_main_dir+'/'+afb_array['.'+afb_dir_nu][afbeeldingnr+1]);
			if ( afbeeldingnr < afb_array['.'+afb_dir_nu].length ) {
				player = setTimeout("scroll('play')",playertimer);
			}
			if ( afbeeldingnr < afb_array['.'+afb_dir_nu].length-1 ) {
				if ( playertimer !=  0 ) {
					if ( playertimer <1000 ) { playertimer = 3501 }
				}
			}
		}
		afbeeldingnr++;
	//		alert(pagina_pos+' > 0 | '+pagina_aant)
	} else { playertimer = 0 }

//parent.document.title  = geheel+' '+deel+' '+afbeeldingnr+' '+Math.ceil(scroll_stap/2)+' '+pagina_pos;

//parent.document.title = afbeeldingnr+' '+afbeeldingen.length+' '+deel+' | '+parent.document.title;

	if ( pagina_pos == 1) { document.pijl_l.src = 'img/spacer.gif'	}
	else                  { document.pijl_l.src = 'img/foto_rw.gif'	}
	if ( pagina_pos >= pagina_aant) { document.pijl_r.src = 'img/spacer.gif'	}
	else                            { document.pijl_r.src = 'img/foto_ff.gif'	}
	if ( pagina_scroll == 0) { scrollscroll() }
}
startpos  = 0;
scroll_pos  = 'leeg';
function scrollscroll() {
	pagina_scroll= 1;
	if ( scroll_pos == 'leeg' ) { scroll_pos = startpos; scroll_laag = eval(doc + '"scroll"' + sty); }
	percent=.15*(scroll_pos-posX-startpos);
	if(percent>0){percent=Math.ceil(percent)}
	else         {percent=Math.floor(percent)}
	if(scroll_pos-posX!=startpos && (posX>=startpos || percent != 0) ){
		scroll_laag.left=scroll_pos-percent;
		scroll_pos=scroll_pos-percent;
	}
//	parent.document.title= scroll_pos;
//	alert(scroll_pos+'-'+posX+'!='+startpos+' && ('+posX+'>'+startpos+' || '+percent+' > 0)');
//	alert(percent+'\n'+scroll_pos+'-'+posX+'-'+startpos+'\n'+scroll_pos+' != '+posX);
	if ( scroll_pos != posX ) {
		setTimeout("scrollscroll()",50)
	} else {
		pagina_scroll= 0;
	}
}

ani_actie = '';
function groot(plaatje) {
	if ( plaatje != 'spacer.gif' ) {
		afbeeldingnr = plaatje;
		plaatje = afb_array['.'+afb_dir_nu][plaatje];
	}
	if ( plaatje.length == 0) {
		plaatje_groot.src = 'img/spacer.gif';
		groot_resize();
	} else {
		plaatje_groot.src = afb_main_dir+'/'+plaatje;
		set_oms(plaatje);
//		if (typeof(referer) != 'undefined' || typeof(SFv) != 'undefined' ) { KSextra('joppefestival','fotos.html?'+afb_main_dir+'&'+plaatje) }
		groot_resize();
		setTimeout("groot_resize()", 500); // De image.onload funktie is niet 100%.....
		setTimeout("groot_resize()",1000); // De image.onload funktie is niet 100%.....
		if ( playertimer > 1500 || playertimer == 0 ) { setTimeout("groot_resize()",1500) }
		if ( playertimer > 2000 || playertimer == 0 ) { setTimeout("groot_resize()",2000) }
		if ( playertimer > 2500 || playertimer == 0 ) { setTimeout("groot_resize()",2500) }
		if ( playertimer > 3000 || playertimer == 0 ) { setTimeout("groot_resize()",3000) }
		if ( playertimer > 3500 || playertimer == 0 ) { setTimeout("groot_resize()",3500) }
	}
}
function groot_resize() {
	if ((plaatje_groot.width  != prev_width
	  || plaatje_groot.height != prev_height )
	&& ani_actie == prev_src ) { groot_resize2() }
	groot_img.src    = plaatje_groot.src;
//	alert(test´)
}
verschil_width = 0;
verschil_height= 0;
function groot_resize2() {
	ani_actie = 'ani';
//	parent.document.title= ani_actie+' '+parent.document.title;
	verschil_width = prev_width -plaatje_groot.width;
	verschil_height= prev_height-plaatje_groot.height;
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.1)+";groot_img.height="+eval(prev_height-verschil_height*.1),  50);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.2)+";groot_img.height="+eval(prev_height-verschil_height*.2), 100);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.3)+";groot_img.height="+eval(prev_height-verschil_height*.3), 150);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.4)+";groot_img.height="+eval(prev_height-verschil_height*.4), 200);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.5)+";groot_img.height="+eval(prev_height-verschil_height*.5), 250);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.6)+";groot_img.height="+eval(prev_height-verschil_height*.6), 300);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.7)+";groot_img.height="+eval(prev_height-verschil_height*.7), 350);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.8)+";groot_img.height="+eval(prev_height-verschil_height*.8), 400);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*.9)+";groot_img.height="+eval(prev_height-verschil_height*.9), 450);
 	setTimeout("groot_img.width="+eval(prev_width-verschil_width*1 )+";groot_img.height="+eval(prev_height-verschil_height* 1)+";ani_actie='"+plaatje_groot.src+"'",500);
	prev_src    = plaatje_groot.src;
	prev_width  = plaatje_groot.width;
	prev_height = plaatje_groot.height;
}
function set_oms(plaatje) {
	id = 'omschrijving';
/*	if ( plaatje.indexOf('_') > 0 ) { str = plaatje.replace(/\.[a-z]+$/,'');
	                                  str = str.replace(/^[^_]+_/,'');
	                                  str = str.replace(/_/g,' ');
	} else { str = '' } this peace of code is for pre-numbered images only WK */
	str = plaatje.replace(/\.[a-z]+$/,'');
	str = replaceExtChars(str);
	setDIVcontent(id,str)
}
function replaceExtChars(text,richting) {
//	replace_str = new RegExp('_([AaEeOoUuIiYy])circ;','g');
//	text = text.replace(replace_str, "&$1circ;");
//	return (text);
	fromTo = new Array( '_([AaEeOoUuIiYy])acute;','$1acute;',
											'_([AaEeOoUuIiYy])uml;','&$1uml;',
											'_([AaEeOoUuIi])circ;','&$1circ;',
											'_([AaEeOoUuIi])grave;','&$1grave;',
											'_(AE|ae)lig;','&$1Elig;',
											'_([Aa])ring;','&$1ring;',
											'_([Aa])Atilde;','&$1tilde;',
											'_([Cc])cedil;','&$1Ccedil;',
											'_([Nn])tilde;','&$1tilde;',
											'_([Oo])slash;','&$1slash;',
											'_([Oo])tilde;','&$1tilde;',
											'_(ETH|eth);','&$1;',
											'_(THORN|thorn);','&$1;',
											'_brvbar;','&brvbar;',
											'_copy;','&copy;',
											'_deg;','&deg;',
											'_frac(12|14|34);','&frac$1;',
											'_gt;?','&gt;',
											'_iexcl;','&iexcl;',
											'_iquest;','&iquest;',
											'_laquo;','&laquo;',
											'_lt;?','&lt;',
											'_mdash;','&mdash;',
											'_micro;','&micro;',
											'_middot;','&middot;',
											'_ndash;','&ndash;',
											'_not;','&not;',
											'_para;','&para;',
											'_plusmn;','&plusmn;',
											'_(cent|euro|pound|yen);','&$1;',
											'_quot;','&quot;',
											'_raquo;','&raquo;',
											'_reg;','&reg;',
											'_sect;','&sect;',
											'_sup([123]);','&sup$1;',
											'_szlig;','&szlig;',
											'_tilde;','&tilde;',
											'_trade;','&trade;',
											'_',' ');
	posA=0;posB=1;
	for (i=0; i < fromTo.length; i=i+2) {
		replace_str = new RegExp(fromTo[i+posA],'g');
		text = text.replace(replace_str, fromTo[i+posB]);
	}
	return (text);
}