var dayname = new Array ("Sunnuntai","Maanantai","Tiistai","Keskiviikko","Torstai","Perjantai","Lauantai");
 
 function Calendar()
{

 thisdate = new Date();
 currentyear = thisdate.getYear();
 month = thisdate.getMonth();
 date = thisdate.getDate();
 day = thisdate.getDay();
 leap_year = false;


 if (currentyear < 1000) currentyear+=1900
 //currentyear += ((currentyear < 97) ? 2000 : 1900);
 
 if (currentyear % 400 == 0)
    leap_year = true;    // on karkausvuosi
 else if (currentyear % 100 == 0)
    leap_year = false;    // ei ole karkausvuosi
 else if (currentyear % 4 == 0)
    leap_year = true;    // on karkausvuosi
          
 cent = parseInt(currentyear/100);
 g = currentyear % 19;
 k = parseInt((cent - 17)/25);
 i = (cent - parseInt(cent/4) - parseInt((cent - k)/3) + 19*g + 15) % 30;
 i = i - parseInt(i/28)*(1 - parseInt(i/28)*parseInt(29/(i+1))*parseInt((21-g)/11));
 j = (currentyear + parseInt(currentyear/4) + i + 2 - cent + parseInt(cent/4)) % 7;
 l = i - j;
 estermonth = 3 + parseInt((l + 40)/44);
 esterdate = l + 28 - 31*parseInt((estermonth/4));
 estermonth--;
 
 document.write("<font color=000000 size=2>&nbsp;" + dayname[day] + ", ");
 if (date < 10) document.write("<font size=2>0" + date + ".");
   else document.write(date + ".");
 num_month = month + 1;
 if (month < 9) document.write("0" + num_month + ".");
   else document.write(num_month + ".");
 document.write(currentyear + "</font>&nbsp;&nbsp;&nbsp;&nbsp;<font color=00aa00 size=2>");
 Set_Year_Month(currentyear, month, date, day, estermonth, esterdate, leap_year);
}

function Set_Year_Month(nYear, nMonth, nDate, nDay, estMonth, estDate, nleapyear)
{
	
 year = nYear;
 month = nMonth;
 date = nDate;
 day = nDay;
 emonth = estMonth;
 edate = estDate;
 leap_year = nleapyear;

// Itsenäisyyspäivä vuodet laskettuna
 usa = 0;  if ( year > 1776) usa = year - 1776; mexico= 0; if ( year > 1810) mexico = year - 1810;
 Brazil = 0; if ( year > 1822) brazil = year - 1822; canada = 0; if ( year > 1867) canada = year - 1867;
 suomi = 0;  if ( year > 1917) suomi = year - 1917; serbia = 0; if ( year > 2006) serbia = year - 2006;
 kosovo = 0; if ( year > 2008) kosovo = year - 2008;
 egypt = 0; if ( year > 1922) egypt = year - 1922;
 intia = 0; if ( year > 1947) intia = year - 1947;
 senegal = 0; if ( year > 1960) senegal = year - 1960;
 australia = 0; if ( year > 1901) australia = year - 1901;
 norja = 0; if ( year > 1905) norja = year - 1905;
 
// Pääsiäisen päivät (Länsi)

if (emonth == 3)  // If emonth is April  PÄÄSIÄINEN HUHTIKUUSSA
{ 
  mariamonth = 2; // maaliskuu
	if (edate <= 11)
	// Marian päivä Pääsiäispäivän ero = -2 week
	// Yleisin on Marianpäivä Pääsiäispäivän ero = -2 week  
  // esim. 1991, 1993, 1994, 1997, 1999, 2002, 2005, 2007, 2008, 2010, ..
	  mariadate = 31 + edate - 14;

	// Marian päivä Pääsiäispäivän ero = -3 week
	// Esim vuosi 2009 Marianpäivä 22.3. ja Pääsiäispäivä 12.4.
  // Esim vuosi 2006 Marianpäivä 26.3. ja Pääsiäispäivä 16.4.
  // Esim vuosi 2001 Marianpäivä 25.3. ja Pääsiäispäivä 15.4.
  // Esim vuosi 1998 Marianpäivä 22.3. ja Pääsiäispäivä  4.4.
  // Esim vuosi 1995 Marianpäivä 26.3. ja Pääsiäispäivä 16.4.
		if ((edate >= 12 ) && (edate <= 16)) // Vuodet 1995, 1998, 2001, 2006
      mariadate = 31 + edate - 21;
      
  // Marian päivä Pääsiäispäivän ero = -4 week
  // Esim vuosi 2003 Marianpäivä 23.3. ja Pääsiäispäivä 20.4.
  // Esim vuosi 2000 Marianpäivä 26.3. ja Pääsiäispäivä 23.4.
  // Esim vuosi 1992 Marianpäivä 22.3. ja Pääsiäispäivä 19.4.
  	if ((edate >= 17 ) && (edate <= 23 )) // Vuodet  1992, 2000, 2003
  	  mariadate = 31 + edate - 28;
}
else
{
	if ((emonth == 2) && (edate >= 14)) // if emonth is march PÄÄSIÄINEN MAALISKUUSSA
  {
    mariadate = edate - 14;
	  mariamonth = 3; // huhtikuu
	}
}
// Marian ilmestyspäivä 
if ((month == mariamonth) && (date == mariadate) && (day==0)) document.write("Marian ilmestysp&auml;iv&auml;");

// Common for all years
// Palmusunnuntai päivä Pääsiäispäivän ero = -1 week
if (edate >= 8){
	palmonth = emonth;
  paldate = edate - 7;
  malmonth = emonth;
  maldate = edate - 6;
  tikmonth = emonth;
  tikdate = edate - 5;
  kelmonth = emonth;
  keldate = edate - 4;
  kiimonth = emonth;
  kiidate = edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
} 
if (edate == 7){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth;
  maldate = edate - 6;
  tikmonth = emonth;
  tikdate = edate - 5;
  kelmonth = emonth;
  keldate = edate - 4;
  kiimonth = emonth;
  kiidate = edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
}
if (edate == 6){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth;
  tikdate = edate - 5;
  kelmonth = emonth;
  keldate = edate - 4;
  kiimonth = emonth;
  kiidate = edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
}
if (edate == 5){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth - 1;
  tikdate = 31 + edate - 5;
  kelmonth = emonth;
  keldate = edate - 4;
  kiimonth = emonth;
  kiidate = edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
} 
if (edate == 4){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth - 1;
  tikdate = 31 + edate - 5;
  kelmonth = emonth - 1;
  keldate = 31 + edate - 4;
  kiimonth = emonth;
  kiidate = edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
} 
if (edate == 3){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth - 1;
  tikdate = 31 + edate - 5;
  kelmonth = emonth - 1;
  keldate = 31 + edate - 4;
  kiimonth = emonth - 1;
  kiidate = 31 + edate - 3;
  pitmonth = emonth;
  pitdate = edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
} 
if (edate == 2){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth - 1;
  tikdate = 31 + edate - 5;
  kelmonth = emonth - 1;
  keldate = 31 + edate - 4;
  kiimonth = emonth - 1;
  kiidate = 31 + edate - 3;
  pitmonth = emonth - 1;
  pitdate = 31 + edate - 2;
  lanmonth = emonth;
  landate = edate - 1;
}
if (edate == 1){
	palmonth = emonth - 1;
	paldate = 31 + edate - 7;
  malmonth = emonth - 1;
  maldate = 31 + edate - 6;
  tikmonth = emonth - 1;
  tikdate = 31 + edate - 5;
  kelmonth = emonth - 1;
  keldate = 31 + edate - 4;
  kiimonth = emonth - 1;
  kiidate = 31 + edate - 3;
  pitmonth = emonth - 1;
  pitdate = 31 + edate - 2;
  lanmonth = emonth -1 ;
  landate = 31 + edate - 1;
}

if ((month == palmonth) && (date == paldate) && (day==0)) document.write("<font color=ff0000 size=2>Palmusunnuntai&nbsp;(virposunnuntai)	 ");
if ((month == malmonth) && (date == maldate) && (day==1)) document.write("<font color=00aa00 size=2>&nbsp;(malkamaanantai)&nbsp;	 ");
if ((month == tikmonth) && (date == tikdate) && (day==2)) document.write("<font color=00aa00 size=2>&nbsp;(tikkutiistai)&nbsp;	 ");
if ((month == kelmonth) && (date == keldate) && (day==3)) document.write("<font color=00aa00 size=2>&nbsp;(kellokeskiviikko)&nbsp;	 ");
if ((month == kiimonth) && (date == kiidate) && (day==4)) document.write("<font color=00aa00 size=2>&nbsp;(kiirastorstai)&nbsp;	 ");
if ((month == pitmonth) && (date == pitdate) && (day==5)) document.write("<font color=ff0000 size=2>Pitk&auml;perjantai&nbsp;	 ");
if ((month == lanmonth) && (date == landate) && (day==6)) document.write("<font color=00aa00 size=2>&nbsp;p&auml;&auml;si&auml;islauantai, lankalauantai eli hiljainen lauantai&nbsp;	 ");

if ((month == emonth) && (date == edate) && (day==0)) document.write("<font color=ff0000 size=2>P&auml;&auml;si&auml;isp&auml;iv&auml; (sukkasunnuntai)	 ");
if ((month == emonth) && (date == edate+1) && (day==1)) document.write("<font color=ff0000 size=2>2. P&auml;&auml;si&auml;isp&auml;iv&auml;	 ");

//Laskiaissunnuntai 7 week before edate (=49 days)
if (emonth == 3) // If emonth is April  PÄÄSIÄINEN HUHTIKUUSSA
{
	if (leap_year) // Karkausvuosi 2000, 2008, 2012, 2016 ...
	  laskiainen = 29-(49-31-edate);
	else 	
		laskiainen = 28-(49-31-edate);

	if (laskiainen > 28)
	{
		laskiainen -= 28;
		if ((month == emonth-1) && (date == laskiainen) && (day==0)) document.write("<font color=ff0000 size=2>Laskiaissunnuntai&nbsp;&nbsp;");
		if ((month == emonth-1) && (date == laskiainen+2) && (day==2)) document.write("<font color=ff0000 size=2>Laskiaistiistai&nbsp;&nbsp;");
	}
	else
  {
		if ((month == emonth-2) && (date == laskiainen) && (day==0)) document.write("<font color=ff0000 size=2>Laskiaissunnuntai&nbsp;&nbsp;");
		if ((month == emonth-2) && (date == laskiainen+2) && (day==2)) document.write("<font color=ff0000 size=2>Laskiaistiistai&nbsp;&nbsp;");
	}
}
else // if emonth is march PÄÄSIÄINEN MAALISKUUSSA
{
	if (leap_year) // Karkausvuosi 2000, 2008, 2012, 2016 ...
	   laskiainen = 29-(49-edate);
	else 
		 laskiainen = 28-(49-edate);
	
	if ((month == emonth-1) && (date == laskiainen) && (day==0)) document.write("<font color=ff0000 size=2>&nbsp;Laskiaissunnuntai&nbsp;&nbsp;");
	if ((month == emonth-1) && (date == laskiainen+2) && (day==2)) document.write("<font color=ff0000 size=2>Laskiaistiistai&nbsp;&nbsp;");
}

// Tammikuu 0
if ((month == 0) && (date == 1)) document.write("Uudenvuodenp&auml;iv&auml;");
if ((month == 0) && (date == 6)) document.write("Loppiainen");
if ((month == 0) && (date == 15)) document.write("<font color=00aa00 size=1>Martin Luther King born");
// 1.1.1901 ??? 
if ((month == 0) && (date == 26)) document.write("<font color=00aa00 size=1>" + australia + ".Itsen&auml;isyysp&auml;iv&auml; Australia (1901)"); //26. tammikuuta
if ((month == 0) && (date == 27)) document.write("<font color=00aa00 size=1>Wolfgang Amadeus Mozart born (1756)<br>");
if ((month == 0) && (date == 27)) document.write("<font color=00aa00 size=1>Vainojen uhrien muistop.");

// Helmikuu 1
if ((year >= 2009) && (month == 1) && (day == 0) && (date > 0) && (date < 9)) document.write("Kynttil&auml;np&auml;iv&auml;&nbsp;"); // 2009 ?, 2010 ?
if ((month == 1) && (date == 5)) document.write("Runebergin p&auml;iv&auml;");
if ((month == 1) && (date == 6)) document.write("Saamelaisten  kansallisp&auml;iv&auml;"); //2007
if ((month == 1) && (date == 8)) document.write("<font color=00aa00 size=1>Jules Verne born (1828)<br>");
if ((month == 1) && (date == 12)) document.write("<font color=00aa00 size=1>Lincolnin syntym&auml;p&auml;iv&auml;");
if ((month == 1) && (date == 14)) document.write("<font color=00aa00 size=2>Yst&auml;v&auml;np&auml;iv&auml;");
if ((month == 1) && (date == 15)) document.write("<font color=00aa00 size=1>Galileo Galilei syntyi born (1564)");
if ((month == 1) && (date == 15)) document.write("<font color=00aa00 size=1>" + serbia + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Serbia (2006)"); //15. helmikuuta 2006
if ((month == 1) && (date == 17)) document.write("<font color=00aa00 size=1>" + kosovo + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Kosovo (2008)"); //17. helmikuuta 2008
if ((month == 1) && (date == 22)) document.write("<font color=00aa00 size=1>Washingtonin syntym&auml;p&auml;iv&auml;");
if ((month == 1) && (date == 28)) document.write("<font color=00aa00 size=1>Kalevalanp&auml;iv&auml;");
if ((month == 1) && (date == 29)) document.write("<font color=00aa00 size=1>Karkausp&auml;iv&auml;");

// Maaliskuu 2
if ((month == 2) && (date == 8)) document.write("Naistenp&auml;iv&auml;");
if ((month == 2) && (date == 19)) document.write("Minna Canthin p&auml;iv&auml;"); //2007
if ((year == 2008) && (month == 2) && (date == 21)) document.write("<font color=00aa00 size=2>Kev&auml;tp&auml;iv&auml;ntasaus");  // 2008 ?
if ((year == 2009) && (month == 2) && (date == 20)) document.write("<font color=00aa00 size=2>Kev&auml;tp&auml;iv&auml;ntasaus");  // 2009 ?
if ((year == 2010) && (month == 2) && (date == 20)) document.write("<font color=00aa00 size=2>Kev&auml;tp&auml;iv&auml;ntasaus");  // 2010 ?
if ((month == 2) && (date == 21)) document.write("<font color=00aa00 size=1>J.S. Bach born (1685)");
if ((month == 2) && (day == 0) && (date > 24) && (date <= 31)) document.write("<font color=00aa00 size=2>&nbsp;&nbsp;Kes&auml;aika alkaa ");

// Huhtikuu 3
if ((month == 3) && (date == 1)) document.write("<font color=00aa00 size=1>Aprilli p&auml;iv&auml;");
if ((month == 3) && (date == 4)) document.write("<font color=00aa00 size=1>" + senegal + ".Itsen&auml;isyysp&auml;iv&auml; Senegal (1960)");
if ((month == 3) && (date == 9)) document.write("<font color=00aa00 size=1>M. Agricolan p&auml;iv&auml;");
if ((month == 3) && (date == 15)) document.write("<br><font color=00aa00 size=1>Leonardo da Vinci born (1452)");
if ((month == 3) && (date == 27)) document.write("<font color=00aa00 size=1>Veteraanip&auml;iv&auml;");

// Toukokuu 4
if ((month == 4) && (date == 1)) document.write("<font color=00aa00 size=1>Itsen&auml;isyysp&auml;iv&auml; Englanti");
if ((month == 4) && (date == 1)) document.write("Vapunp&auml;iv&auml;,&nbsp;<font color=00aa00 size=1>Suomal.ty&ouml;n p.");
if ((year >= 2005) && (month == 4) && (date == 9)) document.write("<font color=00aa00 size=1>Eurooppa-p&auml;iv&auml;");
if ((year >= 2006) && (month == 4) && (date == 12)) document.write("<font color=00aa00 size=1>J.V. Snellmannin p., suomalaisuden p.");
if ((month == 4) && (day == 0) && (date > 7) && (date < 15)) document.write("<font color=ff0000 size=1>&Auml;itienp&auml;iv&auml;");
if ((month == 4) && (day == 0) && (date > 14) && (date < 22)) document.write("<font color=00aa00 size=1>Kaat. muistop&auml;iv&auml;");
if ((year == 2005) && (month == 4) && (date == 5)) document.write("Helatorstai");
if ((year == 2005) && (month == 4) && (day == 0) && (date > 16) && (date < 23)) document.write("Pyh&auml;n Kolminaisuuden p&auml;iv&auml;");
if ((year == 2006) && (month == 4) && (day==4) && (date == 25)) document.write("Helatorstai")
if ((year == 2007) && (month == 4) && (day==4) && (date == 17)) document.write("Helatorstai");;
if ((year == 2008) && (month == 4) && (day==4) && (date == 1)) document.write("<font color=ff0000 size=1>&nbsp;Helatorstai&nbsp;");
if ((year == 2009) && (month == 4) && (day==4) && (date == 21)) document.write("<font color=ff0000 size=1>&nbsp;Helatorstai&nbsp;");

if ((year == 2007) && (month == 4) && (day == 0) && (date == 27)) document.write("Helluntaip&auml;iv&auml;&nbsp;"); //2007
if ((year == 2008) && (month == 4) && (day == 0) && (date == 11)) document.write("<font color=ff0000 size=1>&nbsp;Helluntaip&auml;iv&auml;&nbsp;"); //2008
if ((year == 2009) && (month == 4) && (day == 0) && (date == 31)) document.write("<font color=ff0000 size=1>&nbsp;Helluntaip&auml;iv&auml;&nbsp;"); //2009

// Kesäkuu 5
if ((month == 5) && (date == 6)) document.write("<font color=00aa00 size=1>Itsen&auml;isyysp&auml;iv&auml; Ruotsi"); //6. kesäkuuta
if ((year == 2006) && (month == 5) && (day == 0) && (date == 4)) document.write("Helluntaip&auml;iv&auml;&nbsp;"); //2006
if ((year == 2006) && (month == 5) && (day == 0) && (date > 5) && (date < 15)) document.write("Pyh&auml;n Kolminaisuuden p&auml;iv&auml;");
if ((year == 2009) && (month == 5) && (day == 0) && (date > 6) && (date < 13)) document.write("Pyh&auml;n Kolminaisuuden p&auml;iv&auml;");
if ((month == 5) && (date == 7)) document.write("<font color=00aa00 size=1>&nbsp;" + norja + ". &nbsp;Itsen&auml;isyysp&auml;iv&auml; Norja (1905)");
if ((month == 5) && (date == 4)) document.write("<font color=00aa00 size=1>Puolustusvoimain lippujuhlan p.");
if ((year >= 2005) && (year <= 2007) && (month == 5) && (date == 5)) document.write("<font color=00aa00 size=1>Maailman ymp&auml;rist&ouml;p&auml;iv&auml;");
if ((month == 5) && (date == 21)) document.write("<font color=00aa00 size=1>Kes&auml;p&auml;iv&auml;nseisaus");
if ((month == 5) && (day == 5) && (date > 19) && (date < 26)) document.write("<font color=00aa00 size=1>Juhannusaatto");
if ((month == 5) && (day == 6) && (date >= 20) && (date < 27)) document.write("Juhannusp&auml;iv&auml;<font color=00aa00 size=1>&nbsp;Suomen lipun p.");
if ((year == 2005) && (month == 5) && (date == 26)) document.write("Apostolien p&auml;iv&auml;");
if ((year == 2008) && (month == 5) && (date == 22)) document.write("Apostolien p&auml;iv&auml;");

// Heinäkuu 6
if ((month == 6) && (date == 1)) document.write("<font color=00aa00 size=1>" + canada + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Canada (1867)");
if ((month == 6) && (date == 4)) document.write("<font color=00aa00 size=1>" + usa + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; USA (1776)");
if ((month == 6) && (date == 6)) document.write("<font color=00aa00 size=1>Eino Leinon p&auml;iv&auml;,nbsp;runon ja suven p.");
if ((year == 2006) && (month == 6) && (date == 16)) document.write("Apostolien p&auml;iv&auml;");
if ((year == 2007) && (month == 6) && (date == 8)) document.write("Apostolien p&auml;iv&auml;");
if ((year == 2009) && (month == 6) && (date == 12)) document.write("Apostolien p&auml;iv&auml;");
if ((month == 6) && (date == 27)) document.write("<font color=00aa00 size=1>Unikeonp&auml;iv&auml;");
if ((year <= 2007) && (month == 6) && (day == 0) && (date >= 21) && (date <= 31)) document.write("Kirkastussunnuntai");
if ((year == 2008) && (month == 6) && (day == 0) && (date >= 6) && (date < 21)) document.write("Kirkastussunnuntai");
if ((year == 2009) && (month == 6) && (day == 0) && (date == 26)) document.write("Kirkastussunnuntai");
if ((month == 6) && (date == 23)) document.write("<font color=00aa00 size=1>" + egypt + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Egypt (1922)");

// Elokuu 7
if ((month == 7) && (date == 1)) document.write("<font color=00aa00 size=1>Liittop&auml;iv&auml; (Switzerland)");
if ((month == 7) && (date == 15)) document.write("<font color=00aa00 size=1>" + intia + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Intia (1947)");

// Syyskuu 8
if ((month == 8) && (date == 7)) document.write("<font color=00aa00 size=1>" + brazil + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Brazil (1822)");
if ((month == 8) && (date == 16)) document.write("<font color=00aa00 size=1>" + mexico + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Mexico (1810)");
if ((year <= 2007) && (month == 8) && (date == 23)) document.write("<font color=00aa00 size=2>Syysp&auml;iv&auml;ntasaus");
if ((year == 2008) && (month == 8) && (date == 22)) document.write("<font color=00aa00 size=2>Syysp&auml;iv&auml;ntasaus");
if ((year == 2009) && (month == 8) && (date == 23)) document.write("<font color=00aa00 size=2>Syysp&auml;iv&auml;ntasaus");
if ((year == 2007) && (month == 9) && (day == 0) && (date == 30)) document.write("<font color=00aa00 size=1>Mikkelinp&auml;iv&auml;"); //2007

// Lokakuu 9
if ((year == 2002) && (month == 9) && (date == 1)) document.write("Kans.v&auml;l. lastenp&auml;iv&auml;"); //2005 ?
if ((year == 2006) && (month == 9) && (day == 0) && (date == 1)) document.write("<font color=00aa00 size=1>Mikkelinp&auml;iv&auml;"); //2006 ?
if ((year == 2008) && (month == 9) && (day == 0) && (date == 5)) document.write("<font color=00aa00 size=1>Mikkelinp&auml;iv&auml;"); //2008 ?
if ((year == 2009) && (month == 9) && (day == 0) && (date == 4)) document.write("<font color=00aa00 size=1>Mikkelinp&auml;iv&auml;"); //2009 ?
if ((year == 2010) && (month == 9) && (day == 0) && (date == 3)) document.write("<font color=00aa00 size=1>Mikkelinp&auml;iv&auml;"); //2010 ?
if ((month == 9) && (date == 10)) document.write("<font size=1> Aleksis Kiven p&auml;iv&auml;</font>");
if ((year == 2005) && (month == 9) && (day == 0) && (date >9) && (date < 17)) document.write("Uskonpuhdistuksen muistop."); //2005 ?
if ((year == 2007) && (month == 9) && (day == 0) && (date == 28)) document.write("Uskonpuhdistuksen muistop."); //2007 
if ((year == 2008) && (month == 9) && (day == 0) && (date == 12)) document.write("Uskonpuhdistuksen muistop."); //2008 
if ((month == 9) && (day == 0) && (date > 24) && (date < 31)) document.write("<font color=00aa00 size=2>Kes&auml;aika p&auml;&auml;ttyy");
if ((month == 9) && (date == 24)) document.write("<font color=00aa00 size=2>YK:n p&auml;iv&auml;");
if ((month == 9) && (date == 31)) document.write("<font color=00aa00 size=1>Halloween");
if ((year == 2009) && (month == 9) && (day==6) && (date == 31)) document.write("<font color=ff0000 size=1>&nbsp;Pyh&auml;inp&auml;iv&auml;"); //2009 ?

// Marraskuu 10
if ((year <= 2008) && (month == 10) && (day==6) && (date >= 1) && (date < 6)) document.write("<font color=ff0000 size=1>&nbsp;Pyh&auml;inp&auml;iv&auml;"); //2005, 2006, 2007 2008 ?
if ((year == 2010) && (month == 10) && (day==6) && (date == 6)) document.write("<font color=ff0000 size=1>&nbsp;Pyh&auml;inp&auml;iv&auml;"); //2010 ?
if ((year == 2006) && (month == 10) && (day == 0) && (date == 5)) document.write("Uskonpuhdistuksen muistop."); //2006
if ((year == 2009) && (month == 10) && (day == 0) && (date == 1)) document.write("Uskonpuhdistuksen muistop."); //2009 ?
// ?? if ((year == 2010) && (month == 10) && (day == 0) && (date == 1)) document.write("Uskonpuhdistuksen muistop."); //2010 ?
if ((month == 10) && (date == 6)) document.write("<font color=00aa00 size=1>Ruotsal. p&auml;iv&auml;");
if ((month == 10) && (day == 0) && (date > 6) && (date < 14)) document.write("<font color=00aa00 size=2>Is&auml;np&auml;iv&auml; ");
if ((month == 10) && (day == 0) && (date > 12) && (date <= 20)) document.write("<font color=ff0000 size=2>Valvomisen sunnuntai");
if ((month == 10) && (date == 20)) document.write("<font color=00aa00 size=2>Lapsen oikeuksien p&auml;iv&auml;");
if ((month == 10) && (day == 0) && (date >= 19) && (date <= 26)) document.write("Tuomiosunnuntai"); //2005, 2006, 2007 2008 2009 ?
// ?? Tuomiosunnutai 2010 ?

// Joulukuu 11
if ((month == 11) && (date == 6)) document.write("<font color=00aa00 size=1>" + suomi + ".&nbsp;Itsen&auml;isyysp&auml;iv&auml; Suomi (1917)");
if ((year >= 2006) && (year <= 2007) && (month == 11) && (date == 22)) document.write("<font color=00aa00 size=1>Talvip&auml;iv&auml;nseisaus"); //2006, 2007
if ((year >= 2008) && (year <= 2009) && (month == 11) && (date == 21)) document.write("<font color=00aa00 size=1>Talvip&auml;iv&auml;nseisaus"); //2008 ? 2009 ?
if ((year == 2010) && (month == 11) && (date == 22)) document.write("<font color=00aa00 size=1>Talvip&auml;iv&auml;nseisaus"); //2010 ?
if ((month == 11) && (date == 24)) document.write("<font color=00aa00 size=1>Jouluaatto");
if ((month == 11) && (date == 25)) document.write("<font color=ff0000 size=2>Joulup&auml;iv&auml;");
if ((month == 11) && (date == 26)) document.write("<font color=ff0000 size=2>Tapaninp&auml;iv&auml;");
if ((month == 11) && (date == 28)) document.write("<font color=ff0000 size=1>Viattomienlasten p.");
if ((month == 11) && (date == 31)) document.write("<font color=FF0000 size=1>Uudenvuodenaatto");
document.write("<br><\/font>");
set_dates_and_names();
}

function initArray() 
{
	
this.length = initArray.arguments.length
for (var i = 0; i < this.length; i++)
this[i+1] = initArray.arguments[i]
}

function havinev(ev, ho, nap, nLeapyear) 
{
	
leap_year = nLeapyear;

if (ho==1)
{ var napok = new initArray("-","Aapeli","Elmeri, Elmo, Elmer","Ruut",
"Lea, Leea","Harri","Aku, Aukusti, August","Titta, Hilppa","Veikko, Veli, Veijo, Veikka",
"Nyyrikki","Kari, Karri","Toini","Nuutti","Sakari, Saku","Solja",
"Ilmari, Ilmo","Toni, Anton, Anttoni, Antto","Laura","Heikki, Henrik, Henri, Henrikki, Henna, Henni, Henriikka",
"Sebastian","Aune, Oona, Netta, Auni","Visa","Enni, Eine, Eini","Senja",
"Paavo, Pauli, Paul, Paavali","Joonatan","Viljo","Kalle, Kaarlo, Kaarle, Mies","Valtteri","Irja","Alli","Riitta") }
if (ho==2)
{
  if (leap_year) // Karkausvuosi (2000, 2004, 2008, 2012, 2016, 2020, 2024 etc.
  { var napok=new initArray("Riitta","Jemina, Lumi, Aamu","Valo","Armi, Ronja","Asser",
    "Terhi, Teija, Tiia, Tea, Terhikki","Riku, Rikhard","Laina","Raija, Raisa","Elina, Ella, Ellen, Elna",
    "Talvikki","Elma, Elmi","Sulo, Sulho","Voitto, Valentin, Tino",
    "Sipi, Sippo","Kai","V&auml;in&ouml;, Karita, Rita, V&auml;in&auml;m&ouml;","Kaino","Eija",
    "Heli, Helin&auml;, Helj&auml;, Hely","Keijo","Tuulikki, Tuuli, Hilda, Tuulia","Aslak",
    "Matti, Matias","Tuija, Tuire","Nestori","Torsti","Onni",
    "Karkausp&auml;iv&auml;","Alpo, Alvi, Alpi") }
  else // Ei karkausvuosi
  { var napok=new initArray("Riitta","Jemina, Lumi, Aamu","Valo","Armi, Ronja","Asser",
    "Terhi, Teija, Tiia, Tea, Terhikki","Riku, Rikhard","Laina","Raija, Raisa","Elina, Ella, Ellen, Elna",
    "Talvikki","Elma, Elmi","Sulo, Sulho","Voitto, Valentin, Tino",
    "Sipi, Sippo","Kai","V&auml;in&ouml;, Karita, Rita, V&auml;in&auml;m&ouml;","Kaino","Eija",
    "Heli, Helin&auml;, Helj&auml;, Hely","Keijo","Tuulikki, Tuuli, Hilda, Tuulia","Aslak",
    "Matti, Matias","Tuija, Tuire","Nestori","Torsti","Onni","Alpo, Alvi, Alpi","") } 
}
if (ho==3)
{ var napok=new initArray("Alpo, Alvi, Alpi","Virve, Virva, Fanni","Kauko","Ari, Arsi, Atro",
"Leila, Laila","Tarmo","Tarja, Taru","Vilppu","Auvo","Aurora, Aura, Auri","Kalervo",
"Reijo, Reko","Erno, Ernesti, Tarvo","Matilda, Tilda, Mette","Risto",
"Ilkka","Kerttu, Kerttuli","Eetu, Edvard","Juuso, Josefiina, Jooseppi, Joosef",
"Aki, Kim, Joakim, Jaakkima","Pentti","Vihtori","Akseli",
"Gabriel,Kaapo, Kaapro, Kaappo","Aija",
"Manu, Manne, Immanuel, Immo","Sauli, Saul","Armas","Jouni, Joni, Joonas, Joona, Jonne, Jonni","Usko",
"Irma, Irmeli","Peppi, Raita, Pulmu <font color=00aa00 size=1>(Aprilli p&auml;iv&auml;)</font>" ) }
if (ho==4)
{ var napok=new initArray("Peppi, Raita, Pulmu","Pellervo","Sampo, Veeti","Ukko","Irene, Irina, Ira, Iro",
"Ville, Vilho, Vili, Jami, Vilhem, Viljami","Allan, Ahvo","Suoma, Suometar",
"Elias, Eelis, Eeli, Eljas","Tero","Verna, Minea","Julia, Julius, Janna, Juliaana","Tellervo","Taito","Linda, Tuomi",
"Jalo, Patrik","Otto","Valto, Valdemar","Pilvi, P&auml;lvi","Nella, Lauha","Anssi, Anselmi",
"Alina","Yrj&ouml;, Jyrki, Jyri, Jori, Jiri, Yrj&auml;n&auml;","Pertti, Albert, Altti","Markku, Marko, Markus","Terttu, Teresa, Tessa",
"Merja","Ilpo, Tuure, Ilppo","Teijo","Mirja, Miia, Mira, Mirva, Mirka, Mirjami, Mirkka","Vappu, Valpuri" )}
if (ho==5)
{ var napok=new initArray("Vappu, Valpuri","Vuokko, Viivi","Outi","Roosa, Rosa, Ruusu",
"Melina, Maini","Ylermi","Helmi, Kastehelmi","Heino","Timo, Timi","Aino, Aini, Aina, Ainikki",
"Osmo","Lotta","Kukka, Floora","Tuula","Sofia, Sonja, Sohvi",
"Esteri, Essi, Ester","Maila, Mailis, Maili, Maisa, Rebekka","Erkki, Eero, Eerik, Eerika, Erkka, Eerikki",
"Emilia, Emma, Emmi, Milla, Milja, Milka, Mila, Amalia","Lilja, Karoliina, Lilli","Kosti, Konsta, Konstantin",
"Hemminki, Hemmo","Lyydia, Lyyli","Tuukka, Touko","Urpo","Minna, Vilma, Vilhelmiina, Miina, Mimmi",
"Ritva","Alma","Oiva, Oliver, Olivia, Oivi","Pasi","Helka, Helga","Teemu, Nikodemus" )}
if (ho==6)
{ var napok=new initArray("Teemu, Nikodemus","Venla","Orvokki, Viola","Toivo","Sulevi","Kustaa, Ky&ouml;sti, Kustavi",
"Suvi, Roope, Robert","Salomon, Salomo","Ensio","Seppo","Impi, Immi",
"Esko","Raili, Raila","Kielo, Pihla","Vieno, Moona, Viena","P&auml;ivi, P&auml;ivikki, P&auml;iv&auml;","Urho","Tapio","Siiri",
"Into","Ahti, Ahto","Paula, Pauliina, Liina","Aatu, Aatto, Aadolf",
"Johannes, Juhani, Juha, Jukka, Janne, Juho, Jani, Jussi, Juhana,","Uuno",
"Jorma, Jarmo, Jarkko, Jarno, Jere, Jeremias","Elviira, Elvi","Leo",
"Pekka, Petri, Petra, Petteri, Pietari, Pekko","P&auml;ivi&ouml;, P&auml;iv&ouml;","Aaro, Aaron" ) }
if (ho==7)
{ var napok=new initArray("Aaro, Aaron","Maria, Maija, Mari, Meeri, Marika, Maiju, Riia, Maaria, Maikki, Kukka-Maaria",
"Arvo","Ulla, Ulpu","Unto, Untamo","Esa, Esaias","Klaus, Launo","Turo, Turkka","Jasmin, Ilta, Jade",
"Saima, Saimi","Elli, Noora, Nelli, Eleonoora","Hermanni, Herkko, Herman","Joel, Ilari, Lari","Aliisa, Alisa",
"Rauni, Rauna","Reino","Ossi, Ossian","Riikka"," Sari, Saara, Sara, Salla, Salli",
"Marketta, Maarit, Reetta, Reeta, Maaret, Margareeta","Johanna, Hanna, Jenni, Jenna, Jonna, Hannele, Hanne, Joanna",
"Leena, Matleena, Leeni, Lenita","Olga, Oili","Kristiina, Tiina, Kirsti, Kirsi, Krista, Kiia, Tinja","Jaakko, Jaakob, Jimi, Jaakoppi",
"Martta","Heidi","Atso","Olavi, Olli, Uolevi, Uoti","Asta","Helena, Elena","Maire" )}
if (ho==8)
{ var napok=new initArray("Maire","Kimmo","Nea, Linnea, Neea, Vanamo","Veera","Salme, Sanelma",
"Toimi, Keimo","Lahja","Sylvi, Sylvia, Silva","Erja, Eira","Lauri, Lasse, Lassi",
"Sanna, Susanna, Sanni, Susanne ","Klaara","Jesse","Onerva, Kanerva",
"<font color=00aa00 size=1>Marja, Jaana, Marjatta, Marjo, Marita, Marjut, Marianne, Maritta, Marjaana, Marjukka, Marianna, Jatta</font>","Aulis",
"Verneri","Leevi","Mauno, Maunu","Sami, Samuli, Samu, Samuel","Soini, Veini",
"Iivari, Iivo","Signe, Varma","Perttu","Loviisa","Ilmi, Ilma, Ilmatar",
"Rauli","Tauno","Iina, Iines, Inari","Eemil, Eemeli","Arvi","Pirkka" ) }
if (ho==9)
{ var napok= new initArray("Pirkka","Sinikka, Sini, Justus","Soili, Soile, Soila","Ansa","Roni, Mainio",
"Asko","Miro, Arho, Arhippa","Taimi","Isto, Eevert, Vertti","Kalevi, Kaleva",
"Santeri, Aleksanteri, Santtu, Aleksandra, Sandra, Ali, Ale","Valma, Vilja","Orvo","Iida","Sirpa",
"Hilla, Hellevi, Hillevi, Hille","Aili, Aila","Tyyne, Tytti, Tyyni","Reija","Varpu, Vaula",
"Mervi","Mauri","Minja, Miisa, Mielikki","Alvar, Auno","Kullervo","Kuisma","Vesa",
"Arja, Lenni","Mikko, Mika, Mikael, Miika, Miikka, Miska, Miko, Mikaela","Siru, Sirja, Sorja","Rauno, Rainer, Raine, Raino" )}
if (ho==10)
{ var napok= new initArray("Rauno, Rainer, Raine, Raino","Valio","Raimo","Saija, Saila, Frans",
"Inkeri, Inka","Pinja, Minttu","Pirkko, Pirjo, Piritta, Prita, Birgitta",
"Hilja","Ilona","Aleksi, Aleksis","Otso, Ohto'","Aarre, Aarto",
"Taina, Tanja, Taija","Elsa, Else, Elsi","Helvi, Heta","Sirkka, Sirkku","Saana, Saina",
"Satu, S&auml;de, Luukas","Uljas","Kauno, Kasperi, Jasper, Jesper",
"Ursula","Anja, Anita, Anniina, Anitta, Anette","Severi","Rasmus, Asmo","Sointu","Niina, Nina, Amanda, Ninni, Manta",
"Helli, Hellin, Hell&auml;, Helle","Simo","Alfred, Urmas","Eila","Arto, Arttu, Artturi","Pyry, Lyly" )}
if (ho==11)
{ var napok=new initArray("Pyry, Lyly","Topi, Topias","Terho","Hertta","Reima","Kustaa Aadolf",
"Taisto","Aatos","Teuvo","Martti","Panu","Virpi","Kristian, Ano",
"Iiris","Janina, Janika, Janita, Janette","Aarne, Aarno, Aarni","Eino, Einari","Tenho, Max, Jousia",
"Liisa, Elisa, Eliisa, Liisi, Elisabet, Elise","Jari, Jalmari","Hilma","Silja, Selja","Ismo",
"Lempi, Lemmikki, Sivi","Katri, Kaija, Katja, Kaisa, Kati, Kaarina, Kaisu, Riina, Katariina, Katriina",
"Sisko","Hilkka","Heini, Kaisla","Aimo","Antti, Antero, Atte","Oskari" )}
if (ho==12)
{ var napok=new initArray("Oskari","Anelma, Unelma","Meri, Vellamo","Airi, Aira","Selma",
"Niilo, Niko, Niklas, Niki, Nikolai","Sampsa","Kyllikki, Kylli",
"Anna, Anne, Anni, Anu, Anneli, Annikki, Annika, Annukka","Jutta","Tatu, Daniel, Taneli","Tuovi",
"Seija","Jouko","Heimo","Auli, Aulikki, Aada","Raakel","Aapo, Rami, Aappo",
"Iiro, Iisakki, Iikka, Isko","Benjamin, Kerkko","Tuomas, Tomi, Tommi, Tuomo","Raafael","Senni",
"Aatami, Eeva, Eevi, Eveliina"," ","Tapani, Teppo, Tahvo",
"Hannu, Hannes, Hans","Piia","Rauha","Taavetti, Taavi, Daavid","Sylvester, Silvo","Uudenvuodenp&auml;iv&auml;") }
return napok[nap]
}
// 2010 Tenho, Max, Jousia
function set_dates_and_names()
{

 ido = new Date();
 ev = ido.getYear();
 ho = ido.getMonth()+1;
 nap = ido.getDate();
 dip = ido.getDay();
 leap_year = false;
 
 if (ev % 400 == 0)
    leap_year = true;    // on karkausvuosi
 else if (ev % 100 == 0)
    leap_year = false;    // ei ole karkausvuosi
 else if (ev % 4 == 0)
    leap_year = true;    // on karkausvuosi
    
 ev+=((ev<97) ? 2000 : 1900);
 document.writeln("&nbsp;<font color=000000 size=2>T&auml;n&auml;&auml;n nimip&auml;iv&auml;&nbsp;:&nbsp;" + 
 "&nbsp; <font color=00aa00 size=2>&nbsp;" + 
 havinev(ev, ho, nap, leap_year) +"<\/font>");

 document.write("&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color=aaaaaa size=2>Huomenna&nbsp;:&nbsp;" + 
 "&nbsp;<font color=aaaaaa size=-1>&nbsp;" + 
 havinev(ev, ho, nap+1, leap_year) +"<\/font>")
 document.writeln(" ");
}