var taal_i = 'it'; // waarden overal aangeduid met naam
var taal_n = 'nl'; 
var this_moment = new Date;
// var this_moment = new Date(2005, 10, 3);
var c_uur = 3600000;
var c_dag = 3600000 * 24;												

// DATASTRUCURES
function agendaitem(jaar, maand, dag, tekst, taal, dagen)
{	this.dag = dag 
	this.maand = maand 
	this.jaar = jaar
	this.tekst = tekst
	this.taal = taal
	this.dagen = dagen
}
var agitem_ar = new Array(10);
var n_items = 0;

function agitem(jaar, maand, dag, taal, tekst) 			// in prog.js voor elk jaar
{	agitem_ar[++n_items] = new agendaitem(jaar, maand, dag, tekst, taal, 0) }

function actueelitem(jaar, maand, dag, dagen_display, tekst) 	// TOT EN MET - in actueel.htm
{	agitem_ar[++n_items] = new agendaitem(jaar, maand, dag, tekst, taal_i, dagen_display) }

function actueelitem_totvan(jaar, maand, dag, jaar_v, maand_v, dag_v, tekst) 	// T&M, VAN & MET - in inleiding.htm	
{	l_van = new Date(jaar_v, maand_v -1, dag_v, 0, 0, 0);
	if ( this_moment >= l_van )
	{ agitem_ar[++n_items] = new agendaitem(jaar, maand, dag, tekst, taal_i, 0) }
}

var dagen = ['zondag', 'maandag', 'dinsdag', 'woensdag', 'donderdag', 'vrijdag', 'zaterdag'];



function wr(pyr, pmnd, pdg, txt) 			// call in cursus2.htm
{ totdatum = new Date(pyr, pmnd -1, pdg, 23, 00, 00); 
	if (totdatum > this_moment) {document.write(txt)} 
}  

function wr_vantot(vanyr, vanmnd, vandg, totyr, totmnd, totdg, txt) 
{	vandatum = new Date(vanyr, vanmnd -1, vandg, 00, 00, 00); 
 	totdatum = new Date(totyr, totmnd -1, totdg, 23, 00, 00); 
	if ( (vandatum < this_moment) &&  /* ' */  			// voor CREF: oneigenlijk tag in .js moet ' bevatten
       (totdatum > this_moment) ) {document.write(txt)}
} 
function wr_voorna(pyr, mnd, dg, txt_v, txt_n) 
{	datum = new Date(pyr, mnd -1, dg, 21, 00, 00); 
	document.write( (this_moment < datum ) ? txt_v : txt_n) 
} 

function dagtext(pyr, pmnd, pdg)					// call in write_programma_actueel() v.i.
{	eind_eventdag = new Date(pyr, pmnd -1, pdg, 23, 59, 00);
	u =  (eind_eventdag - this_moment) / c_uur; 			// uren tot middernacht na de lezing
	tis_vandaag =  (u < 24) && /* ' */ (u > 0);
	tis_morgen = (u < 48) && /* ' */ (u > 24);


	if (tis_vandaag) {return  'vandaag'}
	else if (tis_morgen ) {return 'morgen'}
	else {
		as_txt = dagen[eind_eventdag.getDay()]; 
		if (u < 168) { as_txt = as_txt + ' a.s.' } else { as_txt = 'volgende week '+ as_txt }
		return  as_txt; 
		}
}

function write_programma(hele_programma)	// call in programma.htm (voor het jaar (met TRUE) EN overzicht( met FALSE) 
{	document.write('<p></p><table cellspacing="0" border="0" cellpadding="7">');
	for (i = 1; i <= n_items; ++i) 	// '>
	{ with (agitem_ar[i])
		{	eofmelding = new Date(jaar, maand -1, dag, 23, 00, 00);  	
		 	if ( hele_programma || (eofmelding > this_moment) ) 
			{ document.write('<tr><td class="datum">', dag, '-', maand, '-', jaar,'</td><td>', tekst, '</td></tr>')
			} 
		}
	}
	document.write('</table>') 
}

var nothing_written = true;  //081107 nu: GEEN aankondiging lezing, en GEEN ander Actueel item, DAN EEN item met dagen < 0 

function write_programma_actueel()		// call in inleiding.htm
{	for (i = 1; i <= n_items; ++i) 			// ' > 
	{ with (agitem_ar[i])
		{	totdatum = new Date(jaar, maand -1, dag, 23, 00, 00);
			u =  (totdatum - this_moment) / c_uur;
			u = u - u % 1;
			if ( (u < 288) &&  /* ' */ (totdatum >= this_moment) )  	
			{ htxt = taal
			  if ( taal == taal_n ) { htxt = 'een lezing' }
			  if ( taal == taal_i ) { htxt = 'een conferenza' }

			  document.write('<li>Er is ' + dagtext(jaar, maand, dag) + ' <a href="/conferenze/programma.htm">', htxt, '</a> </li>')
			  nothing_written = false;
			} 
		}
	}
}

function write_actueel()			// call in inleiding.htm (081019 NOTHING_WRITTEN alleen als LAATSTE item)
{	
	for (i = 1; i <= n_items; ++i) 		// '>
	{ with (agitem_ar[i])
		{	eofmelding = new Date(jaar, maand -1, dag, 23, 00, 00);  	
		 	if  (	(this_moment < eofmelding) && 		/* ' */
				( (dagen==0) || (this_moment > eofmelding - dagen * c_dag )) ||
				( ( nothing_written ) && (dagen < 0 ) )

			    )
			{ document.write('<li>', tekst, '</li>');
			  nothing_written = false
			} 
		}
	}
}