<!--

//CalcTimes.js
//===============================

//===============================
function CalcPCJD() {
// Bereken het Juliaanse Dagnummer uit de systeemtijd
var time = new Date();
GJ = time.getYear();
if (GJ < 1900) {    	// Nodig bij oa. Firefox
GJ = GJ + 1900;}
GM = time.getMonth(); GM = GM + 1;
GD = time.getDate();

var V1=GJ; var V2=GM; var V3=GD;

if (V2 < 3) {   	// jan en feb achteraan
V2 = V2 + 12;
V1 = V1 - 1;}
var X1 = 365.25 * V1; X1 = parseInt(X1);
var X2 = 30.6 * (V2+1); X2 = parseInt(X2);
var X3 = V1 / 100; X3 = parseInt(X3);
var X4 = V1 / 400; X4 = parseInt(X4);
JD = X1 + X2 + V3 + 1720996.5 - X3 + X4;
MJD=JD-2400000.5;

// Hier testdata
// JD=2454832.5; // 1 januari 2009
}
//===============================

//===============================
function CalcGregDateJD(day, month, year) {
// Bereken het Juliaanse Dagnummer
var V1=year; var V2=month; var V3=day;
if (V2 < 3) {   	// jan en feb achteraan
V2 = V2 + 12;
V1 = V1 - 1;}
var X1 = 365.25 * V1; X1 = parseInt(X1);
var X2 = 30.6 * (V2+1); X2 = parseInt(X2);
var X3 = V1 / 100; X3 = parseInt(X3);
var X4 = V1 / 400; X4 = parseInt(X4);
JD = X1 + X2 + V3 + 1720996.5 - X3 + X4;
}
//===============================

//===============================
function CalcJDGregDate(julday) {
// Bereken de Gregoriaanse datum
var X0 = julday + 0.5;
var X1 = (4 * X0) - 6884477;
X1 = X1 / 146097; X1 = parseInt(X1);
var X2 = (146097 * X1) + 6884480;
X2 = X2 / 4;  X2 = parseInt(X2);
X2 = X0 - X2;
var X3 = (4 * X2) +3;
X3 = X3 / 1461; X3 = parseInt(X3);
var X4 = (1461 * X3);
X4 = X4 / 4; X4 = parseInt(X4);
X4 = X2 - X4;
var X5 = (5* X4) + 461;
X5 = X5 / 153; X5 = parseInt(X5);
var X6 = (153 * X5) - 457;
X6 = X6 / 5; X6 = parseInt(X6);
X6 = X4 - X6;
var X7 = X6 + 1;
GJ = X3 + (100 * X1); GM = X5; GD = X7;
if (GM > 12) {
GM = GM - 12;
GJ = GJ + 1;}
}
//===============================

//===============================
function CalcIslamDateJD(day, month, year){
// Bereken het Juliaanse Dagnummer
var V1 = year; var V2 = month; var V3 = day;
var X1 = (10631 * V1) + 58442583;
X1 = X1 / 30; X1 = parseInt(X1);
var X2 = (325 * V2) - 320;
X2 = X2 / 11; X2 = parseInt(X2);
var X3 = V3 - 1;
JD = X1 + X2 + X3; JD = JD - 0.5;
}
//===============================

//===============================
function CalcJDIslamDate(julday){
// Bereken de Islamitische datum
var V1 = julday + 0.5;
var X1 = (30 * V1) - 58442554;
X1 = X1 / 10631; X1 = parseInt(X1);
var X2 = (10631 * X1) + 58442583;
X2 = X2 / 30; X2 = parseInt(X2);
X2 = V1 - X2;
var X3 = (11 * X2) + 330;
X3 = X3 / 325; X3 = parseInt(X3);
var X4 = (325 * X3) -320;
X4 = X4 / 11; X4 = parseInt(X4); 
X4 = X2 - X4;
var X5 = X4 + 1;
IJ = X1; IM = X3; ID = X5;
}
//===============================

//===============================
function CalcHebrDateJD(day, month, year){
// Bereken het Juliaanse Dagnummer
var V1 = year; var V2 = month; var V3 = day;
HJ = V1; HD = V3;
CalcHelpHebr(HJ, 1);
}
//===============================

//===============================
function CalcJDHebrDate(julday){
// Bereken de Hebreewse datum 
JD1 = 0; JD1 = julday;
var V1 = julday + 0.5; var V2 = V1;
var X1 = V1 - 347997;
var X2 = X1 / (29 + (13753 / 25920) );  X2 = parseInt(X2);
var X3 = ( (19 * X2) + 252) / 235;  X3 = parseInt(X3);
HJ  = X3; 		// Voorlopige bepaling HJ
CalcHelpHebr(HJ, 0);
}
//===============================

//===============================
function CalcHelpHebr(year, mode) {
var V1 = year; var V2 = mode;
var X1 = (12 * V1 +5) % 19;
var X2 = 347605 + (392640 / 492480);	// formule van Robert Schram
X2 = X2 + V1 * (365 + (121555 / 492480) );
X2 = X2 + X1 * (1 + (272953 / 492480) );
var X3 = parseInt(X2); var X4 = X3 % 7;
var X5 = X2 - X3; 
var X6 = X3 + 1;
if ((X4==1) || (X4==3) || (X4==5)) {X6 = X3 + 2;}
if ((X4==0) && (X1 >= 7) && (X5 >= (311676 / 492480))) {X6 = X3 + 3;}  
if ((X4==6) && (X1 >= 12) && (X5 >= (442111 / 492480))) {X6 = X3 + 2;}  
TIS1 = X6;	// TIS1 is de JD van 1 Tisri van lopende Hebr. jaar
//============
var V11 = V1 + 1; 	// berekening voor 1 jaar later
var X11 = (12 * V11 +5) % 19;
var X12 = 347605 + (392640 / 492480);
X12 = X12 + V11 * (365 + (121555 / 492480) );
X12 = X12 + X11 * (1 + (272953 / 492480) );
var X13 = parseInt(X12);
var X14 = X13 % 7;
var X15 = X12 - X13;
var X16 = X13 + 1;
if ((X14==1) || (X14==3) || (X14==5)) {X16 = X13 + 2;}
if ((X14==0) && (X11 >= 7) && (X15 >= (311676 / 492480))) {X16 = X13 + 3;}  
if ((X14==6) && (X11 >= 12) && (X15 >= (442111 / 492480))) {X16 = X13 + 2;}  
TIS2 = X16;	// TIS2 is de JD van 1 Tisri van (Hebr. jaar + 1)
//============
//Bepaling jaartype 
var X7 = TIS2 - TIS1; 	// X7 is lengte van het jaar
var X8=0;
if (X7 == 353) {X8 = 1;}
if (X7 == 354) {X8 = 2;}
if (X7 == 355) {X8 = 3;}
if (X7 == 383) {X8 = 4;}
if (X7 == 384) {X8 = 5;}
if (X7 == 385) {X8 = 6;}
if (X8 < 1) {X6 = 0;}  	// TIS1 wordt nul als jaartype ongeldig is
HT = X8;		// HT is het jaartype
JDP = JD1 + 0.5; 

if (V2==1) {
JDP = JD = TIS1;
if ( ( HT > 3 ) && (HM > 6 ) )  { tel = HM - 6; }
if ( ( HT > 3 ) && (HM < 7 ) )  { tel = HM +7; }
if ( ( HT < 4 ) && (HM > 6 ) )  { tel = HM - 6; }
if ( ( HT < 4 ) && (HM < 7 ) )  { tel = HM + 6; }
}

if (V2==0) {
if (JDP < TIS1) {
HJ = HJ - 1;
CalcHelpHebr(HJ) } 

if (JDP > TIS2) {
HJ = HJ + 1;
CalcHelpHebr(HJ) } 

// dagennummer HN in lopend jaar HJ
HN = JDP - TIS1 + 1;}

// Hier volgt een 2-dimentionale array met de som van de dagen vanaf 1 Tisri

dagsom = [ 	[0,30,59,88,117,147,176,206,235,265,294,324,353,353],
		[0,30,59,89,118,148,177,207,236,266,295,325,354,354],
		[0,30,60,90,119,149,178,208,237,267,296,326,355,355],
		[0,30,59,88,117,147,177,206,236,265,295,324,354,383],
		[0,30,59,89,118,148,178,207,237,266,296,325,355,384],
		[0,30,60,90,119,149,179,208,238,267,297,326,356,385]      ];

if (V2==1) {
HN = dagsom[HT-1][tel-1]
JD = HN + TIS1 + HD - 1.5;}

if (V2==0) {
var tel = 0;
while (HN > dagsom[HT-1][tel] ) {
tel = tel + 1;}

HD = HN - dagsom[HT-1][tel-1]; HM = tel;

if ( ( HT > 3 ) && (tel < 8 ) )  { HM = tel + 6; }
if ( ( HT > 3 ) && (tel > 7 ) )  { HM = tel - 7; }
if ( ( HT < 4 ) && (tel < 7 ) )  { HM = tel + 6; }
if ( ( HT < 4 ) && (tel > 6 ) )  { HM = tel - 6; } 
}
}
//===============================

//===============================
function CalcJDWeekDay(julday) {
// Bereken de weekdag uit JD (Ma=0 Di=1 etc.
var X1=julday+0.5;
var X2= (X1/7); X2=parseInt(X2);
var X3=(7*X2);
WD=X1-X3;
WD=X1 % 7;
}
//===============================

//===============================
function CalcMonthCalend (month, year) {
// Bereken gegevens voor een (Greg) maandkalender
JD2 = JD;		// Bewaar JD
CalcGregDateJD(1,month,year);
JDF=JD;    		// Eerste dag van de maand
CalcGregDateJD(1,month+1,year);
JDS=JD;    		// Eerste dag van de volgende maand
AD = JDS-JDF;  		//Aantal dagen in de maand
CalcJDWeekDay(JDF);
WDF=WD;  		// Weekdag vd eerste dag van de maand
CalcJDWeekDay(JDS);
WDS=WD;  		// Weekdag vd eerste dag van de volgende maand
JD = JD2;
}
//===============================

//===============================
function PrintVariable(line, value) {
// Print een variabele met evt. boven lege regels
var X1 = line; var X2 = value;

while (X1 >= 1) {
document.write ("<br>");
X1 = X1 - 1; }

document.write (X2);
}
//===============================

//===============================
function PrintDateOLD(line, day, month, year, mode) {
// Print een datum met evt. boven lege regels
var X1 = day; 
var X2 = month; 
var X3 = year; 
var X4 = line; 
var X5 = mode; // 0=dd-mm-jjjj en 1=jjjj-mm-dd

while (X4 >= 1) {
document.write ("<br>");
X4 = X4 - 1; }

if (X1<10) {
X1 = "0" + X1;}
if (X2<10) {
X2 = "0" + X2;}

if (X5==0) {document.write (X1, "-", X2, "-", X3);}
else {document.write (X3, "-", X2, "-", X1);}
}
//===============================

//===============================
function PrintGregWeekDay(line, weekday) {
var X1 = line; 
var X2 = weekday;

while (X1 >= 1) {
document.write ("<br>");
X1 = X1 - 1; }

var GregDay=new Array(); 
GregDay[0]="maandag"; 
GregDay[1]="dinsdag"; 
GregDay[2]="woensdag"; 
GregDay[3]="donderdag"; 
GregDay[4]="vrijdag"; 
GregDay[5]="zaterdag";
GregDay[6]="zondag"; 

document.write(GregDay[X2]);
}
//===============================

//===============================

//===============================

//===============================

//===============================

//===============================

//===============================
function PrintGregDate(day, month, year, mode) {
X0 = mode; X1 = day; X2 = month; X3 = year;
while (X0 > 10) {
X0 = X0 - 10;
document.write ("<br>");}
if (X1<10) {
X1 = "0" + X1;}
if (X2<10) {
X2 = "0" + X2;}
if (X0 == 1) {
document.write (X1, "-", X2, "-", X3);
return;}

var GregMonth=new Array();
GregMonth[1]="januari";
GregMonth[2]="februari";GregMonth[3]="maart";
GregMonth[4]="april";GregMonth[5]="mei";GregMonth[6]="juni";
GregMonth[7]="juli";GregMonth[8]="augustus";GregMonth[9]="september";
GregMonth[10]="oktober";GregMonth[11]="november";GregMonth[12]="december";

if (X0 == 2) {
X2 = month;
document.write(X1," ",GregMonth[X2] ," ",X3);
return;}

if (X0 == 3) {
X2 = month;
X4 = GregMonth[X2];
X5 = X4.substring(0,3);
document.write(X1," ",X5," ",X3);
return;}
}
//===============================

//===============================
function PrintIslamDate(day, month, year, mode) {
X0 = mode; X1 = day; X2 = month; X3 = year;
while (X0 > 10) {
X0 = X0 - 10;
document.write ("<br>");}
if (X1<10) {
X1 = "0" + X1;}
if (X2<10) {
X2 = "0" + X2;}
if (X0 == 1) {
document.write (X1, "-", X2, "-", X3);
return;}

var IslamMonth=new Array();
IslamMonth[1]="Muharram";IslamMonth[2]="Safar";IslamMonth[3]="Rabi 1";
IslamMonth[4]="Rabi II";IslamMonth[5]="Jumada 1";IslamMonth[6]="Jumada II";
IslamMonth[7]="Rajab";IslamMonth[8]="Sha’ban";IslamMonth[9]="Ramadan";
IslamMonth[10]="Shawwal";IslamMonth[11]="Dhu al-Qa’da";IslamMonth[12]="Dhu al-Hijja";

if (X0 == 2) {
X2 = month;
document.write(X1," ",IslamMonth[X2] ," ",X3);
return;}
}
//===============================

//===============================
function PrintIslamDay(DayNum) {
var IslamDay=new Array(); 
IslamDay[0]="al-ithnayna";
IslamDay[1]="ath-thalatha'";
IslamDay[2]="al-arba'a'";
IslamDay[3]="al-hamis";
IslamDay[4]="al-jum'a";
IslamDay[5]="as-sabt";
IslamDay[6]="al-ahad";
document.write(IslamDay[DayNum]);
}
//===============================

//===============================
function PrintCalendDate(){
document.write("<br>AD = " + AD);
document.write("<br>JDF = " + JDF);
document.write("<br>WDF = " + WDF);
PrintGregWeekDay(WDF, 11);
PrintIslamWeekDay(WDF, 11);
document.write("<br>JDS = " + JDS);
document.write("<br>WDS = " + WDS);
PrintGregWeekDay(WDS, 11);
PrintIslamWeekDay(WDS, 11);
}
//===============================

//===============================
function PrintIslamWeekDay(weekday, mode) {
X0 = mode; X1 = weekday;
while (X0 > 10) {
X0 = X0 - 10;
document.write ("<br>");}
var IslamDay=new Array(); 
IslamDay[0]="al-ithnayna";
IslamDay[1]="ath-thalatha'";
IslamDay[2]="al-arba'a'";
IslamDay[3]="al-hamis";
IslamDay[4]="al-jum'a";
IslamDay[5]="as-sabt";
IslamDay[6]="al-ahad";
if (X0 == 1) {
document.write(IslamDay[X1]);
return;}
}
//===============================

//===============================
function PrintGregDay(DayNum) {
var GregDay=new Array(); 
GregDay[0]="maandag"; 
GregDay[1]="dinsdag"; 
GregDay[2]="woensdag"; 
GregDay[3]="donderdag"; 
GregDay[4]="vrijdag"; 
GregDay[5]="zaterdag";
GregDay[6]="zondag"; 
document.write(GregDay[DayNum]);
}
//===============================

//===============================
function PrintDate(line, val1, val2, val3) {
// Print variabelen met evt. boven lege regels
var X1 = val1; var X2 = val2; var X3 = val3; var X4 = line;
while (X4 >= 1) {
document.write ("<br>");
X4 = X4 - 1; }
if (X1<10) {
X1 = "0" + X1;}
if (X2<10) {
X2 = "0" + X2;}
if (X3<10) {
X3 = "0" + X3;}
document.write (X1, "-", X2, "-", X3);
}
//===============================

//===============================
function CalcGregDayName(day, month, year) {
CalcGregDateJD(GD,GM,GJ);
var X1=parseInt(JD + 1.5);
var X2=parseInt(X1 / 7);
var X3=X1 - (7*X2);
var GregDay=new Array(); 
GregDay[0]="zondag"; 
GregDay[1]="maandag"; 
GregDay[2]="dinsdag"; 
GregDay[3]="woensdag"; 
GregDay[4]="donderdag"; 
GregDay[5]="vrijdag"; 
GregDay[6]="zaterdag";
GDN=GregDay[X3];}
//===============================

//===============================
function CalcIslamDayName(day, month, year) {
CalcIslamDateJD(ID,IM,IJ);
var X1= parseInt(JD + 1.5);
var X2=parseInt(X1 / 7);
var X3=X1 - (7*X2);
var IslamDay=new Array(); 
IslamDay[0]="yaum al-ahad";
IslamDay[1]="yaum al-ithnayna";
IslamDay[2]="yaum ath-thalatha";
IslamDay[3]="yaum al-arba'a";
IslamDay[4]="yaum al-hamis";
IslamDay[5]="yaum al-jum'a";
IslamDay[6]="yaum as-sabt";
IDN=IslamDay[X3];}
//===============================

//===============================
function CalcHebrDayName(day, month, year) {
CalcHebrDateJD(HD,HM,HJ);
var X1= parseInt(JD + 1.5);
var X2=parseInt(X1 / 7);
var X3=X1 - (7*X2);
var HebrDay=new Array();
HebrDay[0]="yom rishon";
HebrDay[1]="yom sheni";
HebrDay[2]="yom shelishi";
HebrDay[3]="yom revi'i";
HebrDay[4]="yom hamishi";
HebrDay[5]="yom shishi";
HebrDay[6]="yom shabbat";
HDN=HebrDay[X3];}
//===============================

//===============================
function CalcGregMonthName(GM) {
var X1= GM-1;
var GregMonth=new Array();
GregMonth[0]="januari";
GregMonth[1]="februari";
GregMonth[2]="maart";
GregMonth[3]="april";
GregMonth[4]="mei";
GregMonth[5]="juni";
GregMonth[6]="juli";
GregMonth[7]="augustus";
GregMonth[8]="september";
GregMonth[9]="oktober";
GregMonth[10]="november";
GregMonth[11]="december";
GMN=GregMonth[X1];}
//===============================

//===============================
function CalcIslamMonthName(IM) {
var X1= IM-1;
var IslamMonth=new Array();
IslamMonth[0]="Muharram";
IslamMonth[1]="Safar";
IslamMonth[2]="Rabi 1";
IslamMonth[3]="Rabi II";
IslamMonth[4]="Jumada 1";
IslamMonth[5]="Jumada II";
IslamMonth[6]="Rajab";
IslamMonth[7]="Sha’ban";
IslamMonth[8]="Ramadan";
IslamMonth[9]="Shawwal";
IslamMonth[10]="Dhu al-Qa’da";
IslamMonth[11]="Dhu al-Hijja";
IMN=IslamMonth[X1];}
//===============================

//===============================
function CalcHebrMonthName(HM) {
var X1=HM-1;
var HebrMonth=new Array();
HebrMonth[0]="Nisan";
HebrMonth[1]="Lyyar";
HebrMonth[2]="Sivan";
HebrMonth[3]="Tammuz";
HebrMonth[4]="Av";
HebrMonth[5]="Elul";
HebrMonth[6]="Tishri";
HebrMonth[7]="Marheshvan";
HebrMonth[8]="Kislev";
HebrMonth[9]="Tevet";
HebrMonth[10]="Shevat";
HebrMonth[11]="Adar";
HebrMonth[12]="Adar II";
HMN=HebrMonth[X1];}
//===============================

//===============================
function PrintGregLongDate(line,day,month,year,mode) {
var X1 = day; 
var X2 = month; 
var X3 = year; 
var X4 = line; 
var X5 = mode; // 0=niets en 1= met dagnaam
while (X4 >= 1) {
document.write ("<br>");
X4 = X4 - 1; }
if (X5 > 0) {
CalcGregDayName(day, month, year);
document.write (GDN," ");}
CalcGregMonthName(GM);
document.write(X1," ",GMN," ",X3);}
//===============================

//===============================
function PrintIslamLongDate(line,day,month,year,mode) {
var X1 = day; 
var X2 = month; 
var X3 = year; 
var X4 = line; 
var X5 = mode; // 0=niets en 1= met dagnaam
while (X4 >= 1) {
document.write ("<br>");
X4 = X4 - 1; }
if (X5 > 0) {
CalcIslamDayName(day, month, year);
document.write (IDN," ");}
CalcIslamMonthName(IM);
document.write(X1," ",IMN," ",X3);}
//===============================

//===============================
function PrintHebrLongDate(line,day,month,year,mode) {
var X1 = day; 
var X2 = month; 
var X3 = year; 
var X4 = line; 
var X5 = mode; // 0=niets en 1= met dagnaam
while (X4 >= 1) {
document.write ("<br>");
X4 = X4 - 1; }
if (X5 > 0) {
CalcHebrDayName(day, month, year);
document.write (HDN," ");}
CalcHebrMonthName(HM);
document.write(X1," ",HMN," ",X3);}
//===============================

//===============================
function CalcISODayNum(julday){
var X0 = julday; 
CalcJDGregDate(X0);
CalcGregDateJD(1,1, GJ);  //JD van 1 jan
var X1=JD;
var X2=X0-X1+1;
JD=X0;  //Oorspronkelijke waarde van JD
CalcJDGregDate(X0);
ISOD=X2;

ISOD$="dag "+ISOD+" van "+GJ;
}
//===============================

//===============================
function CalcISOWeekNum(julday){
var X0=julday;
CalcJDGregDate(X0);
CalcGregDateJD(4,1, GJ);  //JD van 1 jan
var X1=JD; // JD van 4 jan is altijd in week 1
var X2=parseInt(JD + 0.5);
var X3=parseInt(X2 / 7);
var X4=X2 - (7*X3); // Ma=0, Di=1, etc.

// 4 jan is zondag (waarde = X4 = 6)
// Week 1 begint op maandagJD=X5=X1-X4
var X5=X1-X4;
ISOBW=X5; // Begin van week 1
CalcJDGregDate(X5);

// Aantal weken
var X6=(X0-X5) / 7;
X6=parseInt(X6+1);
ISOW=X6;

JD=X0;  //Oorspronkelijke waarde van JD
CalcJDGregDate(X0);

ISOW$="week "+ISOW+" van "+GJ;
}
//===============================

//===============================
function CalcGregLongDate(julday,mode) {
var X0=julday;
var X4 = mode; // 0=niets en 1= met dagnaam
// 2 = met dag en met A.D. (Anno Domini)

CalcJDGregDate(X0);
var X1 = GD;
var X2 = GM; 
var X3 = GJ; 

CalcGregMonthName(X2); // Geeft GMN
GLD$=GD+ " "+GMN+" "+GJ;

if (X4 > 0) {
CalcGregDayName(X1, X2, X3); // Geeft GDN
GLD$=GDN+" " +GLD$;}

if (X4 >1) {
GLD$=GLD$+" A.D." ;}
}
//===============================

//===============================
function CalcIslamLongDate(julday,mode) {
var X0=julday;
var X4 = mode; // 0=niets en 1= met dagnaam
// 2 = met dag en met A.H. (Anno Hegira)

CalcJDIslamDate(X0);
var X1 = ID;
var X2 = IM; 
var X3 = IJ; 

CalcIslamMonthName(X2); // Geeft IMN
ILD$=ID+ " "+IMN+" "+IJ;

if (X4 > 0) {
CalcIslamDayName(X1, X2, X3); // Geeft IDN
ILD$=IDN+" " +ILD$;}

if (X4 >1) {
ILD$=ILD$+" A.H." ;}
}
//===============================

//===============================
function CalcHebrLongDate(julday,mode) {
var X0=julday;
var X4 = mode; // 0=niets en 1= met dagnaam
// 2 = met dag en met A.M. (Anno Mundi)

CalcJDHebrDate(X0);
var X1 = HD;
var X2 = HM; 
var X3 = HJ; 

CalcHebrMonthName(X2); // Geeft HMN
HLD$=HD+ " "+HMN+" "+HJ;

if (X4 > 0) {
CalcHebrDayName(X1, X2, X3); // Geeft HDN
HLD$=HDN+" " +HLD$;}

if (X4 >1) {
HLD$=HLD$+" A.M." ;}
}
//===============================

//===============================
function MakeCalend(aantreg,aantkol,richting,weekdag,weeknum) {
var X1=aantreg;
var X2=aantkol;
var X3=richting; // 1=hor. telling  2=vert. telling
var X4=weekdag;
var X5=weeknum;

document.write('<table id="kalender1">');

aantreg=X1;
aantkol=X2;
// dagnum = JD;
// dagnum = MJD;
dagnum = ISOBW; // ISO Begin Week

for(regel=0; regel<aantreg; regel++) {	// Nieuwe regel
document.write("<tr>");

for(kolom=0; kolom<aantkol; kolom++) { 	// Nieuwe kolom
document.write("<td>");

X13=regel*(aantkol)+kolom;	// Telling horizontaal
X14=kolom*(aantreg)+regel;	// Telling vertikaal

X15=X13; 		// Horizontaal
if (X3==2) {X15 = X14;} 	// Vertikaal

if (X4==1) {X15=X15-7;}	// Met weekdag

CalcJDWeekDay(dagnum+X15);
document.write(X15);
if (X15 < 0) {PrintGregWeekDay(1, WD);}




document.write("</td>");} 	// Einde kolom
document.write("</tr>");}  	// Einde regel
document.write("</table>");	// Einde tabel
}
//===============================

//===============================
//-->