Skrypt wypisuje czyje są dzisiaj imieniny. Ponieważ tablica z imionami jest dość duża (ok. 10KB) nie zaleca się wstawiania jej bezpośrednio do pliku HTML. Lepiej jest wstawic poniższy kod do tagu HEAD:
<script language="javascript" type="text/javascript" src="sciezka"></script>
Gdzie sciezka jest ścieżką dostępu do pliku imieniny.js, który możesz ściągnąć stąd.
Teraz w miejscu, gdzie mają być wypisane imieniny, wstawiamy kod:
<script language="javascript" type="text/javascript"><!-- WypiszImieniny("Dzisiaj są imieniny: <b>","</b>",", "," i ",0); //--></script>
Gdzie:
Aby użyć parametrów domyślnych można wpisać null. Jeżeli chcemy wartość niestadnardową przypisać jedynie pierwszemu parametrowi, możemy go wpisać, a pozostałe pominąć. Jeżeli chcemy ustawić pierwszy i trzeci, możemy pominąć czwarty, a jako drugi wpuisać null. Oto kilka przykładów:
A oto kod pliku imieniny.js:
// Copyright (c) June 2002 by Michał Nazarewicz (mina86@tlen.pl) // This software is free; It's distributed under terms of GNU Lesser General Public License var ImieninyArray=new Array( new Array( "Mieszka, Mieczysława, 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, Dobrosława, Danuty", "Honoraty, Teodozjusza, Matyldy", "Grety, Arkadiusza, Rajmunda", "Bogumiły, Weroniki, Hilarego", "Feliksa, Domosława, Niny", "Pawła, Arnolda, Izydora", "Marcelego, Włodzimierza, Waldemara", "Antoniego, Rościsława, Jana", "Piotra, Małgorzaty", "Henryka, Mariusza, Marty", "Fabiana, Sebastiana", "Agnieszki, Jarosława", "Anastazego, Wincentego", "Ildefonsa, Rajmunda", "Felicji, Franciszka, Rafała", "Pawła, Miłosza, Elwiry", "Tymoteusza, Michała, Tytusa", "Przybysława, Anieli, Jerzego", "Walerego, Radomira, Tomasza", "Zdzisława, Franciszka, Józefa", "Macieja, Martyny, Teofila", "Marceli, Ludwiki, Jana" ), new Array( "Brygidy, Ignacego, Seweryna", "Marii, Miłosława", "Błażeja, Oskara", "Andrzeja, Weroniki, Joanny", "Agaty, Adelajdy", "Doroty, Bogdana, Pawła", "Ryszarda, Teodora, Romana", "Hieronima, Sebastiana, Ireny", "Apolonii, Eryki, Cyryla", "Elwiry, Jacka, Scholastyki", "Lucjana, Olgierda", "Eulalii, Radosława, 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, Małgorzaty, Piotra", "Romany, Damiana, Polikarpa", "Macieja, Bogusza, Sergiusza", "Wiktora, Cezarego", "Mirosława, Aleksandra", "Gabriela, Anastazji", "Romana, Ludomira, Lecha", "Lecha, Lutosława" ), 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", "Ludosława, Konstantyna, Benedykta", "Grzegorza, Justyna, Alojzego", "Bożeny, Krystyny", "Leona, Matyldy, Łazarza", "Longina, Klemensa, Ludwiki", "Izabeli, Oktawii, Hilarego", "Patryka, Zbigniewa, Gertrudy", "Cyryla, Edwarda, Boguchwały", "Józefa, Bogdana", "Klaudii, Eufemii, Maurycego", "Lubomira, Benedykta", "Katarzyny, Bogusława", "Pelagii, Oktawiana, Feliksa", "Marka, Gabriela, Katarzyny", "Marioli, Wieczysława, 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ładysława, Franciszka, Teodozji", "Ryszarda, Pankracego, Ingi", "Izydora, Wacława", "Ireny, Wincentego", "Izoldy, Celestyna, Wilhelma", "Rufina, Celestyna, Jana", "Cezaryny, Dionizego, Julii", "Marii, Dymitra, Heliodora", "Michała, Makarego", "Filipa, Leona", "Juliusza, Lubosława, Zenona", "Przemysława, Hermenegildy, Marcina", "Bereniki, Waleriana, Justyny", "Ludwiny, Wacławy, Anastazji", "Kseni, Cecylii, Bernardety", "Rudolfa, Roberta", "Bogusławy, Apoloniusza", "Adolfa, Tymona, Leona", "Czesława, Agnieszki, Mariana", "Anzelma, Bartosza, Feliksa", "Kai, Leonii, Sotera", "Jerzego, Wojciecha", "Horacego, Feliksa, Grzegorza", "Marka, Jarosława, Wasyla", "Marzeny, Klaudiusza, Marii", "Zyty, Teofila, Felicji", "Piotra, Walerii, Witalisa", "Rity, Katarzyny, Bogusława", "Mariana, Donaty, Tamary" ), new Array( "Józefa, Jeremiasza, Filipa", "Zygmunta, Atanazego, Anatola", "Marii, Antoniny", "Moniki, Floriana, Władysława", "Ireny, Waldemara", "Judyty, Jakuba, Filipa", "Gizeli, Ludmiły, Benedykta", "Stanisława, Lizy, Wiktora", "Bożydara, Grzegorza, Karoliny", "Izydora, Antoniny, Symeona", "Igi, Miry, Władysławy", "Pankracego, Dominika, Achillesa", "Serwacego, Roberta, Glorii", "Bonifacego, Dobiesława, Macieja", "Zofii, Nadziei, Izydora", "Andrzeja, Jedrzeja, Szymona", "Paschalisa, Sławomira, Weroniki", "Eryka, Feliksa, Jana", "Iwa, Piotra, Celestyna", "Bazylego, Bernardyna, Aleksandra", "Wiktora, Kryspina, Tymoteusza", "Heleny, Wiesławy, Ryty", "Iwony, Dezyderego, Kryspina", "Joanny, Zuzanny", "Grzegorza, Urbana, Magdaleny", "Filipa, Pauliny", "Augustyna, Juliana, Magdaleny", "Jaromira, Justa, Justyny", "Magdaleny, Bogumiły, Urszuli", "Ferdynanda, Karola, Jana", "Anieli, Petroneli" ), new Array( "Justyna, Anieli, Konrada", "Marianny, Marcelina, Piotra", "Leszka, Tamary, Karola", "Kwiryny, Franciszka", "Waltera, Bonifacego, Walerii", "Norberta, Laurentego, Bogumiła", "Roberta, Wiesława", "Medarda, Maksyma, Seweryna", "Pelagii, Dominika, Efrema", "Bogumiła, Małgorzaty, Diany", "Barnaby, Radomiła, Feliksa", "Janiny, Onufrego, Leona", "Lucjana, Antoniego", "Bazylego, Elwiry, Michała", "Wita, Jolanty", "Aliny, Benona, Anety", "Laury, Marcjana, Alberta", "Marka, Elżbiety", "Gerwazego, Protazego", "Diny, Bogny, Florentyny", "Alicji, Alojzego", "Pauliny, Tomasza, Jana", "Wandy, Zenona", "Jana, Danuty", "Lucji, Wilhelma, Doroty", "Jana, Pawła", "Maryli, Władysława, Cyryla", "Leona, Ireneusza", "Piotra, Pawła", "Emilii, Lucyny" ), new Array( "Haliny, Mariana, Marcina", "Jagody, Urbana, Marii", "Jacka, Anatola, Tomasza", "Odona, Malwiny, Elżbiety", "Marii, Antoniego", "Gotarda, Dominiki, Lucji", "Cyryla, Estery, Metodego", "Edgara, Elżbiety, Eugeniusza", "Lukrecji, Weroniki, Zenona", "Sylwany, Witalisa, Antoniego", "Olgi, Kaliny, Benedykta", "Jana, Brunona, Bonifacego", "Henryka, Kingi, Andrzeja", "Ulryka, Bonawentury, Kamila", "Henryka, Włodzimierza, Dawida", "Mariki, Benity, Eustachego", "Anety, Bogdana, Jadwigi", "Erwina, Kamila, Szymona", "Wincentego, Wodzisława, Marcina", "Czesława, Hieronima, Małgorzaty", "Daniela, Dalidy, Wawrzyńca", "Marii, Magdaleny", "Stwosza, Bogny, Brygidy", "Kingi, Krystyny", "Walentyny, Krzysztofa, Jakuba", "Anny, Mirosławy, Grażyny", "Lilii, Julii, Natalii", "Aidy, Marceli, Wiktora", "Olafa, Marty, Ludmiły", "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, Wawrzyńca", "Klary, Zuzanny, Lecha", "Innocentego, Lecha, Euzebii", "Diany, Hipolita, Poncjana", "Alfreda, Euzebiusza, Maksymiliana", "Napoleona, Stelii", "Rocha, Stefana, Joachima", "Żanny, Mirona, Jacka", "Ilony, Bronisława, Heleny", "Bolesława, Juliana", "Bernarda, Samuela, Sobiesława", "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óży, Szczęsnego, Feliksa", "Bogdana, Ramony, Rajmunda" ), new Array( "Idziego, Bronisława", "Juliana, Stefana, Wilhelma", "Grzegorza, Izabeli, Szymona", "Idy, Julianny, Rozalii, Róży", "Doroty, Teodora, Wawrzyńca", "Beaty, Eugeniusza", "Domosławy, Melchiora, Reginy", "Marii, Adrianny, Serafiny", "Ścibora, Sergiusza, Piotra", "Lukasza, Aldony, Mścisława", "Jacka, Prota, Dagny, Hiacynta", "Gwidona, Radzimira, Marii", "Eugenii, Aureliusza, Jana", "Roksany, Bernarda, Cypriana", "Albina, Nikodema, Marii", "Edyty, Korneliusza, Cypriana", "Franciszka, Roberta, Justyna", "Irmy, Stanisława, Ireny", "Januarego, Konstancji, Teodora", "Filipiny, Eustachego, Euzebii", "Jonasza, Mateusza, Hipolita", "Tomasza, Maurycego, Joachima", "Tekli, Bogusława, Linusa", "Gerarda, Ruperta, Tomiry", "Aurelii, Władysława, Kleofasa", "Wawrzyńca, Kosmy, Damiana", "Wincentego, Mirabeli, Justyny", "Wacława, Tymona, Marka", "Michała, Gabriela, Rafała", "Wery, Honoriusza, Hieronima" ), new Array( "Danuty, Remigiusza, Teresy", "Teofila, Dionizego, Sławomira", "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", "Gawła, Ambrożego", "Wiktora, Marity, Ignacego", "Juliana, Łukasza", "Ziemowita, Jana, Pawła", "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, Przemysława, Edmunda", "Urbana, Saturnina, Krzysztofa" ), new Array( "WSZYSTKICH ŚWIĘTYCH", "Bohdany, Bożydara", "Sylwii, Marcina, Huberta", "Karola, Olgierda", "Elżbiety, Sławomira, Dominika", "Feliksa, Leonarda, Ziemowita", "Antoniego, Żytomira, Ernesta", "Seweryna, Bogdana, Klaudiusza", "Aleksandra, Ludwika, Teodora", "Leny, Ludomira, Leona", "Marcina, Batłomieja, Teodora", "Renaty, Witolda, Jozafata", "Mateusza, Izaaka, Stanisława", "Rogera, Serafina, Wawrzyńca", "Alberta, Leopolda", "Gertrudy, Edmunda, Marii", "Salomei, Grzegorza, Elżbiety", "Romana, Klaudyny, Karoliny", "Seweryny, Maksyma, Salomei", "Anatola, Sedzimira, Rafała", "Alberta, Janusza, Konrada", "Cecylii, Wszemiły, Stefana", "Adelii, Klemensa, Felicyty", "Flory, Emmy, Chryzogona", "Erazma, Katarzyny", "Delfiny, Sylwestra, Konrada", "Waleriana, Wirgiliusza, Maksyma", "Lesława, Zdzisława, Stefana", "Błażeja, Saturnina", "Andrzeja, Maury, Konstantego" ), new Array( "Natalii, Eligiusza, Edmunda", "Balbiny, Bibianny, Pauliny", "Franciszka, Ksawerego, Kasjana", "Barbary, Krystiana, Jana", "Sabiny, Krystyny, Edyty", "Mikołaja, Jaremy, Emiliana", "Marcina, Ambrożego, Teodora", "Marii, Światozara, Makarego", "Wiesława 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, Bogusława, Laurencji", "Gabrieli, Dariusza, Eleonory", "Bogumiły, Dominika", "Tomisława, Seweryna, Piotra", "Zenona, Honoraty, Franciszki", "Wiktorii, Sławomiry, Jana", "Adama, Ewy, Eweliny", "Anastazji, Eugenii", "Dionizego, Szczepana", "Jana, Żanety, Maksyma", "Teofilii, Godzisława, 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); }