//Javascript routines. Layout and date routines. "zlhlayout.js"
//www.zoleefthove.be, author P. Van der Gucht
//Copyright 2002
//Freeware, provided 5 top-lines are kept in place.
//Version Alg 2007

//Kalender
var nu = new Date();
var vandaag = new Date();
var Jaar = nu.getFullYear();
var yr = Jaar;
var Maand = nu.getMonth(); 
var MdDag = nu.getDate(); 
var WkDag = nu.getDay();
var DUur = nu.getHours(); 
//------------------------
var D0 = 100 * (Maand + 1) + MdDag;	
var DU0 = D0 * 100 + DUur;
var DJ0 = (Jaar % 100) * 10000 + D0;
var DJU0 = DJ0 * 100 + DUur;
var RefDat = D0;
//-------------------------
var Mnd = new Array(' ','januari','februari','maart','april','mei','juni','juli','augustus','september','oktober','november','december','januari');
var EMnd = new Array('January','February','March,','April','May','June','July','August','September','October','November','December');
var VMnd = new Array('','jan','feb','mar,','apr','mei','jun','jul','aug','sep','okt','nov','dec');
var DagW = new Array('Zo','Ma','Di','Wo','Do','Vr','Za');
var dow = new Array('zondag','maandag','dinsdag','woensdag','donderdag','vrijdag','zaterdag');
emnd = EMnd;
var mdlen = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
mdlen[1] = ((!(Jaar%4))&&(Jaar%100)) ? 29 : 28;
var mlen = mdlen;
var jrlen = 0;	// dagen in het lopende jaar
for (i=0;	i<12;	i++)
	jrlen += mdlen[i];
var LW = (Jaar==2007) ? 52 : 52;// Nr laatste week vh jaar
var wk = LW;
var FileDatum, vlg, NMaand, Datnr, WDoeldag, MDoeldag, i;
var weekreferentie = 3;	//Weekdag waarop datumfiles omschakelen (Woensdag)
//--------------------------
//Algemeen
var sfg = "#000000";
var sbg = "#FFFFFF";
var Tekst, tkleur, bgkleur, dikte, SL, SR, titel, bdt;
var meer, sysdag, Show, inh, me, he;
var ovTxt = '', T = ' ', T2 = ' ', begr0 = 0;
var bdte = screen.width;
var hgte = screen.height;
var sb = screen.width/1024;
var poetsd, doopb, doopd, parochie;
var op = (navigator.userAgent.search(/Opera/)>=0);
var ie = ((navigator.userAgent.search(/MSIE.+/)>=0)||(op));
var ff = (navigator.userAgent.search(/Firefox/)>=0);
var saf = (navigator.userAgent.search(/Safari/)>=0);
//--------------------------
//Mailcache
var mt = 'mailto:', at = '&#64;';
var mailred = 'redactie' + at + 'boechovrem.be';
var mailp = 'pastoor.paul' + at + 'telenet.be';
//---------------------------
//Beurtenkalender
var beurtd = new Array(115,212,311,415,513,610,916,1014,1112,1216);//2009-2008 doop
var hlmisza = '18.00';	var hjmisza = '17.00';	var hbmisza = '18.30';	var vjmiszo1 = '8.00';
var hlmiszo = '9.30';	var hjmiszo = '11.00';	var hbmiszo = '11.00';	var vjmiszo2 = '9.30';

//-------------------------------------------------------------------------------------------
//-----------------------------------------LAYOUTFUNCTIES------------------------------------
//-------------------------------------------------------------------------------------------

function BigT()	{
	Tekst = "";
	tkleur = "#FFFFFF";
	bgkleur = sfg;
	dikte = "6";
	bdt = "99.5%";
	L = arguments.length;
	if (L){
		Tekst = arguments[0];
		if (L > 1){
			tkleur = arguments[1];
			if (L > 2){
				bgkleur = arguments[2];
				if (L > 3)
					dikte = arguments[3];
	}	}	}
	document.write('<DIV align="center"><TABLE width=',bdt,' cellpadding=10 cellspacing=0 border=0><TR>');
	document.write('<TD bgcolor=',bgkleur,' align="center"><FONT size=',dikte,' face="Tahoma" color=',tkleur,'><B><I>&nbsp;',Tekst,'&nbsp;</I></B></FONT></TD>');
	document.write('</TR></TABLE></DIV>');
}

function SmallT()	{
	Tekst = "";
	tkleur = '#FFFFFF';
	bgkleur = sfg;
	dikte = "4";
	al = "center";
	L= arguments.length;
	if (L){
		Tekst = arguments[0];
		if (L > 1){
			tkleur = arguments[1];
			if (L > 2){
				bgkleur = arguments[2];
				if (L > 3){
					dikte = arguments[3];
					if (L > 4)	{
						al = arguments[4];
	}	}	}	}	}
	document.write('<DIV align="',al,'">');
	document.write('<TABLE cellpadding=5><TR>');
	document.write('<TD bgcolor=',bgkleur,' align="center"><FONT size=',dikte,' face="Tahoma,sans-serif" color=',tkleur,'><B><I>&nbsp;',Tekst,'&nbsp;</I></B></FONT></TD>');
	document.write('</TR></TABLE></DIV>');
}

function nSmallT()	{
	document.write('<DIV align="center">');
	document.write('<TABLE width="100%"><TR><TD style="width:20%;background:',sbg,';">&nbsp;</TD>');
		document.write('<TD bgcolor=',sbg,' align="center">');
	if ((arguments.length)||(arguments[0]==''))
		document.write('<TABLE cellpadding=5><TR><TD bgcolor=',sfg,' style="font:italic 13.5pt Tahoma,sans-serif;color:#FFFFFF;text-align:center">&nbsp;<B>',arguments[0],'</B>&nbsp;</TD></TR></TABLE>');	
	else
		document.write('&nbsp;');
	document.write('</TD><TD width="20%" style="background:',sbg,';text-align:right"><A style="decoration:none;" href="#" onClick="moveOnMenu();moveOffSelector()"><IMG src="http://www.boechovrem.be/pic/Alm.gif"></A></TD></TR></TABLE></DIV>');
}

function tempSmallT()	{
if (DU0 <= arguments[1])
	SmallT(arguments[0],'',arguments[2],arguments[3],arguments[4],arguments[5]);
}

function miniT()	{
var Tx;
	Tx = arguments[0];
	if (Tx.toUpperCase() == 'SJ')
		Tx = 'Sint-Jozef';
	if (Tx.toUpperCase() == 'SL')
		Tx = 'Sint-Laurentius';
	document.write('<DIV align="left"><TABLE cellpadding=0 cellspacing=0><TR>');
	document.write('<TD bgcolor=',sfg,' align="center"><FONT size=3 face="Tahoma" color="FFFFFF"><B><I>&nbsp;',Tx,'&nbsp;</I></B></FONT></TD>');
	document.write('</TR></TABLE></DIV>');
}

function tempT()	{	//geen lange sysdat !
var Dt1 = 0, Dt2 = 130000, Dt3; 
var L = arguments.length;
	if (L == 1)	{
		Dt1 = DU0;	Dt2 = arguments[0];}
	else 	if (L > 1)	{
		Dt1 = arguments[0];	Dt2 = arguments[1];	}
	Dt3 = Dt2;
	if ((Maand > 9)&&(Dt2 < 20000)&&(Dt1 > 110000))
			Dt3 = 123200;
	if ((DU0 >= Dt1)&&(DU0 < Dt3))
		document.write(T);
	else if ((DU0 >= Dt3)&&(T2.length > 1))
		document.write(T2);
	T = ' ';	T2 = ' ';
}

function printit()	{
if (navigator.appName== "Netscape")	
	window.print();
else	{
	var webBrowser = '<OBJECT ID="WebBrowser1" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>';
	document.body.insertAdjacentHTML('beforeEnd',webBrowser);
	WebBrowser1.ExecWB(6.2);
	WebBrowser1.outerHTML="";
}	}

function email1()	{
if (arguments.length > 1)	
	document.write('<A href="' +  mt + arguments[0] + at + arguments[1] + '">' + arguments[2] + '</A>');
else
	document.write('<A href="' +  mt + mailred + '">' + arguments[0] + '</A>');
}

function email2()	{
if (!arguments.length)
	document.write('<A href="' + mt + mailred +'">' + 'redactie</A>');
else	
	document.write('<A href="' + mt + arguments[0] + at + arguments[1] + '">' + mailred + '</A>');
}

function tlink()	{
switch(arguments[0])	{
case 1:	{//Nieuws
	document.write('<TABLE width="100%" cellpadding=2 cellspacing=0><TR>');
	document.write('<TD style="font:8pt;text-align:right;"><A href="',ndateFile('bni'),'">Bn1</A>&nbsp;<A href="',ndateFile('bni',3,7),'">Bn2</A>&nbsp;<A href="',ndateFile('vni'),'">Vn1</A>&nbsp;<A href="',ndateFile('vni',3,7),'">Vn2</A>&nbsp;<A href="',ndateFile('hni'),'">Hn1</A>&nbsp;<A href="',ndateFile('hni',3,7),'">Hn2</A>&nbsp;<A href="',ndateFile('fni'),'">Fn1</A>&nbsp;<A href="',ndateFile('fni',3,7),'">Fn2</A>&nbsp;<A href="nnieuws.htm">Nn</A>&nbsp;<A href="',ndateFile('fed'),'">E</A>&nbsp;<A href="',ndateFile('bve'),'">V</A>&nbsp;<A href="b3viering.htm">M</A></TD>');
	document.write('</TR></TABLE>');
	break;
	}

case 2:	{//Verenigingen
	document.write('<TABLE width="100%" cellpadding=2 cellspacing=0><TR>');
	document.write('<TD style="font:8pt;text-align:right;"><A href="',ndateFile('bve'),'">Bv1</A>&nbsp;<A href="',ndateFile('bve',3,7),'">Bv2</A>&nbsp;<A href="',ndateFile('hve'),'">Hv1</A>&nbsp;<A href="',ndateFile('hve',3,7),'">Hv2</A>&nbsp;<A href="',ndateFile('vve'),'">Vv1</A>&nbsp;<A href="',ndateFile('vve',3,7),'">Vv2</A>&nbsp;&nbsp;<A href="',ndateFile('fed'),'">E</A>&nbsp;&nbsp;<A href="',ndateFile('bni',3),'">N</A>&nbsp;&nbsp;<A href="b2viering.htm">M</A></TD>');
	document.write('</TR></TABLE>');
	break;
	}

case 3:	{//Vieringen
	document.write('<TABLE width="100%" cellpadding=2 cellspacing=0>');
	document.write('<TR><TD width="30%" style="color:black;font:8pt;text-align:left;">',bd,'</TD>');
	var v = (bd=='&nbsp;')	? bd	: 'WEEK NR '+WN;
	document.write('<TD width="40%" align="center">',v,'</TD>');
	document.write('<TD width="30%" style="font:8pt;text-align:right;"><A href="b1viering.htm">Bm1</A>&nbsp;<A href="b2viering.htm">Bm2</A>&nbsp;<A href="b3viering.htm">Bm3</A>&nbsp;<A href="h1viering.htm">Hm1</A>&nbsp;<A href="h2viering.htm">Hm2</A>&nbsp;<A href="h3viering.htm">Hm3</A>&nbsp;<A href="v1viering.htm">Vm1</A>&nbsp;<A href="v2viering.htm">Vm2</A>&nbsp;<A href="v3viering.htm">Vm3</A>&nbsp;&nbsp;<A href="',ndateFile('fed'),'">E</A>&nbsp;&nbsp;<A href="',ndateFile('bni'),'">N</A>&nbsp;&nbsp;<A href="',ndateFile('bve'),'">V</A></TD>');
	document.write('</TR></TABLE>');
	break;
	}

case 4:	{//Editoriaal
	document.write('<TABLE width="100%" cellpadding=2 cellspacing=0><TR>');
	document.write('<TD style="font:8pt;text-align:right;"><A href="',ndateFile('fed'),'">Ed1</A>&nbsp;<A href="',ndateFile('fed',3,7),'">Ed2</A>&nbsp;&nbsp;<A href="b2viering.htm">M</A>&nbsp;&nbsp;<A href="',ndateFile('bni'),'">N</A>&nbsp;&nbsp;<A href="',ndateFile('bve'),'">V</A></TD>');
	document.write('</TR></TABLE>');
}	}	}

function mystyle()	{
var sw = 850;
var wd = 800;
var l = arguments.length;
if (l)
	sw = arguments[0];
if (l > 1)
	wd = arguments[1];
//if (screen.width >= sw * sb)
	document.write('<CENTER><TABLE width=',wd*sb,'><TR><TD>');
}

function endmystyle()	{
document.write('</TD></TR></TABLE></CENTER>');
}

function movetotop(IdOfElement){
var divname = document.getElementById(IdOfElement);
divname.scrollTop = divname.clientHeight - divname.scrollHeight;
}

function zoekAnker()	{		//alleen binnen één pagina
if (arguments.length)	{
	window.location.hash = arguments[0];	//geen #
	window.scrollBy(0,-35);
}	}

//-------------------------------------------------------------------------------------------
//--------------------------------KALENDERFUNCTIES-------------------------------------------
//-------------------------------------------------------------------------------------------

function Volg()	{			//Juiste dag wijst naar vlg. week
//arg: WDoeldag, extra.
var FD, L = arguments.length;
	MDoeldag = MdDag + ((arguments[0] - WkDag + 6) % 7) + 1;
	NMaand = Maand;
	if (MDoeldag > mdlen[Maand])	{
		NMaand = (Maand == 11) ? 0 : (Maand+1);
		MDoeldag -= mdlen[Maand];
	}
	if (L > 1)	
		Plus(arguments[1]);
	Nulstring = (NMaand < 9) ? "0" : "";
	FD = (NMaand + 1) * 100 + MDoeldag;
	FileDatum = "_" + Nulstring + FD + ".htm";
	return(FD);
}

function Vorig()	{	//Juiste dag wijst naar vandaag
//arg: WDoeldag, extra.
var FD, L = arguments.length;
var Nulstring;
	MDoeldag = MdDag - ((WkDag - arguments[0] + 7) % 7);
	NMaand = Maand;
	if (MDoeldag < 1)	{
		NMaand = (Maand == 0) ? 11 : (Maand - 1);
		MDoeldag += mdlen[NMaand];
	}
	if (L > 1)	{
		if (arguments[1] > 0)
			Plus(arguments[1]);
		else if (arguments[1] < 0)
			Min(-arguments[1]);
	}
	Nulstring = (NMaand < 9) ? "0" : "";
	FD = (NMaand + 1) * 100 + MDoeldag;
	FileDatum = "_" + Nulstring + FD + ".htm";
	return(FD);
}

function Plus(extra)	{
var FD;
	MDoeldag += extra;
	while (MDoeldag > mdlen[NMaand])	{
		MDoeldag -= mdlen[NMaand];
		NMaand = (NMaand == 11)	? 0	: NMaand+1;
	}
	Nulstring = (NMaand < 9) ? "0" : "";
	FD = (NMaand + 1) * 100 + MDoeldag;
	FileDatum = "_" + Nulstring + FD + ".htm";
	return(FD);
}

function Min(extra)	{
var FD;
	MDoeldag -= extra;
	while (MDoeldag < 1)	{
		NMaand = (NMaand == 0)	? 11	: NMaand-1;
		MDoeldag += mdlen[NMaand];
	}
	Nulstring = (NMaand < 9) ? "0" : "";
	FD = (NMaand + 1) * 100 + MDoeldag;
	FileDatum = "_" + Nulstring + FD + ".htm";
	return(FD);
}

function Dplus(sdag,meer)	{	//Systeemdag, 'meer' = dagen later.(Niet negatief!)
var k, m = Math.floor((sdag%10000) / 100) - 1; 			//maand (0-11)
var J = (Math.floor(sdag/10000))	? 2000 + Math.floor(sdag/10000)	: Jaar;
var ML = ((J%4==0)&&(J%100)&&(m==1)) ? 29 : mdlen[m];		//lengte vd maand
var ndag = sdag%100 + meer;
	while (ndag > ML)	{
		ndag -= ML;
		m = (m+1)%12;
		ML = ((J%4==0)&&(J%100!=0)&&(m==1)) ? 29 : mdlen[m];
		J = (m)	? J	: J+1;
	}
	k = (sdag>1231)	? Math.floor(J%100)	: 0;	//nieuw resp. oud formaat sysdag
	return(10000*k + 100*(m+1) + ndag);
}

function Datnummer()	{	
//nr v.d. dag in het jaar  arg 1: sysdag  arg 2: jaar  default: vandaag
var M = Maand;
var datnr = MdDag;
var year = Jaar;
var oldmdlen = mdlen[1];
	if ((arguments.length>1)&&!(arguments[1]%4))
		mdlen[1] = 29;
	if (arguments.length)	{
		M = Math.floor(arguments[0]/100) - 1;
		datnr = arguments[0] % 100;
	}
	for (md = 0; md < M ; md++)
		datnr += mdlen[md];
	mdlen[1] = oldmdlen;
	return(datnr);
}

function Weekdag()	{
// weekdag arg1: sysdag arg2: jaar default: vandaag
var inp = (arguments.length) ? arguments[0] :D0;
var doel, year = Jaar;
	if ((arguments.length > 1)&&(arguments[1] > 1900))
		year = arguments[1];
	doel = new Date(EMnd[Math.floor(inp/100)-1] + ' ' + (inp%100) + ', ' + year);
	return(doel.getDay());
}

function Weeknummer()	{	//nr v.d. week in het jaar
//weeknummer arg 1: sysdag arg2: jaar default : vandaag 
var inp = (arguments.length) ? arguments[0] : D0;
var week, year = Jaar;
var abn = 0;
	if (arguments.length>1)
		year = arguments[1];
	if (year>2007)
		abn = 3;	//abnormaal nummer Pb value 0 - 3
	if (Weekdag(101,year) > 3)
		week = Math.ceil((Datnummer(inp) - Weekdag(inp))/7);	// week is het courante weeknummer
	else
		week = Math.floor((Datnummer(inp) - Weekdag(inp))/7);
	return((week + abn)%52);
}

function dateFile()	{	//ga naar datumfile (soort,fileanker,ankerdag)
var bestemming, ankerdag = weekreferentie;
	if (arguments.length > 2)
		ankerdag = arguments[2];
	Vorig(ankerdag);	//default: Woensdag
	bestemming = arguments[0] + FileDatum.slice(1);
	if (arguments.length > 1)
		bestemming += '#' + arguments[1];  // default: geen fileanker
	document.location.href = bestemming;
}

function ndateFile()	{	//ga naar datumfile (soort,ankerdag,plus)
var bestemming, ankerdag = weekreferentie;
	if (arguments.length > 1)
		ankerdag = arguments[1];
	Vorig(ankerdag);	//default: Woensdag
	if (arguments.length > 2)
		Plus(arguments[2]);
	bestemming = arguments[0] + FileDatum.slice(1);
	return(bestemming);
}

function datStr()	{
var Inp = arguments[0]%10000;
var SMaand = Math.floor(Inp / 100);
var SJaar, njaar;
	if ((!arguments.length)||(!SMaand)||(SMaand > 12)||((Inp%100)>31))
		return 'undef.';
	else	{
		SJaar = nu.getFullYear();
		njaar = ((D0 > 1100)&&(Inp < 300)) ? (SJaar+1)	: SJaar;
		if ((D0 < 300)&&(Inp > 1100))	
			njaar = SJaar-1;

var Dstring = new Array(12);
var doeldg = new Date(EMnd[SMaand-1] + ' ' + (Inp % 100) + ', ' + njaar);
	
		Dt = (Inp % 100) + ' ' + Mnd[SMaand];
		Dstring[0] = Inp;
		Dstring[1] = dow[doeldg.getDay()];
		Dstring[2] = Dstring[1].substr(0,1).toUpperCase() + Dstring[1].slice(1);
		Dstring[3] = Dstring[1] + ' ' + Dt;
		Dstring[4] = Dstring[2] + ' ' + Dt;
		Dstring[5] = Dstring[3] + ' ' + njaar;
		Dstring[6] = Dstring[4] + ' ' + njaar;
		Dstring[9] = Dt;
		Dstring[10] = Dt + ' ' + njaar;
		Dstring[11] = njaar;
		Dstring[12] = '<B>' + Dstring[4] + ':</B>';
		Dt = (Inp % 100) + '/' + SMaand + '/';
		a = (njaar < 2010)	? '0' + (njaar % 1000)	: njaar % 100;
		Dstring[7] = Dt + a;
		Dstring[8] = Dt + njaar;
		if (arguments.length != 1)
			return Dstring[arguments[1]];
		else
			return (Dstring[12]);
}	}

function lamod()	{
var a,b;
var LMD = new Date(document.lastModified);
	document.write('<BR><FONT size=-2>Ltste Wijz. ');
	a = (arguments.length < 2) ? 'PV ' : (arguments[1] + ' ');
	document.write(a,LMD.getDate(),"/",LMD.getMonth()+1,"/",LMD.getFullYear(),' ');
	if ((arguments.length)&&(arguments[0].length))	{
		Lmin = LMD.getMinutes();
		b = (Lmin > 9) ? "." : ".0";
		document.write(LMD.getHours(),b,Lmin,'u.');
	}
	document.write('</FONT><BR>');
}

function datKStr(Inp)	{
//arg : jaarsysdat !!!Werkt niet met korte sysdat!!
var Maand = Math.floor((Inp % 10000)/ 100);
var njaar, DString, doeldg, Dt, Dag;
if ((Maand)&&(Maand<13)&&((Inp%100)<32))	{
	njaar = 2000 + Math.floor(Inp/10000);
	doeldg = new Date(EMnd[Maand-1] + ' ' + (Inp % 100) + ', ' + njaar);
	Dt = (Inp % 100) + ' ' + Mnd[Maand];
	Dag = dow[doeldg.getDay()];
	Dstring = Dag.substr(0,1).toUpperCase() + Dag.slice(1) + ' ' + Dt;
	return (Dstring);
	}
else
	return('foute datum');
}

//-----------------------------------------------------------------------------------------------
//------------------------------CONVERSIEFUNCTIES------------------------------------------------
//-----------------------------------------------------------------------------------------------

function sys2Dat()	{
//Arg: sysdat (short or long). Output: Date (js-formaat)
var thatDate = new Date();
var Jr = Math.floor(arguments[0]/10000);
	Jr = (Jr)	? Jr + 2000	: (nu.getFullYear() % 100) + 2000;
	thatDate.setFullYear(Jr,Math.floor((arguments[0] % 10000) / 100) - 1,arguments[0] % 100);
	return (thatDate);
}

function Dat2sys()	{
//Arg: Date (js-formaat). Output: sysdat (long)
var thatDate = new Date();
	thatDate = arguments[0];
	return (10000 * (Math.floor(thatDate.getFullYear() % 100)) + 100 * (thatDate.getMonth() + 1) + thatDate.getDate());
}

function D2plus()	{
// Arg: sysdag , meer
var thisDate = new Date();
	if (arguments)
		thisdate = sys2Dat(arguments[0]);
	thisDate.setDate(thisDate.getDate()+arguments[1]);
	return(Dat2sys(thisDate));
}

//POL.  27/7/2003 // 12/11/03 // 26/11/03 //02/01/05 //29/04/05 //01/12/05 //27/5/07