/* author: Amazing Mama */
/* Creation date: 15-11-2004 */


// Algemeen 
//----------------------------------------------------------------------------------------

function Load(file) {
if (file.substr(0,3)=='www') 
	{window.open ('http://'
				+file
				,'New'
				,'toolbar=1,location=1, directories=1, menuBar=1,scrollbars=1, '
				+'resizable=1, width=800 ,height=600,left=100,top=100'
				);
	}
else{ Id=file.substr(file.lastIndexOf('?')+1); 
	  if (parent.frames.length>5)
	  {eval("parent.Tekst.location='../HTM/"+file+"'");}
	  else {eval("top.location='../index.htm'");}
	}
}
var Lijn='_______________________';
function dw(x) {document.write(x);}
function decode(a,b,c,d) {if (a==b){return c;}else{return d;}}
function nvl(a,b) {if (!a){return b;}{return a;}}
function mod(a,b) { return a-b*Math.floor(a/b);}
function AinB(a,b){if (b.indexOf(a)==-1) {return false;} else {return true;}}
function lijn(x,y){dw ('<hr width="'+x+'" size="'+y+'">');}
function initBold(x){return '<b>'+x.substr(0,1)+'</b>'+x.substr(1);}
function splitsValues(v,str)
// v is de unescaped string die in stukken gehakt moet worden, <str> is de scheider
// resultaat is een array Val met de aparte waarden
// Val moet gedeclareerd in aanroepende pagina

{ Val.splice(0,Val.length);
if (!str){str=';';}
var van=-1; var tot=0;
// verwijder eventuele laatste <str>
v=decode(v.substr(v.length-1,1),str,v.substr(0,v.length-1),v);
for (iS=0;iS<v.length;iS++)
{tot=v.indexOf(str,van); 
if (tot==-1) {Val[iS]=v.substring(van,v.length);break;} 
 else {Val[iS]=v.substring(van,tot); van=tot+1;}
}
}
var Q='\''; 														// single '
var QQ='\'\''; 

function replace(x,c,rep)
{
var ret=''; 
for (ir=0;ir<x.length;ir++)
{if (x.substr(ir,1)==c) {ret+=rep;}else{ret+=x.substr(ir,1);}}
//if (x.substr(ir,1)==c) {ret+=x.substring(posvan,ir)+rep;posvan=ir+1;}{}
//alert (ret);
return ret;
}

function findObj(n, d) { 
  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=findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function showHideLayers() { 
  var i,p,v,obj,args=showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

//--------------------------------------------------------------------------------


function getLink (x,y,z,c) { /* x is link, y is eventuele tekst, z type, c class */

if (!c) {c='t';}

var over=' onmouseover="Cl=this.style.color;this.style.color=\'#FF7E7E\'" onmouseout ="this.style.color=Cl"';

	 if (z.toLowerCase()=='http') 
		{// strip http:// indien y daarmee begint
			if (y.indexOf('//')>-1) {y=y.substr(y.indexOf('//')+2);}
			return '<a '
				+ over			
				+' href="http://' + y + '" class="'+c+'" target="_blank">' 
				+ x +'</a>';}
else if (z.toLowerCase()=='page') 
		{return '<a '
				+ over	
				+' href="javascript:Load(\'' + y + '\');" class="'+c+'">' 
				+ x +'</a>';}
else if ((z.toLowerCase()=='mail')||(z.toLowerCase()=='email')) 
		{return '<a class="'+c+'" '
				+ over	
				+' href="mailto:' 
				+ y + '" class="'+c+'">'  +x +'</a>';}
else if (z.toLowerCase()=='popup') 
		{return '<a '
				+ over	
				+' href="javascript:Popup(\'' + y + '\');" class="'+c+'">' + x +'</a>';}
else if (z.toLowerCase()=='pan') 
		{return '<a '
				+ over	
				+' href="javascript:PanPopup(\'' + y + '\');" class="'+c+'">' + x +'</a>';}
else  if ((z.toLowerCase()=='doc'))
		{return '<a '
				+ over	
				+' href="../Doc/' + y + '"  target="_blank">' 
				+ x +'</a>';}
else if (z.toLowerCase()=='expopup') 
		{return '<a '
				+ over	
				+' href="javascript:ExPopup(\'' + y + '\');" class="'+c+'">' + x +'</a>';}
else if (z.toLowerCase()=='kaart') 
		{return '<a '
				+ over	
				+' href="javascript:KaartPopup(\'' + y + '\');" class="'+c+'">' + x +'</a>';}
else	{return  '<span class="'+c+'" '
				+ over	
				+' >'
				+ x + '</span>';}
}


function Popup(x){
window.open('../HTM/Popup.htm?'+x,'IP',
'toolbar=0,location=0, directories=0, menuBar=0,scrollbars=1, resizable=1, width=400 ,height=200,left=200,top=400');
}

function PanPopup(x){
window.open('../HTM/PanPopup.htm?'+x,'IP',
'toolbar=0,location=0, directories=0, menuBar=0,scrollbars=1, resizable=1, width=600 ,height=280,left=200,top=400');
}

function ExPopup(RowId){
window.open('../HTM/ExPopup.htm?'+RowId,'IP',
'toolbar=0, location=0, directories=0, menuBar=0, scrollbars=1, resizable=1, width=600 ,height=400');
}
function KaartPopup(XY){
window.open('../HTM/KaartPopup.htm?'+XY,'IP',
'toolbar=0, location=0, directories=0, menuBar=0, scrollbars=0, resizable=1, width=520 ,height=590,left=300,top=100');
}


//----------------------------------------------------------------------------------------
// t.b.v. Nieuws 
//----------------------------------------------------------------------------------------
var now = new Date();
var midnight = new Date ();
now.setHours(0,0,0,0);
midnight.setHours(24,0,0,0);
var Maand=now.getMonth();
var Jaar=now.getYear();

function to_date (datum,uur) {
datum=''+datum;
if (!uur){uur=0;}
var d, m, y;
d=datum.substr(0,2);
m=datum.substr(3,2);
y='20'+ datum.substr(6,2);
var date=new Date(y,m-1,d,uur,0,0);
return date;}

function to_char(datum) {
datum=''+datum;
var d, m, y;
d=datum.substr(0,2);
m=datum.substr(3,2);
y=datum.substr(6,2);
var rest = datum.substr(8);
if ((d+m+y=='010101')||(d+m+y=='311299')) {return rest;}
else {
date = d + '·';
 if 	  (m == '01') date += "jan";
  else if (m == '02') date += "feb";
  else if (m == '03') date += "mrt";
  else if (m == '04') date += "apr";
  else if (m == '05') date += "mei";
  else if (m == '06') date += "jun";
  else if (m == '07') date += "jul";
  else if (m == '08') date += "aug";
  else if (m == '09') date += "sep";
  else if (m == '10') date += "okt";
  else if (m == '11') date += "nov";
  else if (m == '12') date += "dec";
date += '·' + y  +rest;
return date;}
}

function to_month (datum) {
var d=datum.substr(0,2);
var m=datum.substr(3,2);
var y=datum.substr(6,2);
var rest = datum.substr(8);
if ((d+m+y=='010101')||(d+m+y=='311299')) {return rest;}
else {
date = '';
 if 	  (m == '01') date += "jan";
  else if (m == '02') date += "feb";
  else if (m == '03') date += "mrt";
  else if (m == '04') date += "apr";
  else if (m == '05') date += "mei";
  else if (m == '06') date += "jun";
  else if (m == '07') date += "jul";
  else if (m == '08') date += "aug";
  else if (m == '09') date += "sep";
  else if (m == '10') date += "okt";
  else if (m == '11') date += "nov";
  else if (m == '12') date += "dec";
date += '·' + y  +rest;
return date;}
}

//---------------------------------------------------------------------------------------
// Now geeft systeemdatum; als n een waarde heeft is dat het aantal uren na middernacht
// interessante gevallen: Now(), Now(0) en Now(24)
//
function Now(v_n)
{nw = new Date(); 
if (!v_n) {} 
//else {nw.setHours(v_n,0,0,0);}
else nw.setMilliseconds(1000*60*60*v_n);
return nw;}
//---------------------------------------------------------------------------------------
// Sorteren
//---------------------------------------------------------------------------------------
function sw (datum) { 
// alert (datum);
var d=Number(datum.substr(0,2));
var m=Number(datum.substr(3,2));
var y=Number(datum.substr(6,2));
return  (d) + (32 * m) + (400 * y);
}
function XXswn (n) { 
// alert (datum);

return Number(n);
}
function dateSort0a(a,b) {
if (sw(a[0])<sw(b[0])) return -1;
if (sw(a[0])>sw(b[0])) return  1;
return 0;
}
function dateSort0d(a,b) {
if (sw(a[0])>sw(b[0])) return -1;
if (sw(a[0])<sw(b[0])) return  1;
return 0;
}
function dateSort1a(a,b) {
if (sw(a[1])<sw(b[1])) return -1;
if (sw(a[1])>sw(b[1])) return  1;
return 0;
}
function dateSort1d(a,b) {
if (sw(a[1])>sw(b[1])) return -1;
if (sw(a[1])<sw(b[1])) return  1;
return 0;
}
function Sort1_2(a,b) {
var A=a[1]+a[2];
var B=b[1]+b[2];
if ( A.toLowerCase() > B.toLowerCase()) return 1;
if ( A.toLowerCase() < B.toLowerCase()) return -1;
return 0;
}
function Sort0a(a,b) {
if ( a[0].toLowerCase() > b[0].toLowerCase()) return 1;
if ( a[0].toLowerCase() < b[0].toLowerCase()) return -1;
return 0;
}
function Sort2(a,b) {
if ( a[2].toLowerCase() > b[2].toLowerCase()) return 1;
if ( a[2].toLowerCase() < b[2].toLowerCase()) return -1;
return 0;
}
function Sort1_3(a,b) {
if ((a[1]+a[3])>(b[1]+b[3])) return 1;
if ((a[1]+a[3])<(b[1]+b[3])) return -1;
return 0;
}
function SortN1a(a,b) {
if ( Number(a[1]) > Number(b[1])) return 1;
if ( Number(a[1]) < Number(b[1])) return -1;
return 0;
}

/*function Sort6_5d(a,b) {
if (100*a[6]+Number(a[5])<100*b[6]+Number(b[5])) return -1;
if (100*a[6]+Number(a[5])>100*b[6]+Number(b[5])) return  1;
return 0;
}*/
function Sort6_7d(a,b) {
if (100*a[7]+Number(a[6])<100*b[7]+Number(b[6])) return -1;
if (100*a[7]+Number(a[6])>100*b[7]+Number(b[6])) return  1;
return 0;
}
function Sort2a(a,b) {
if (a[2]<b[2]) return -1;
if (a[2]>b[2]) return  1;
return 0;
}
//---------------------------------------------------------------------------------------

function toonNieuws(){
var TMP=Nieuws[0]; 
	Nieuws.shift();
	Nieuws.sort(dateSort1d); 
	Nieuws.unshift(TMP);
var tel = 0;
for (Q=1; Q < Nieuws.length; Q++)
if ((Now(24)>=to_date(unescape(Nieuws[Q][1])))
	  &&(to_date(unescape(Nieuws[Q][2]))> Now(24)))
{	if (tel==0){dw ('<table border=0><tr><td class=lt><b>Nieuws:</b></td></tr><tr><td><ul style="margin-left: 5 pt">');tel=1;}
  dw('<li style="margin-left: 8 pt">'
    + decode( unescape(Nieuws[Q][5])
  		,''
		, unescape(Nieuws[Q][3])
		, getLink (unescape(Nieuws[Q][3])
				  , decode(Nieuws[Q][5],'popup',unescape(Nieuws[Q][0]),unescape(Nieuws[Q][4]))
				  , unescape(Nieuws[Q][5])
				  ,'la')
				  )
	 );

dw('</a></b></li>');
	}
if (tel>0) {dw('</ul></td></tr></table>');}
}

function kap(str, grens, op, plus) // kapt een string "str" af op de eerste "op" na "grens" en zet er "plus" na
{
if (!plus){plus='...';}
if (!op) {op=' ';}
return decode
		(unescape(str).indexOf(op,grens)
		,-1
        ,unescape(str)
        ,unescape(str).substr(0,unescape(str).indexOf(op,grens))+plus
        );
}

function showMededelingen(n,w,nl) 
// n aantal te tonen mededelingen; w aanduiding voor breedte lijst; nl nieuwe regel?;
{
var TMP=Mededeling[0]; 
	Mededeling.shift();
	Mededeling.sort(dateSort0a); 
	Mededeling.unshift(TMP);
var teller=0;
var MedStr='<table align=center width=100% border=0 class=t cellspacing=0 width='+w+' cellpadding=0>'; 

for (i=1;i<Mededeling.length;i++)
if  (	(to_date(unescape(Mededeling[i][0])) <= Now(0)) 
	&&  (Now(0)<=to_date(unescape(Mededeling[i][1])))
    )
{teller++; 
if (teller==1){MedStr +='<tr><td width='+w+' ><b class=c>Nieuws</b></td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';}{}
if (teller>n){break;}
{
if (Mededeling[i][3]!='')  // dus er is een lang bericht; popupMed zorgt voor verdere afhandeling
	{MedStr	+= '<tr><td width='+w+''
    		+ '><a class=t '
    		+ 'href="#"'
            + ' onmouseover="this.style.color='+Q+'#FF7E7E'+Q+'"'
    		+ ' onmouseout="this.style.color='+QQ+'"'
            + ' onclick="popupMed('+i+');">'
    		+ decode(Mededeling[i][6],'B','<strong>','')
    		+ decode(Mededeling[i][6],'I','<i>','')
    		+ decode(Mededeling[i][6],'U','<u>','')
            + unescape(Mededeling[i][2])
            +'...'
    		+ decode(Mededeling[i][6],'U','</u>','')
    		+ decode(Mededeling[i][6],'I','</i>','')
    		+ decode(Mededeling[i][6],'B','</strong>','')
            +'</a></td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';
    }
else if (unescape(Mededeling[i][5]).toLowerCase()=='http')
	{MedStr	+= '<tr><td width='+w+'><a class=t '
    		+ ' onmouseover="this.style.color='+Q+'#FF7E7E'+Q+'" '
            + ' onmouseout="this.style.color='+QQ+'"'
            + ' href="http://'
        	+decode((unescape(Mededeling[i][4]).indexOf('http://')>-1)
            		,true
                    ,unescape(Mededeling[i][4]).substr(7)
            		,unescape(Mededeling[i][4])
                    )
    		+ '" target="_blank">'
    		+ decode(Mededeling[i][6],'B','<strong>','')
    		+ decode(Mededeling[i][6],'I','<i>','')
    		+ decode(Mededeling[i][6],'U','<u>','')
            + unescape(Mededeling[i][2])
            +'...'
    		+ decode(Mededeling[i][6],'U','</u>','')
    		+ decode(Mededeling[i][6],'I','</i>','')
    		+ decode(Mededeling[i][6],'B','</strong>','')
            +'</a></td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';
    }
else if (unescape(Mededeling[i][5]).toLowerCase()=='page')
	{MedStr	+= '<tr><td width='+w+'><a class=t href="../HTM/'
    		+ unescape(Mededeling[i][4])
            +'" target="Tekst"'
    		+ ' onmouseover="this.style.color='+Q+'#FF7E7E'+Q+'" '
            + ' onmouseout="this.style.color='+QQ+'"'
    		+ '>'
    		+ decode(Mededeling[i][6],'B','<strong>','')
    		+ decode(Mededeling[i][6],'I','<i>','')
    		+ decode(Mededeling[i][6],'U','<u>','')
            + unescape(Mededeling[i][2])
            +'...'
    		+ decode(Mededeling[i][6],'U','</u>','')
    		+ decode(Mededeling[i][6],'I','</i>','')
    		+ decode(Mededeling[i][6],'B','</strong>','')
            +'</a></td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';
    }
else if (unescape(Mededeling[i][5]).toLowerCase()=='pdf')
	{MedStr	+= '<tr><td width='+w+'><a class=t href="../PDF/'
    		+ unescape(Mededeling[i][4])
            +'"'
    		+ ' onmouseover="this.style.color='+Q+'#FF7E7E'+Q+'" '
            + ' onmouseout="this.style.color='+QQ+'"'
    		+ ' target="_blank">'
    		+ decode(Mededeling[i][6],'B','<strong>','')
    		+ decode(Mededeling[i][6],'I','<i>','')
    		+ decode(Mededeling[i][6],'U','<u>','')
            + unescape(Mededeling[i][2])
            +'...'
    		+ decode(Mededeling[i][6],'U','</u>','')
    		+ decode(Mededeling[i][6],'I','</i>','')
    		+ decode(Mededeling[i][6],'B','</strong>','')
            +'</a></td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';
    }
else MedStr	+='<tr><td width='+w+'>'
			+ decode(Mededeling[i][6],'B','<strong>','')
    		+ decode(Mededeling[i][6],'I','<i>','')
    		+ decode(Mededeling[i][6],'U','<u>','')
            + unescape(Mededeling[i][2])
    		+ decode(Mededeling[i][6],'U','</u>','')
    		+ decode(Mededeling[i][6],'I','</i>','')
    		+ decode(Mededeling[i][6],'B','</strong>','')
            +'</td></tr><tr><td height=1 bgcolor=silver></td></tr><tr><td height=2 bgcolor=white></td></tr>';
}
}
//MedStr=MedStr+decode(nl,true,'<br>','');

if (teller>n){MedStr
	+='<tr><td><a class=c '
	+ ' onmouseover="this.style.color='+Q+'#FF7E7E'+Q+'" '
    + ' onmouseout="this.style.color='+QQ+'"'
	+ ' href="javascript:Load(\'Nieuws.htm\')"> &nbsp;&nbsp;Meer nieuws...</a>';}{}
MedStr+='</table>';
dw (MedStr); 
}

function popupMed(x)
{var TMP=Mededeling[0]; 
	Mededeling.shift();
	Mededeling.sort(dateSort0a); 
	Mededeling.unshift(TMP);
var text = 
//	decode(Mededeling[x][7],'','','<img src="../Images/'+unescape(Mededeling[x][7])+'"border=1 align=left>')
	unescape(Mededeling[x][3]);
if (unescape(Mededeling[x][4])!='')
{
text += '<br><br>';
if 		(unescape(Mededeling[x][5]).toLowerCase()=='http')
{text	+= '<a class=kr '
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
            + ' href="http://'
        	+decode((unescape(Mededeling[x][4]).indexOf('http://')>-1)
            		,true
                    ,unescape(Mededeling[x][4]).substr(7)
            		,unescape(Mededeling[x][4])
                    )
    		+ '" target="_blank">Meer..</a>';
    }
else if (unescape(Mededeling[x][5]).toLowerCase()=='page')
	{text	+= '<a class=kr href="../HTM/'
    		+ unescape(Mededeling[x][4])
            +'" target="Tekst"'
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
    		+ '>Meer..</a>';
    }
else if (unescape(Mededeling[x][5]).toLowerCase()=='pdf')
	{text	+= '<a class=kr href="../PDF/'
    		+ unescape(Mededeling[x][4])
            +'" target="_blank"'
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
    		+ '>Meer..</a>';
    }
}
popUpText(text,unescape(Mededeling[x][2]), 350, 200, 100);
}

function showDeelnemerMededelingen(D,n,w,nl) 
// n aantal te tonen DeelnemerMededelingen; w aanduiding voor breedte lijst; nl nieuwe regel?;
{
// eerste mededeling is of de tent eventueel gesloten is op de volgende KKR
var MedStr='<table cellspacing=0 cellpadding=0 border=0>'; 
	var TMP=Evenementen[0]; 
	Evenementen.shift();
	Evenementen.sort(dateSort0a); 
	Evenementen.unshift(TMP); 

for (i=1;i<Evenementen.length;i++)
 if 
	(	(Evenementen[i][2]=='KunstKijkRoutes')
	&&	(to_date(unescape(Evenementen[i][0])) >= Now(-24))
	) { if (unescape(Evenementen[i][3]).indexOf(D)>-1)
    	{MedStr='<tr><td><b><span class=c>! '
		+'Atelier/Galerie is '
        +to_char(unescape(Evenementen[i][0]))+' gesloten</span></b></td></tr>' ;
        }{break;}
      }
    
	TMP=DeelnemerMededeling[1]; 
	DeelnemerMededeling.shift();
	DeelnemerMededeling.sort(Sort0a); 
	DeelnemerMededeling.unshift(TMP);

for (i=1;i<DeelnemerMededeling.length;i++)

if  (	(to_date(unescape(DeelnemerMededeling[i][1])) <= Now(0)) 
	&&  (Now(0)<=to_date(unescape(DeelnemerMededeling[i][2])))
    &&	(unescape(DeelnemerMededeling[i][0])==D.toUpperCase())
    )
{
if (DeelnemerMededeling[i][4]!='')  // dus er is een lang bericht
	{MedStr	+= '<tr><td class=t><a class=t '
    		+ 'href="#"'
    		+ 'onmouseover="this.style.color=\'FF7E7E\'" onmouseout="this.style.color=\'\'"'
            + 'onclick="popupDeelnMed('+i+');">'
    		+ decode(DeelnemerMededeling[i][7],'B','<strong>','')
    		+ decode(DeelnemerMededeling[i][7],'I','<i>','')
    		+ decode(DeelnemerMededeling[i][7],'U','<u>','')
            + '• '+ unescape(DeelnemerMededeling[i][3])
    		+ decode(DeelnemerMededeling[i][7],'U','</u>','')
    		+ decode(DeelnemerMededeling[i][7],'I','</i>','')
    		+ decode(DeelnemerMededeling[i][7],'B','</strong>','')
            +'</a></td></tr>';
    }

else if (unescape(DeelnemerMededeling[i][6]).toLowerCase()=='http')
	{MedStr	+= '<tr><td class=t><a class=t '
    		+ 'onmouseover="this.style.color=\'FF7E7E\'" onmouseout="this.style.color=\'\'"'
            + ' href="http://'
    		+ unescape(DeelnemerMededeling[i][5])
    		+ '" target="_blank">'
    		+ decode(DeelnemerMededeling[i][7],'B','<strong>','')
    		+ decode(DeelnemerMededeling[i][7],'I','<i>','')
    		+ decode(DeelnemerMededeling[i][7],'U','<u>','')
            + unescape(DeelnemerMededeling[i][3])
    		+ decode(DeelnemerMededeling[i][7],'U','</u>','')
    		+ decode(DeelnemerMededeling[i][7],'I','</i>','')
    		+ decode(DeelnemerMededeling[i][7],'B','</strong>','')
            +'</a></td></tr>';
    }
else if (unescape(DeelnemerMededeling[i][6]).toLowerCase()=='page')
	{MedStr	+= '<tr><td class=t><a class=t href="../HTM/'
    		+ unescape(DeelnemerMededeling[i][5])
            +'" target="Main"'
    		+ 'onmouseover="this.style.color=\'FF7E7E\'" onmouseout="this.style.color=\'\'"'
    		+ '>'
    		+ decode(DeelnemerMededeling[i][7],'B','<strong>','')
    		+ decode(DeelnemerMededeling[i][7],'I','<i>','')
    		+ decode(DeelnemerMededeling[i][7],'U','<u>','')
            + unescape(DeelnemerMededeling[i][3])
    		+ decode(DeelnemerMededeling[i][7],'U','</u>','')
    		+ decode(DeelnemerMededeling[i][7],'I','</i>','')
    		+ decode(DeelnemerMededeling[i][7],'B','</strong>','')
            +'</a></td></tr>';
    }
else if (unescape(DeelnemerMededeling[i][6]).toLowerCase()=='pdf')
	{MedStr	+= '<tr><td class=t><a class=t href="../PDF/'
    		+ unescape(DeelnemerMededeling[i][5])
            +'"'
    		+ 'onmouseover="this.style.color=\'FF7E7E\'" onmouseout="this.style.color=\'\'"'
    		+ ' target="_blank">'
    		+ decode(DeelnemerMededeling[i][7],'B','<strong>','')
    		+ decode(DeelnemerMededeling[i][7],'I','<i>','')
    		+ decode(DeelnemerMededeling[i][7],'U','<u>','')
            + unescape(DeelnemerMededeling[i][3])
    		+ decode(DeelnemerMededeling[i][7],'U','</u>','')
    		+ decode(DeelnemerMededeling[i][7],'I','</i>','')
    		+ decode(DeelnemerMededeling[i][7],'B','</strong>','')
            +'</a></td></tr>';
    }
else MedStr	+='<tr><td class=t>'+decode(DeelnemerMededeling[i][7],'B','<strong>','')
    		+ decode(DeelnemerMededeling[i][7],'I','<i>','')
    		+ decode(DeelnemerMededeling[i][7],'U','<u>','')
            + unescape(DeelnemerMededeling[i][3])
    		+ decode(DeelnemerMededeling[i][7],'U','</u>','')
    		+ decode(DeelnemerMededeling[i][7],'I','</i>','')
    		+ decode(DeelnemerMededeling[i][7],'B','</strong>','')
			+'</td></tr>';
}

return MedStr+'</table>';

}

function popupDeelnMed(x)
{var TMP=DeelnemerMededeling[1]; 
	DeelnemerMededeling.shift();
	DeelnemerMededeling.sort(Sort0a); 
	DeelnemerMededeling.unshift(TMP);
var text = unescape(DeelnemerMededeling[x][4]);
if (unescape(DeelnemerMededeling[x][5])!='')
{
text += '<br><br>';
if 		(unescape(DeelnemerMededeling[x][6]).toLowerCase()=='http')
{text	+= '<a class=kr '
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
            + ' href="http://'
    		+ unescape(DeelnemerMededeling[x][5])
    		+ '" target="_blank">Meer..</a>';
    }
else if (unescape(DeelnemerMededeling[x][6]).toLowerCase()=='page')
	{text	+= '<a class=kr href="../HTM/'
    		+ unescape(DeelnemerMededeling[x][5])
            +'" target="Main"'
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
    		+ '>Meer..</a>';
    }
else if (unescape(DeelnemerMededeling[x][6]).toLowerCase()=='pdf')
	{text	+= '<a class=kr href="../PDF/'
    		+ unescape(DeelnemerMededeling[x][5])
            +'" target="_blank"'
    		+ 'onmouseover="this.style.color=\'red\'" onmouseout="this.style.color=\'#E0A4A4\'"'
    		+ '>Meer..</a>';
    }
}
popUpText(text,unescape(DeelnemerMededeling[x][3]), 200,100, 350);
}

//----------------------------------------------------------------------------------------
// Evenementen
//----------------------------------------------------------------------------------------

function VolgendeEvenement(T)
{	var TMP=Evenementen[0]; 
	Evenementen.shift();
	Evenementen.sort(dateSort0a); 
	Evenementen.unshift(TMP); 

for (i=1;i<Evenementen.length;i++)
 if 
( // eerste conditie voor een- en meerdaagse dingen: tonen als startdatum vandaag of toekomst is
 	(	(Evenementen[i][2]==T)
	&&	(to_date(unescape(Evenementen[i][0])) >= Now(-24))
	)
	|| // tweede conditie voor meerdaagse dingen: blijven tonen als einddatum nog niet voorbij
 	(	(Evenementen[i][2]==T)
	&&	(Now(0)>=to_date(unescape(Evenementen[i][0])))
	&&	(nvl(to_date(unescape(Evenementen[i][1]))
		,to_date('01-01-01')
		) >= Now(-24))	
	)
)
	{return Evenementen[i][0] 
    	+ decode(Evenementen[i][3]
        		,''
                ,''
                ,' </tr><tr><td colspan=2><a href="javascript:getUitz('
						+Q+unescape(Evenementen[i][3])+Q
                        +','
                        +Q+Evenementen[i][0]+Q
                        +');">'
                        +'<b>wie niet open</b> op '+ to_char(Evenementen[i][0])+'?'
                        +'</a></td>') ; break;}
}

function getUitz(x,dat)
{
splitsValues(x); 
var cap='&nbsp;&nbsp;NIET geopend op '+to_char(dat);
var ret='';
for (j=0;j<Val.length;j++)
	{Id=getDeelnemerRowId(Val[j]);
	if (Id)	{ret=ret+decode(Deelnemers[Id][1],'A','* atelier ','* galerie ')+ NaamVoluit2(Id)+'<br>';
			}
	}
ret+= '<b>...gegevens onder voorbehoud...</b>';
popUpText(ret,cap, 240,200,100);
}

function toonEvenementen()
{
dw('<table cellspacing=0 cellpadding=0 border=0><tr><td colspan=2><b>Volgende data:</b></td></tr>');
for (j=1;j<EvenementSoorten.length;j++)
{	
dw('<tr><td><b>'+unescape(EvenementSoorten[j])+'</b>&nbsp; </td><td>'+ to_char(VolgendeEvenement(EvenementSoorten[j]))+'</td></tr>');}
dw('</table>');
}

function toonAlleEvenementen(T,n)
{var teller=0;
var TMP=Evenementen[0]; 
	Evenementen.shift();
	Evenementen.sort(dateSort0a); 
	Evenementen.unshift(TMP); 
for (i=1;i<Evenementen.length;i++)
if (teller <n) 
{if ((Evenementen[i][2]==T)&&(Now(0)<=to_date(unescape(Evenementen[i][0])))) 
{dw('<br><b>'+ to_char(Evenementen[i][0])+' </b>'); teller++;}}
else {break;}
}


//----------------------------------------------------------------------------------------
// Exposities
//----------------------------------------------------------------------------------------


function toonExposities(GId)
{ //alleen de expositie(s)van GId tijdens de komende KKR dag
	var TMP=Exposities[0]; 
	Exposities.shift();
	Exposities.sort(dateSort1a); 
	Exposities.unshift(TMP);
	var tel = 0;
// zoek komende KKRdag
var NextKKR = to_date(VolgendeEvenement('KunstKijkRoutes'));
	dw  ('<b>Expositie tijdens komende KKR:</b><br>'
		);
	for (Q=1; Q < Exposities.length; Q++)
	{
	if ( 	(to_date(unescape(Exposities[Q][1]))<= NextKKR)
		&& 	(to_date(unescape(Exposities[Q][2]))>  NextKKR)
		&&	(unescape(Exposities[Q][3])==unescape(GId)) )
		  
	{dw ('<b>'
		+decode
		(unescape(Exposities[Q][5])
  		,''
		, unescape(Exposities[Q][4])
		, getLink 
				(unescape(Exposities[Q][4])
				, decode(Exposities[Q][6]
						,'popup'
						,unescape(Exposities[Q][0])
						,unescape(Exposities[Q][5])
						)
				, decode(Exposities[Q][6]
						,'popup'
						,'expopup'
						,unescape(Exposities[Q][6])
						)
				,'la')
		) 
		+'</b><br>'
		); 
	 tel++;
	 }
	}
if (tel<1) {dw('geen exposities opgegeven');}
}

//----------------------------------------------------------------------------------------
// Hoofdmenu
//----------------------------------------------------------------------------------------

var menus = [];

// --- menu class ---
function menu (item_struct, pos, styles) {
	// browser check
	this.item_struct = item_struct;
	this.pos = pos;
	this.styles = styles;
	this.id = menus.length;
	this.items = [];
	this.children = [];
	
	this.add_item = menu_add_item;
	this.hide = menu_hide;
	
	this.onclick = menu_onclick;
	this.onmouseout = menu_onmouseout;
	this.onmouseover = menu_onmouseover;
	this.onmousedown = menu_onmousedown;
	
	var i;
	for (i = 0; i < this.item_struct.length; i++)
		new menu_item(i, this, this);
	for (i = 0; i < this.children.length; i++)
		this.children[i].visibility(true);
	menus[this.id] = this;
}
function menu_add_item (item) {
	var id = this.items.length;
	this.items[id] = item;
	return (id);
}
function menu_hide () {
	for (var i = 0; i < this.items.length; i++) {
		this.items[i].visibility(false);
		this.items[i].switch_style('onmouseout');
	}
}
function menu_onclick (id) {
	var item = this.items[id];
	return (item.fields[1] ? true : false);
}
function menu_onmouseout (id) {
	this.hide_timer = setTimeout('menus['+ this.id +'].hide();',
		this.pos['hide_delay'][this.active_item.depth]);
	if (this.active_item.id == id)
		this.active_item = null;
}
function menu_onmouseover (id) {
	this.active_item = this.items[id];
	clearTimeout(this.hide_timer);
	var curr_item, visib;
	for (var i = 0; i < this.items.length; i++) {
		curr_item = this.items[i];
		visib = (curr_item.arrpath.slice(0, curr_item.depth).join('_') ==
			this.active_item.arrpath.slice(0, curr_item.depth).join('_'));
		if (visib)
			curr_item.switch_style (
				curr_item == this.active_item ? 'onmouseover' : 'onmouseout');
		curr_item.visibility(visib);
	}
}
function menu_onmousedown (id) {
	this.items[id].switch_style('onmousedown');
}
// --- menu item Class ---
function menu_item (path, parent, container) {
	this.path = new String (path);
	this.parent = parent;
	this.container = container;
	this.arrpath = this.path.split('_');
	this.depth = this.arrpath.length - 1;
	// get pointer to item's data in the structure
	var struct_path = '', i;
	for (i = 0; i <= this.depth; i++)
		struct_path += '[' + (Number(this.arrpath[i]) + (i ? 2 : 0)) + ']';
	eval('this.fields = this.container.item_struct' + struct_path);
	if (!this.fields) return;
	
	// assign methods	
	this.get_x = mitem_get_x;
	this.get_y = mitem_get_y;
	// these methods may be different for different browsers (i.e. non DOM compatible)
	this.init = mitem_init;
	this.visibility = mitem_visibility;
	this.switch_style = mitem_switch_style;
	
	// register in the collections
	this.id = this.container.add_item(this);
	parent.children[parent.children.length] = this;
	
	// init recursively
	this.init();
	this.children = [];
	var child_count = this.fields.length - 2;
	for (i = 0; i < child_count; i++)
		new menu_item (this.path + '_' + i, this, this.container);
	this.switch_style('onmouseout');
}
function mitem_init() {
	document.write (
		'<a id="mi_' + this.container.id + '_'
			+ this.id +'" class="m' + this.container.id + 'l' + this.depth 
			+'o" href="javascript:Load(\'' + this.fields[1] 
			+ '\');" style="position: absolute; top: '
			+ this.get_y() + 'px; left: '	+ this.get_x() + 'px; width: '
			+ this.container.pos['width'][this.depth] + 'px; height: '
			+ this.container.pos['height'][this.depth] + 'px; visibility: hidden;'
			+' background: black; color: white; z-index: ' + this.depth + ';" '
			+ 'onclick="return menus[' + this.container.id + '].onclick('
			+ this.id + ');" onmouseout="menus[' + this.container.id + '].onmouseout('
			+ this.id + ');" onmouseover="menus[' + this.container.id + '].onmouseover('
			+ this.id + ');" onmousedown="menus[' + this.container.id + '].onmousedown('
			+ this.id + ');"><div class="m'  + this.container.id + 'l' + this.depth + 'i">'
			+ this.fields[0] 
			+ "</div></a>\n"
		);
	this.element = document.getElementById('mi_' + this.container.id + '_' + this.id);
}
function mitem_visibility(make_visible) {
	if (make_visible != null) {
		if (this.visible == make_visible) return;
		this.visible = make_visible;
		if (make_visible)
			this.element.style.visibility = 'visible';
		else if (this.depth)
			this.element.style.visibility = 'hidden';
	}
	return (this.visible);
}
function mitem_get_x() {
	var value = 0;
	for (var i = 0; i <= this.depth; i++)
		value += this.container.pos['block_left'][i]
		+ this.arrpath[i] * this.container.pos['left'][i];
	return (value);
}
function mitem_get_y() {
	var value = 0;
	for (var i = 0; i <= this.depth; i++)
		value += this.container.pos['block_top'][i]
		+ this.arrpath[i] * this.container.pos['top'][i];
	return (value);
}
function mitem_switch_style(state) {
	if (this.state == state) return;
	this.state = state;
	var style = this.container.styles[state];
	for (var i = 0; i < style.length; i += 2)
		if (style[i] && style[i+1])
			eval('this.element.style.' + style[i] + "='" 
			+ style[i+1][this.depth] + "';");
}

/* --- geometry and timing of the menu --- */
var MENU_POS = new Array();

	// item sizes for different levels of menu
	MENU_POS['height']     = [18, 18, 18];
	MENU_POS['width']      = [120, 180, 180];

	// menu block offset from the origin:
	//  for root level origin is upper left corner of the page
	//  for other levels origin is upper left corner of parent item
	MENU_POS['block_top']  = [ 3, 14, 5];
	MENU_POS['block_left'] = [ 2, 5, 150 ];

	// offsets between items of the same level
	MENU_POS['top']        = [0, 19, 19];
	MENU_POS['left']       = [120, 0, 0];

	// time in milliseconds before menu is hidden after cursor has gone out
	// of any items
	MENU_POS['hide_delay'] = [500, 500, 500];


var MENU_STYLES = new Array();

	MENU_STYLES['onmouseout'] = [
		'background', 	['white', '#FF7E7E','#9966CC'],
		'color', 		['#FF7E7E', 'white','white']
	];
	MENU_STYLES['onmouseover'] = [
		'background', 	['white', '#FF7E7E','#9966CC'],
		'color', 		['#FFCEC6', '#9966CC','#FF7E7E']
	];
	MENU_STYLES['onmousedown'] = [
		'background', 	['white', '#9966CC','#9966CC'],
		'color', 		['#FFCEC6', '#FF7E7E','#FF7E7E']
	];





//----------------------------------------------------------------------------------------
// Foto's
//----------------------------------------------------------------------------------------

function showFoto(P)
{for (i=1;i<Foto.length;i++)
 { if ((unescape(Foto[i][0]+'.htm')==P)||(unescape(Foto[i][0])==P))
     {dw( '<tr><td align="center" class="t">'+
	 decode(unescape(Foto[i][1])
	 		,''
			,'<img border=0 src="../SysImages/TransparantW.gif" width=200 height=250></td></tr><tr><td class="o">'
			,'<img border=1 src="../Images/'+unescape(Foto[i][1])+'"></td></tr><tr><td align="center"  class="o">')
			);
	  dw( nvl(unescape(Foto[i][2]),'<br>'));
	  dw ('</td></tr>');
     } 
}}

function toonSiteMap()
{dw('<table border="0" cellpadding="0" cellspacing="2" >');
for (i=0;i<MenuItem.length;i++)
	{ 	dw ('<tr><td valign="top" align="right" ><b>');
			dw (decode(MenuItem[i][0]
			,''
			,''
			,' <a class="c" ' 
			+' onmouseover="this.style.color=\'black\'"'
			+' onmouseout ="this.style.color=\''+ kl_contr+'\'"' 
			+' href="javascript:Load(\''+i+'-'+0+'\')">'
			+ MenuItem[i][0] + ':&nbsp;</b></td><td class="t">'));
		
		for (j=0;j<MenuItem[i][1].length;j++)
		{	dw(decode(MenuItem[i][1][j]
			,''
			,''
			,' <a class="t" ' 
			+' onmouseover="this.style.color=\'black\'"'
			+' onmouseout ="this.style.color=\'gray\'"' 
			+'href="javascript:Load(\''+i+'-'+j+'\')">'
			+ MenuItem[i][1][j]+'</a><br>'));
		}dw ('</td>');
	}dw ('</tr>');
dw('</table>');
}

//---------------------------------------------------------------------------------------
// Diashow
//----------------------------------------------------------------------------------------
function getDias(x)
{ var j=0; for (i=1;i<Foto.length;i++)
	if (unescape(Foto[i][0])==unescape(x)) {DiaTMP[j]=Foto[i];j++;}
}

function chgImg() {
ImgNum++; if (ImgNum > DiaTMP.length-1) {ImgNum = 0;}
document.Diashow.src = ImDir+ DiaTMP[ImgNum][1];
document.DS.ST.value = unescape(DiaTMP[ImgNum][2]);
}

function showbegindia(){
/* random start*/
ImgNum=Math.floor(Math.random()*(DiaTMP.length-1)+1);
document.Diashow.src = ImDir + DiaTMP[ImgNum][1];
document.DS.ST.value = unescape(DiaTMP[ImgNum][2]);
}

function auto() {
run = setInterval("chgImg()", tussentijd);
}

function dias(x)
{getDias(x); showbegindia();auto();}


//-----------------------------------------------------------------------------------
// diversen
//-----------------------------------------------------------------------------------

function spacer(x,y,w)
{ if (!w){w=0;}
dw('<img src="../SysImages/Transparant.gif" '
	+' border="' + w+'"'
	+' width="'  + x+'"'
	+' height="' + y+'" align="top">');}

function underline(d)
{ x=d.substr(d.lastIndexOf('page')+6,1); 
dw ('<table colspacing=0 colpadding=0 border="0"><tr><td height=6 colspan=5></td></tr><tr>');
for (i=0;i<6;i++)
 {dw('<td height=10 width=116>');
  if (i==x){dw('<img src="../SysImages/Selected2.jpg" border="0" width="116" height="20" alt="">');}
   dw('</td>');}
   dw('</tr></table>');
}
//--------------------------------------------------------------------------------------
// fotoseries
//--------------------------------------------------------------------------------------

function getFotoData(x,type)
{var j=0; if(!type){type='';}
	for (i=1;i<Foto.length;i++)
		{if ((unescape(Foto[i][0])==unescape(Deelnemers[x][0]))&&(Foto[i][1]==type)) {FotoTMP[j]=Foto[i];j++;}}
	if (FotoTMP.length==0){FotoTMP[0]=['','','../SysImages/Transparant.gif','foto en onderschrift ontbreekt'];}
}

function showNextPrev(x) 
{
Nxt='../SysImages/ButNext.gif';
Prv='../SysImages/ButPrev.gif';
if (FotoTMP.length<1) 
dw('<img src="../SysImages/Transparant.gif" border="0" width=20 height=20>');
else 
dw
(''
+'<br><a href="javascript:NextFotoTMP(document.F.FotoNr.value)"><img src="'+Nxt+'" border="0"  alt="Volgende foto"></a><br>'
+'<a href="javascript:PrevFotoTMP(document.F.FotoNr.value)"><img src="'+Prv+'" border="0"  alt="Vorige foto"></a>'
+'<br><img src="../SysImages/Transparant.gif" border="0" width="20" height="20" alt="">'
);
}

function ShowFoto(N)
{document.Im.src='../Images/'+FotoTMP[N][2];
 document.Im.alt='Foto '+Number(N+1)+' van '+FotoTMP.length;
 document.F.Onderschrift.value=nvl(unescape(FotoTMP[N][3]),unescape(FotoTMP[N][2]));
 document.F.FotoNr.value=N;
}
function NextFotoTMP(x)
{
N=decode(Number(x)+1,FotoTMP.length,0,Number(x)+1); 
ShowFoto(N);
}

function PrevFotoTMP(x)
{
N=decode(x-1,-1,FotoTMP.length-1,x-1);
ShowFoto(N);
}

function popupFoto(N)
{document.Im.src='../Images/'+FotoTMP[N][2];
 document.F.Onderschrift.value=unescape(FotoTMP[N][3]);
}

//--------------------------------------------------------------------------------------
// kunstenaars en Galeries
//--------------------------------------------------------------------------------------

function getDeelnemerRowId(s)
{ for (i=1;i<Deelnemers.length;i++)
  if (unescape(Deelnemers[i][0]).toLowerCase()==unescape(s).toLowerCase())
  {return i; break;}
}

function NaamVoluit(RowId)
{return   (unescape(Deelnemers[RowId][3]))
		+ decode(Deelnemers[RowId][3],'','',' ')
		+ initBold(unescape(Deelnemers[RowId][2]));
}
function NaamVoluit2(RowId)
{return   (unescape(Deelnemers[RowId][3]))
		+ decode(Deelnemers[RowId][3],'','',' ')
		+ unescape(Deelnemers[RowId][2]);
}
function toonKunstenaarInfo1(RowId)
{dw ('<p>'
	+ '<b>discipline:</b><br>'
	+ unescape(Deelnemers[RowId][12])
	+ '<br>'
	+ '<b>A:</b> ' 
	+ unescape(Deelnemers[RowId][4])
	+ '<br><b>T:</b> '
	+ unescape(Deelnemers[RowId][5])
	+ '<br>'
	+ decode (	Deelnemers[RowId][8]
			 ,	''
			 ,	''
			 ,	'<b>E:</b> '
			 		+	getLink 
                    	(unescape(Deelnemers[RowId][8])
			 			,unescape(Deelnemers[RowId][8])
						,'mail'
						,'la'
						)
					+'<br>'
			 )
	+ decode(Deelnemers[RowId][6]+Deelnemers[RowId][7]
			,'00'
			,''
			,	getLink ('<b>atelierlocatie</b>'
						, RowId
						,'Kaart'
						,'la'
						)
			)
	+ decode (	Deelnemers[RowId][9]
			 ,	''
			 ,	''
			 ,	getLink (' | <b>meer werk</b>'
			 			,unescape(Deelnemers[RowId][9])
						,'http'
						,'la'
						)
			 )
	+ decode (	Deelnemers[RowId][10]
			 ,	''
			 ,	''
			 ,	getLink (' | <b>cv</b>'
			 			,unescape(Deelnemers[RowId][10])
						,'http'
						,'la'
						)
			 )
	+ '</p>'
);}


function toonKunstenaarInfo2(RowId)
{dw ( '<p>'
	+ '<b>statement:</b><br>'
	+ unescape(Deelnemers[RowId][11])
	+ '</p>'
);
}


function toonGalerieInfo2(RowId)
{
dw (  unescape(Deelnemers[RowId][11])

);
}

function toonGalerieInfo(RowId)
{dw ('<b>'
	+ unescape(Deelnemers[RowId][12])
	+ '</b><br>'
	+ '<b>A: </b>' 
	+ unescape(Deelnemers[RowId][4])
	+ '<br><b>T: </b>'
	+ unescape(Deelnemers[RowId][5])
	+ '<br>'
	+ decode (	Deelnemers[RowId][8]
			 ,	''
			 ,	''
			 ,	'<b>E: </b> '
			 		+	getLink (unescape(Deelnemers[RowId][8])
			 			,unescape(Deelnemers[RowId][8])
						,'mail'
						,'la'
						)
					+'<br>'
			 )
	+getLink('<b>Locatie</b>'
			, RowId //RowId
			,'Kaart'
			,'la'
			)
	+ decode (	Deelnemers[RowId][9]
			 ,	''
			 ,	''
			 ,	getLink (' | <b>website</b>'
			 			,unescape(Deelnemers[RowId][9])
						,'http'
						,'la'
						)
			 )
);}


function getRIdKaart(s)
{
if (s.length>3) return 4;
else for (var i=1;i<Kaart.length;i++) 
	if (Kaart[i][0]==s) {return i; break;};
}

function getKaartNaam(s)
{var bingo=0; for (i=1;i<Kaart.length;i++)
if (Kaart[i][0]==s) {dw(unescape(Kaart[i][8])); bingo++; break;} 
if (bingo==0) {dw('Overzichtskaart');}
}

function toonKaart(H,V,x,y,KRid)
{ 
dw('<table cellpadding=0 cellspacing=0 style="background: url(../SysImages/'+ Kaart[KRid][7]+')">');
for (y1=1;y1<=V;y1++)
	{dw('<tr>');
	 for (x1=1;x1<=H;x1++)
	 	{if ((x1==x)&(y1==y)) {dw('<td width=20 height=20 style="background: url(../SysImages/CirkelRW.gif)" >&nbsp;</td>');}
		 else {dw('<td width=20 height=20>' +'</td>');}
		}
	 dw('</tr>');
	}
dw('</table>');
}

function Zetom(Val,XY,KRid) // Val is coordinaat op basiskaart XY geeft aan of x of y coordinaat
{
{var a = Number(Kaart[KRid][1]); 
 var b = Number(Kaart[KRid][2]); 
 var c = Number(Kaart[KRid][3]); 
 var d = Number(Kaart[KRid][4]); 
 var B = Number(Kaart[KRid][5]); 
 var H = Number(Kaart[KRid][6]); 
}
return decode(XY,'X',Math.floor(((Val-a)/(c-a))*(B/20))+1,Math.floor(((Val-b)/(d-b))*(H/20))+1);
}

function besteKaart(RId)
{ var K = new Array();
for (i=1;i<Kaart.length;i++)
{var a = Number(Kaart[i][1]); 
 var b = Number(Kaart[i][2]); 
 var c = Number(Kaart[i][3]); 
 var d = Number(Kaart[i][4]); 
 var B = Number(Kaart[i][5]); 
 var H = Number(Kaart[i][6]); 
 var x = Number(Deelnemers[RId][6]); 
 var y = Number(Deelnemers[RId][7]);
//alert(a+'<'+x+'<'+c+';'+b+'<'+y+'<'+d+ 'waar?:' + ((a<x)&&(x<c)&&(b<y)&&(y<d)));
if ((a<x)&&(x<c)&&(b<y)&&(y<d))
{ K[i-1]=[i,Math.pow(((x - (.5*(c-0+a)))/B),2) + Math.pow(((y - (.5*(d-0+b)))/H),2)];}
else { K[i-1]=[i,99999999];}
}
//alert(K);
K.sort(SortN1a);
//alert(K);
//alert(K[0][0]);
return K[0][0];
}



function valtBinnen (X,Y,A,B,C,D)
{
if ((Number(X)>Number(A))&&(Number(X)<Number(C))&&(Number(Y)>Number(B))&&(Number(Y)<Number(D)))
return true; else return false;
}

function cirkel(x2,y2,s)
{ var loc=0; 
for (i=1;i<Deelnemers.length;i++)
{if ( (unescape(Deelnemers[i][6])==x2)
   	&&(unescape(Deelnemers[i][7])==y2)
	&&(Deelnemers[i][13]=='J')
	&&( decode  ((s.length<3)			// <3:Geografisch >3: Alfabetisch
    			, true
                , true
		    	, (s.indexOf(Deelnemers[i][2].substr(0,1))>-1)	//Alfabetisch
                )
       )
        ) {loc=i; break;}}
return loc;
}

function toonDeelnemers(Type, KolomLengte) 
{var TMP=Deelnemers[0]; 
	Deelnemers.shift();
	Deelnemers.sort(Sort2);
	Deelnemers.unshift(TMP);
var teller=0; Dummy=''; var TotAtelier=0;
for (i=1;i<Deelnemers.length;i++)
if (( Deelnemers[i][13]=='J')&&(Type.indexOf(Deelnemers[i][1])>-1))
{ teller++; TotAtelier=TotAtelier+decode(Deelnemers[i][1],'A',1,0);}{}
var Tot= teller; 

kop=0;
teller=1000;
dw ('<table align=center border=0 cellpadding=0 cellspacing=1><tr>');
for (i=1;i<Deelnemers.length;i++)
if (( Deelnemers[i][13]=='J')&&(Type.indexOf(Deelnemers[i][1])>-1))
{
if (teller > KolomLengte) {dw('</td><td valign=top>');teller=0;}{}

dw('<b>'
	+decode((Dummy==unescape(Deelnemers[i][2]).substr(0,1))
    		,true
            ,''
            ,'<br><span class=c2>_<u>'+unescape(Deelnemers[i][2]).substr(0,1).toUpperCase()+'</u>'
            +Lijn+'</span><br>'
            )
   );
if (Dummy!=unescape(Deelnemers[i][2]).substr(0,1)) {kop=1;}{}   

dw	('</b><span class=c><i>'
    + Deelnemers[i][1]
	+'</i> </span><a href="../HTM/'
    + decode(Deelnemers[i][1]
					,'G'
					,'Galerie'
					,'Kunstenaar')
    +'.htm?'+Deelnemers[i][0]+'"'
    +' onmouseover="this.style.color='+Q+'#FFFFFF'+Q+'; this.style.background='+Q+'#FF7E7E'+Q+'" '
    +' onmouseout ="this.style.color='+QQ+'; this.style.background='+QQ+'" '
    +'>'
	+'<span class=t>'+NaamVoluit(i)+'</span>'
	/*		+', '
			+decode ( Deelnemers[i][4].indexOf('/')
					, -1
					, unescape(Deelnemers[i][4])
					, unescape(Deelnemers[i][4].substr(0,Deelnemers[i][4].indexOf('%20/')))
					)*/
             +'</a><br>'
             );
teller=teller+kop; kop=0; teller++; Dummy=unescape(Deelnemers[i][2]).substr(0,1);
if (teller > KolomLengte) {dw('</td><td valign=top>');teller=0;}
}
dw('</tr><tr><td colspan=5><table><tr><td><br><b>legenda </b><i> A</i>: Atelier | <i>G</i>: Galerie<br>'
+ decode (Type.indexOf('A')>-1
		 ,true
         , 'Aantal deelnemende ateliers: '+TotAtelier +'.<br>'
         , '')
+ decode (Type.indexOf('G')>-1
		 ,true        
         ,'Aantal deelnemende  galeries: '+ Number(Tot-TotAtelier)+'.'
         ,'')
+'</td></tr></table></td></tr></table>');
}


//-----------------------------------------------------------------------------------
// toont de adressen bij een kruis op de kaart - kan mooier ....
//-----------------------------------------------------------------------------------

function knipper(x,y,K)
{
var tekst='';
{for (i=1;i<Deelnemers.length;i++)
if (	(Zetom(Deelnemers[i][6],'X',K)==x)
	&&	(Zetom(Deelnemers[i][7],'Y',K)==y)
    &&	(Deelnemers[i][13]=='J')
    ) 
{tekst += NaamVoluit2(i)
	   + ' - '
       +decode ( Deelnemers[i][4].indexOf('/')==-1
					, true
					, unescape(Deelnemers[i][4])
					, unescape(Deelnemers[i][4].substr(0,Deelnemers[i][4].indexOf('%20/')))
					)
       +' | ';}}
document.F.Details.value=tekst;
}

//--------------------------------------------------------------------------------------
// Mozaiek HomePage
//--------------------------------------------------------------------------------------

function toonMozaiek(MB,fotoB, fotoH)
{
if (!fotoH){fotoH=60;}
if (!fotoB){fotoB=80;}
if (!MB){MB=6;}
var teller=0;
var tot=0;
var TMP=Deelnemers[0]; 
	Deelnemers.shift();
	Deelnemers.sort(Sort2a); 
	Deelnemers.unshift(TMP);
dw('<table summary="" cellspacing=3 cellpadding=0 border="0">');
for (i=1;i<Deelnemers.length;i++)
{ if (Deelnemers[i][13]=='J') {tot++;}}

for (i=1;i<Deelnemers.length;i++)
{ if (Deelnemers[i][13]=='J')
   {dw(decode(teller,0,'<tr>','')+'<td valign="middle" align="center"  '
	+ decode(fotoB,'','',' width ='+(Number(fotoB)))
	+ decode(fotoH,'','',' height='+(Number(fotoH)))
	+' style="background: url(../Images/'+Deelnemers[i][0]+'moz.jpg); background-repeat: no-repeat; '
	+' border:  1pt solid '
	+ 'darkgray'
	+';" ' 
	+'align="right">');
	dw	('<a href="../HTM/'
		+decode(Deelnemers[i][1],'A','Kunstenaar','Galerie')+'.htm?'+Deelnemers[i][0]
		+'" target="Tekst">'
		+'<img src="../SysImages/Trans'
		+decode(Deelnemers[i][1],'A','Zwart','Wit')
		+'64-48.gif" '
		+' name="Im'+i+'" '
		+ decode(fotoB,'','',' width ='+fotoB)
		+ decode(fotoH,'','',' height='+(fotoH))
		+' border=0 '
		+' onmouseover="document.Im'+i+'.src=\'../SysImages/Transparant.gif\';'
		+ ' document.F.Details.value=\'>'
			+ decode  (Deelnemers[i][1],'A',' atelier ',' galerie ') 
			+ NaamVoluit2(i)
			+'\'"'
		+' onmouseout= "document.Im'+i
			+'.src='+Q+'../SysImages/Trans'
		+decode(Deelnemers[i][1],'A','Zwart','Wit')
			+'64-48.gif'+Q+'; document.F.Details.value='+Q+'Aantal deelnemers: '+tot+Q+';"'
		+'></a>'
		);
	teller=(teller+1)%MB;
	dw(decode(teller,0,'</td></tr>','</td>'));
}}
	if (teller<MB){ dw('<td colspan='+(MB-teller)+'><br></td></tr>');}
	dw('</table>'); 
}

function getVirtueleExpo()
{
for (i=1;i<Exposities.length;i++) 
{
if (	(Exposities[i][3]=='KKR')
	&&	(to_date(Exposities[i][1])<=Now(24))
	&&	(to_date(Exposities[i][2])>=Now(0))
	)
dw(getLink(unescape(Exposities[i][4]),'DigitaleExpositie.htm?'+i,'page','c')+'<br>');}

}
function showPar(x)
{
for (i=1;i<Parameters.length;i++)
if (Parameters[i][0]==x) {return Parameters[i][1];}
}
//-------------------------------------------------------------------------------------
// Links
//-------------------------------------------------------------------------------------

function toonLinks(x)
{ dw('<table border="0" class="t" cellpadding="0" cellspacing="0">'
	);
var Groep='Onzin';
for (i=1;i<Links.length;i++)
if (AinB(x,Links[i][3]))
{	dw  ('<tr><td colspan=2><b>' 
		+ decode(Links[i][0],Groep,'',unescape(Links[i][0])) 
		+ '</b></td></tr><tr><td width=20>&nbsp;</td><td>' 
		+ getLink(unescape(Links[i][1]),unescape(Links[i][2]),'http','c')
		+ '</td></tr>' 
		);
		Groep=Links[i][0];
}
dw('</table>');
}
//---------------------------------------------------------------------------------------
// Colofon
//----------------------------------------------------------------------------------------
function showColofon()
{	dw ('<table cellspacing=1 cellpadding=2 ><tr>'
		+'<td class=t><b>Bijdrage</b></td>'
		+'<td class=t><b>Door</b></td>'
		+'</tr>'
		);
	for (i=1;i<Colofon.length;i++)
	{dw	('<tr><td valign=top class="t">'
		+ unescape(Colofon[i][0])
		+'</td><td valign=top class="t">'
		+ decode( Colofon[i][2]
				, ''
				, unescape(Colofon[i][1])
				, getLink(unescape(Colofon[i][1]),unescape(Colofon[i][2]),'http','la')
				)
		+'</td></tr>');
	}
}
//-------------------------------------------------------------------------------------
// Projecten
//-------------------------------------------------------------------------------------
function toonProjecten(x){
var TMP=Projecten[0]; 
	Projecten.shift();
	Projecten.sort(dateSort1d); 
	Projecten.unshift(TMP);
var NextKKR = to_date(VolgendeEvenement('KunstKijkRoutes'));

var tel=0;
	if (tel==0) { tel++;}
	for (i=1;i<Projecten.length;i++)

if (x=='Actueel')
{		if ((NextKKR>=to_date(unescape(Projecten[i][1])))
	   	&&(to_date(unescape(Projecten[i][2]))> NextKKR))
		 { dw
		 	('•&nbsp;<a onmouseover="javascript:document.F.Details.value=\''
			+unescape(Projecten[i][4])
			+ '\\n'
			+to_char(unescape(Projecten[i][1]))
			+ ' - '
			+to_char(unescape(Projecten[i][2]))
			+ '\\n\\n'
			+unescape(Projecten[i][5])
			+'\'; document.Img.src=\'../Images/'
			+nvl(unescape(Projecten[i][6]),'../SysImages/Transparant.gif')
			+'\'; Cl=this.style.color;this.style.color=\'gray\'" '
			+'style="cursor: hand"'
			+' onmouseout="javascript:document.F.Details.value=\'\';'
			+' this.style.color=Cl; '
			+' document.Img.src=\'../SysImages/Transparant.gif\' '
			+'" '
			+'>'
			+unescape(Projecten[i][4])
			+'</a><br>'
			);
		}
}
else
{		if ((Now(0)>=to_date(unescape(Projecten[i][2])))
	   	&&(to_date(unescape(Projecten[i][3]))> Now(0)))
		 { dw
		 	('•&nbsp;<a onmouseover="javascript:document.F.Details.value=\''
			+unescape(Projecten[i][4])
			+ '\\n'
			+to_month(unescape(Projecten[i][1]))
			+ ' - '
			+to_month(unescape(Projecten[i][2]))
			+ '\\n\\n'
			+unescape(Projecten[i][5])
			+'\'; document.Img.src=\'../Images/'
			+nvl(unescape(Projecten[i][6]),'../SysImages/Transparant.gif')
			+'\'; Cl=this.style.color;this.style.color=\'gray\';'
			+' document.F.Link.value=\''
			+unescape(Projecten[i][7])
			+'\';'
			+decode (unescape(Projecten[i][7])
					,''
					,'document.Klik.src=\'../SysImages/Transparant.gif\'; '
					,' document.Klik.src=\'../SysImages/ButRightkl.gif\'; ')
			+'" '
			+'style="cursor: hand"'
			+' onmouseout="javascript:'
			+' this.style.color=Cl; '
			+'" '
			+'>'
			+unescape(Projecten[i][4])
			+'</a><br>'
			);
		}
}
}
//-------------------------------------------------------------------------------------
// Digitale Exposities
//-------------------------------------------------------------------------------------

function toonDigitaleExposities()
{ 	//var TMP=Exposities[0]; 
	//Exposities.shift();
	//Exposities.sort(dateSort1a); 
	//Exposities.unshift(TMP);
	var tel = 0;
	dw  ('<b>Archief digitale exposities:</b><br>'
		);
	for (Q=1; Q < Exposities.length; Q++)
	{
	if ( 	(to_date(unescape(Exposities[Q][2]))<= Now(0))
		&&	(unescape(Exposities[Q][3])=='KKR') )
		{dw ( getLink( unescape(Exposities[Q][4])
					 , 'DigitaleExpositie.htm?' + Q
					 , 'page'
					 , 'c'
					 )
			+ '<br>'
			);
		}
		
	}
}

//---------------------------------------------------------------------------------
// volgende Deelnemer
//---------------------------------------------------------------------------------

function nextDeelnemer(x)
{var TMP=Deelnemers[0]; 
	Deelnemers.shift();
	Deelnemers.sort(Sort2);
	Deelnemers.unshift(TMP);
var Ld= Deelnemers.length;
for (i=1;i<Ld;i++)
{	if (Deelnemers[i][0]==x)
	{for (j=1; j<=Ld;j++)
		if ((Deelnemers[(i+j)%Ld][13]=='J')&& (Deelnemers[(i+j)%Ld][1]==Deelnemers[i][1]))
	    {return Deelnemers[(i+j)%Ld][0]; break;
        }
	}
}
}

//---------------------------------------------------------------------------------
// overlib
//---------------------------------------------------------------------------------

function popUpText(tekst,cap,w, x, y){
return overlib(tekst, STICKY, CAPTION, cap, WIDTH, w, FIXX,x, FIXY, y, CLOSECLICK);}

//---------------------------------------------------------------------------------
// Routes
//---------------------------------------------------------------------------------
function toonAdresLijst(KRid,APvT)
{var a = Number(Kaart[KRid][1]); 
 var b = Number(Kaart[KRid][2]); 
 var c = Number(Kaart[KRid][3]); 
 var d = Number(Kaart[KRid][4]); 
 var B = Number(Kaart[KRid][5]); 
 var H = Number(Kaart[KRid][6]); 
// wie zit op kaart KRId
var TMP=Deelnemers[0]; 
	Deelnemers.shift();
	Deelnemers.sort(Sort2);
	Deelnemers.unshift(TMP);
for (i=1;i<Deelnemers.length;i++)
{var x = Number(Deelnemers[i][6]); 
 var y = Number(Deelnemers[i][7]);
if ((valtBinnen(x,y,a,b,c,d))&&(Deelnemers[i][13]=='J'))


{
Positie=Number(((Zetom(y,'Y',KRid)-1)*(H/20))+Zetom(x,'X',KRid)+ Number(APvT));
//alert(Positie);
dw
('<span style="cursor: hand" '
+'onmouseover="document.images[' 
+ Positie+']'
+ decode(Deelnemers[i][1]
		,'A'
		,'.src=\'../SysImages/CirkelRW.gif\' '
		,'.src=\'../SysImages/CirkelZW.gif\' '
		)
+';'
+' document.F.Details.value='+Q
+ NaamVoluit2(i)+ ' - ' +unescape(Deelnemers[i][4])
+ Q+ ';'
+'"'
+' onmouseout="document.images[' 
+ Positie+']'
+'.src='+Q+'../SysImages/CirkelR.gif'+Q+';'
+' document.F.Details.value=\'\';"'

+' onclick="Load('+Q+ decode(Deelnemers[i][1]
					,'G'
					,'Galerie'
					,'Kunstenaar')
					+'.htm?'+Deelnemers[i][0]+Q+');"'
+'>'
+decode(x
	,'A'
	,getLink(Deelnemers[i][1]
			+' '
			+NaamVoluit(i)
			+', '
			+decode ( Deelnemers[i][4].indexOf('/')
					, -1
					, unescape(Deelnemers[i][4])
					, unescape(Deelnemers[i][4].substr(0,Deelnemers[i][4].indexOf('%20/')))
					)
		,''
		,''
		,'t'
		)
	,getLink(Deelnemers[i][1]
			+' '
			+decode ( Deelnemers[i][4].indexOf('/')
					, -1
					, unescape(Deelnemers[i][4])
					, unescape(Deelnemers[i][4].substr(0,Deelnemers[i][4].indexOf('%20/')))
					)
			+ ', '
			+NaamVoluit(i)
		,''
		,''
		,'t'
		)
)
+'</span><br>');
}

}
}


function toonRoute(KRid)
{var a= Number(Kaart[KRid][1]); 
 var b= Number(Kaart[KRid][2]); 
 var c= Number(Kaart[KRid][3]); 
 var d= Number(Kaart[KRid][4]);
 var H = Number(Kaart[KRid][5])/20; 
 var V = Number(Kaart[KRid][6])/20; 
 KfX=(1/(c-a));
 KfY=(1/(d-b));

var tt=0; loc=0; x=0; y=0; X=0; Y=0;

// maak TMP table met coordiaten van de vakjes van deze kaart; waarde tussen 1 en H resp 1 en V;
for (y1=1;y1<=V;y1++) 
	{for (x1=1;x1<=H;x1++)
    	{ TMPTAB[tt]=[x1,y1,'#','']; tt++;
        }
    } 

    var res=0;
    
// zet Id en G/A gegevens uit Deelnemers tabel erbij van de deelnemers op deze kaart

for (i=1;i<Deelnemers.length;i++)
{
x=Number(Deelnemers[i][6]);
y=Number(Deelnemers[i][7]);
 if ( (Deelnemers[i][13]=='J')				// hebben betaald
    &&(valtBinnen(x,y,a,b,c,d)) 			// positie binnen gebied deelkaart
	)
       {X = Zetom(x,'X',KRid);				//X = x coordinaat op deze kaart afgerond op blokken van 20x20
        Y = Zetom(y,'Y',KRid);				//Y = y coordinaat op deze kaart afgerond op blokken van 20x20
        TMPTAB[H*(Y-1)+(X-1)][2]=Deelnemers[i][0]; //Id
        TMPTAB[H*(Y-1)+(X-1)][3]=Deelnemers[i][1]; //G of A
       }
}  

dw('<table cellpadding=0 cellspacing=0 style="background: url(../SysImages/'+unescape(Kaart[KRid][7])+')">');
var h=0;
for (tt=0;tt<TMPTAB.length;tt++)
{ 	if (h%H==0){dw('<tr>');}
	dw('<td>');h++;
	if (TMPTAB[tt][2]=='#') 
    	{dw ('<td><img src="../SysImages/Transparant.gif" border="0" width="20" height="20"'
        	+' alt="('+TMPTAB[tt][0]+','+TMPTAB[tt][1]+')"></td>');}
	else{dw ('<td width=20 height=20>'
			+'<img src="../SysImages/CirkelR.gif" border="0" width="20"'
		 	+' height="20" name="Im'+TMPTAB[tt][0]+'-'+TMPTAB[tt][1]+'" '
            +' alt="('+TMPTAB[tt][0]+','+TMPTAB[tt][1]+')"'
			+' onmouseover="knipper('+TMPTAB[tt][0]+','+TMPTAB[tt][1]+','+KRid+');"'
			+' onmouseout="document.F.Details.value=\'\';"'
			+' style="cursor: hand" '
			+' onclick="Load('+Q
            		+decode(TMPTAB[tt][3]
					,'G'
					,'Galerie'
					,'Kunstenaar'
                    )
					+'.htm?'+TMPTAB[tt][2]+Q+');"'
			+'></td>');
		}
     if (h%H==0) {dw('</tr>');}
}
dw ('</table>');
}