function homilia() {
	var mainap = new Date();
	var i = mainap.getDate();
	var nev;
	var ho;
	var nap;
	var aktnap = i;
	do {
		mainap.setDate(i);
		ho = '0'+(mainap.getMonth()+1);
		nap = '0'+(mainap.getDate());
		if (i != aktnap) nev = (mainap.getFullYear() + "." + ho.substring((ho.length)-2) + "." + nap.substring((nap.length)-2));
		else nev = "mai nap";
		filenev = ("./_homilia/" + mainap.getFullYear() + ho.substring((ho.length)-2) + nap.substring((nap.length)-2) + ".html");

		i--;
	} while (!isFile(filenev) && i > -10);

// kiirna, hogy melyik volt az utolso letezo file a ciklus utan
// document.writeln(isFile(filenev) + " : " + filenev + "<br>");

	document.writeln("<a href=\"" + filenev + "\" target=\"_blank\" onMouseOver=\"oda('agoston_atya_homiliaja','./kepek/hatterek/agoston_atya_homiliaja_halvany.gif');\" onMouseOut=\"oda('agoston_atya_homiliaja','./kepek/hatterek/agoston_atya_homiliaja.gif');\"> ");
	document.writeln("<img name=\"agoston_atya_homiliaja\" alt=\"Ágoston atya homíliaja\" border=2 src=\"./kepek/hatterek/agoston_atya_homiliaja.gif\"></a>");
	document.writeln("<br>Utolsó: " + nev);

 }  


// letezik-e a file a server oldalon?
//

    function isFile(str){
        var O= AJ();
        if(!O) return false;
        try
        {
            O.open("HEAD", str, false);
            O.send(null);
            return (O.status==200) ? true : false;
        }
        catch(er)
        {
            return false;
        }
    }
    function AJ()
    {
        var obj;
        if (window.XMLHttpRequest)
        {
            obj= new XMLHttpRequest();
        }
        else if (window.ActiveXObject)
        {
            try
            {
                obj= new ActiveXObject('MSXML2.XMLHTTP.3.0');
            }
            catch(er)
            {
                obj=false;
            }
        }
        return obj;
    }

// idaig letezik-e a file?




 function oda(nev,kepnev) {
	p = eval("document." + nev);
	p.src = kepnev;
 }




 function kiiro_datum() {
   var mainap = new Date()  
   var ev = mainap.getFullYear()
   var ho = mainap.getMonth()+1
   var nap = mainap.getDate()
   document.writeln("<font size=3>"+ mainap.getFullYear() + ". " + honapokneve(ho) + " " + nap + "., " + napokneve(mainap.getDay()+1)+".")
 }  

 function kiiro_nevnap() {
   var mainap = new Date()  
   var ev = mainap.getFullYear()
   var ho = mainap.getMonth()+1
   var nap = mainap.getDate()
   document.writeln("<br><font size=2><b>ma&nbsp;&nbsp;&nbsp;</b><u><font color=red size=4>"+nevnapok(ev,ho,nap)+"</u></font color><font size=2><b>&nbsp;&nbsp;&nbsp;nevenapja van.</b>"+
   "<br><u> <font color=red size=4>"+unnepnapok(ev,ho,nap)+"</font></u>"+
   "<br><font size=2><b>"+programok(ev,ho,nap)+"<b></font>")
 }  

 function kiiro_ido() {
   var mainap = new Date()  
   var ora = mainap.getHours()
   var perc = mainap.getMinutes()
   var mp = mainap.getSeconds()
   document.writeln("&nbsp;&nbsp;&nbsp;<font size=3>"+ ora + " óra " + perc + " perc " + mp + " mp<br><br>")
 }  


 function kezdeti() {  
   this.length = kezdeti.arguments.length  
   for (var i = 0; i < this.length; i++)  
   this[i+1] = kezdeti.arguments[i]  
 }  
   

 function unnepnapok(ev,ho,nap) {  
 if (ho==1)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==2)  
   if ((ev!=2004) && (ev!=2008) && ev!=2012)  
     { var napok=new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","",
         "") }
      else  
     { var napok=new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","",
         "") }  
 if (ho==3)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","Nemzeti ünnep",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==4)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==5)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==6)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==7)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==8)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","Nagyboldogasszony ünnepe",
         "","","","","Szent István ünnepe",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==9)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==10)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","Nemzeti ünnep","","",
         "","","","","",
         "",
         "") }
 if (ho==11)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==12)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","Szenteste","Karácsony",
         "Karácsony","","","","",
         "Szilveszter",
         "") }
 return napok[nap]  
 }  



 function nevnapok(ev,ho,nap) {  
 if (ho==1)  
   { var napok = new kezdeti(
         "Fruzsina","Ábel","Genovéva, Benjámin","Titusz, Leona",  
         "Simon","Boldizsár","Attila, Ramóna","Gyöngyvér","Marcell",  
         "Melánia","Ágota","ErnŐ","Veronika","Bódog","Lóránt, Loránd",  
         "Gusztáv","Antal, Antónia","Piroska","Sára, Márió","Fábián, Sebestyén",  
         "Ágnes","Vince, Artúr","Zelma, Rajmund","Timót","Pál","Vanda, Paula",  
         "Angelika","Károly, Karola","Adél","Martina, Gerda","Marcella","") }  
 if (ho==2)  
   if ((ev!=2000) && (ev!=2004) && ev!=2008)  
     { var napok=new kezdeti(
         "Ignác","Karolina, Aida","Balázs","Ráhel, Csenge","Ágota, Ingrid",  
         "Dorottya, Dóra","Tódor, Rómeó","Aranka","Abigél, Alex","Elvira",  
         "Bertold, Marietta","Lívia, Lídia","Ella, Linda","Bálint, Valentin",  
         "Kolos, Georgina","Julianna, Lilla","Donát","Bernadett","Zsuzsanna",  
         "Aladár, Álmos","Eleonóra","Gerzson","Alfréd",  
         "Mátyás","Géza","Edina","Ákos, Bátor","Elemér","","")  }  
      else  
     { var napok=new kezdeti(
         "Ignác","Karolina, Aida","Balázs","Ráhel, Csenge","Ágota, Ingrid",  
         "Dorottya, Dóra","Tódor, Rómeó","Aranka","Abigél, Alex","Elvira",  
         "Bertold, Marietta","Lívia, Lídia","Ella, Linda","Bálint, Valentin",  
         "Kolos, Georgina","Julianna, Lilla","Donát","Bernadett","Zsuzsanna",  
         "Aladár, Álmos","Eleonóra","Gerzson","Alfréd",  
         "Szőkőnap","Mátyás","Géza","Edina","Ákos, Bátor","Elemér","","") }  
 if (ho==3)  
   { var napok=new kezdeti(
         "Albin","Lujza","Kornélia","Kázmér","Adorján, Adrián","Leonóra, Inez",  
         "Tamás","Zoltán","Franciska, Fanni","Ildikó","Szilárd",  
         "Gergely","Krisztián, Ajtony","Matild","Kristóf",  
         "Henrietta","Gertrúd, Patrik","Sándor, Ede","József, Bánk","Klaudia",  
         "Benedek","Beáta, Izolda","Emőke","Gábor, Karina","Irén, Irisz",  
         "Emánuel","Hajnalka","Gedeon, Johanna","Auguszta","Zalán","Árpád","" ) }  
 if (ho==4)  
   { var napok=new kezdeti(
         "Hugó","Áron","Buda, Richárd","Izidor","Vince","Vilmos, Bíborka",  
         "Herman","Dénes","Erhard","Zsolt","Leó, Szaniszló","Gyula","Ida",  
         "Tibor","Anasztázia, Tas","Csongor","Rudolf","Andrea, Ilma","Emma",  
         "Tivadar","Konrád","Csilla, Noémi","Béla","György","Márk","Ervin",  
         "Zita","Valéria","Péter, Petúr","Katalin, Kitti","" )}  
 if (ho==5)  
   { var napok=new kezdeti(
         "Fülöp, Jakab","Zsigmond","Tímea, Irma","Mónika, Flórián",  
         "Györgyi","Ivett, Frida","Gizella","Mihály","Gergely","Ármin, Pálma",  
         "Ferenc","Pongrác","Szervác, Imola","Bonifác","Zsófia, Szonja",  
         "Mózes, Botond","Paszkál","Erik, Alexandra","Ivó, Milán",  
         "Bernát, Felícia","Konstantin","Júlia, Rita","Dezső","Eszter, Eliza",  
         "Orbán","Fülöp, Evelin","Hella","Emil, Csanád","Magdolna",  
         "Janka, Zsanett","Angéla, Petronella","" )}  
 if (ho==6)  
   { var napok=new kezdeti(
         "Tünde","Kármen, Anita","Klotild","Bulcsú","Fatime","Norbert, Cintia",  
         "Róbert","Medárd","Félix","Margit, Gréta","Barnabás","Villő",  
         "Antal, Anett","Vazul","Jolán, Vid","Jusztin","Laura, Alida",  
         "Arnold, Levente","Gyárfás","Rafael","Alajos, Leila","Paulina",  
         "Zoltán","Iván","Vilmos","János, Pál","László","Levente, Irén",  
         "Péter, Pál","Pál","" ) }  
 if (ho==7)  
   { var napok=new kezdeti(
         "Tihamér, Annamária","Ottó","Kornél, Soma","Ulrik","Emese, Sarolta",  
         "Csaba","Appolónia","Ellák","Lukrécia","Amália","Nóra, Lili",  
         "Izabella, Dalma","Jenő","Őrs, Stella","Henrik, Roland","Valter",  
         "Endre, Elek","Frigyes","Emília","Illés","Dániel, Daniella",  
         "Magdolna","Lenke","Kinga, Kincső","Kristóf, Jakab","Anna, Anikó, Zolna",  
         "Olga, Liliána","Szabolcs","Márta, Flóra","Judit, Xénia","Oszkár","" )}  
 if (ho==8)  
   { var napok=new kezdeti(
         "Boglárka","Lehel","Hermina","Domonkos, Dominika","Krisztina",  
         "Berta, Bettina","Ibolya","László","Emőd","Lörinc",  
         "Zsuzsanna, Tiborc","Klára","Ipoly","Marcell","Mária","Ábrahám",  
         "Jácint","Ilona","Huba","István","Sámuel, Hajna",  
         "Menyhért, Mirjam","Bence","Bertalan","Lajos, Patrícia","Izsó",  
         "Gáspár","Ágoston","Beatrix, Erna","Rózsa","Erika, Bella") }  
 if (ho==9)  
   { var napok= new kezdeti(
         "Egyed, Egon","Rebeka, Dorina","Hilda","Rozália","Viktor, Lőrinc",  
         "Zakariás","Regina","Mária, Adrienn","Ádám","Nikolett, Hunor",  
         "Teodóra","Mária","Kornél","Szeréna, Roxána","Enikő, Melitta","Edit",  
         "Zsófia","Diána","Vilhelmina","Friderika","Máté, Mirella","Móric",  
         "Tekla","Gellért, Mercédesz","Eufrozina, Kende","Jusztina","Adalbert",  
         "Vencel","Mihály","Jeromos","" )}  
 if (ho==10)  
   { var napok= new kezdeti(
         "Malvin","Petra","Helga","Ferenc","Aurél","Brúnó, Renáta","Amália",  
         "Koppány","Dénes","Gedeon","Brigitta","Miksa","Kálmán, Ede","Helén",  
         "Teréz","Gál","Hedvig","Lukács","Nándor","Vendel","Orsolya","Előd",  
         "Gyöngyi","Salamon","Blanka, Bianka","Dömötör",  
         "Szabina","Simon, Szimonetta","Nárcisz","Alfonz","Farkas","" )}  
 if (ho==11)  
   { var napok=new kezdeti(
         "Marianna","Achilles","Győző","Károly","Imre","Lénárd","Rezső",  
         "Zsombor","Tivadar","Réka","Márton","Jónás, Renátó","Szilvia",  
         "Aliz","Albert, Lipót","Ödön","Hortenzia, Gergő","Jenő","Erzsébet",  
         "Jolán","Olivér","Cecília","Kelemen, Klementina","Emma","Katalin",  
         "Virág","Virgil","Stefánia","Taksony","András, Andor","" )}  
 if (ho==12)  
   { var napok=new kezdeti(
         "Elza","Melinda, Vivien","Ferenc, Olívia","Borbála, Barbara","Vilma",  
         "Miklós","Ambrus","Mária","Natália","Judit","Árpád","Gabriella",  
         "Luca, Otília","Szilárda","Valér","Etelka, Aletta","Lázár, Olimpia",  
         "Auguszta","Viola","Teofil","Tamás","Zéno","Viktória","Ádám, Éva",  
         "Eugénia","István","János","Kamilla",  
         "Tamás, Tamara","Dávid","Szilveszter","") }  
 return napok[nap]  
 }  
   



 function programok(ev,ho,nap) {  
 if (ho==1)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==2)  
   if ((ev!=2004) && (ev!=2008) && ev!=2012)  
     { var napok=new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","",
         "") }
      else  
     { var napok=new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","",
         "") }  
 if (ho==3)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==4)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==5)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==6)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==7)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==8)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==9)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==10)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 if (ho==11)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "") }
 if (ho==12)  
   { var napok = new kezdeti(
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "","","","","",
         "",
         "") }
 return napok[nap]  
 }  



 function honapokneve(ho) {  
	 var month = new kezdeti("január (Boldogasszony hava)","február (Böjtelő hava)","március (Böjtmás hava)","április (Szent György hava)","május (Pünkösd hava)","június (Szent Iván hava)","július (Szent Jakab hava)","augusztus (Kisasszony hava)","szeptember (Szent Mihály hava)","október (Mindenszentek hava)","november (Szent András hava)","december (Karácsony hava)");
 return month[ho]  
 }  
   
 function napokneve(szam) {  
 	var napok = new kezdeti("vasárnap","hétfő","kedd","szerda","csütörtök","péntek","szombat","vasárnap")
 return napok[szam]  
 }