/* 
Päivämäärään liittyviä funktioita Keinutien ala-asteen koulun webbisivulle
(c) Antti Hakkarainen 1999 antti.t.hakkarainen@edu.hel.fi
Saa käyttää vapaasti, kun ei ota kiitosta itselleen!

Nimipäivärutiinit:
Original idea and script by: Joltsu - www.joltsu.cjb.net

Laita tämä tiedosto HTML-sivun alkuun.

Globaalit muuttujat ja niiden alustus 
Näitä voi käyttää kotisivulla!    */

//päiväys tänään
var nyt = new Date();

//kenen nimipäivä on tänään
var nimipv = "";

//käyttäjän nimi
var nimi = "";

//käyttäjän syntymäaika
var s_vuosi = "";
var s_kuukausi = "";
var s_paiva = "";

//käyntilaskuri
var laskuri=0;

//edellinen käyntikerta
var visiitti="";

//jos ollaan ekaa kertaa
var ekakerta=false;

//päivämäärä pilkottuna
var paiva = nyt.getDate();
var kuukausi = nyt.getMonth();
var vuosi = nyt.getYear();
if (vuosi<1900) vuosi+=1900;

/* Seuraavia funktioita voi käyttää kotisivulla */

//Tulostetaan päivän nimipäiväsankarit
function nimip()
{
var i;
for (i in nimet) {
  document.write(nimet[i]);
  if (i<nimet.length-2)
    document.write(", ");
  else if (i==nimet.length-2)
    document.write(" ja ");
  }
}


//Tulostetaan ss+käyttäjän_ikä+es, tai ds, jos ikää ei tiedetä
function ika(ds,ss,es)
{
if (s_paiva){
  document.write(ss); 
  write_date_diff(s_vuosi,s_kuukausi-1,s_paiva,vuosi,kuukausi,paiva);
  document.write(es);
  }
else document.write(ds);
}

//Tulostetaan päivämäärä d, jos wd=1, tulostetaan viikonpäivä pienellä, jos wd=2 niin isolla
function write_date(d, wd, liite) {
if (wd>0) {
  var vp=pv_nimet[d.getDay()];
  if (wd==1)
    vp=vp.toLowerCase();
  document.write(vp);
  if (liite) document.write(liite)
  }
var v=d.getYear();
if (v<1900) v+=1900;
var pvm = " " + d.getDate() + "." + (d.getMonth()+1) + "." + v;
document.write(pvm);
}

//Lasketaan ja tulostetaan kahden päivämäärän välinen ero, eka on aikaisempi
function write_date_diff(y1,m1,d1,y2,m2,d2)
{
if (d2<d1) {d2 += 30 ; m2--;}
if (m2<m1) {m2 += 12 ; y2--;}
var y = y2-y1;
var m = m2-m1;
var d = d2-d1;
if (y) document.write(y+" vuotta ");
if (m) document.write(m+" kuukautta ");
if (d) document.write(d+" päivää ");
}

//asetetaan Cookie ja sille arvo
function keksi_aseta(a_nimi, arvo)
{
document.cookie=(a_nimi + "=" + escape(arvo) + "; expires="+exp.toGMTString());
}

//keksit haetaan vain alustettaessa (ks. alla)!

/* Taulukot nimipäiviä ym. varten */
var pv_nimet = new Array("Sunnuntai","Maanantai","Tiistai","Keskiviikko","Torstai","Perjantai","Lauantai");

tammikuu = new Array(31);
tammikuu[0]="Uudenvuodenpäivä";
tammikuu[1]="Aapeli";
tammikuu[2]="Elmo Elmer";
tammikuu[3]="Ruut";
tammikuu[4]="Lea Leea";
tammikuu[5]="Harri";
tammikuu[6]="Aukusti Aku";
tammikuu[7]="Hilppa Titta";
tammikuu[8]="Veikko Veli Veijo";
tammikuu[9]="Nyyrikki";
tammikuu[10]="Kari Karri";
tammikuu[11]="Toini";
tammikuu[12]="Nuutti";
tammikuu[13]="Sakari Saku";
tammikuu[14]="Solja";
tammikuu[15]="Ilmari Ilmo";
tammikuu[16]="Toni Anttoni";
tammikuu[17]="Laura";
tammikuu[18]="Heikki Henrik";
tammikuu[19]="Henna Henni";
tammikuu[20]="Aune Oona";
tammikuu[21]="Visa";
tammikuu[22]="Eine Eini Enni";
tammikuu[23]="Senja";
tammikuu[24]="Paavo Pauli";
tammikuu[25]="Joonatan";
tammikuu[26]="Viljo";
tammikuu[27]="Kaarlo Kalle";
tammikuu[28]="Valtteri";
tammikuu[29]="Irja";
tammikuu[30]="Alli";

helmikuu = new Array(29);
helmikuu[0]="Riitta";
helmikuu[1]="Aamu";
helmikuu[2]="Valo";
helmikuu[3]="Armi";
helmikuu[4]="Asser";
helmikuu[5]="Terhi Teija Tiia";
helmikuu[6]="Riku Rikhard";
helmikuu[7]="Laina";
helmikuu[8]="Raija Raisa";
helmikuu[9]="Elina Elna";
helmikuu[10]="Talvikki";
helmikuu[11]="Elma Elmi";
helmikuu[12]="Sulo Sulho";
helmikuu[13]="Voitto";
helmikuu[14]="Sipi Sippo";
helmikuu[15]="Kai";
helmikuu[16]="Väinö Väinämö";
helmikuu[17]="Kaino";
helmikuu[18]="Eija";
helmikuu[19]="Heli Helinä";
helmikuu[20]="Keijo";
helmikuu[21]="Tuulikki Tuuli";
helmikuu[22]="Aslak";
helmikuu[23]="Matti Mattias";
helmikuu[24]="Tuija Tuire";
helmikuu[25]="Nestori";
helmikuu[26]="Torsti";
helmikuu[27]="Onni";
helmikuu[28]="Karkauspäivä";

maaliskuu = new Array(31);
maaliskuu[0]="Alpo Alvi Alpi";
maaliskuu[1]="Virve Virva";
maaliskuu[2]="Kauko";
maaliskuu[3]="Ari Arsi Atro";
maaliskuu[4]="Laila Leila";
maaliskuu[5]="Tarmo";
maaliskuu[6]="Tarja Taru";
maaliskuu[7]="Vilppu";
maaliskuu[8]="Auvo";
maaliskuu[9]="Aurora Aura Auri";
maaliskuu[10]="Kalervo";
maaliskuu[11]="Reijo Reko";
maaliskuu[12]="Erno Tarvo";
maaliskuu[13]="Matilda Tilda";
maaliskuu[14]="Risto";
maaliskuu[15]="Ilkka";
maaliskuu[16]="Kerttu Kerttuli";
maaliskuu[17]="Eetu Edvard";
maaliskuu[18]="Jooseppi Juuso";
maaliskuu[19]="Aki Joakim Kim";
maaliskuu[20]="Pentti";
maaliskuu[21]="Vihtori";
maaliskuu[22]="Akseli";
maaliskuu[23]="Kaapo Gabriel";
maaliskuu[24]="Aija";
maaliskuu[25]="Manu Immanuel";
maaliskuu[26]="Sauli Saul";
maaliskuu[27]="Armas";
maaliskuu[28]="Joonas Jouni Joni";
maaliskuu[29]="Usko Tage";
maaliskuu[30]="Irma Irmeli";

huhtikuu = new Array(30);
huhtikuu[0]="Raita Pulmu";
huhtikuu[1]="Pellervo";
huhtikuu[2]="Sampo";
huhtikuu[3]="Ukko";
huhtikuu[4]="Irene Irina";
huhtikuu[5]="Vilho Ville";
huhtikuu[6]="Allan Ahvo";
huhtikuu[7]="Suoma Suometar";
huhtikuu[8]="Elias Eelis";
huhtikuu[9]="Tero";
huhtikuu[10]="Verna";
huhtikuu[11]="Julius Julia";
huhtikuu[12]="Tellervo";
huhtikuu[13]="Taito";
huhtikuu[14]="Linda Tuomi";
huhtikuu[15]="Jalo Patrik";
huhtikuu[16]="Otto";
huhtikuu[17]="Valto Valdemar";
huhtikuu[18]="Päivi Pilvi";
huhtikuu[19]="Lauha";
huhtikuu[20]="Anssi Anselmi";
huhtikuu[21]="Alina";
huhtikuu[22]="Yrjö Jyrki Jyri";
huhtikuu[23]="Pertti Albert";
huhtikuu[24]="Markku Markus Marko";
huhtikuu[25]="Terttu Teresa";
huhtikuu[26]="Merja";
huhtikuu[27]="Ilpo Ilppo";
huhtikuu[28]="Teijo";
huhtikuu[29]="Mirja Mirva Mira Miia";

toukokuu = new Array(31);
toukokuu[0]="Vappu Valpuri";
toukokuu[1]="Vuokko Viivi";
toukokuu[2]="Outi";
toukokuu[3]="Ruusu Roosa";
toukokuu[4]="Maini";
toukokuu[5]="Ylermi";
toukokuu[6]="Helmi Kastehelmi";
toukokuu[7]="Heino";
toukokuu[8]="Timo";
toukokuu[9]="Aino Aina Aini";
toukokuu[10]="Osmo";
toukokuu[11]="Lotta";
toukokuu[12]="Kukka Floora";
toukokuu[13]="Tuula";
toukokuu[14]="Sofia Sonja";
toukokuu[15]="Esteri Essi";
toukokuu[16]="Maila Maili";
toukokuu[17]="Erkki Eero";
toukokuu[18]="Emilia Milja Emma";
toukokuu[19]="Lilja Karoliina";
toukokuu[20]="Kosti Kosta";
toukokuu[21]="Hemminki Hemmo";
toukokuu[22]="Lyydia Lyyli";
toukokuu[23]="Tuukka Touko";
toukokuu[24]="Urpo";
toukokuu[25]="Minna Vilma";
toukokuu[26]="Ritva";
toukokuu[27]="Alma";
toukokuu[28]="Oiva Oivi";
toukokuu[29]="Pasi";
toukokuu[30]="Helka Helga";

kesakuu = new Array(30);
kesakuu[0]="Teemu Nikodemus";
kesakuu[1]="Venla";
kesakuu[2]="Orvokki";
kesakuu[3]="Toivo";
kesakuu[4]="Sulevi";
kesakuu[5]="Kustaa Kyösti";
kesakuu[6]="Suvi";
kesakuu[7]="Salomo Salomon";
kesakuu[8]="Ensio";
kesakuu[9]="Seppo";
kesakuu[10]="Impi Immi";
kesakuu[11]="Esko";
kesakuu[12]="Raili Raila";
kesakuu[13]="Kielo";
kesakuu[14]="Vieno Viena";
kesakuu[15]="Päivi Päivikki Päivä";
kesakuu[16]="Urho";
kesakuu[17]="Tapio";
kesakuu[18]="Siiri";
kesakuu[19]="Into";
kesakuu[20]="Ahti Ahto";
kesakuu[21]="Paula Liina Pauliina";
kesakuu[22]="Aatto Aatu Aadolf";
kesakuu[23]="Johannes Juhani Juha";
kesakuu[24]="Uuno";
kesakuu[25]="Jorma Jarmo Jarkko";
kesakuu[26]="Elviira Elvi";
kesakuu[27]="Leo";
kesakuu[28]="Pietari Pekka Petri Petra";
kesakuu[29]="Päiviö Päivö";

heinakuu = new Array(31);
heinakuu[0]="Aaro Aaron";
heinakuu[1]="Maria Mari Maija Meeri Maaria";
heinakuu[2]="Arvo";
heinakuu[3]="Ulla Upu";
heinakuu[4]="Unto Untamo";
heinakuu[5]="Esa Esaias";
heinakuu[6]="Klaus Launo";
heinakuu[7]="Turo Turkka";
heinakuu[8]="Ilta Jasmin";
heinakuu[9]="Saima Saimi";
heinakuu[10]="Elli Noora Nelli";
heinakuu[11]="Hermanni Herkko";
heinakuu[12]="Ilari Lari Joel";
heinakuu[13]="Aliisa";
heinakuu[14]="Rauni Rauna";
heinakuu[15]="Reino";
heinakuu[16]="Ossi Ossian";
heinakuu[17]="Riikka";
heinakuu[18]="Saara Sari Salli Salla";
heinakuu[19]="Marketta Maarit Reeta";
heinakuu[20]="Johanna Hanna Jenni";
heinakuu[21]="Leena Leeni Lenita";
heinakuu[22]="Oili Olga";
heinakuu[23]="Kirsti Tiina Kirsi Kristiina";
heinakuu[24]="Jaakko Jaakoppi";
heinakuu[25]="Martta";
heinakuu[26]="Heidi";
heinakuu[27]="Atso";
heinakuu[28]="Olavi Olli Uolevi Uoti";
heinakuu[29]="Asta";
heinakuu[30]="Helena Elena";

elokuu = new Array(31);
elokuu[0]="Maire";
elokuu[1]="Kimmo";
elokuu[2]="Linnea Nea Vanamo";
elokuu[3]="Veera";
elokuu[4]="Salme Sanelma";
elokuu[5]="Toimi Keimo";
elokuu[6]="Lahja";
elokuu[7]="Sylvi Sylvia Silva";
elokuu[8]="Erja Eira";
elokuu[9]="Lauri Lasse Lassi";
elokuu[10]="Sanna Susanna Sanni";
elokuu[11]="Klaara";
elokuu[12]="Jesse";
elokuu[13]="Onerva Kanerva";
elokuu[14]="Marjatta Marja Jaana";
elokuu[15]="Aulis";
elokuu[16]="Verneri";
elokuu[17]="Leevi";
elokuu[18]="Mauno Maunu";
elokuu[19]="Samuli Sami Samuel Samu";
elokuu[20]="Soini Veini";
elokuu[21]="Iivari Iivo";
elokuu[22]="Varma Signe";
elokuu[23]="Perttu";
elokuu[24]="Loviisa";
elokuu[25]="Ilma Ilmi Ilmatar";
elokuu[26]="Rauli";
elokuu[27]="Tauno";
elokuu[28]="Iines Iina Inari";
elokuu[29]="Eemil Eemeli";
elokuu[30]="Arvi";

syyskuu = new Array(30);
syyskuu[0]="Pirkka";
syyskuu[1]="Sinikka Sini";
syyskuu[2]="Soili Soile Soila";
syyskuu[3]="Ansa";
syyskuu[4]="Mainio";
syyskuu[5]="Asko";
syyskuu[6]="Arho Arhippa";
syyskuu[7]="Taimi";
syyskuu[8]="Eevert Isto";
syyskuu[9]="Kalevi Kaleva";
syyskuu[10]="Santeri Ali Ale Aleksanteri";
syyskuu[11]="Valma Vilja ";
syyskuu[12]="Orvo";
syyskuu[13]="Iida";
syyskuu[14]="Sirpa";
syyskuu[15]="Hellevi Hillevi Hille Hilla";
syyskuu[16]="Aili Aila";
syyskuu[17]="Tyyne Tytti Tyyni";
syyskuu[18]="Reija";
syyskuu[19]="Varpu Vaula";
syyskuu[20]="Mervi";
syyskuu[21]="Mauri";
syyskuu[22]="Mielikki";
syyskuu[23]="Alvar Auno";
syyskuu[24]="Kullervo";
syyskuu[25]="Kuisma";
syyskuu[26]="Vesa";
syyskuu[27]="Arja";
syyskuu[28]="Mikko Mika Mikael Miika";
syyskuu[29]="Sorja Sirja";

lokakuu = new Array(31);
lokakuu[0]="Rauno Rainer Raine Raino";
lokakuu[1]="Valio";
lokakuu[2]="Raimo";
lokakuu[3]="Saila Saija";
lokakuu[4]="Inkeri Inka";
lokakuu[5]="Minttu Pinja";
lokakuu[6]="Pirkko Pirjo Piritta Pirita";
lokakuu[7]="Hilja";
lokakuu[8]="Ilona";
lokakuu[9]="Aleksi Aleksis";
lokakuu[10]="Otso Ohto";
lokakuu[11]="Aarre Aarto";
lokakuu[12]="Taina Tanja Taija";
lokakuu[13]="Elsa Else Elsi";
lokakuu[14]="Helvi Heta";
lokakuu[15]="Sirkka Sirkku";
lokakuu[16]="Saini Saana";
lokakuu[17]="Satu Säde";
lokakuu[18]="Uljas";
lokakuu[19]="Kauno Kasperi";
lokakuu[20]="Ursula";
lokakuu[21]="Anja Anita Anniina Anitta";
lokakuu[22]="Severi";
lokakuu[23]="Asmo";
lokakuu[24]="Sointu";
lokakuu[25]="Amanda Niina Manta";
lokakuu[26]="Helli Hellä Hellin Helle";
lokakuu[27]="Simo";
lokakuu[28]="Alfred Urmas";
lokakuu[29]="Eila";
lokakuu[30]="Artturi Arto Arttu";

marraskuu = new Array(30);
marraskuu[0]="Pyry Lyly";
marraskuu[1]="Topi Topias";
marraskuu[2]="Terho";
marraskuu[3]="Hertta";
marraskuu[4]="Reima";
marraskuu[5]="Kustaa Aadolf";
marraskuu[6]="Taisto";
marraskuu[7]="Aatos";
marraskuu[8]="Teuvo";
marraskuu[9]="Martti";
marraskuu[10]="Panu";
marraskuu[11]="Virpi";
marraskuu[12]="Ano Kristian";
marraskuu[13]="Iiris";
marraskuu[14]="Janika Janita Janina";
marraskuu[15]="Aarne Aarno Aarni";
marraskuu[16]="Eino Einar";
marraskuu[17]="Tenho Jousia";
marraskuu[18]="Liisa Eliisa Elisa Elisabet";
marraskuu[19]="Jalmari Jari";
marraskuu[20]="Hilma";
marraskuu[21]="Silja Selja";
marraskuu[22]="Ismo";
marraskuu[23]="Lempi Lemmikki Sivi";
marraskuu[24]="Katri Kaisa Kaija Katja";
marraskuu[25]="Sisko";
marraskuu[26]="Hilkka";
marraskuu[27]="Heini";
marraskuu[28]="Aimo";
marraskuu[29]="Antti Antero Atte";

joulukuu = new Array(31);
joulukuu[0]="Oskari";
joulukuu[1]="Anelma Unelma";
joulukuu[2]="Vellamo Meri";
joulukuu[3]="Airi Aira";
joulukuu[4]="Selma";
joulukuu[5]="Niilo Niko Niklas";
joulukuu[6]="Sampsa";
joulukuu[7]="Kyllikki Kylli";
joulukuu[8]="Anna Anne Anni Anu Annikki";
joulukuu[9]="Jutta";
joulukuu[10]="Taneli Tatu Daniel";
joulukuu[11]="Tuovi";
joulukuu[12]="Seija";
joulukuu[13]="Jouko";
joulukuu[14]="Heimo";
joulukuu[15]="Auli Aulikki";
joulukuu[16]="Raakel";
joulukuu[17]="Aapo Aappo Rami";
joulukuu[18]="Iikka Iiro Iisakki Isko";
joulukuu[19]="Benjamin Kerkko";
joulukuu[20]="Tuomas Tuomo Tommi";
joulukuu[21]="Raafael";
joulukuu[22]="Senni";
joulukuu[23]="Aatami Eeva Eevi Eveliina";
joulukuu[24]="-Joulupäivä-";
joulukuu[25]="Tapani Teppo";
joulukuu[26]="Hannu Hannes";
joulukuu[27]="Piia";
joulukuu[28]="Rauha";
joulukuu[29]="Daavid Taavetti Taavi";
joulukuu[30]="Sylvester Silvo";


/* Suoritetaan loput alustukset */

//keksin vanheneminen = 1 vuosi
exp = new Date(vuosi+1, kuukausi, paiva);

//asetetaan nimipäivä
if(kuukausi == 0)nimipv=tammikuu[paiva-1];
else if(kuukausi == 1)nimipv=helmikuu[paiva-1];
else if(kuukausi == 2)nimipv=maaliskuu[paiva-1];
else if(kuukausi == 3)nimipv=huhtikuu[paiva-1];
else if(kuukausi == 4)nimipv=toukokuu[paiva-1];
else if(kuukausi == 5)nimipv=kesakuu[paiva-1];
else if(kuukausi == 6)nimipv=heinakuu[paiva-1];
else if(kuukausi == 7)nimipv=elokuu[paiva-1];
else if(kuukausi == 8)nimipv=syyskuu[paiva-1];
else if(kuukausi == 9)nimipv=lokakuu[paiva-1];
else if(kuukausi == 10)nimipv=marraskuu[paiva-1];
else if(kuukausi == 11)nimipv=joulukuu[paiva-1];
nimet=nimipv.split(" ");

//haetaan keksistä tiedot
keksit=document.cookie.split("; ");
for (i in keksit) {
  pari = keksit[i].split("=");
  pari[1]=unescape(pari[1]);
  if (pari[1]=="undefined") pari[1]="";
  if (pari[0] == "s_vuosi") s_vuosi=pari[1];
  else if(pari[0] == "s_kuukausi") s_kuukausi=pari[1];
  else if(pari[0] == "s_paiva") s_paiva=pari[1];
  else if(pari[0] == "nimi") nimi=pari[1];
  else if(pari[0] == "laskuri") laskuri=pari[1];
  else if(pari[0] == "visiitti") visiitti=pari[1];
  }

ekakerta = (visiitti=="")

//päivitetään käyntilaskuri
vd=new Date(visiitti);
if ((vd.getDate()!=paiva) || (vd.getMonth()!=kuukausi)) {
  laskuri++;
  keksi_aseta("laskuri", laskuri);
  }
keksi_aseta("visiitti", nyt.toGMTString());