﻿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, Mścisława, Juliusza",
      "Marceliny, Marianny, Juliana",
      "Wilhelma, Dobroslawa, Danuty",
      "Honoraty, Teodozjusza, Matyldy",
      "Grety, Arkadiusza, Rajmunda",
      "Bogumily, Weroniki, Hilarego",
      "Feliksa, Domoslawa, Niny",
      "Pawla, Arnolda, Izydora",
      "Marcelego, Wlodzimierza, Waldemara",
      "Antoniego, Rościsława, 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, Józefa",
      "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, Radosława, Dawida",
      "Heleny, Halszki, Pawła",
      "Maryny, Kunegundy, Tycjana",
      "Lucji, Kazimierza, Eugeniusza",
      "Adriana, Fryderyka, Teofila",
      "Róży, Jordana, Agnieszki",
      "Tomasza, Perpetuy, Felicyty",
      "Beaty, Wincentego, Jana",
      "Franciszki, Brunona",
      "Cypriana, Marcela, Aleksandra",
      "Ludoslawa, Konstantyna, Benedykta",
      "Grzegorza, Justyna, Alojzego",
      "Bozeny, 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, Bogusława",
      "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, Grażyny, Ireny",
      "Władyslawa, 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",
      "Przemyslawa, 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(
      "Józefa, Jeremiasza, Filipa",
      "Zygmunta, Atanazego, Anatola",
      "Marii, Antoniny",
      "Moniki, Floriana, Wladyslawa",
      "Ireny, Waldemara",
      "Judyty, Jakuba, Filipa",
      "Gizeli, Ludmily, Benedykta",
      "Stanislawa, Lizy, Wiktora",
      "Bozydara, 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",
      "Czeslawa, 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",
      "Slawy, 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",
      "Marii, Napoleona, Stefana",
      "Rocha, Stefana, Joachima",
      "Zanny, Mirona, Jacka",
      "Ilony, Bronislawa, Heleny",
      "Boleslawa, Juliana",
      "Bernarda, Samuela, Sobieslawa",
      "Joanny, Kazimiery, Piusa",
      "Cezarego, Tymoteusza",
      "Apolinarego, Filipa",
      "Jerzego, Bartosza, Haliny",
      "Luizy, Ludwika, Józefa",
      "Marii, Aleksandra",
      "Cezarego, Józefa, Moniki",
      "Patrycji, Wyszomira, Augustyna",
      "Beaty, Jana, Sabiny, Racibora",
      "Rózy, Szczesnego, Feliksa",
      "Bogdana, Ramony, Rajmunda"
   ),

   new Array(
      "Idziego, Bronislawa",
      "Juliana, Stefana, Wilhelma",
      "Grzegorza, Izabeli, Szymona",
      "Idy, Julianny, Rozalii, Rózy",
      "Doroty, Teodora, Wawrzynca",
      "Beaty, Eugeniusza",
      "Domoslawy, Melchiora, Reginy",
      "Marii, Adrianny, Serafiny",
      "?cibora, Sergiusza, Piotra",
      "Lukasza, Aldony, M?cislawa",
      "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",
      "Rafala, 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, Rafala",
      "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, Zdzisławy, Alicji",
      "Olimpii, Lazarza, Floriana",
      "Gracjana, Boguslawa, Laurencji",
      "Gabrieli, Dariusza, Eleonory",
      "Bogumily, Dominika",
      "Tomislawa, Seweryna, Piotra",
      "Zenona, Honoraty, Franciszki",
      "Wiktorii, Sławomiry, 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=="nca") { 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("Dzisiaj są Imieniny : <b>","</b>",", "," i ",0);
//-->