kop0  = '<table align=center border=0 cellspacing=0 cellpadding=0 style="font: 12pt Times New Roman; padding-left: 5; padding-right: 5;"><tr>'

	kop1a = '	<td valign=top align=center colspan=2> DIOCLE-&nbsp; <br> TIAANS&nbsp;&nbsp; <br> JAAR&nbsp;&nbsp; </td>'
	kop1b = '	<td valign=top align=center colspan=2> JAAR&nbsp; <br> VAN&nbsp; <br> ONZE&nbsp; <br> HEER&nbsp; <br> JEZUS&nbsp; <br> CHRISTUS&nbsp; </td>'

	kop2  = '	<td valign=top> dit is		<br> de in-	<br> dictie				</td>'
	kop2 += '	<td valign=top> epact,		<br> dat is de	<br> bijtelling <br> van de <br> maan	</td>'
	kop2 += '	<td valign=top> samen-		<br> vallen-	<br> de dag				</td>'
	kop2 += '	<td valign=top> zoveel		<br> is de	<br> maan-	<br> cyclus		</td>'
	kop2 += '	<td valign=top> dit is de	<br> pascale	<br> 14<sup>e</sup> dag	<br> vd. maan	</td>'
	kop2 += '	<td valign=top> Zondag		<br> van het	<br> feest				</td>'
	kop2 += '	<td valign=top> zo oud is	<br> de maan	<br> op die	<br> zondag		</td>'
	kop2 += '</tr>'
	ncol = 9

	rom1 = ",X,XX,XXX,XL,L,LX,LXX,LXXX,XC".split(",")
	rom2 = ",I,II,III,IIII,V,VI,VII,VIII,VIIII".split(",")
	ROMEINS = ["NIKS"]
	for (i = 0; i < rom1.length; i++) for (j = ROMEINS.length%10; j < rom2.length; j++) ROMEINS.push(rom1[i]+rom2[j]);
	ROMEEUW = rom1.join(",").replace(/C/g,"M").replace(/L/g,"D").replace(/X/g,"C").split(",")
	ROMEEUW.push("M")
	romeins = ROMEINS.join(",").toLowerCase().split(",")

	pmnd = " mrt./ apr.".split("/")
// ===================================================================================================================================
//										kalendas aprilis
// maart:	kal,	 6, 5, 4, 3, 2,non,	 8, 7, 6, 5, 4, 3, 2,ides,	17,16,15,14,13,12,11,10, 9, 8, 7, 6, 5, 4, 3, 2,kal
//		 1,	 2, 3, 4, 5, 6, 7,	 8, 9,10,11,12,13,14,15,	16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31
//
//										kalendas maii
// april:	kal,	 4, 3, 2,non,		 8, 7, 6, 5, 4, 3, 2,ides,	18,17,16,15,14,13,12,11,10, 9, 8, 7, 6, 5, 4, 3, 2,kal
//	 	1,	 2, 3, 4, 5,		 6, 7, 8, 9,10,11,12,13,	14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30
// ===================================================================================================================================
	function romdat(dd)
	{	var rm = "Mart./Apr./Maii".split("/"), id = [15,13]
		var x = dd.split(" "), d = parseInt(x[0],10), m = "ma".indexOf(x[1].charAt(0)), i = id[m], n = i-8
		if (d == 1)	return			  "k."  +rm[m]
		if (d <  n)	return	romeins[n+1-d]	+" non."+rm[m]
		if (d == n)	return			  "non."+rm[m]
		if (d <  i)	return	romeins[i+1-d]	+" id." +rm[m]
		if (d == i)	return			  "id." +rm[m]
				return	romeins[33-m-d]	+" k."  +rm[m+1]
	}
	function cyclus19()
	{	var html = '<tr><td colspan='+ncol+'>&nbsp;</td></tr>'
		for (var n = 0; n < 19; jaar++, n++)
		{	var indictie	= 1 + (jaar + 2) % 15				// Argumentum ii
			var epact	= (11 * (jaar % 19) ) % 30			// Argumentum iii
			var concur	= 1 +(Math.floor (jaar * 5 / 4) + 3) % 7	// Argumentum iiii
			var maan	= 1 + (jaar - 3) % 19				// Argumentum vi
										// hieronder is niet volgens een arg.
										// er is nl. geen arg. dat het beschrijft
			var p		= 36 - epact; if (p < 21) p += 30		// Paschale Luna IV
			var d		= (concur + p - 17) % 7; if (d == 0) d = 7	// weekdag van p (zo = 1, za = 7)
			var z		= p + 8 - d					// de zondag na de PFM

			var luna14	= ''+(1+(p-1)%31)+pmnd[Math.floor(p/32)], romL14=romdat(luna14)
			var pasen	= ''+(1+(z-1)%31)+pmnd[Math.floor(z/32)], rompas=romdat(pasen)
			html += (jaar != 525 ? '<tr>' : '<tr style="font-weight:bold;">')
			if (jaar < 532)
			{	html += '<td colspan=2 title="'+ (229+n) + ' Diocl. = Anno Domini ' + jaar +'" style="cursor:hand;">&nbsp;&nbsp;&nbsp;CC' + ROMEINS[29+n] + '</td>'
			} else
			{	html += '<td>' + (jaar%4 != 0 ? '&nbsp;' : 'B') + '</td>'
				html += '<td title="Anno Domini ' + jaar +'" style="cursor:hand;">'
				html += ROMEEUW[Math.floor(jaar/100)]
				if (jaar%100 > 0) html += ROMEINS[jaar%100]
				html += '</td>'
			}
			html += '<td>' + romeins[indictie]	+ '</td>'
			html += '<td>' + romeins[epact]		+ '</td>'
			html += '<td>' + romeins[concur]	+ '</td>'
			html += '<td>' + romeins[maan]		+ '</td>'
			html += '<td title="'+romL14+' = '+luna14+'" style="cursor:hand;">' + romL14 + '</td>'
			html += '<td title="'+rompas+' = '+pasen +'" style="cursor:hand;">' + rompas + '</td>'
			html += '<td>' + romeins[14+z-p] + (n == 7 ? ' ogd.' : n == 18 ? ' hend.' : '')	+ '</td>'
			html += '</tr>'
		}
		return html
	}