// current date as initial value
function currDate()
{

var currDate = new Date();
return currDate;
}

// function in which date is converted to format for link
function 
convLnkDate(convWDay,convMDay,convMonth,convYear,convChan,cntLoop)
{

var	weekDName = new Array(7);
	weekDName[0] = "Zondag";
	weekDName[1] = "Maandag";
	weekDName[2] = "Dinsdag";
	weekDName[3] = "Woensdag";
	weekDName[4] = "Donderdag";
	weekDName[5] = "Vrijdag";
	weekDName[6] = "Zaterdag";

var monthName = new Array(12);
	monthName[0] = "januari";
	monthName[1] = "februari";
	monthName[2] = "maart";
	monthName[3] = "april";
	monthName[4] = "mei";
	monthName[5] = "juni";
	monthName[6] = "juli";
	monthName[7] = "augustus";
	monthName[8] = "september";
	monthName[9] = "oktober";
	monthName[10] = "november";
	monthName[11] = "december";

convMDay  = convMDay + cntLoop;
if (convMDay < 1) {
    convMDay  = procDayPast(convMDay,convMonth,convYear);
	convMonth = convMonth - 1;
    if (convMonth < 0) {
        convMonth = convMonth + 12;
		convYear = convYear - 1;
        }
    }
else {
	if (convMonth == 1) {
		if (convYear % 4 == 0) {
			if (convMDay > 29) {
				convMDay = convMDay - 29;
				convMonth = convMonth + 1;
				}
			}
		else {
			if (convMDay > 28) {
				convMDay = convMDay - 28;
				convMonth = convMonth + 1;
				}
			}
		}
	else {
		if (convMonth == 3 || convMonth == 5 || convMonth == 8 || 
			convMonth == 10) {
			if (convMDay > 30) {
				convMDay = convMDay - 30;
				convMonth = convMonth + 1;
				}
			}
		else {
			if (convMDay > 31) {
				convMDay = convMDay - 31;
				convMonth = convMonth + 1;
				if (convMonth > 11) {
					convMonth = 0;
					convYear = convYear + 1;
					}
				}
			}
		}
	}

convWDay  = convWDay + cntLoop;
if (convWDay > 6) {
	convWDay = convWDay - 7;
	}

convForm = procForm(convMDay,convMonth,convYear)

if (cntLoop == -1) {
    convDesc = "Gisteren";
    }
else {
	if (cntLoop == 0) {
    	convDesc = "Vandaag";
	    }
	//else {
	  //  if (cntLoop == 1) {
	    //    convDesc = "Morgen";
		  //  }
	    else {
	        convDesc = weekDName[convWDay] ;
		    }
	//    }
	}
return "<p><a href=televisie_"+ convChan + ".asp?uitzDag=" + convForm + "&#38;Weekdag&#61;" + convDesc +
	   " >" + convDesc + "</a></p>";	
}

// function in which date is processed
function procDayPast(convMDay,convMonth,convYear)
{

convMonth = convMonth - 1;
if (convMonth < 0) {
    convMonth = convMonth + 12;
    convYear = convYear - 1;
    }
if (convMonth == 1) {
    if (convYear % 4 == 0) {
        convMDay = convMDay + 29;
        }
    else {
	    convMDay = convMDay + 28;
        }  
    }
else {
    if (convMonth == 3 || convMonth == 5 || convMonth == 8 || 
	    convMonth == 10) {
        convMDay = convMDay + 30;
        }
    else {
        convMDay = convMDay + 31;
        }
    }	
return convMDay;	
}
//

function procForm(convMDay,convMonth,convYear)
{
return convYear + "-" + (convMonth + 1) + "-" + convMDay;
}
//