x-ƒ (x_f)

Vārdadienas (x-f's edition) 

otrdien, 3.08.2004 @1:42 pm | x-ƒ

[info]kaitnieks vakar publicēja savu S2 kodu, kā viņš izvada katras dienas vārdadienas. Šodien to daru es. :) Neviens kods nav ne labāks, ne sliktāks, tie abi darbojas pareizi. Vienkārši – savādāka pieeja. Un daru es to tāpēc, ka vēlos, lai tiem, kurus interesē S2, būtu vairāk reālu piemēru, ko ar S2 vispār iespējams izdarīt. Lūk, kā. :)

Manā žūrnālā pagaidām vārdadienas nekur netiek izvadītas, jo vēl neesmu izdomājis īsti, kur varētu, taču nodemonstrējums atrodams Saitemanā testu lapā.

## demo šajā lapā - http://journal.bad.lv/users/x-f/?.lapa=testiem
## iespējams ko līdzīgu izdarīt ar cibiņu dzimšanas dienām, bet tad tās,
## protams, jāraksta ar roku. bet būtu noderīgāk.
# $datums = $.time.day$.time.month - piemēram, 0806 - 8. jūnijs

function print_vardadiena(string datums) "Šodien vārdadienu svin.." {

############ Vārdadienas ##################
  var string{} vardadienas;
  $vardadienas = {
	"0101" => "Solvita, Laimnesis, Solvija",	"0102" => "Brigita, Indra, Indars, Indris",
	"0103" => "Ivars, Ilgvars",			"0104" => "Dagnis, Dagne",
	"0105" => "Ziedonis",				"0106" => "Biruta, Mairita, Bernedīna",
	"0107" => "Imants, Rimants, Ingars, Intars",	"0108" => "Albīns, Albīna",
	"0109" => "Ilmārs, Iluta, Austrums",		"0110" => "Zanda, Zandis, Lāsma",
	"0111" => "Ikars",				"0112" => "Arnolds, Emanuels",
	"0201" => "Indulis, Ivo, Iva, Ivis",		"0202" => "Spīdola, Sonora",
	"0203" => "Lavīze, Luīze, Laila",		"0204" => "Imgarde",
	"0205" => "Zigmunds, Sigmunds, Zigismunds",	"0206" => "Emma, Lība",
	"0207" => "Lauma, Ilvars, Halina",		"0208" => "Normunds, Stefans",
	"0209" => "Elīza, Lizete, Zete",		"0210" => "Ilma, Skaidris",
	"0211" => "Vivita, Viva, Dzīle",		"0212" => "Meta, Sniedze",
	"0301" => "Ringolds, Miervaldis, Miervalda",	"0302" => "Aīda, Vida, Ida",
	"0303" => "Marts, Tālis, Tālavs",		"0304" => "Daira, Dairis",
	"0305" => "Gints, Uvis",			"0306" => "Inta, Intra, Ineta",
	"0307" => "Benita, Everita, Verita",		"0308" => "Augusts",
	"0309" => "Berta, Bella",			"0310" => "Elza, Ilizana",
	"0311" => "Ērika, Dagnija",			"0312" => "Evija, Raita, Jogita",
	"0401" => "Spodra, Ilva",			"0402" => "Daila, Veronika",
	"0403" => "Alise, Auce",			"0404" => "Valda, Herta, Ārvalda, Ārvalds",
	"0405" => "Vizbulīte, Viola, Vijolīte",		"0406" => "Elfrīda, Sintija, Sindija",
	"0407" => "Uldis, Ulvis, Sandis",		"0408" => "Romāns, Romualds, Romualda",
	"0409" => "Dzintra, Dzintars, Dzintara",	"0410" => "Modra, Francis",
	"0411" => "Atis, Otomārs, Oto",			"0412" => "Baiba, Barbara, Barba",
	"0501" => "Sīmanis, Zintis",			"0502" => "Agate, Selga, Silga, Sinilga",
	"0503" => "Austra, Aurora",			"0504" => "Vija, Vidaga, Aivija",
	"0505" => "Ģirts, Ģederts",			"0506" => "Igors, Margots, Ingvars",
	"0507" => "Andžs, Andžejs, Edīte, Esmeralda",	"0508" => "Osvalds, Arvils",
	"0509" => "Klaudija, Persijs, Vaida",		"0510" => "Amālija",
	"0511" => "Šarlote, Lote",			"0512" => "Sabīne, Sarma, Klaudijs",
	"0601" => "Arnita, Spulga",			"0602" => "Dārta, Dace, Dora",
	"0603" => "Vents, Centis, Gotfrīds",		"0604" => "Zinta, Vīlips, Filips, Dzinta",
	"0605" => "Gaidis, Didzis",			"0606" => "Ingrīda, Ardis",
	"0607" => "Anrijs, Arkādijs",			"0608" => "Askolds, Aisma",
	"0609" => "Maigonis, Magnuss, Mariuss",		"0610" => "Monika, Zilgma, Zilga",
	"0611" => "Linards, Leons, Leo, Leonards",	"0612" => "Nikolajs, Niklāvs, Niks",
	"0701" => "Juliāns, Rota, Zigmārs, Digmārs",	"0702" => "Rihards, Ričards, Nelda",
	"0703" => "Ella, Elmīra",			"0704" => "Zina, Zinaīda, Helmuts",
	"0705" => "Jete, Henriete, Henrijs",		"0706" => "Gaida, Arnis",
	"0707" => "Alda, Maruta",			"0708" => "Alfrēds, Fredis, Madars",
	"0709" => "Regīna, Ermīns",			"0710" => "Daumants, Druvvaldis",
	"0711" => "Helma, Lotārs",			"0712" => "Antonija, Anta, Dzirkstīte",
	"0801" => "Gatis, Ivanda",			"0802" => "Aldona",
	"0803" => "Dagmāra, Marga, Margita",		"0804" => "Edgars, Danute, Dana, Dans",
	"0805" => "Staņislavs, Staņislava, Stefānija",	"0806" => "Frīdis, Frīda, Mundra",
	"0807" => "Antra, Adele, Ada",			"0808" => "Mudīte, Vladislavs, Vladislava",
	"0809" => "Ilga",				"0810" => "Aina, Anete",
	"0811" => "Aleksandra, Agra",			"0812" => "Gunārs, Vladimirs, Gunis",
	"0901" => "Kaspars, Aksels, Alta",		"0902" => "Simona, Apolonija",
	"0903" => "Ēvalds",				"0904" => "Valērija, Žubīte",
	"0905" => "Klāvs, Einārs, Ervīns",		"0906" => "Ligita, Gita",
	"0907" => "Zaiga, Asne, Asna",			"0908" => "Madara, Genoveva",
	"0909" => "Bruno, Telma",			"0910" => "Elga, Helga, Elgars",
	"0911" => "Teodors",				"0912" => "Sarmīte, Tabita",
	"1001" => "Tatjana, Dorisa",			"1002" => "Paulīne, Paula",
	"1003" => "Liliāna, Laimrota, Silvija",		"1004" => "Anita, Anitra, Zīle",
	"1005" => "Maija, Paija",			"1006" => "Malva, Anatols",
	"1007" => "Lija, Olīvija",			"1008" => "Brencis, Inuta, Audris",
	"1009" => "Jausma, Albertīne",			"1010" => "Arvīds, Arvis, Druvis",
	"1011" => "Mārtiņš, Mārcis, Markuss",		"1012" => "Guna, Judīte",
	"1101" => "Smaida, Franciska",			"1102" => "Laima, Laimdota",
	"1103" => "Konstantīns, Agita",			"1104" => "Hermanis, Vilmārs",
	"1105" => "Milda, Karmena, Manfreds",		"1106" => "Ingus, Mairis, Vidvuds",
	"1107" => "Leonora, Svens",			"1108" => "Olga, Zita, Zigita, Liega",
	"1109" => "Signe, Signija",			"1110" => "Monta, Tince, Silva",
	"1111" => "Ojārs, Nellija, Rainers",		"1112" => "Voldemārs, Valdemārs, Valdis",
	"1201" => "Reinis, Renāts, Reinholds, Reina",	"1202" => "Karlīna, Līna",
	"1203" => "Aija, Aiva, Aivis",			"1204" => "Jūlijs, Ainis",
	"1205" => "Valija, Ināra, Ina, Inārs",		"1206" => "Nora, Ija, Lenora",
	"1207" => "Indriķis, Ints, Namejs",		"1208" => "Vizma, Klāra",
	"1209" => "Erna, Evita, Eva",			"1210" => "Valfrīds, Kira",
	"1211" => "Kaija, Kornēlija",			"1212" => "Otīlija, Iveta",
	"1301" => "Harijs, Ārijs, Āris, Aira",		"1302" => "Malda, Melita",
	"1303" => "Ernests, Balvis",			"1304" => "Egīls, Egils, Nauris",
	"1305" => "Irēna, Irīna, Ira, Iraīda",		"1306" => "Zigfrīds, Ainārs, Uva",
	"1307" => "Margrieta, Margarita",		"1308" => "Elvīra, Velga",
	"1309" => "Iza, Izabella",			"1310" => "Irma, Mirga",
	"1311" => "Eižens, Jevgeņijs, Jevgeņija",	"1312" => "Lūcija, Veldze",
	"1401" => "Roberts, Roberta, Raitis, Raits",	"1402" => "Valentīns",
	"1403" => "Matilde, Ulrika",			"1404" => "Strauja, Gudrīte",
	"1405" => "Krišjānis, Elfa, Elvita, Aivita",	"1406" => "Tija, Saiva, Saivis, Sentis, Santis",
	"1407" => "Oskars, Ritvars, Anvars",		"1408" => "Zelma, Zemgus, Virma",
	"1409" => "Sanita, Sanija, Santa, Sanda",	"1410" => "Vilhelmīne, Minna",
	"1411" => "Fricis, Vikentijs",			"1412" => "Auseklis, Gaisma",
	"1501" => "Fēlikss, Felicita",			"1502" => "Alvils, Olafs, Olavs, Aloīzs",
	"1503" => "Imalda, Amilda, Amalda",		"1504" => "Aelita, Gastons",
	"1505" => "Sofija, Taiga, Arita, Airita",	"1506" => "Baņuta, Žermēna, Vilija, Vits",
	"1507" => "Egons, Egmonts, Egija, Henriks, Heinrihs",	"1508" => "Zenta, Dzelde, Zelda",
	"1509" => "Sandra, Sondra, Gunvaldis, Gunvaris",	"1510" => "Eda, Hedviga, Helvijs",
	"1511" => "Leopolds, Undīne, Unda",		"1512" => "Jana, Johanna, Hanna",
	"1601" => "Lidija, Lida",			"1602" => "Jūlija, Džuljeta",
	"1603" => "Guntris, Guntis, Guntars",		"1604" => "Mintauts, Alfs, Bernadeta",
	"1605" => "Edvīns, Edijs",			"1606" => "Justīne, Juta",
	"1607" => "Hermīne, Estere",			"1608" => "Astra, Astrīda",
	"1609" => "Asja, Asnete, Dāgs",			"1610" => "Daiga, Dinija",
	"1611" => "Banga, Glorija",			"1612" => "Alvīne",
	"1701" => "Tenis, Dravis",			"1702" => "Donats, Konstance",
	"1703" => "Ģertrūde, Gerda",			"1704" => "Rūdolfs, Rūdis, Viviāna",
	"1705" => "Herberts, Dailis, Umberts",		"1706" => "Artūrs, Artis",
	"1707" => "Aleksis, Aleksejs",			"1708" => "Vineta, Oļegs",
	"1709" => "Vera, Vaira, Vairis",		"1710" => "Gaits, Karīna",
	"1711" => "Hugo, Uga, Uģis",			"1712" => "Hilda, Teiksma",
	"1801" => "Antons, Antis",			"1802" => "Kora, Kintija",
	"1803" => "Ilona, Adelīna",			"1804" => "Laura, Jadviga",
	"1805" => "Inese, Inesis, Ēriks",		"1806" => "Alberts, Madis",
	"1807" => "Rozālija, Roze",			"1808" => "Liene, Liena, Helēna, Elena, Ellena",
	"1809" => "Liesma, Elita, Alita",		"1810" => "Rolands, Rolanda, Ronalds, Erlends",
	"1811" => "Aleksandrs, Doloresa",		"1812" => "Kristaps, Krists, Klinta, Kristofers",
	"1901" => "Andulis, Alnis",			"1902" => "Zane, Zuzanna",
	"1903" => "Jāzeps",				"1904" => "Vēsma, Fanija",
	"1905" => "Lita, Sibilla, Teika",		"1906" => "Viktors, Nils",
	"1907" => "Jautrīte, Kamila, Digna",		"1908" => "Melānija, Imanta",
	"1909" => "Verners, Muntis",			"1910" => "Elīna, Drosma, Drosmis",
	"1911" => "Elizabete, Liza, Līze, Betija",	"1912" => "Lelde, Sarmis",
	"2001" => "Oļģerts, Aļģirds, Orests, Aļģis",	"2002" => "Vitauts, Smuidra, Smuidris",
	"2003" => "Made, Irbe",				"2004" => "Mirta, Ziedīte",
	"2005" => "Venta, Salvis, Selva",		"2006" => "Rasma, Rasa, Maira",
	"2007" => "Ritma, Ramona",			"2008" => "Bernhards, Boriss",
	"2009" => "Guntra, Marianna, Ginters",		"2010" => "Leonīds, Leonīda",
	"2011" => "Anda, Andīna",			"2012" => "Arta, Minjona",
	"2101" => "Agne, Agnese, Agnija",		"2102" => "Eleonora, Ariadne",
	"2103" => "Unigunde, Dzelme, Una, Benedikts",	"2104" => "Marģers, Anastasija",
	"2105" => "Ernestīne, Ingmārs, Akvelīna",	"2106" => "Emīls, Egita, Monvīds",
	"2107" => "Melisa, Meldra, Meldris",		"2108" => "Janīna, Linda",
	"2109" => "Modris, Matīss, Mariss",		"2110" => "Urzula, Severīns",
	"2111" => "Zeltīte, Andis",			"2112" => "Toms, Tomass, Saulcerīte",
	"2201" => "Austris",				"2202" => "Rigonda, Adrians, Ārija",
	"2203" => "Tamāra, Dziedra",			"2204" => "Armanda, Armands",
	"2205" => "Emīlija, kalendāros nerakstīto vārdu diena",	"2206" => "Ludmila, Laimdots, Laimiņš",
	"2207" => "Marija, Marika, Marina",		"2208" => "Rudite, Everts",
	"2209" => "Māris, Mārica, Maigurs",		"2210" => "Īrisa, Irīda",
	"2211" => "Aldis, Alfons, Aldris",		"2212" => "Saulvedis",
	"2301" => "Grieta, Strauta",			"2302" => "Haralds, Almants",
	"2303" => "Mirdza, Žanete, Žanna",		"2304" => "Jurģis, Juris, Georgs",
	"2305" => "Leontīne, Lonija, Ligija, Leokādija",	"2306" => "Līga",
	"2307" => "Magda, Magone, Mērija",		"2308" => "Vitālijs, Ralfs, Valgudis",
	"2309" => "Vanda, Veneranda, Venija",		"2310" => "Daina, Dainis, Dainida",
	"2311" => "Zigrīda, Zigfrīda, Zigrīds",		"2312" => "Viktorija, Balva",
	"2401" => "Krišs, Ksenija, Eglons",		"2402" => "Diāna, Dina, Dins",
	"2403" => "Kazimirs, Izidors",			"2404" => "Visvaldis, Nameda, Ritvaldis",
	"2405" => "Ilvija, Marlēna, Ziedone",		"2406" => "Jānis",
	"2407" => "Kristīne, Krista, Kristiāna, Kristiāns",	"2408" => "Bērtulis, Boļeslavs",
	"2409" => "Agris, Agrita",			"2410" => "Renāte, Modrīte, Mudrīte",
	"2411" => "Velta, Velda",			"2412" => "Ādams, Ieva",
	"2501" => "Zigurds, Sigurds",			"2502" => "Alma, Annemarija",
	"2503" => "Māra, Mārīte, Marita",		"2504" => "Līksma, Bārbala",
	"2505" => "Anšlavs, Junora",			"2506" => "Milija, Maiga",
	"2507" => "Jēkabs, Žaklīna",			"2508" => "Ludvigs, Ludis, Ivonna, Patrīcija",
	"2509" => "Rodrigo, Rauls",			"2510" => "Beāte, Beatrise",
	"2511" => "Katrīna, Kate, Kadrija, Trīne",	"2512" => "Stella, Larisa",
	"2601" => "Ansis, Agnis, Agneta",		"2602" => "Aurēlija, Mētra, Evelīna",
	"2603" => "Ženija, Eiženija",			"2604" => "Alīna, Sandris, Rūsiņš",
	"2605" => "Eduards, Edvards, Varis",		"2606" => "Ausma, Ausmis, Inguna, Inguns",
	"2607" => "Anna, Annija, Ance",			"2608" => "Natālija, Tālija, Broņislava, Broņislavs",
	"2609" => "Gundars, Kurts, Knuts",		"2610" => "Amanda, Amanta, Kaiva",
	"2611" => "Konrāds, Sebastians",		"2612" => "Dainuvīte, Gija, Megija",
	"2701" => "Ilze, Ildze, Izolde",		"2702" => "Līva, Andra, Līvija",
	"2703" => "Tālrīts, Gusts, Gustavs",		"2704" => "Raimonda, Raina, Tāle, Klementīne",
	"2705" => "Dzidra, Dzidris, Gunita, Loreta",	"2706" => "Malvīne, Malvis",
	"2707" => "Marta, Dita",			"2708" => "Žanis, Jorens, Alens",
	"2709" => "Ādolfs, Ilgonis",			"2710" => "Lilita, Irita, Ita",
	"2711" => "Lauris, Norberts",			"2712" => "Elmārs, Inita",
	"2801" => "Kārlis, Spodris",			"2802" => "Skaidrīte, Skaidra, Justs",
	"2803" => "Gunta, Ginta, Gunda",		"2804" => "Gundega, Terēze",
	"2805" => "Vilis, Vilhelms",			"2806" => "Viesturs, Viestards, Kitija",
	"2807" => "Cecīlija, Cilda",			"2808" => "Auguste, Guste",
	"2809" => "Sergejs, Svetlana, Lana",		"2810" => "Ņina, Ninona, Antoņina, Oksana",
	"2811" => "Rita, Vita, Olita",			"2812" => "Inga, Ivita, Irvita, Ingeborga",
	"2901" => "Valērijs, Aivars",			"2903" => "Aldonis, Agija",
	"2904" => "Vilnis, Raimonds, Laine",		"2905" => "Maksis, Raivis, Raivo",
	"2906" => "Pēteris, Pāvils, Pauls, Paulis",	"2907" => "Edmunds, Edžus, Vidmants",
	"2908" => "Armīns, Vismants, Aiga",		"2909" => "Miķelis, Mikus, Mihails, Miks",
	"2910" => "Laimonis, Laimis, Elvijs, Elva, Elvis",	"2911" => "Ignats, Virgīnija",
	"2912" => "Solveiga, Ilgona",			"3001" => "Valentīna, Tīna, Pārsla",
	"3003" => "Nanija, Ilgmārs",			"3004" => "Lilija, Liāna",
	"3005" => "Vitolds, Lolita",			"3006" => "Tālivaldis, Mareks",
	"3007" => "Valters, Renārs",			"3008" => "Alvis, Jolanta, Samanta",
	"3009" => "Elma, Elna, Menarda",		"3010" => "Nadlīna, Adīna, Ulla",
	"3011" => "Andrejs, Andris, Andrievs",		"3012" => "Dāvids, Dāvis, Dāniels, Daniela",
	"3101" => 
x-ƒ (x_f)
beigas tika norautas. šeit.. | x-ƒ (atbildēt)

pirmdien, 1.11.2004 @5:41 pm

beigas tika norautas. šeit turpinājums. atvainojos.

	"3101" => "Tekla, Violeta",			"3103" => "Atvars, Gvido",
	"3105" => "Alīda, Jūsma",			"3107" => "Ruta, Rūta, Angelika, Sigita",
	"3108" => "Vilma, Aigars",			"3110" => "Valts, Rinalds, Rinalda",
	"3112" => "Silvestrs, Silvis, Kalvis" };
############ Vārdadienas ##################

  foreach var string dat($vardadienas){
    if ($dat == $datums){
      print $vardadienas{$dat};
    }
  }
}

#####################
## piemērs, kā izsaukt un izvadīt

function tests() "Kā tikt pie šodienas vārdadienas" {

  var Page p = get_page();

  var string diena_v = zeropad($p.time.day, 2);
  var string menesis_v = zeropad($p.time.month, 2);
  var string datums_vardadienai = $diena_v + $menesis_v;

  """<p>Vārdadienu svin """;
    print_vardadiena($datums_vardadienai); 
  """</p>""";
}