function c_test( fset)  /* Test, ob die aufrufende Datei in einer Frame-Struktur eingebettet ist  */ 
     {
      if(top.frames.length==0)document.write("Sie sind seitlich eingestiegen. Die Navigationsleiste finden Sie auf <a href=" + fset + ">dieser<\/a> Seite.<br>"); 
     }
/* -------------------------  */
/* Beginn: Öffnet ein 'popup' Fenster für die Anzeige von Bildern oder Lesungstexten  */   
    function openWindow ( PAGE, WIDTH, HEIGHT ) 
    {
      var winString = "height=" + HEIGHT + ",width=" + WIDTH + ",screenX=175,screenY=250,directories=0,location=0,menubar=0,resizable=1,scrollbars=1,status=0,toolbar=0" ;
      window.open( PAGE, "newwin" , winString) ;
      window.blur( ) ;
    }
/* Ende:   Öffnet ein 'popup' Fenster für die Anzeige von Bildern oder Lesungstexten  */
/* -------------------------  */

/* ------------------------ Gibt das Datum von 'Jetzt' zurück ----------------------- */
/* Zweck dieser Funktion: Macht es möglich, das Datum in Archiven zu manipulieren     */    
   function Jetzt() {
    /* return( new Date(2002, 02-1, 23, 20,00,00)) */
       return( new Date()); 
    }
/* Ende: Jetzt() -----------  */

/* ------------------------ Allerlei für's Datum  ----------------------------------- */ 

   /* Deklaration des Objekts 'Datum'  */
   function Datum( Jahr, MonatZahl, MonatName, TagZahl, TagName, WochentagZahl,
                   WochentagName, Zeit, Stunden, Minuten, Sekunden)
     {
       this.Jahr          = Jahr;
       this.MonatZahl     = MonatZahl;
       this.MonatName     = MonatName;
       this.TagZahl       = TagZahl;
       this.TagName       = TagName;
       this.WochentagZahl = WochentagZahl;
       this.WochentagName = WochentagName;
       this.Zeit          = Zeit;
       this.Stunden       = Stunden;
       this.Minuten       = Minuten;
       this.Sekunden      = Sekunden;
     }
 
   /* Macht Zahlen zweistellig - wenn nötig mit führender Null  */
   function LenTwo( number) {
       var out = number;
       if (out < 10) {out = "0"+out;};
       return(out);
     }

   /* Füllt die Komponenten des Objekts 'Datum' ( aber nicht Tag- und Monatsname! ) */
   function setDatum( input )   
     {
       date  = new Date(input);    
       datum = new Datum();
    
       datum.Jahr          = date.getYear();
       if (datum.Jahr < 70) {datum.Jahr += 2000} else if (datum.Jahr < 1000) {datum.Jahr += 1900};
       datum.MonatZahl     = LenTwo(date.getMonth()+1);
       datum.TagZahl       = LenTwo(date.getDate());
       datum.WochentagZahl = date.getDay();                 /* Sonntag ist '0' */
       datum.Stunden       = LenTwo(date.getHours());
       datum.Minuten       = LenTwo(date.getMinutes());
       datum.Sekunden      = LenTwo(date.getSeconds());
       datum.Zeit          = datum.Stunden+":"+datum.Minuten;

       /*  document.write(datum.Jahr + "-" + datum.MonatZahl + "-" + datum.TagZahl + "<br>");
           document.write(datum.Zeit + "<br>");
           document.write(datum.Zeit + ":" + datum.Sekunden + "<br>");  
           var deutschdat = datum.TagZahl + "." + datum.MonatZahl + "."  + datum.Jahr;
           if (opt1 == "zeit") { deutschdat = deutschdat + ", " + datum.Zeit };           */
                                                                                  
       return datum;
     }        /* Ende 'function' */
   /* Ende:  Füllt die Komponenten des Objekts 'Datum'         */


   /* Stellt das Dateidatum im deutschen Format dar     */
      /* Aufruf:                                                                
         var deutsch_dat = DeutschDat(document.lastModified, "zeit");
         oder, wenn gleich auszugeben:
         document.write( DeutschDat(document.lastModified, "zeit") + "<br>");
         Die Uhrzeit wird nur mit ausgegeben, wenn Option "zeit" gewählt ist.
      */
    function DeutschDat( input, opt1)
     {
       datum = setDatum( input);
       var deutschdat = datum.TagZahl + "." + datum.MonatZahl + "."  + datum.Jahr;
       if (opt1 == "zeit") { deutschdat = deutschdat + ", " + datum.Zeit };                                                                                             

       return deutschdat;
     }      /* Ende 'function' */
   /* Ende:  Stellt das Dateidatum im deutschen Format dar     */ 

   /* Stellt das Dateidatum im ISO Format dar     */ 
      /* Aufruf: Analog DeutschDat()              */                                                                
            function ISODat( input, opt1)
     {
       datum = setDatum( input);
       var isodat = datum.Jahr + "-" + datum.MonatZahl + "-" + datum.TagZahl;
       if (opt1 == "zeit") { isodat = isodat + ", " + datum.Zeit };                                                                                             

       return isodat;
     }      /* Ende 'function' */
   /* Ende:  Stellt das Dateidatum im ISO Format dar     */ 

/* ------------------------ Allerlei für's Datum, Ende ------------------------------ */

/* Diese Prozedur soll es Robots erschweren, unsere Mail-Adressen auszukundschaften!  */
    function CallMail ( NAME, SUBJECT, FILEDATUM, AnzeigeNAME )  /* Alle Parameter ausser NAME sind wahlfrei */
    {                                                            /* Auslassung ist mit "" anzuzeigen         */
      var DOMAIN;
      var MailString = "<a title=\"Die hier benutzte Mail-Adresse &#10;ist zum sofortigen Gebrauch!\" href=\"mai";
          MailString += "lto:";

      switch(NAME.toUpperCase()) {
        case "Nieder".toUpperCase():
          MailString += "PfNie";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "Pfarrer Nieder"};
        break;
        case "Bienias".toUpperCase():
          MailString += "Bieni";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "Isabell Bienias"};
        break;
        case "Buero".toUpperCase():
          MailString += "PfBuero";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "das Pfarrb&uuml;ro"};
        break; 
        case "Andreas Gebert".toUpperCase():
          MailString += "Geb";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "den Betreuer"};
        break;  
        case "Kerstin Steude".toUpperCase():
          MailString += "Steude";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "Kerstin Steude"};
        break;  
        case "Johannes Fink".toUpperCase():
          MailString += "Fin";
          if ( ! AnzeigeNAME) { AnzeigeNAME = "den Betreuer"};
        break;  
        case "Birgit Probst".toUpperCase():
          MailString += "BirgitProbst";                                                                            
          DOMAIN = "aol.com";                                                                              
        break;
        default:
          MailString += "webm";
          DOMAIN = "christkoenig-walldorf.de"; 
          if ( ! AnzeigeNAME) { AnzeigeNAME = "den Betreuer"};
        break;  }  

      if (   FILEDATUM)   { FILEDATUM = ", Stand: " + FILEDATUM  } else FILEDATUM = " ";   
      if (   SUBJECT)     { SUBJECT   = "?subject=" + SUBJECT + FILEDATUM  } else SUBJECT = " ";
      if ( ! AnzeigeNAME) { AnzeigeNAME = NAME  };
      if ( ! DOMAIN)      { DOMAIN = "christkoenig-walldorf.de" };
  
      
      MailString += "@"; MailString += DOMAIN; MailString += SUBJECT + "\">";
      MailString += "<img src=\"images/xgmail.gif\" border=\"0\" width=\"15\" height=\"10\" alt=\"E-Mail:\">";
      MailString += "&nbsp;&nbsp;Nachricht an " + AnzeigeNAME + "<\/a>&nbsp;&nbsp;"; 
      document.write(MailString); 
    }
/* --------- Ende der Vernebelung von Mail Adressen  --------------------------------- */