DayName = new Array(7)
DayName[0] = "Niedziela "
DayName[1] = "Poniedzialek "
DayName[2] = "Wtorek "
DayName[3] = "Sroda "
DayName[4] = "Czwartek "
DayName[5] = "Piatek "
DayName[6] = "Sobota "

MonthName = new Array(12)
MonthName[0] = "stycznia "
MonthName[1] = "lutego "
MonthName[2] = "marca "
MonthName[3] = "kwietnia "
MonthName[4] = "maja "
MonthName[5] = "czerwca "
MonthName[6] = "lipca "
MonthName[7] = "sierpnia "
MonthName[8] = "wrzesnia "
MonthName[9] = "pazdziernika "
MonthName[10] = "listopada "
MonthName[11] = "grudnia "

function getDateStr(){
    var Today = new Date()
    var WeekDay = Today.getDay()
    var Month = Today.getMonth()
    var Day = Today.getDate()
    var Year = Today.getFullYear()

    if(Year <= 99)
        Year += 1900

    return DayName[WeekDay] + "," + " " + Day + " " + MonthName[Month] + "  " + Year
}
document.write(getDateStr())
var ImieninyArray=new Array(
 new Array(
  "Mieszka, Mieczyslawa, Marii",
  "Izydora, Bazylego, Grzegorza",
  "Arlety, Genowefy, Danuty",
  "Tytusa, Anieli, Eugeniusza",
  "Hanny, Szymona, Edwarda",
  "Kacpra, Melchiora, Baltazara",
  "Juliana, Lucjana, Rajmunda",
  "Seweryna, Mscislawa, Juliusza",
  "Marceliny, Marianny, Juliana",
  "Wilhelma, Dobroslawa, Danuty",
  "Honoraty, Teodozjusza, Matyldy",
  "Grety, Arkadiusza, Rajmunda",
  "Bogumily, Weroniki, Hilarego",
  "Feliksa, Domoslawa, Niny",
  "Pawla, Arnolda, Izydora",
  "Marcelego, Włodzimierza, Waldemara",
  "Antoniego, Roscislawa, Jana",
  "Piotra, Malgorzaty",
  "Henryka, Mariusza, Marty",
  "Fabiana, Sebastiana",
  "Agnieszki, Jaroslawa",
  "Anastazego, Wincentego",
  "Ildefonsa, Rajmunda",
  "Felicji, Franciszka, Rafala",
  "Pawla, Milosza, Elwiry",
  "Tymoteusza, Michala, Tytusa",
  "Przybyslawa, Anieli, Jerzego",
  "Walerego, Radomira, Tomasza",
  "Zdzislawa, Franciszka, Jozefa",
  "Macieja, Martyny, Teofila",
  "Marceli, Ludwiki, Jana"
 ),

 new Array(
  "Brygidy, Ignacego, Seweryna",
  "Marii, Miloslawa",
  "Blazeja, Oskara",
  "Andrzeja, Weroniki, Joanny",
  "Agaty, Adelajdy",
  "Doroty, Bogdana, Pawla",
  "Ryszarda, Teodora, Romana",
  "Hieronima, Sebastiana, Ireny",
  "Apolonii, Eryki, Cyryla",
  "Elwiry, Jacka, Scholastyki",
  "Lucjana, Olgierda",
  "Eulalii, Radoslawa, Modesta",
  "Grzegorza, Katarzyny",
  "Cyryla, Metodego, Walentego",
  "Jowity, Faustyna, Zygfryda",
  "Danuty, Julianny, Daniela",
  "Aleksego, Zbigniewa, Lukasza",
  "Szymona, Konstancji, Flawiana",
  "Arnolda, Konrada, Marcelego",
  "Leona, Ludomira, Zenobiusza",
  "Eleonory, Fortunata, Roberta",
  "Marty, Malgorzaty, Piotra",
  "Romany, Damiana, Polikarpa",
  "Macieja, Bogusza, Sergiusza",
  "Wiktora, Cezarego",
  "Miroslawa, Aleksandra",
  "Gabriela, Anastazji",
  "Romana, Ludomira, Lecha",
  "Lecha, Lutoslawa"
 ),

 new Array(
  "Antoniny, Radoslawa, Dawida",
  "Heleny, Halszki, Pawla",
  "Maryny, Kunegundy, Tycjana",
  "Lucji, Kazimierza, Eugeniusza",
  "Adriana, Fryderyka, Teofila",
  "Rozy, Jordana, Agnieszki",
  "Tomasza, Perpetuy, Felicyty",
  "Beaty, Wincentego, Jana",
  "Franciszki, Brunona",
  "Cypriana, Marcela, Aleksandra",
  "Ludoslawa, Konstantyna, Benedykta",
  "Grzegorza, Justyna, Alojzego",
  "Bożeny, Krystyny",
  "Leona, Matyldy, Lazarza",
  "Longina, Klemensa, Ludwiki",
  "Izabeli, Oktawii, Hilarego",
  "Patryka, Zbigniewa, Gertrudy",
  "Cyryla, Edwarda, Boguchwaly",
  "Józefa, Bogdana",
  "Klaudii, Eufemii, Maurycego",
  "Lubomira, Benedykta",
  "Katarzyny, Boguslawa",
  "Pelagii, Oktawiana, Feliksa",
  "Marka, Gabriela, Katarzyny",
  "Marioli, Wieczyslawa, Ireneusza",
  "Larysy, Emanyela, Teodora",
  "Lidii, Ernesta",
  "Anieli, Sykstusa, Jana",
  "Wiktoryna, Helmuta, Eustachego",
  "Anieli, Kwiryna, Leonarda",
  "Beniamina, Dobromierza, Leonarda"
 ),

 new Array(
  "Teodory, Grazyny, Ireny",
  "Wladyslawa, Franciszka, Teodozji",
  "Ryszarda, Pankracego, Ingi",
  "Izydora, Waclawa",
  "Ireny, Wincentego",
  "Izoldy, Celestyna, Wilhelma",
  "Rufina, Celestyna, Jana",
  "Cezaryny, Dionizego, Julii",
  "Marii, Dymitra, Heliodora",
  "Michala, Makarego",
  "Filipa, Leona",
  "Juliusza, Luboslawa, Zenona",
  "Przemysława, Hermenegildy, Marcina",
  "Bereniki, Waleriana, Justyny",
  "Ludwiny, Waclawy, Anastazji",
  "Kseni, Cecylii, Bernardety",
  "Rudolfa, Roberta",
  "Boguslawy, Apoloniusza",
  "Adolfa, Tymona, Leona",
  "Czeslawa, Agnieszki, Mariana",
  "Anzelma, Bartosza, Feliksa",
  "Kai, Leonii, Sotera",
  "Jerzego, Wojciecha",
  "Horacego, Feliksa, Grzegorza",
  "Marka, Jaroslawa, Wasyla",
  "Marzeny, Klaudiusza, Marii",
  "Zyty, Teofila, Felicji",
  "Piotra, Walerii, Witalisa",
  "Rity, Katarzyny, Boguslawa",
  "Mariana, Donaty, Tamary"
 ),

 new Array(
  "Jozefa, Jeremiasza, Filipa",
  "Zygmunta, Atanazego, Anatola",
  "Marii, Antoniny",
  "Moniki, Floriana, Wladysława",
  "Ireny, Waldemara",
  "Judyty, Jakuba, Filipa",
  "Gizeli, Ludmily, Benedykta",
  "Stanislawa, Lizy, Wiktora",
  "Bożydara, Grzegorza, Karoliny",
  "Izydora, Antoniny, Symeona",
  "Igi, Miry, Wladyslawy",
  "Pankracego, Dominika, Achillesa",
  "Serwacego, Roberta, Glorii",
  "Bonifacego, Dobieslawa, Macieja",
  "Zofii, Nadziei, Izydora",
  "Andrzeja, Jedrzeja, Szymona",
  "Paschalisa, Slawomira, Weroniki",
  "Eryka, Feliksa, Jana",
  "Iwa, Piotra, Celestyna",
  "Bazylego, Bernardyna, Aleksandra",
  "Wiktora, Kryspina, Tymoteusza",
  "Heleny, Wieslawy, Ryty",
  "Iwony, Dezyderego, Kryspina",
  "Joanny, Zuzanny",
  "Grzegorza, Urbana, Magdaleny",
  "Filipa, Pauliny",
  "Augustyna, Juliana, Magdaleny",
  "Jaromira, Justa, Justyny",
  "Magdaleny, Bogumily, Urszuli",
  "Ferdynanda, Karola, Jana",
  "Anieli, Petroneli"
 ),

 new Array(
  "Justyna, Anieli, Konrada",
  "Marianny, Marcelina, Piotra",
  "Leszka, Tamary, Karola",
  "Kwiryny, Franciszka",
  "Waltera, Bonifacego, Walerii",
  "Norberta, Laurentego, Bogumila",
  "Roberta, Wieslawa",
  "Medarda, Maksyma, Seweryna",
  "Pelagii, Dominika, Efrema",
  "Bogumila, Malgorzaty, Diany",
  "Barnaby, Radomila, Feliksa",
  "Janiny, Onufrego, Leona",
  "Lucjana, Antoniego",
  "Bazylego, Elwiry, Michala",
  "Wita, Jolanty",
  "Aliny, Benona, Anety",
  "Laury, Marcjana, Alberta",
  "Marka, Elzbiety",
  "Gerwazego, Protazego",
  "Diny, Bogny, Florentyny",
  "Alicji, Alojzego",
  "Pauliny, Tomasza, Jana",
  "Wandy, Zenona",
  "Jana, Danuty",
  "Lucji, Wilhelma, Doroty",
  "Jana, Pawla",
  "Maryli, Wladyslawa, Cyryla",
  "Leona, Ireneusza",
  "Piotra, Pawla",
  "Emilii, Lucyny"
 ),

 new Array(
  "Haliny, Mariana, Marcina",
  "Jagody, Urbana, Marii",
  "Jacka, Anatola, Tomasza",
  "Odona, Malwiny, Elzbiety",
  "Marii, Antoniego",
  "Gotarda, Dominiki, Lucji",
  "Cyryla, Estery, Metodego",
  "Edgara, Elzbiety, Eugeniusza",
  "Lukrecji, Weroniki, Zenona",
  "Sylwany, Witalisa, Antoniego",
  "Olgi, Kaliny, Benedykta",
  "Jana, Brunona, Bonifacego",
  "Henryka, Kingi, Andrzeja",
  "Ulryka, Bonawentury, Kamila",
  "Henryka, Wlodzimierza, Dawida",
  "Mariki, Benity, Eustachego",
  "Anety, Bogdana, Jadwigi",
  "Erwina, Kamila, Szymona",
  "Wincentego, Wodzislawa, Marcina",
  "Czesława, Hieronima, Malgorzaty",
  "Daniela, Dalidy, Wawrzynca",
  "Marii, Magdaleny",
  "Stwosza, Bogny, Brygidy",
  "Kingi, Krystyny",
  "Walentyny, Krzysztofa, Jakuba",
  "Anny, Miroslawy, Grazyny",
  "Lilii, Julii, Natalii",
  "Aidy, Marceli, Wiktora",
  "Olafa, Marty, Ludmily",
  "Julity, Piotra, Aldony",
  "Ignacego, Lubomira, Heleny"
 ),

 new Array(
  "Nadii, Justyna, Juliana",
  "Kariny, Gustawa, Euzebiusza",
  "Lidii, Augusta, Nikodema",
  "Dominika, Protazego, Jana",
  "Oswalda, Marii, Mariana",
  "Sławy, Jakuba, Oktawiana",
  "Kajetana, Doroty, Sykstusa",
  "Cypriana, Emiliana, Dominika",
  "Romana, Ryszarda, Edyty",
  "Borysa, Filomeny, Wawrzynca",
  "Klary, Zuzanny, Lecha",
  "Innocentego, Lecha, Euzebii",
  "Diany, Hipolita, Poncjana",
  "Alfreda, Euzebiusza, Maksymiliana",
  "Napoleona, Stelii",
  "Rocha, Stefana, Joachima",
  "Zanny, Mirona, Jacka",
  "Ilony, Bronislawa, Heleny",
  "Bolesława, Juliana",
  "Bernarda, Samuela, Sobieslawa",
  "Joanny, Kazimiery, Piusa",
  "Cezarego, Tymoteusza",
  "Apolinarego, Filipa",
  "Jerzego, Bartosza, Haliny",
  "Luizy, Ludwika, Jozefa",
  "Marii, Aleksandra",
  "Cezarego, Jozefa, Moniki",
  "Patrycji, Wyszomira, Augustyna",
  "Beaty, Jana, Sabiny, Racibora",
  "Rozy, Szczesnego, Feliksa",
  "Bogdana, Ramony, Rajmunda"
 ),

 new Array(
  "Idziego, Bronislawa",
  "Juliana, Stefana, Wilhelma",
  "Grzegorza, Izabeli, Szymona",
  "Idy, Julianny, Rozalii, Rozy",
  "Doroty, Teodora, Wawrzynca",
  "Beaty, Eugeniusza",
  "Domoslawy, Melchiora, Reginy",
  "Marii, Adrianny, Serafiny",
  "Scibora, Sergiusza, Piotra",
  "Lukasza, Aldony, Mscislawa",
  "Jacka, Prota, Dagny, Hiacynta",
  "Gwidona, Radzimira, Marii",
  "Eugenii, Aureliusza, Jana",
  "Roksany, Bernarda, Cypriana",
  "Albina, Nikodema, Marii",
  "Edyty, Korneliusza, Cypriana",
  "Franciszka, Roberta, Justyna",
  "Irmy, Stanislawa, Ireny",
  "Januarego, Konstancji, Teodora",
  "Filipiny, Eustachego, Euzebii",
  "Jonasza, Mateusza, Hipolita",
  "Tomasza, Maurycego, Joachima",
  "Tekli, Boguslawa, Linusa",
  "Gerarda, Ruperta, Tomiry",
  "Aurelii, Wladyslawa, Kleofasa",
  "Wawrzynca, Kosmy, Damiana",
  "Wincentego, Mirabeli, Justyny",
  "Waclawa, Tymona, Marka",
  "Michala, Gabriela, Rafala",
  "Wery, Honoriusza, Hieronima"
 ),

 new Array(
  "Danuty, Remigiusza, Teresy",
  "Teofila, Dionizego, Slawomira",
  "Teresy, Heliodora, Jana",
  "Rozalii, Edwina, Franciszka",
  "Placyda, Apolinarego",
  "Artura, Brunona",
  "Marii, Marka, Mirelli",
  "Pelagii, Brygidy, Walerii",
  "Amolda, Dionizego, Wincentego",
  "Pauliny, Danieli, Leona",
  "Aldony, Aleksandra, Dobromiry",
  "Eustachego, Maksymiliana, Edwina",
  "Geralda, Edwarda, Honorata",
  "Liwii, Kaliksta, Bernarda",
  "Jadwigi, Teresy, Florentyny",
  "Gawla, Ambrozego",
  "Wiktora, Marity, Ignacego",
  "Juliana, Lukasza",
  "Ziemowita, Jana, Pawla",
  "Ireny, Kleopatry, Jana",
  "Urszuli, Hilarego, Jakuba",
  "Halki, Filipa, Salomei",
  "Marleny, Seweryna, Igi",
  "Rafała, Marcina, Antoniego",
  "Darii, Wilhelminy, Bonifacego",
  "Lucjana, Ewarysta, Damiana",
  "Iwony, Sabiny",
  "Szymona, Tadeusza",
  "Euzebii, Wioletty, Felicjana",
  "Zenobii, Przemyslawa, Edmunda",
  "Urbana, Saturnina, Krzysztofa"
 ),

 new Array(
  "WSZYSTKICH SWIETYCH",
  "Bohdany, Bozydara",
  "Sylwii, Marcina, Huberta",
  "Karola, Olgierda",
  "Elzbiety, Slawomira, Dominika",
  "Feliksa, Leonarda, Ziemowita",
  "Antoniego, Zytomira, Ernesta",
  "Seweryna, Bogdana, Klaudiusza",
  "Aleksandra, Ludwika, Teodora",
  "Leny, Ludomira, Leona",
  "Marcina, Batlomieja, Teodora",
  "Renaty, Witolda, Jozafata",
  "Mateusza, Izaaka, Stanislawa",
  "Rogera, Serafina, Wawrzynca",
  "Alberta, Leopolda",
  "Gertrudy, Edmunda, Marii",
  "Salomei, Grzegorza, Elzbiety",
  "Romana, Klaudyny, Karoliny",
  "Seweryny, Maksyma, Salomei",
  "Anatola, Sedzimira, Rafała",
  "Alberta, Janusza, Konrada",
  "Cecylii, Wszemily, Stefana",
  "Adelii, Klemensa, Felicyty",
  "Flory, Emmy, Chryzogona",
  "Erazma, Katarzyny",
  "Delfiny, Sylwestra, Konrada",
  "Waleriana, Wirgiliusza, Maksyma",
  "Leslawa, Zdzislawa, Stefana",
  "Blazeja, Saturnina",
  "Andrzeja, Maury, Konstantego"
 ),

 new Array(
  "Natalii, Eligiusza, Edmunda",
  "Balbiny, Bibianny, Pauliny",
  "Franciszka, Ksawerego, Kasjana",
  "Barbary, Krystiana, Jana",
  "Sabiny, Krystyny, Edyty",
  "Mikolaja, Jaremy, Emiliana",
  "Marcina, Ambrozego, Teodora",
  "Marii, Swiatozara, Makarego",
  "Wieslawa Leokadii Joanny",
  "Julii, Danieli, Bogdana",
  "Damazego, Waldemara, Daniela",
  "Dagmary, Aleksandra, Ady",
  "Lucji, Otylii",
  "Alfreda, Izydora, Jana",
  "Niny, Celiny, Waleriana",
  "Albiny, Zdzislawy, Alicji",
  "Olimpii, Lazarza, Floriana",
  "Gracjana, Boguslawa, Laurencji",
  "Gabrieli, Dariusza, Eleonory",
  "Bogumily, Dominika",
  "Tomislawa, Seweryna, Piotra",
  "Zenona, Honoraty, Franciszki",
  "Wiktorii, Slawomiry, Jana",
  "Adama, Ewy, Eweliny",
  "Anastazji, Eugenii",
  "Dionizego, Szczepana",
  "Jana, Zanety, Maksyma",
  "Teofilii, Godzislawa, Cezarego",
  "Dawida, Tomasza, Dominika",
  "Rainera, Eugeniusza, Irmy",
  "Sylwestra, Melanii, Mariusza"
 )
);

function PobierzImieniny(Sep, lastSep, method) {
 switch (arguments.length) {
  case 0: Sep=null;
  case 1: lastSep=null;
  case 2: method=0;
 }
 if (Sep==null) Sep=", "; if (lastSep==null) lastSep=Sep;

 var date=new Date();
 var tab=ImieninyArray[date.getMonth()][date.getDate()-1].split(", ");

 if (method==1)
  for (var i=0, ch, name, len, last; i<tab.length; i++) {
   ch=(last=(name=tab[i]).substring((len=name.length)-3)).charAt(2);

   if (last=="ego") { tab[i]=name.substring(0,len-3)+"y";    continue; }
   if (last=="ńca") { tab[i]=name.substring(0,len-3)+"niec"; continue; }
   if (last=="tra") { tab[i]=name.substring(0,len-3)+"ter";  continue; }

   tab[i]=name.substring(0,len-1)+(ch=='a'?"":'a');
  }

 var str=tab[0];
 for (var i=1; i<tab.length-1; i++) str+=Sep+tab[i];
 if (tab.length!=1) str+=lastSep+tab[tab.length-1];

 return str;
}

function WypiszImieniny(before, after, Sep, lastSep, method) {
 switch (arguments.length) {
  case 0: before="";
  case 1: after="";
  case 2: Sep=null;
  case 3: lastSep=null;
  case 3: method=0;
 }
 document.write(""+before+PobierzImieniny(Sep,lastSep,method)+after);
}


<!--
WypiszImieniny(",  Imieniny: ","",", "," i ",0);
//-->

