function datum (jaarmaand,minerant)
{ //inde body onload
//minerant necesse negativus esse
  today=new Date();
	vandaag=today.getDate();
	maand=today.getMonth()+1;
	jaar=today.getYear()+1900;
	maand=today.getMonth();
	//alert(maand)
  weekdag=today.getDay();
	tijdnu=today.getHours()+":"+today.getMinutes();
	var mndnm=new Array("","Januari","Februari","Maart","April","Mei","Juni","Juli","Augustus","September","Oktober","November","December","Januari","Februari");
	var mndtot=new Array(0,31,28,31,30,31,30,31,31,30,31,30,31);
	//var mndverg=new Array(0,10,14,14,11,30,0,0,12,10,14,12,0,0);
	//additio ultima 09 per rationem finis annis januarius tredecim mensis concipietur
	var mndverg=new Array(0,09,14,10,0,27,0,0,11,10,14,12,09,0);
	//mndnm={};
	if (mndverg[maand]<vandaag)
	{
		   
			 /*
			 vergadering=-1;
			 alert(mndverg[maand]);
			 alert(vergadering);
			 alert(vandaag);
			 vergadering=mndverg[maand+1];
			 tweedevergadering=mndverg[maand+2];//??*/
			 vergadering=0;//mndverg[maand-1];
			 //tweedevergadering=;mndverg[maand+1];//??

  }
	else
	{
	     vergadering=mndverg[maand];
		   //tweedevergadering=mndverg[maand+1];//??
			 //alert(vergadering);
	}
	//alert(vergadering);
	if (maand>=13) 
	{
		 maand=1;
									
	}	

  switch(maand)
	{
	   case 0: // necesse ianuarius
		 {
		     start=1;tot=31;
				 break;
		 }
	   case 1:
		 {
		     start=1;tot=28;
				 break;
		 }
	   case 2:
		 {
		     start=4;tot=31;
				 break;
		 }
	   case 3:
		 {
		     start=4;tot=30;
				 break;
		 }
	   case 4:
		 {
		     start=7;tot=31;
				 break;
		 }
	   case 5:
		 {
		     start=2;tot=30;
				 break;
		 }
	   case 6:
		 {
		     start=5;tot=31;
				 break;
		 }
	   case 7:
		 {
		     start=7;tot=31;
				 break;
		 }
	   case 8:
		 {
		     start=3;tot=30;
				 break;
		 }
	   case 9:
		 {
		     start=6;tot=31;
				 break;
		 }
	   case 10:
		 {
		     start=1;tot=30;
				 break;
		 }
	   case 11:
		 {
		     start=4;tot=31;
				 break;
		 }
	   case 12:
		 {
		     start=6;tot=31;
				 break;
		 }
	}
	if (weekdag==0)
	{
	   weekdag=6;
	}
	else
	{
	   weekdag=weekdag-1;
	}
	// trivialitas solutionem secundam reunionem
	tssr=0;
	starttel=vandaag-weekdag;
	//startmin=-minerant+weekdag;
	ketting="<legend><span class='subtitle'>Kalender</span></legend> <span style='text-align:center'>"+mndnm[maand+1]+"</span><br />";
	volgmaand=0;
	
	if (vandaag>vergadering)
	{
	 tssr=1; 
  }
	else
	{
		tssr=0;
	}
	tweedevergadering=0;
	//alert(minerant);
	if ((maand==3)&&(-minerant>vandaag))
	{
	   minerant=0;  //temporalis
		 //alert(minerant); 
	}
	minerant=0;  //temporalis
	
	mineranttel=0 // para  asegurar dat é keer gekleurd, correcio falsa ad non executare erat 2
	almaand=20; // ad faciendum quod mensis unum incrementum tenet
  toonmaand=maand+1; // addendum unum in maius ad monstrandum minerant
	      					  //alert(maand);
	
	for(rij=1;rij<=6;rij=rij+1)
	{
	   
	   if (rij==5)
		 {
		 //alert(tot); // tot vanaf rij 5 undefined   !!!!!!!!!!!!!!!!!
		 //tweedevergadering=-tweedevergadering;
		 }
	   for(kol=1;kol<=7;kol=kol+1)
		 {
		    if(starttel<=tot)
				{
				  startpos="kk"+kol;//ID
					vulvoor="";
					//alert("e");
					// sequens non executare, iterea 300 ipv 0
					//hier maken dat slechts in mei toont
  						if (((minerant<0) && (-minerant<=starttel))||((minerant<0) && (-minerant<=starttel-1))) // maand van minerant
  	  				{
							  //alert(minerant);
								//alert(toonmaand);
      					if (jaarmaand==toonmaand)
      					{// ad faciendum mensis exactum miner
  							
    							vulvoor=" class='kalmin' title='Minerant'"
    							if (mineranttel<=-1)  //minus unum rationis quod duo iterationes performare debet
    							{
    							  minerant=0//minerant+1;
    							}
    							   mineranttel=mineranttel-1
      					}
								else
								{//iste loco ad adspectum praesentationis
								 vulvoor=" class='"+startpos+" fillin'";
								
								}				
  		   			}
					else
					{ //iste loco ad adspectum praesentationis
					     vulvoor=" class='"+startpos+" fillin'";// test fillink
					}
					//if (starttel==vergadering) //mndverg[maand]
					//{alert(tssr);alert(mndverg[maand]);}
					//if (starttel==30)
					 
					if ((starttel==mndverg[maand]) || (starttel==tweedevergadering))
					//if ((starttel==mndverg[maand]) //  (starttel==tweedevergadering))
					{
					  
					   //
					  //trivialitas ad solutionem
						if (tssr==0)
						{
							if (starttel==mndverg[maand])
							{
							    //alert(tssr);
						      vulvoor=" class='kalverg' title='Vergadering van deze maand, zie de startpagina voor details'";
							    tssr=1;
							
							}
						 
						}
						else
						{
						  //alert( tssr);
							if (starttel==tweedevergadering)
							{
							  vulvoor=" class='kalvergvol' title='Vergadering van volgende maand, zie het overzicht'";
							}
						  
						}
						/* 		error hier doet ook voor tweedevergadering
						if (tweedevergadering==starttel) // mensis secundae reunio
						{
						}
						else
						{
						}*/
								
						    if (vergadering>vandaag)
								{
								  vergadering=-100;
								}
					}
					else
					{
					 
					   /*alert(minerant);
					   if ((minerant==-1) && (starttel-1==vergadering)) // maand van minerant
						 {
							 		 vulvoor=" class='kalverg' title='Minerant'"
									 minerant=-2;
					   }
						 else
						 {
					     vulvoor=" class='"+startpos+" fillin'";// test fillink
						 } */  
						 if (starttel>31)
						 //quid ratio 27 aut -> 31
						 {
						   if (almaand==20)
							 {
						    maand=maand+1;
								//tweedevergadering=-mndverg[maand];
								//alert(almaand);
								almaand=0
							 }
								
						 }
						 if ((tweedevergadering==starttel)&&(rij>2)) // mensis secundae reunio
						 {
						     //vulvoor=" class='kalvergvol' title='Vergadering van volgende maand'";
								 //alert("1");//eerst tweede positief, als index groter dan terug negatief
								 //ad demonstrandum informationem secundae reunionis
						 }
					}
					
          if (starttel==vandaag)
					{
					   ketting=ketting+"";
						 vulvoor=" class='kalnu' title='Vandaag, volgens Uw computer om "+tijdnu+"'";
  				 	 if (vergadering==vandaag)
  					 {
  					   vulvoor=" class='kalwe' title='De vergadering van deze maand heeft vandaag plaats' onmouseout='toon_vergadering(0)' onmouseover='toon_vergadering(1)'"
  					   vergadering=-100;
					   } 
					}
					if (starttel<10)
					{
					   voorblank="0";
					}
					else
					{
					   voorblank="";
					}
					
					if (starttel<1)
					{
				     //ketting=ketting+'&nbsp;<span style="background-color:#999999;background-image:url(kal/kalfin.png);font-size:12px "'+vulvoor+'>&gt;&lt;</span>';
				     ketting=ketting+'&nbsp;<span class="kalnihil"'+vulvoor+'>&gt;&lt;</span>';
				  
					}
					else
					{
					   ketting=ketting+'&nbsp;<span '+vulvoor+'>'+voorblank+starttel+'</span>';
						 /*
						 if (-tweedevergadering==starttel) // mensis secundae reunio
						 {
						     //vulvoor=vulvoor+"title='Vergadering van volgende maand'"
								 //alert(vulvoor);
								 //alert(starttel);
						 }
						 */
					}
					
				  if ((starttel==tot)&&(kol<8)) //finis mensis et quedan rastra sine numero
					{ 
              vulvoor="class='kalverg'";//evitar descripcion cuando muevan delante
					    for (tel=kol;tel<7;tel=tel+1)
							{
							  //ketting=ketting+'&nbsp;<span style="background-color:#999999 ;background-image:url(kal/kalfin.png); "'+vulvoor+'>&gt;&lt;</span>';
							  ketting=ketting+'&nbsp;<span class="kalnihil"'+vulvoor+'>&gt;&lt;</span>';
							} 
							//alert(maand);
							//maand=maand+1;
							tweedevergadering=mndverg[maand+1];
							volgmaand=volgmaand+1;
							toonmaand=maand+volgmaand;
									//alert(toonmaand);
							//tot=mndtot[toonmaand];// positio ille ante necesse
					    if (toonmaand>11) 
							{
							    toonmaand=2;
							    tot=mndtot[toonmaand];// positio ille post necesse
									//alert(mndnm[toonmaand-1]); minus unum
							    ketting=ketting+"<br /><span style='position:inherit;left:450px;'>"+mndnm[toonmaand-1]+"</span><br />";
							}
							else	
							{  // correctio mensis idem se manifestabat
							    tot=mndtot[toonmaand];// positio ille ante necesse
							    toonmaand=toonmaand+1;	
							    ketting=ketting+"<br /><span style='position:inherit;left:450px;'>"+mndnm[toonmaand]+"</span><br />";
							//alert(tot);
							}
						// movido condicion de aqui una lineas antes
							//alert(ketting);
							for (tel=1;tel<kol+1;tel=tel+1)
							{
							  //ketting=ketting+'&nbsp;<span style="background-color:#999999;background-image:url(kal/kalfin.png); "'+vulvoor+'>&gt;&lt;</span>';
							  //per dies quinon existant locus tres
								ketting=ketting+'&nbsp;<span class="kalnihil"'+vulvoor+'>&gt;&lt;</span>';
							  //aqui se necesita imagen
							} 
					    starttel=0;
							vandaag=32;
							//alert(vandaag);
					}//fin de cuadros sin contenido
				}
				starttel=starttel+1;
		 }//aqui se termina la rep primera
		 
		 ketting=ketting+ "<br /> <label id='eindtekst'></label>"
	}
   //alert(ketting);
  tijd=document.getElementById("kalender");
  tijd.innerHTML=ketting;
	//document.write(ketting);
}

function toon_vergadering(aanuit)
{
   //alert("hier");
   if (aanuit==1)
	 { 
	    toner=document.getElementById("eindtekst"); 
			//getoond=document.getElementById("eindtekst"); 
			toner.innerHTML="volgende vergadering";
	 }
	 else 
	 {
	    toner=document.getElementById("eindtekst"); 
			//getoond=document.getElementById("eindtekst"); 
			toner.innerHTML="";
	 }
}
var photoshow=new Array("foto/ps01.jpg","foto/ps02.jpg");
var photonaam=new Array("opaalzandsteen","obsidiaan","opaal","ulexiet");
var aantaltonen=4;
function pp_toon(richting)
{ //todo draaibeelden
  bron=document.getElementById("toonfilm");
  kader=document.getElementById("filmset");
	richting=positie.toString(bron.title);
	//alert(positie);
	if (richting==-1)
	{
	  
	}
	else
	{
	}
}
function aftel(vanaf)
{
		
		var nu = new Date();
		//tijd=new Date(2009,04,08,18);
		tijd=new Date(2010,04,08,08);
		vanaf=tijd.getDate();
		
		nogtijd=(tijd.getTime()-nu.getTime())/(1000*60*60);
		//daytoo=vanaf-nu.getDate();
		daytoo=Math.round((tijd-nu)/(1000*60*60*24));//int()
    //time.parseInt((new Date(2007,04,05,10)-new Date())/(24*60*60)/60);
		
    stop = window.setInterval("document.form2.text1.value = parseInt(nogtijd.toLocaleString())",1000);
		//alert(stop);//-nu.getDate()
		
    stoptoo = window.setInterval("document.form2.text2.value = daytoo.toLocaleString()",1000);
    stoptree = window.setInterval("document.form1.text3.value = daytoo.toLocaleString()",1000);
  
}
function aftel2()
{
    time =(new Date(2008,03,26,10)-new Date())/(24*60*60)/60;
		tijdelijk=new Date(2008,03,26,10)-new Date();
		alert(new Date(2008,03,26,10));
    timetoo =(tijdelijk)/(24*60*60)/(60*24);
		
		var nu = new Date();
		tijd=new Date(2008,03,26,10);
		nogtijd=(tijd.getTime()-nu.getTime())/(1000*60*60);
		daytoo=26-nu.getDate();
		alert(nogtijd);
    //time.parseInt((new Date(2007,04,05,10)-new Date())/(24*60*60)/60);
		
    stop = window.setInterval("document.form1.text1.value = nogtijd.toLocaleString()",1000);
    stoptoo = window.setInterval("document.form1.text2.value = daytoo.toLocaleString()",1000);

}