/* DHTML-Bibliothek */
<!-- Es folgt Die Funktionen für die Browserabfrage -->
var DHTML = 0, DOM = 0, MS = 0, NS = 0, OP = 0, Datum = "© 31.03.2008";

function DHTML_init() {

 if (window.opera) {
     OP = "1";}
 if(document.getElementById) {
   DHTML = "1";
   DOM = "1";}
 if(document.all && !OP) {
   DHTML = "1";
   MS = "1";}
if(document.layers && !OP) {
   DHTML = "1";
   NS = "1";}
}

function getElem(p1,p2,p3) {
 var Elem;
 if(DOM) {
   if(p1.toLowerCase()=="id") {
     if (typeof document.getElementById(p2) == "object")
     Elem = document.getElementById(p2);
     else Elem = void(0);
     return(Elem);}
   else if(p1.toLowerCase()=="name") {
     if (typeof document.getElementsByName(p2) == "object")
     Elem = document.getElementsByName(p2)[p3];
     else Elem = void(0);
     return(Elem);}
   else if(p1.toLowerCase()=="tagname") {
     if (typeof document.getElementsByTagName(p2) == "object" || (OP && typeof document.getElementsByTagName(p2) == "function"))
     Elem = document.getElementsByTagName(p2)[p3];
     else Elem = void(0);
     return(Elem);}
   else return void(0);}
 else if(MS) {
   if(p1.toLowerCase()=="id") {
     if (typeof document.all[p2] == "object")
     Elem = document.all[p2];
     else Elem = void(0);
     return(Elem);}
   else if(p1.toLowerCase()=="tagname") {
     if (typeof document.all.tags(p2) == "object")
     Elem = document.all.tags(p2)[p3];
     else Elem = void(0);
     return(Elem);}
   else if(p1.toLowerCase()=="name") {
     if (typeof document[p2] == "object")
     Elem = document[p2];
     else Elem = void(0);
     return(Elem);}
   else return void(0);}
 else if(NS) {
   if(p1.toLowerCase()=="id" || p1.toLowerCase()=="name") {
   if (typeof document[p2] == "object")
     Elem = document[p2];
     else Elem = void(0);
     return(Elem);}
   else if(p1.toLowerCase()=="index") {
    if (typeof document.layers[p2] == "object")
     Elem = document.layers[p2];
    else Elem = void(0);
     return(Elem);}
   else return void(0);}
}

function getCont(p1,p2,p3) {
   var Cont;
   if(DOM && getElem(p1,p2,p3) && getElem(p1,p2,p3).firstChild) {
     if(getElem(p1,p2,p3).firstChild.nodeType == 3)
       Cont = getElem(p1,p2,p3).firstChild.nodeValue;
     else
       Cont = "";
     return(Cont);}
   else if(MS && getElem(p1,p2,p3)) {
     Cont = getElem(p1,p2,p3).innerText;
     return(Cont);}
   else return void(0);}

function getAttr(p1,p2,p3,p4) {
   var Attr;
   if((DOM || MS) && getElem(p1,p2,p3)) {
     Attr = getElem(p1,p2,p3).getAttribute(p4);
     return(Attr);}
   else if (NS && getElem(p1,p2)) {
       if (typeof getElem(p1,p2)[p3] == "object")
        Attr=getElem(p1,p2)[p3][p4]
       else
        Attr=getElem(p1,p2)[p4]
         return Attr;}
   else return void(0);}

function setCont(p1,p2,p3,p4) {
   if(DOM && getElem(p1,p2,p3) && getElem(p1,p2,p3).firstChild)
     getElem(p1,p2,p3).firstChild.nodeValue = p4;
   else if(MS && getElem(p1,p2,p3))
     getElem(p1,p2,p3).innerText = p4;
   else if(NS && getElem(p1,p2,p3)) {
     getElem(p1,p2,p3).document.open();
     getElem(p1,p2,p3).document.write(p4);
     getElem(p1,p2,p3).document.close();}
}

DHTML_init();

var old;
var memold;
var bil;
var nr;
var x;
var b = new Array();

<!-- Es folgt Menu und Bilder wieder zuklappen wenn Maus auf ein geschlossenes Menue trifft-->
if(NS){
        window.captureEvents(Event.MOUSEUP);
        window.onmouseup=do_out;}
else
{        document.onmouseup=do_out;}

<!-- Es folgt Seite kann nicht im Frame angezeigt werden!! -->
if(top.frames.length > 0)    top.location.href=self.location;

<!-- Es folgt Bilder laden orginal Kirchenbuecher  -->
function lade_bild(nr,x,bil)
{

   if(NS && !DOM)
   {
     document[x].src = 'kirchb/' +nr+ '.gif' ;
     do_menu(x);
   }
   else if(MS && !DOM)
   {
     window.document.images[bil].src='kirchb/' +nr+ '.gif';
     do_menu(x);
   }
   else if(DOM )
   {
     window.document.images[bil].src='kirchb/' +nr+ '.gif';
     do_menu(x);
   }

}

<!-- Es folgt Die Funktionen für das Menu und Bilder -->

function show_layer(x)
{
  if(NS)
                document.layers[x].visibility="show";
  else if(MS && !DOM)
                document.all[x].style.visibility="visible";
  else if(DOM)
                document.getElementById(x).style.visibility = "visible";
}

function hide_layer(x)
{
  if(NS)
                document.layers[x].visibility="hide";
  else if(MS && !DOM)
                document.all[x].style.visibility="hidden";
  else if(DOM)
                document.getElementById(x).style.visibility = "hidden";
}

function do_menu(x)
{
        do_out(x)
        if(!old)
/*  old=memold;  */
        if(old!=x)
        {
                show_layer(x);
                old=x;
        } else

                old="";
}

function do_check(x)
{
        do_menu(x)
        if(old && old!=x)
        {
                hide_layer(old);
                show_layer(x);
                old=x;
        }

}

function do_out()
{
        if(old)
                hide_layer(old);
                memold=old;
        old="";
}

<!-- Es folgt Die Funktionen für Kartenabfrage -->
function Frage()
{
 var einga;
 einga = confirm("Wollen Sie die Karte wirklich laden? (341KB)");
  if (einga != true)
  { return; }
 else
  { window.location.href = "karteust.htm";}
}

<!-- Es folgt  Die Funktionen für GedView Fenster -->
  function gedcom()
  { popupfenster1=window.open("http://www.HeinleNews.de/PHP/index.php", "gedcom" ,"width=1000,height=700,screenX=1000,screenY=700,left=10,top=10,scrollbars=yes");
   }

 function navi()
  {
    window.location.href = "navigati.htm";
  }

function Lager()
{ var winkarte=window.open("lager1574.htm", "lager1574" ,"width=640,height=510,screenX=0,screenY=20,left=0,top=20,resizable=yes,scrollbars=yes")

function Datum(P)
  {
    document.write(Datum);
  }
 var LD=Datum();
}