//if(self.name == "spalte1" || self.name == "spalte2") document.write("<p class=s6r>"+window.location.href+"</p>") //s.u.
//if(self.name == "spalte1" || self.name == "spalte2") document.write("<p class=s6r>"+fkz+"|"+lang+"|"+exst+"|"+year+"</p>")
//document.write(window.location.href+"|"+window.location.pathname)
//if(self.name == "spalte1" || self.name == "spalte2") document.write("<p class=s6r>"+window.location.href+"</p>")
//document.write(navigator.appVersion+"<br>")

var extern = 0
if (window.location.href.lastIndexOf("www.dresden-lexikon.de") == -1) extern = 1 //13.01.2012

if (extern == 0) //13.01.2012
   path = ".."
else
   path = "http://www.dresden-lexikon.de"   

var quelle = window.document.referrer;           //alert("Quelle in target "+quelle);
var rahmen = parent.frames.top.length;           //alert(rahmen);

var s = window.location.href.lastIndexOf("/");
file  = window.location.href.substr(s+1,120);    //alert(file);  //Dateiname mit Typ, Parameter und Anker //05.06.2011 30 >> 120
anker = window.location.hash                     //11.12.2010 wieder eingefügt

//if (self.name == "spalte1" || self.name == "spalte2") document.write("<P class=s6r>"+anker)

var jetzt = new Date()
var jahr = jetzt.getYear(); if (jahr < 999) jahr += 1900 //27.03.2010

buch = gmkg = file.substr(0,file.indexOf("."));  //alert(buch);  //Dateiname ohne Typ und Anker >> Buchstabe, Gemarkung, ...

//if (window.location.href.indexOf("/Vorschau/") > -1) document.write("<p class=s6r>"+file+"|"+buch+"|"+buch.length+"|</span>") 

var s = window.location.href.substr(14,60).indexOf("/")+15;
suche = window.location.href.substr(s,200);      //alert(suche); //Dateiname mit relativen Ordner, Typ, Parameter und Anker
var s = suche.indexOf("#");                      //Anker abtrennen 
if (s > -1) suche = suche.substr(0,s);           //alert(suche); //Dateiname mit Ordner, Typ, Parameter

var s = window.location.href.lastIndexOf("/")+1; //Ordner abtrennen
dabei = window.location.href.substr(s,30);       dabei2 = dabei  //nur für Fehlermeldung
var s = dabei.indexOf(".");                      //Typ abtrennen
dabei = dabei.substr(0,s);     //alert(dabei);   //alert(dabei)  //Dateiname ohne Ordner, Typ, Parameter u. Anker (plus Leerz.)

if (dabei == "") dabei = "???" //07.08.2008 für "ohne Dateiname"

browser = Browser() //23.03.2010

//hierher verschoben: Aufruf der Arrays aus csv-Dateien nur noch in spalte1 und spalte2

if(self.name=="spalte1" || self.name=="spalte2" || self.name=="antwort")
{

document.write("<script src='../Lexikon/funktionen.js'></script>")       //22.11.2008 Bibliothekserweiterung!!!
document.write("<script src='../Lexikon/koordinatentrafo.js'></script>") //14.04.2008
document.write("<script src='../Lexikon/show.js'></script>")             //30.11.2010


adressen   = new Array(); adressen[0]   = "n.v."
kategorien = new Array(); kategorien[0] = "n.v."
termine    = new Array(); termine[0]    = "n.v."
personen   = new Array(); personen[0]   = "n.v."
zitate     = new Array(); zitate[0]     = "n.v."
sachsen    = new Array(); sachsen[0]    = "n.v."
gebiete    = new Array(); gebiete[0]    = "n.v."
synonyme   = new Array(); synonyme[0]   = "n.v."
linien     = new Array(); linien[0]     = "n.v."
ewe        = new Array(); ewe[0]        = "n.v."
zahlen     = new Array(); zahlen[0]     = "n.v."
gde        = new Array(); gde[0]        = "n.v."
ststteile  = new Array(); ststteile[0]  = "n.v."
bilder     = new Array(); bilder[0]     = "n.v."

                                                          
document.write("<script src='../Daten/array_adr.js'></script>") 
document.write("<script src='../Daten/array_kat.js'></script>") 
document.write("<script src='../Daten/array_ter.js'></script>")
document.write("<script src='../Daten/array_per.js'></script>")
document.write("<script src='../Daten/array_zit.js'></script>")
document.write("<script src='../Daten/array_sax.js'></script>")           //18.02.2009 wegen Sachsen
document.write("<script src='../Daten/array_geb.js'></script>")           //26.07.2010
document.write("<script src='../Daten/array_syn.js'></script>")           //01.08.2010
document.write("<script src='../Daten/array_lin.js'></script>")           //hier 13.10.2010 3x eingefügt
document.write("<script src='../Daten/array_ewe.js'></script>")
document.write("<script src='../Daten/array_zah.js'></script>")
document.write("<script src='../Daten/gemeinden.js'></script>")
document.write("<script src='../Daten/array_sst.js'></script>")           //26.07.2010
document.write("<script src='../Daten/array_bil.js'></script>")           //30.11.2010
document.write('<script src="../Daten/array_zus.js"></script>')           //15.03.2011 hier, bisher nur in funktionen.js

//document.write(termine[0]+"|<br>")
//document.write(adressen[0]+"|<br>")
//document.write(zahlen[0]+"||<br>")
//document.write(kategorien[0]+"|||<br>")

statstadtteile = ststteile //14.10.2010 für alte Benennung in der Folge!

}

//if (self.name == "spalte1" || self.name == "spalte2") document.write("<P class=s6b>"+anker)

//***********************************************************************************************************************

fkz = "?*"; lang = "xx"; jahr_karte = "1206"; exst = 9; n=s=v=9 //Standardzuweisung, falls Parameter fehlt!

//document.write("<p class=s6b>"+window.location.href+"|"+window.location.search+"|") //TEST 03.02.2012

parameter = window.location.search.split("&"); //alert(parameter[0])

for(i=0; i < parameter.length; i++)
   {
   wert = new Array()
   wert = parameter[i].split("=")

   wert[0] = wert[0].replace(/\?/g,"") //11.12.2010

   if(wert.length == 1) wert[1] = ""

   switch (wert[0])
      {
      case "f":   fkz  = wert[1]; break; //vorgesehen
      case "k":   fkz  = wert[1]; break; //vorgesehen ?
      case "j":   year = wert[1]; break; //vorgesehen ?
      case "l":   lang = wert[1]; break;
      case "s":   stat = wert[1]; break;
      case "n":   n =    wert[1]; break;
      case "v":   v =    wert[1]; break;
      case "e":   exst = wert[1]; break;
      case "ex":  exst = wert[1]; break;
      case "wt":  wt   = wert[1]; break; //23.01.2011
      case "kz":  kz   = wert[1]; break; //23.01.2011
      case "img": fkz  = wert[1]; break; //vorgesehen ?
      case "fkz": fkz  = wert[1]; break; //vorgesehen ?
      default: if (wert[1].length == 0) fkz = year = wert[0]; break;
      } 
   }

if (window.location.href.indexOf(".htm#") > -1) fkz = "?*" //03.02.2012 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
if (window.location.href.indexOf("?")    == -1) fkz = "?*" //03.02.2012 vorige Zeile ggf. überflüssig

if (window.location.href.indexOf("Lexikon-en") > -1) lang = "en" //09.12.2010

if (fkz.substr(0,1) == "?") fkz = fkz.substr(1,30) //13.12.2010

//if (fkz.substr(0,1) != "?") fkz = "?"+fkz //zur Sicherheit, da zurzeit mit ? verlangt

//if (self.name == "kopf1" || self.name == "xxspalte2") document.write(fkz+"|"+lang+"|"+exst+"|"+n+"|"+v+"|"+window.location.search+"|<br>")

//if (self.name == "spalte1" || self.name == "spalte2") document.write("<P class=s6r>"+lang+"|</p>") //04.01.2011 TEST

//***********************************************************************************************************************

//immer nur 1 Fotoschau
alle = "ABCDEF";
p = -1;
i = 0;
while (i < 6)
   {
   s = fkz.indexOf(alle.substr(i,1));
   if (s > p) p=s;
   i = i +1;
   }

if (p > -1)
{
fsch = fkz.substr(p,1);
s = alle.indexOf(fsch);
if (s > -1) rest = alle.substr(0,s)+alle.substr(s+1,60);

i = 0;
while (i < 5)
   {
   s = fkz.indexOf(rest.substr(i,1)); 
   if (s > -1) fkz = fkz.substr(0,s)+fkz.substr(s+1,60);
   i = i +1;
   }
}

//---------------------
//alert(rahmen+"|"+window.name+"|"+self.name+"|"+window.location.href)

if (rahmen == 0 && window.name != "antwort" && window.location.href.indexOf("Tramplan.php") == -1 && window.location.href.indexOf("ADRFSET.HTM") == -1 && window.location.href.indexOf("dd4kids") == -1 && window.location.href.indexOf("Ersetzen-Stadtteile.php") == -1 && window.location.href.indexOf("Presseartikel-einfuegen.php") == -1 && window.location.href.indexOf("E-Cards") == -1 && window.location.href.indexOf("Neumarkt-1600.htm") == -1 && window.location.href.indexOf("Main-TEST.htm") == -1 && window.location.href.indexOf("Test-termine.php") == -1 && window.location.href.indexOf("Lageplan.htm") == -1)
   {

//alert(window.location.href+"|"+window.location.hash)

   lang = "de";
   if (window.location.href.indexOf("-en") > -1 || window.location.href.indexOf("l=en") > -1) lang = "en"

   suche = suche + window.location.hash; //25.06.2007 vor Quelle anhängen verschoben!

   suche1 = suche //retten ohne Quelle

   if (quelle.length > 0) suche = suche+"&quelle="+quelle;
   if (window.location.href.substr(0,4) == "file")
      {
      if ("Suchen ,Kopf ,Index ,Titel ,Home ".indexOf(dabei) > -1)       //keine Inhalte fuer Lexikonspalten (lokal)
         top.location.href = "../index.html?-LL";
      else
         {
         if (lang == "en")
            top.location.href = "../index.html?-EE+../"+suche;
         else
            top.location.href = "../index.html?-LL+../"+suche; 
         }
      }
   else
      {
      if ("Suchen,Kopf,Index,Titel,Home,".indexOf(dabei+",") > -1)       //dgl. (Internet) //wichtig ist das an dabei angehängte Komma
         {
         top.location.href = "../?-LL";
         }
      else
         { 
         if (lang == "en")
            top.location.href = "../?-EE+../"+suche;
         else
            {
            if (suche1.indexOf("Sachsen") > -1)                           //25.03.2009 wegen Ordner Sachsen
               {
//alert("Umleitung in target ../Sachsen/index.html?-LL+../"+suche)
               top.location.href = "../Sachsen/index.html?-LL+../"+suche;
               }
            else
               top.location.href = "../?-LL+../"+suche;
            }
         }
      }
   }
//-------------------------

var anker = Umlaute(window.location.hash); //16.12.2004
//if (self.name == "spalte1" || self.name == "spalte2") document.write("<P class=s6b>"+anker)

if (anker == "") anker = "#top8";

var newbase="noch offen";

if (window.location.href.indexOf("Suchen") == -1 || window.location.href.indexOf("Hinweise-Suchen") > -1)
{

//document.write(self.name+"<br>")
//document.write(navigator.appVersion.indexOf("MSIE 6.0")+"|"+navigator.appVersion+"<br>")

switch(self.name)
   {
   case "kopf1":   document.write("<base target='spalte1'>"); break; //für Dresden-Lexikon
   case "kopf2":   document.write("<base target='spalte2'>"); break;

   case "spalte1": if (navigator.appVersion.indexOf("MSIE 6.0") == -1) //????
                      document.write("<base target='spalte2'>");
                   else
                      xxx = 1
                   break
   case "spalte2": if (navigator.appVersion.indexOf("MSIE 6.0") == -1) //????
                      document.write("<base target='spalte1'>");
                   else
                      xxx = 2
                   break
   case "iframe1": document.write("<base target='spalte1'>"); break; //23.07.2009
   case "iframe2": document.write("<base target='spalte2'>"); break; //23.07.2009

// case "text":    document.write("<base target='fotos'>");   break;
// case "fotos":   document.write("<base target='fotos'>");   break;
// case "foto":    document.write("<base target='foto'>");    break;
   default:        document.write("<base target='_self'>");   break;
   }
}

//if(self.name == "spalte1" || self.name == "spalte2") 
//if(self.name != "kopf1" && self.name != "kopf2" && self.name != "home" && self.name != "index" && self.name != "main")

//if(self.name == "main") alert(file)

//document.write(self.name+"|"+file+"<br>") //22.07.2010 TEST

if(file.substr(1,1) == "." && self.name != "main" && window.location.href.indexOf("Service/Meldung.php") == -1) //Kopf darf nur in spalte1 und spalte 2 aufgerufen werden!
  Kopf(); 

//if((self.name=="spalte1" || self.name=="spalte2") && dabei.length == 1) document.write("<p class=detail style='margin-left:5; '>Testinfo: "+fkz+"|"+dabei+"|</p>") //08.02.2010

//============================================================================== ab hier FUNKTIONEN =====================

function ZweiFrames(URL1,F1,URL2,F2)
{
F1=F1+1; F2=F2+1; //wegen später eingefügtem frame land=0, daher home=1, index=2, main=3 - übergeben wird aber 1 (für index) und 2 (für main)
top.frames[F1].location.href=URL1;
top.frames[F2].location.href=URL2;
}

//#######################################################################################################################

function Zeitdiff()
{
var zeit   = new Date();        //alert(zeit)
var a_time = zeit.getTime();    //alert(a_time)

diff = z_time - a_time
sec  = diff/1000
min  = sec / 60
h    = min / 60
tage = h / 24+"."

x    = tage.split(".")
tage = x[0]
h    = ("0."+x[1])*24+"."

x    = h.split(".")
h    = x[0]
min  = ("0."+x[1])*60+"."

x    = min.split(".")
min  = x[0]
sec  = ("0."+x[1])*60+"."

x    = sec.split(".")
sec  = x[0]
 
aktdiff = tage+" Tage, "+h+" Std. "+min+" Min. und "+sec+" Sek." 

document.all.diffzeit.innerHTML = aktdiff

window.setTimeout("Zeitdiff()",100)
}

//#######################################################################################################################

function festung()
{
PlanFenster = window.open("http://www.dresdner-verein-bruehlsche-terrasse.de/seiten/festungzei1555.htm", "600x440", "toolbar=no, status=no, scrollbars=no,location=no, menubar=no, directories=no, width=720, height=550")
PlanFenster.focus();
}

//#######################################################################################################################

function PanoFenster()
{
MeinFenster =open("http://www.panoflex.de/360grad/2000/yg5plrz.htm", "antwort", "width=500,height=400,left=600,top=200,dependent=yes,scrollbars=yes");
MeinFenster.focus();
}

//#######################################################################################################################

function KapellknabenFenster()  
{

MeinFenster3=open('http://www.kapellknaben.de/intro.html','Kathedrale','width=640,height=400,scrollbars=0');
MeinFenster3.focus();
}

//#######################################################################################################################

function KartenFenster(gname)
{

//alert(gname)

MeinFenster2=open("Lageplan.htm?"+gname,"antwort2","width=210,height=200,left=500,top=300,dependent=yes,marginwidth=0,marginheigth=0,scrollbars=no,menubar=no,status=no,toolbar=no,location=no");
MeinFenster2.focus();
}

//#######################################################################################################################

function GlockenFenster(glocke)
{
MeinFenster1=open("Glocken.htm?"+glocke,"antwort", "width=300,height=50,left=550,top=10,dependent=yes,marginwidth=0,marginheigth=0,scrollbars=no");
MeinFenster1.focus();
}

//#######################################################################################################################

function NeuFenster(suche) //auslaufend in Chronik.php/Chronik-x.htm, neu nur noch direkt Lexikon(suche)
{
Lexikon(suche)
}

//#######################################################################################################################

function Lexikon(suche)
{
//alert(suche);
//alert(lang);

//document.write(self.name+"|"+lang+"<br>") //02.09.2010 TEST ####################################################

if (suche.indexOf(".htm") == -1 && suche.indexOf(".ph") == -1)
   {
   switch (suche.substr(0,1))
      {
      case "X": zeich = "W"; break;
      case "Y": zeich = "W"; break;
      default:  zeich = suche.substr(0,1); break;
      }
   ziel = zeich+".htm#"+suche;
   }
else
   ziel = suche;

var name = ziel.substr(0,ziel.indexOf("."));

anker="#top";
s = ziel.indexOf("#");
if (s > -1)
   {
   anker = ziel.substr(s,60);
   ziel = ziel.substr(0,s);
   }

//switch(self.name) //02.09.2010 gestrichen
//   {
//   case "spalte1": s = parent.spalte2.window.location.href.indexOf("l=");
//                   lang = parent.spalte2.window.location.href.substr(s+2,2); break;
//   case "spalte2": s = parent.spalte1.window.location.href.indexOf("l="); 
//                   lang = parent.spalte1.window.location.href.substr(s+2,2); break; 
//   }

//zweisprachige Seiten
w = "Pl-Einleitung, Architektur, Ausflugsziele, Bahnhoefe, Brunnen, Denkmale, Dorfkerne, Einkaufen, Einkehren, Forschung, Friedhoefe, Herbstmarkt, Hochschulen, Kinder, Kirchen, Krankenhaeuser, Maerkte, Museen, Nachbarorte, Parkanlagen, Schloesser, Schoenster-Biergarten, Sehenswuerdigkeiten, Sportstaetten, Theater, Veranstaltungen, Verkehrswesen, ".indexOf(name+",");

//alert(lang+"|"+name+"|"+w+"|"+ziel+"|"+anker);

if (lang == "en")
   {
   if (w > -1)
      {
      if (ziel.indexOf("/") == -1)
         ziel = "../Lexikon/"+ziel

      if (ziel.indexOf("?") > -1)
         ziel = ziel+"&l=en"
      else
         ziel = ziel+"?l=en"
      }
   else
      {
      if (ziel.substr(1,1) == ".")
         ziel = "../Lexikon-en/"+ziel
      else
         ziel = "../Lexikon-en/Page.php?"+ziel
      }
   }
else
   {
   if (ziel.indexOf("/") == -1)
      ziel = "../Lexikon/"+ziel
   if (w > -1)
      {
      if (ziel.indexOf("?") > -1)
         ziel = ziel+"&l=de"
      else
         ziel = ziel+"?l=de"
      }
   }

ziel = ziel+anker; 

//document.write(self.name+"<br>") //02.09.2010 TEST ####################################################

switch(self.name)
   {
   case "spalte1": parent.spalte2.location.href = ziel; break;
   case "spalte2": parent.spalte1.location.href = ziel; break;
   }
}

//#######################################################################################################################

function Text(de,en)
{
if (lang == "en")
   document.write(en)
else
   document.write(de)
}

//#######################################################################################################################

function DeEn(de,en)
{
if (de+"" == "undefined") de = "..."
if (en+"" == "undefined") en = ""
text = de
if (lang == "en" && en.length > 0) text = en 
return text
}

//#######################################################################################################################

function Umlaute(text,variante)  //31.08.2011 neu für Bildung Datei- und Ankernamen
{
if (variante+"" == "undefined") variante = 1 //04.10.2011

text = Umlsond(text)              //z.B. &Auml nach Ä (s.u.)

//if (text.indexOf("%") > -1)       //Umwandlung wegen Netscape 7.0 //31.08.2011 prüfen ???
   text = Umlhexa(text)           //z.B. %C4 nach Ä (s.u.)

text = Umlohne(text)              //eigentliche Wandlung

if (variante == 2)                //Ordner und Anker ggf. getrennt wandeln! nach Prüfung 31.08.2011 vermutlich noch ungenutzt 
   text = text.replace(/\//g,"-") //Sinnvoll für Wandlung eines Ankers "Dresden/Heidenau" in "Dresden-Heidenau"
                                  //Ordner und Anker ggf. getrennt wandeln!
return text
}

//#######################################################################################################################

function Umlohne(text) //29.04.2009
{
text = text.replace(/\Ä/g,"Ae")
text = text.replace(/\Ö/g,"Oe")
text = text.replace(/\Ü/g,"Ue")
text = text.replace(/\ä/g,"ae")
text = text.replace(/\ö/g,"oe")
text = text.replace(/\ü/g,"ue") //ggf. Fehler im IE bei \ue ???
text = text.replace(/\ß/g,"ss")
text = text.replace(/\é/g,"e")
text = text.replace(/\ /g,"-")
return text
}

//#######################################################################################################################

function Umlsond(text) //29.04.2009
{
text = text.replace(/\&Auml;/g,"Ä")
text = text.replace(/\&Ouml;/g,"Ö")
text = text.replace(/\&Uuml;/g,"Ü")
text = text.replace(/\&auml;/g,"ä")
text = text.replace(/\&ouml;/g,"ö")
text = text.replace(/\&uuml;/g,"ü")
text = text.replace(/\&szlig;/g,"ß")
text = text.replace(/\&eacute;/g,"é")

text = text.replace(/\&#091;/g,"[")
text = text.replace(/\&#093;/g,"]")
return text
}

//#######################################################################################################################

function Umlhtml(text) //29.04.2009
{
text = text.replace(/\Ä/g,"&Auml;")
text = text.replace(/\Ö/g,"&Ouml;")
text = text.replace(/\Ü/g,"&Uuml;")
text = text.replace(/\ä/g,"&auml;")
text = text.replace(/\ö/g,"&ouml;")
text = text.replace(/\ü/g,"&uuml;")
text = text.replace(/\ß/g,"&szlig;")
text = text.replace(/\é/g,"&eacute;")
return text
}

//#######################################################################################################################

function Umlhexa(text) //15.02.2010 wegen FireFox, Chrome u.a.
{
text = text.replace(/\%C4/g,"Ä")
text = text.replace(/\%D6/g,"Ö")
text = text.replace(/\%DC/g,"Ü")
text = text.replace(/\%E4/g,"ä")
text = text.replace(/\%F6/g,"ö")
text = text.replace(/\%FC/g,"ü")
text = text.replace(/\%DF/g,"ß")
text = text.replace(/\%E9/g,"é")
text = text.replace(/\%20/g," ")

text = text.replace(/\%2C/g,",") //06.11.2010
text = text.replace(/\+/g," ")  //06.11.2010

return text
}

//#######################################################################################################################

function Umlback(text) //05.12.2010 R&uuml;ckwandlung der Umschreibung in normale Umlaute (20.09.2011 aus Navigation.htm)
{
text = text.replace(/Ae/g,"&Auml;")  // \Ae usw. geht auch
text = text.replace(/Oe/g,"&Ouml;")
text = text.replace(/Ue/g,"&Uuml;")
text = text.replace(/ae/g,"&auml;")
text = text.replace(/oe/g,"&ouml;")
if (text.indexOf("auen") < 0 && text.indexOf("quer") < 0) //09.10.2011 unbedingt lassen! //03.02.2012 wegen Plauen und Frauen... bzw. quer
text = text.replace(/ue/g,"&uuml;")  //aber nicht bei "Plauen"
text = text.replace(/ss/g,"&szlig;") // \ss oder \s\s geht nicht!!!
text = text.replace(/\-/g," ")

if (text == "Dürrröhrsdorf Dittersbach") text = "Dürrröhrsdorf-Dittersbach" //wegen Bindestrich
if (text == "Ottendorf Okrilla")         text = "Ottendorf-Okrilla"

//if (text.indexOf("Leubnitz") > -1) document.write("<p class=s6b>"+text+"</p>") //09.10.2011

if (text == "Leubnitz Neuostra")         text = "Leubnitz-Neuostra"

return text
}

//#######################################################################################################################

function Synonyme(wert,art) //ermittelt ggf. Synonymbegriff und stellt generell kompletten Seitennamen mit Artikel bereit !
{

//if (window.location.href.indexOf("Denkmale") > -1) alert(wert+" | "+art) //05.02.2012 TEST !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

if (wert.indexOf(".") > -1 && wert.indexOf("Ew./") == -1) return wert //04.02.2012

if (art+"" == "undefined") art = 1 //29.01.2012

//if (window.location.href.indexOf("Denkmale") > -1) document.write("<p class=s6b>"+wert+"|"+art)

//if(wert == "Area OA oS") alert (wert)
//alert (wert)

if (wert.substr(0,1) == "(") //02.10.2011 Abfrage, Klammern nur beseitigen, wenn gesamter Begriff in (...), z.B. div. Ortsteile
   {
   wert = wert.replace(/\(/g,"")
   wert = wert.replace(/\)/g,"")
   }
wert = wert.replace(/, Stadt/g,"")

teil = wert.split(" [")             //02.10.2011
wert = teil[0]                      //02.10.2011

//if (window.location.href.indexOf("Denkmale") > -1) document.write("<p class=s6r>"+wert)

for (jj = 0; jj < synonyme.length; jj++)
   {
   var feld = synonyme[jj].split(";")
    
//   if(wert.indexOf("Innenstadtplan") == -1) wert = Umlaute(wert) //02.03.2012 Abfrage

//if (window.location.href.indexOf("Denkmale") > -1) document.write("<p class=s6b>"+feld[0]+"|"+wert)
    
   if (Umlaute(feld[0].toLowerCase()) == Umlaute(wert.toLowerCase()))
      {
      if (art == 1)
         {
         if (feld[1].length > 0)
            wert = Umlaute(feld[1])   //nur sicherheitshalber, Feldinhalt sollte mit Umlautumschreibung sein! (ae, ue, ss, ...)
         else
            wert = Umlaute(feld[0])   //23.09.2011 

         if (wert.indexOf(".") == -1) wert = wert+".htm"
         }
          
      if (art == 2) //29.01.2012
         {
         wert = feld[0] //02.03.2012 Sprachvarianten
//if (window.location.href.indexOf("Denkmale") > -1) document.write("<p class=s6r>"+wert)
         if (feld[2].length > 0 && lang == "de") wert = feld[2]  
         if (feld[3].length > 0 && lang == "en") wert = feld[3]
//if (window.location.href.indexOf("Denkmale") > -1) document.write("<p class=s6b>"+wert)
         }
            
      return wert
      }
   }

// ------------------------------------------------------- // fuer nicht in synonyme.csv gefundene Begriffe:

if (art == 2) return wert //29.01.2012

if (wert.substr(0,3) == "---")                             // wichtig wegen Trennzeile mit Strichen in gebiete.csv 
   {
   wert = "leer.htm"
   return wert
   }
   
// ....................................................... // Anfangsbuchstaben gross schreiben (auch nach Bindestrich)

wort = wert.split("-"); wert = ""                          // wort[0] ist auch bei fehlendem Minus belegt, deshalb kein 2. Zweig!

for(i = 0; i < wort.length; i++) 
   wert = wert+"-"+wort[i].substr(0,1).toUpperCase()+wort[i].substr(1,30)
wert = wert.substr(1,100)                                  // Minuszeichen am Anfang entfernen

// ....................................................... // Linkbildung

abst = wert.substr(0,1)                                    // Anfangsbuchstabe bestimmt ABC-Seite
if (abst == "X" || abst == "Y") buchst = "W"               // X und Y sind nach W auf dessen Seite
wert = abst+".htm#"+wert
return wert
}

//#######################################################################################################################

function Statstadtteile(oa) //29.07.2010 oa = Ortsamtskürzel aus statistische-stadtteile.csv
{
oa = oa+""
if (oa.length == 0 || oa == "undefined") oa = ""

switch (oa.length)
   {
   case 0: document.write("<P class=l15>Das <b>Stadtgebiet</b> Dresden umfasst die Statistischen Stadtteile<P class=l15>"); break
   case 1: document.write("<P class=l15>Der <b>Ortsamtsbereich</b> umfasst die Statistischen Stadtteile<P class=l15>"); break
   case 2: document.write("<P class=l15>Der <b>Ortschaftsbereich</b> umfasst die Statistischen Stadtteile<P class=l15>"); break
   }

for (ii = 0; ii < statstadtteile.length; ii++)
   {
   feld = statstadtteile[ii].split(";")

   if ((oa.length > 0 && feld[2] == oa) || (oa.length == 0 && feld[2].length > 0))
      {
      Plan("S="+feld[0],feld[1])
      text = feld[0]+" "+feld[1]
//    if (oa.length > 0) text = "<b>"+text+"</b>" //01.08.2010 gestr.
      document.write(" "+text+"<br>")
      }
   }
}

//#######################################################################################################################

function Gebiete(oa) //27.07.2010 oa = Ortsamtskürzel aus gebiete.csv, überarbeitet 01.08.2010
{
if (oa+"" == "undefined") oa = ""

//document.write("<P class=l15>"+oa.length+"|"+oa+"|<br>")

switch (oa.length)
   {
   case 0: document.write("<P class=l15>Das <b>Stadtgebiet</b> von Dresden umfasst die Stadt- bzw. Ortsteile<P class=l15>"); break
   case 1: document.write("<P class=l15>Der <b>Ortsamtsbereich</b> umfasst die Stadtteile <span class=detail>(i.d.R. Gemarkungen </span>")
           document.write("<span class=s6b title='sonst Stadtteile innerhalb einer der Gemarkungen Altstadt I, Altstadt II oder Neustadt'>*)</span>")
           document.write("<P class=l15>"); break
   case 2: document.write("<P class=l15>Der <b>Ortschaftsbereich</b> umfasst die Ortsteile (Gemarkungen)<P class=l15>"); break
   }

for (ii = 0; ii < gebiete.length; ii++)
   {
   var wert = gebiete[ii].split(";")

   klammer = wert[0].substr(0,1)
   wert[0] = wert[0].replace(/\(/g,"") //29.07.2010
   wert[0] = wert[0].replace(/\)/g,"")

// wert[1] = Umlaute(wert[0]) //20.09.2011 gestrichen, da Folgezeilen wieder komplett auf wert[0] umgestellt

   sperrkz = 0; if (wert[4].indexOf("!") > -1) sperrkz = 1 //19.09.2011
   wert[4]  = wert[4].replace(/!/g,"")                     //19.09.2011

   if ((oa.length > 0 && wert[4].substr(0,2) == oa && klammer != "(") || (oa.length == 0 && wert[4].length > 0))
      {
      if (wert[2].substr(0,1) == "(") //Gemarkung in Klammern, dann Statistischer Stadtteil
         Plan("S="+wert[3])
      else
         Plan("G="+wert[2])
      document.write(" ")

      if (sperrkz == 0)
         Link(Umlaute(wert[0])+".htm?*","S")
      else
         {
         
//document.write(synonyme.length+"|"+wert[1]+"|<br>")

//         for (jj = 0; jj < synonyme.length; jj++) //20.09.2011 durch Synonyme() ersetzt
//             {
//             var feld = synonyme[jj].split(";")
//             if (Umlaute(feld[0]) == Umlaute(wert[0])) break //20.09.2011 variabel bzgl. Umlaute
//             }
//         synonym = feld[1]

         synonym = Synonyme(wert[0]) //20.09.2011, auch in Folgezeilen feld[1] durch synonym ersetzt
             
         if(synonym.indexOf(".") == -1) synonym = synonym+".htm"

         icon = "Z"
         if (synonym.indexOf("#") > -1) 
            {
            icon = "L"
            xxxx = synonym.split("#")      //16.03.2011
            synonym = xxxx[0]+"?*#"+xxxx[1] //16.03.2011
            }

         else
            synonym = synonym+"?*"         //16.03.2011            

         Link(synonym,icon)
         }

      if (oa.length == 0 && wert[2].substr(0,1) != "(") wert[0] = "<b>"+wert[0]+"</b>"
      document.write(" "+wert[0]) 

      if (wert[2].substr(0,1) == "(" && klammer != "(")
         document.write(" <span class=s6b title='keine Gemarkung, sondern Stadtteil innerhalb einer der innerstädtischen Gemarkungen Altstadt I, Altstadt II oder Neustadt'>*)</span>")

      if (wert[2].substr(0,1) == "(" && klammer == "(")
         document.write(" <span class=s6b title='keine Gemarkung, sondern historischer Ortsteil oder umgangssprachliche Bezeichnung innerhalb einer sonstigen Gemarkung sowie sonstige Bezeichnung'>**)</span>")

      document.write("<br>") 

      } 
   }
}

//#######################################################################################################################

function Go(suche) //Aufruf der Stadtteil-Tour in Gemarkungen.htm, Stadtteile.htm, Ortsaemter.htm //21.02.2010 v entfernt, nach entfernt
{
//var teil = suche.split(",") //02.09.2010zwei Zeile: Komma Stadt entfernen!
//suche = teil[0]
top.frames[3].location.href = "../Stadtteile/Main.htm?"+suche+"&l="+lang //generell main = top.frames[3].name neu laden, egal woher!  //+"&n="+nach
}

//#######################################################################################################################

function GoOrt(ort) //Ortsverzweigung in Vorbemerkungsseite Sachsen-Lexikon
{
//alert(ort)

ort_uml = Umlaute(ort) //hier in target.js, z.B. Ä in Ae

//alert(self.name+"|"+ort_uml)

if (self.name == "spalte1")
   parent.spalte2.location.href = "../Lexikon/"+ort_uml+".htm"
else
   parent.spalte1.location.href = "../Lexikon/"+ort_uml+".htm"

}

//#######################################################################################################################

function Gos(seite,lang) //ABC-Seiten spielen hier keine Rolle!
{
//alert(seite)

seitealt = seite //02.10.2011 TEST

if (seite == "nothing" || seite.substr(0,1) == "-" || seite.substr(0,1) == "[") return //02.10.2011

//seite = Umlaute(seite)
seite = Synonyme(seite) //24.09.2011

//alert(seitealt+" >> "+seite)

if (seite.indexOf(".htm") == -1 && seite.indexOf(".ph") == -1) //06.08.2005 .phtml und .php
   seite = seite+".htm";

teil = seite.split("#") //08.02.2009 evtl. Anker abtrennen

suche = teil[0]
anker = teil[1]

if(suche.indexOf("?") == -1) //Abfrage ab 01.06.2010
  suche = suche+"?*"         //+"?*" ab 27.03.2010

if (lang == "en" && suche.indexOf("/") == -1 && suche.substr(0,18) != "Innenstadtplan.htm") //1-spr. engl. ST- und Sonders.
   {

   if (suche.indexOf("ere") == -1) //hier alle vorh. (bzw. nicht vorh.) ausser: Innere Alt- und Neustadt, Aeussere Neustadt
      {
      if (self.name == "kopf1")
         parent.spalte1.location.href="../Lexikon/"+suche+"&l="+lang+"&e=0#"+anker //20.01.2011
      else
         parent.spalte2.location.href="../Lexikon/"+suche+"&l="+lang+"&e=0#"+anker //20.01.2011
      }
   else //hier: Innere Alt- und Neustadt, Aeussere Neustadt
      {
      if (self.name == "kopf1")
         parent.spalte1.location.href="../Lexikon-en/"+suche+"#"+anker //20.01.2011 Anker
      else
         parent.spalte2.location.href="../Lexikon-en/"+suche+"#"+anker //20.01.2011 Anker
      }

   }
else //deutsche Seiten Ordner Lexikon und 2-sprachige Seiten aller Ordner einschl. Innenstadtplan.htm
   {
   if (self.name == "kopf1" || self.name == "spalte2")
      parent.spalte1.location.href="../Lexikon/"+suche+"&l="+lang+"&e=0#"+anker //20.01.2011
   if (self.name == "kopf2" || self.name == "spalte1")
      parent.spalte2.location.href="../Lexikon/"+suche+"&l="+lang+"&e=0#"+anker //20.01.2011
   }
}

//#######################################################################################################################

function str_replace(quelle,ersatz,text) //durch Standardfunktion ersetzen !!!
{
//alert(ersatz+"+"+quelle+"+"+text)

if (ersatz == null || ersatz.length == 0) ersatz = ""

var p = text.indexOf(quelle); //alert(p)
while (p > -1)
   {
   text = text.substr(0,p)+ersatz+text.substr(p+quelle.length,text.length-p-quelle.length)
   p = text.indexOf(quelle)
   }
   return text
}


//#######################################################################################################################

// ggf. adressen[i] auf dresden[i] umstellen! ???

function AdrSuch(id,obj)
{

//if (window.location.href.indexOf("Rom") > -1) document.write("<p class=s6b>|"+id+"|") //TEST 26.09.2011
//id_save = id

id = Umlsond(id) //30.08.2011 Rückwandlung HTML-Umschreibung in echte Umlaute (wegen folgendem Suchvorgang)

id = id.replace(/\#/g,"",id)   //21.06.2010 //30.08.2011
id = id.replace(/\*/g,"",id)   //21.06.2010 //30.08.2011
id = id.replace(/\|/g," ",id)  //21.06.2010 //30.08.2011
id = id.replace(/\[/g,"",id)   //16.07.2009 //30.08.2011
id = id.replace(/\]/g,"",id)   //16.07.2009 //30.08.2011
id = id.replace(/\/\//g,"",id) //16.07.2009 //26.09.2011 //22.01.2012 gestr. //23.01.2012 doppelt

gg = 0
i  = 1
while (i < adressen.length && id.substr(0,2) != "01" && id.indexOf("R=") == -1 && gg == 0) //nur bei Objekt + keine Koordinaten
   {
   wert = adressen[i].split(";")
   suchfelder = wert[2]                        //13.02.2009 nur noch obj (Name des Objekts)
   
   suchfelder = suchfelder.replace(/\#/g,"")   //13.05.2009 //30.08.2011
   suchfelder = suchfelder.replace(/\*/g,"")   //26.06.2009 //30.08.2011
   suchfelder = suchfelder.replace(/\|/g," ")  //26.06.2009 //30.08.2011
   suchfelder = suchfelder.replace(/\[/g,"")   //26.06.2009 //30.08.2011
   suchfelder = suchfelder.replace(/\]/g,"")   //26.06.2009 //30.08.2011
   suchfelder = suchfelder.replace(/\/\//g,"") //26.09.2011 //22.01.2012 gestr. //23.01.2012 doppelt
   suchfelder = suchfelder.replace(/\~ /g,"")  //26.06.2009 //30.08.2011

   suchvar = 1
   if (wert[8].indexOf("x") > -1) suchvar = 2
   if (wert[8].indexOf("y") > -1) suchvar = 3 //Suchmethoden auf 3 Fälle am 28.06.2009 erweitert

   id_retten  = id                       //05.10.2009
   id         = id.toLowerCase()         //27.09.2009
   suchfelder = suchfelder.toLowerCase() //27.09.2009

   if ((suchfelder.indexOf(id) > -1 && suchvar == 1) || (suchfelder.substr(0,id.length) == id && suchvar == 2) || (suchfelder == id && suchvar == 3))
      {
      lnk    = wert[1]
      ob2    = wert[2]
      mail   = wert[6] //noch nicht mit E-Mail-Adresse belegt!

      if (wert[4].indexOf("R=") > -1) //19.01.2010 Unterfrage bei Variante über Koordinaten
         {
         if (wert[6].length > 0)
            adr = wert[5]+" "+wert[6]+", "+wert[4]
         else
            adr = wert[5]+" Dresden, "+wert[4] //hier nur Dresden 
         }
      else
         adr = wert[5]+" "+wert[4]

      if (adr.substr(0,1) == " ") adr = adr.substr(1,120) //14.01.2009/07.02.2009 bei leerer PLZ

      gg = 1;
      adrfile = 1 //in Adressdatei gefunden

      if(wert[0] == "*") gg = 0; else break //04.02.2011 //else 25.04.2011
      }
   id = id_retten //05.10.2009
   i = i+1;
   }

if (gg == 0)
   {
   lnk = id
   ob2 = id
   adr = id
   adrfile = 2 //in Adressdatei nicht gefunden
   }

ob2 = ob2.replace(/\[/g,"")   //30.08.2011
ob2 = ob2.replace(/\]/g,"")   //30.08.2011
ob2 = ob2.replace(/\#/g,"")   //30.08.2011
ob2 = ob2.replace(/\*/g,"\n") //30.08.2011
ob2 = ob2.replace(/\|/g," ")  //30.08.2011 //23.11.2011
ob2 = ob2.replace(/\//g,"")   //26.09.2011
ob2 = ob2.replace(/\~ /g,"")  //30.08.2011

//ob2 = ob2.replace(/Pie\./g,"Pieschen")  //30.08.2011 - letztlich wegen title in Plan() bis 15.09.2011
//ob2 = ob2.replace(/Klo\./g,"Klotzsche") //30.08.2011
//ob2 = ob2.replace(/Bla\./g,"Blasewitz") //30.08.2011

wert = ob2.split(":")
ob1  = wert[0] //nur Feldinhalt vor Doppelpunkt! (seltener Fall)

//if (window.location.href.indexOf("V.htm") > -1 && id_save == "Villa Sorgenfrei") document.write("<p class=s6b>|"+id+"|"+adr) //TEST 06.10.2011
//if (window.location.href.indexOf("L.htm") > -1 && id_save == "Landesbühnen")     document.write("<p class=s6b>|"+id+"|"+adr) //TEST 06.10.2011

return adr,lnk,ob1,ob2

}

//#######################################################################################################################

function Plan(id,obj,out,sch,gemeinde)
{
//if (window.location.href.indexOf("dd4kids") > -1) document.write("<p class=s6b>"+id+"|"+obj+"|"+out+"|")
//if (window.location.href.indexOf("News") > -1) document.write("<p class=s6b>"+id+"|"+obj+"|"+out+"|")
//if (window.location.href.indexOf("Rom") > -1) document.write("<p class=s6r>|"+id+"|") //TEST 26.09.2011

adressen = dresden //Testweise 07.04.2009, erneut ab 03.03.2011, für sachsen kommt Plan() ohnehin nicht infrage

if (id.indexOf("²") > -1)  //23.01.2012 falls "Nichtsuchen" in AdrSuch() direkt im id-Text gefordert
   {
   out = "x"
   id  = id.replace(/²/g,"")
   }

id = Umlsond(id) //26.09.2011

if (id +"" == "undefined") id  = "" //30.07.2010
if (obj+"" == "undefined") obj = ""
if (out+"" == "undefined") out = ""
if (sch+"" == "undefined") sch = ""

if (obj == "x") { obj = ""; out = "x" }

if (obj.length == 1 && "12gk".indexOf(obj) > -1) { sch = obj; obj = "" } //02.08.2011 //25.08.2011

if (sch == "1") sch = "" //02.03.2010 Varianten der Übergabe (künftig denkbar, überarbeiten!)
if (sch == "g") sch = ""
if (sch == "k") sch = "2" //Anm. 10.07.2010: aktuell im folgenden nur 2 oder leer!

if (id.substr(1,1) == "=" && out != "x1") out = "x" //14.01.2009 //10.07.2010 zweiter Teil

if (id == "TU") id = "Technische Universität" //20.08.2010

adrfile = 2

plz_dd = "010,011,012,013,014" //014 ab 12.02.2009 

//if (window.location.href.indexOf("Rom") > -1) document.write("<p class=s6>|"+id+"|"+id.substr(0,1)) //TEST 26.09.2011
//if (window.location.href.indexOf("V.htm") > -1 && id == "Villa Sorgenfrei") document.write("<p class=s6>|"+id+"|"+id.substr(0,1)) //TEST 06.10.2011

if ((id.substr(0,1) == "&" || id.substr(0,1) == "/" || id.substr(0,2) > "99" || id.substr(1,1) == "." || id.substr(2,1) == "." || id.substr(3,1) == ".") && id.indexOf("R=") == -1 && out.substr(0,1) != "x")  //01.06.2009 für alle PLZ-Bereiche bis 99 //16.02.2010 & wegen Umlauten am Anfang //25.04.2011 Punkt an Pos. 1
   {

//if (window.location.href.indexOf("Rom") > -1) document.write("<p class=s6r>|"+id+"|") //TEST 26.09.2011
//if (window.location.href.indexOf("V.htm") > -1 && id == "Villa Sorgenfrei") document.write("<p class=s6b>|"+id+"|"+obj) //TEST 06.10.2011
   
   if (adressen[0] == "n.v.")
      {
      adr = "\nAdressdatei momentan nicht verfügbar"
      ADRSUCHE= 0
      adrfile = 0 //nicht verfügbar
      }
   else
      {

      AdrSuch(id,obj) //adrfile wird mit 1=gefunden oder 2=nicht gefunden belegt! ********************************************************

      if(adrfile == 1 && obj == "") obj = ob2 //voller Datensatzinhalt als obj bei gefunden, wenn obj leer oder nicht angegeben

      if(obj == "-")   obj = ""  //kein Objekt anzeigen!
      if(obj == "+")   obj = id
      if(obj == "++")  obj = ob1
      if(obj == "+++") obj = ob2 //Standard
      }
   }
else
   {
   adrfile = 3
   adr = id
   }

//if (window.location.href.indexOf("News.htm") > -1)
//   document.write("<p class=s6b>"+adr+"|")        //TEST 22.01.2012
    
if (window.location.href.indexOf("dd4kids") > -1 && 1 == 2) //Zweig 15.01.2012 wegen UTF-8-Code bei www.dd4kids.de
   {
// document.write("<p class=s6b>"+adr+"|")        //TEST 15.01.2012 

// adr = Umlhtml(adr)
// obj = Umlhtml(obj)

   if ( 1 == 1)
   {
   adr = adr.replace(/ö/g,"&ouml;") //ö erster Umlaut wird für alle gewandelt, Grund ???
   adr = adr.replace(/Ä/g,"&Auml;") //Ä
   adr = adr.replace(/Ö/g,"&Ouml;") //Ö
   adr = adr.replace(/Ü/g,"&Uuml;") //Ü
   adr = adr.replace(/ä/g,"&auml;") //ä
   adr = adr.replace(/ö/g,"&ouml;") //ö
   adr = adr.replace(/ü/g,"&uuml;") //ü
   adr = adr.replace(/ß/g,"&szlig;") //ß
   adr = adr.replace(/é/g,"&eacute;") //é

   obj = obj.replace(/ä/g,"&auml;") //ä erster Umlaut wird für alle gewandelt, Grund ???
   obj = obj.replace(/Ä/g,"&Auml;") //Ä
   obj = obj.replace(/Ö/g,"&Ouml;") //Ö
   obj = obj.replace(/Ü/g,"&Uuml;") //Ü
   obj = obj.replace(/ä/g,"&auml;") //ä
   obj = obj.replace(/ö/g,"&ouml;") //ö
   obj = obj.replace(/ü/g,"&uuml;") //ü
   obj = obj.replace(/ß/g,"&szlig;") //ß
   obj = obj.replace(/é/g,"&eacute;") //é
   }
   
   if ( 1 == 2)
   {
   adr = str_replace("Ä","&Auml;",adr)
   adr = str_replace("Ö","&Ouml;",adr)
   adr = str_replace("Ü","&Uuml;",adr)
   adr = str_replace("ä","&auml;",adr)
   adr = str_replace("ö","&ouml;",adr)
   adr = str_replace("ü","&uuml;",adr)
   adr = str_replace("ß","&szlig;",adr)
   adr = str_replace("é","&eacute;",adr)

   obj = str_replace("Ä","&Auml;",obj)
   obj = str_replace("Ö","&Ouml;",obj)
   obj = str_replace("Ü","&Uuml;",obj)
   obj = str_replace("ä","&auml;",obj)
   obj = str_replace("ö","&ouml;",obj)
   obj = str_replace("ü","&uuml;",obj)
   obj = str_replace("ß","&szlig;",obj)
   obj = str_replace("é","&eacute;",obj)
   }
   
// document.write("<p class=s6b>"+adr+"|")        //TEST 15.01.2012 
   }

//if (window.location.href.indexOf("News.htm") > -1) document.write("<p class=s6b>"+adr+"|"+obj) //TEST 27.08.2011 
//if (window.location.href.indexOf("V.htm") > -1 && id == "Villa Sorgenfrei") document.write("<p class=s6r>|"+id+"|"+obj) //TEST 06.10.2011

if(out == "x1") adrfile = 1 //Anm. 10.07.2010: hier aus Funktion adressen() >>> generell Icon in grün

if(plz_dd.indexOf(adr.substr(0,3)) == -1 && adr.substr(0,2) >= "01" && adr.substr(0,2) <= "99" && adr.substr(1,4).indexOf(".") == -1 && adr.indexOf("R=") == -1) return 
//kein Plansymbol wenn keine Dresdner PLZ     und erste zwei Stellen zwischen 01 und 99  und kein Punkt enthalten       und nicht über Koordinaten 

//if (window.location.href.indexOf("V.htm") > -1 && id == "Villa Sorgenfrei") document.write("<p class=s6>|"+id+"|"+obj) //TEST 06.10.2011

switch(adrfile)
   {
   case 0: icon = "Mg"; break //rot  adressen[] n.V.
   case 1: icon = "Mf"; break //grün Objekt gefunden
   case 2: icon = "Mg"; break //rot  Objekt nicht gefunden
   case 3: icon = "Md"; break //gelb Objekt direkt aufgerufen //"T=" hat direkte Icon-Zuweisung "Ma"
   case 4: icon = "M";  break //über Adressen.php
   }

adr = adr.replace(/\%/g,"")       //30.08.2011 

obj = obj.replace(/\,\,/g,"")   //30.08.2011 //gilt alles nur für direkt angegebene Objekte, nicht für solche aus adressen.csv
obj = obj.replace(/\|\|/g,"\n") //30.08.2011
obj = obj.replace(/\|/g  ,"\n") //30.08.2011
obj = obj.replace(/\ \ /g," ")  //30.08.2011
obj = obj.replace(/\~ /g ,"")   //30.08.2011
//obj = obj.replace(/\//g  ,"")   //30.08.2011 auch für //22.01.2012 gestr.

obj = obj.replace(/\>/g  ,"")   //04.10.2011 auch für />

obj = obj.replace(/\[/g,"") //29.05.2011 //30.08.2011 hierher verschoben für alle folgenden Fälle
obj = obj.replace(/\]/g,"") //29.05.2011 //[ und ] können allerdings bei gefunden über AdrSuch() nicht mehr vorkommen!

// obj = obj +"ööö" //23.11.2011 TEST

//      obj = obj.replace(/\/\//g,"") //23.11.2011 ???
//      obj = obj.replace(/\|/g," ")  //23.11.2011 ???

target  = "stadtplan-dresden"
urheber = "\nDer Stadtplan wird von www.dresden.de bereitgestellt"

switch(id) //31.07.2010 besondere Kurzparameter wandeln
   {
   case "":  adr = "T=keins"; break
   case "0": adr = "T=ohne Thema"; break
   case "1": adr = "T=Gemarkungsgrenzen"; break
   case "2": adr = "T=Sta"; obj = "Grenzen der Statistischen Stadtteile"; break
   case "3": adr = "T=Ortsamts- und Ortschaftsgrenzen"; break
   }

//if (window.location.href.indexOf("V.htm") > -1 && id == "Villa Sorgenfrei") document.write("<p class=s6>|"+id+"|"+obj+"|"+adr) //TEST 06.10.2011
//if (window.location.href.indexOf("L.htm") > -1 && id == "Landesbühnen") document.write("<p class=s6>|"+id+"|"+obj+"|"+adr) //TEST 06.10.2011

//------------------------- Darstellung von (ganzen) voreingestellten Themen 04.08.2010

if (adr.indexOf("T=") > -1)
   {
   switch(adr.substr(2,3))
      {
      case "OEP": thema = "VA_OEPNV_STRABAHN|VA_OEPNV_BUS|VVO_HAST"; break
      case "Str": thema = "VA_OEPNV_STRABAHN";              break
      case "Bus": thema = "VA_OEPNV_BUS";                   break
      case "Spi": thema = "GA_SPIELPLATZ";                  break
      case "Gri": thema = "UW_LAGERFEUER_GRILL";            break
      case "PLZ": thema = "VA_PLZ";                         break
      case "Ort": thema = "VA_ORTSAMT";                     break
      case "Sta": thema = "VA_STADTTEIL";                   break
      case "Gem": thema = "VA_GEMARKUNG";                   break
      case "Zen": thema = "SPA_ZENTREN";                    break
      default:    thema = "";                               break //hier auch ohne bzw. kein Thema
      }

   if (obj+"" == "undefined") obj = ""          //06.08.2010
   if (obj.length == 0) obj = adr.substr(2,120) //06.08.2010, 01.09.2010

   title = "Zum Stadtplan\nvoreingestelltes Thema: "+obj+"\n"+urheber

   document.write("<a href='http://stadtplan.dresden.de?TH="+thema+"&POS-OFFSET=200&POS-MARK=TRUE&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");

   document.write("<img src='"+path+"/B/Ma"+sch+".gif' style='border-style:none;'></a>") //13.01.2012

   return
   }

//------------------------- Umrissdarstellung der Ortsämter bzw. Ortschaften

if (adr.indexOf("O=") > -1)
   {
   if (adr.substr(2,1) > "9")
      {
      obj_bez = Umlsond(adr.substr(2,30))

      for (i = 0; i < oa_os.length; i++)
          {
          wert = oa_os[i].split(";")
          if (wert[1] == obj_bez) { nr = wert[2]; break }
          }
      }
   else
      {
      p = adr.indexOf("O=") //13.09.2010
      nr = adr.substr(p+2,5)
      for (i = 0; i < oa_os.length; i++)
          {
          wert = oa_os[i].split(";")
          if (wert[2] == nr) { obj_bez = wert[1]; break }
          }
      }

   typ = ""
   if (obj.length == 0)
      {
      typ = "Ortsamt"; if (i > 9) typ = "Ortschaft"
      obj = obj_bez 
      }

   title = "Zum Stadtplanausschnitt\n"+typ+" "+obj+"\n"+urheber
   document.write("<a href='http://stadtplan.dresden.de/?POS-OBJ=VA_ORTSAMT|"+nr+"&POS-OFFSET=200&POS-MARK=TRUE&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");
   document.write("<img src='"+path+"/B/"+icon+sch+".gif' style='border-style:none;'></a>")
   return
   }

//------------------------- Umrissdarstellung der Statistischen Stadtteile //22.07.2010 auch derzeit nur über Stadtteil-Nummer

if (adr.indexOf("S=") > -1)     //ggf. mit TH=VA_GEMARKUNG&
   {
   if (adr.substr(2,1) > "9")
      {
      adr = Umlsond(adr)
      for (i = 0; i < statstadtteile.length; i++)
         {
         wert = statstadtteile[i].split(";")
         if (wert[1].indexOf(adr.substr(2,20)) > -1) { nr = wert[0]; break } 
         }
      }
   else //25.07.2010
      {
      p = adr.indexOf("S=") //13.09.2010
      nr = adr.substr(p+2,8)
      if (nr == "") return //02.09.2010 wegen Nachbarorte
      }

   if (obj.length == 0) //26.07.2010
      {
      for (var i = 0; i < statstadtteile.length; i++)
          {
          wert = statstadtteile[i].split(";")
          if (wert[0] == nr) { obj = wert[1]; break }
          }
      }

   if (adr.length > 4) { wert = obj.split("-"); obj = wert[0] } //27.07.2010
   obj = nr+" "+obj
   if(adr.indexOf(",") > -1)
      title = "Zum Stadtplanausschnitt\nStatistische Stadtteile "+obj+"\n"+urheber
   else
      title = "Zum Stadtplanausschnitt\nStatistischer Stadtteil "+obj+"\n"+urheber
   document.write("<a href='http://stadtplan.dresden.de/?POS-OBJ=VA_STADTTEIL|"+nr+"&POS-OFFSET=200&POS-MARK=TRUE&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");

   document.write("<img src='"+path+"/B/"+icon+sch+".gif' style='border-style:none;'></a>")
   return
   }

//------------------------- Umrissdarstellung der Gemarkungen 22.07.2010

if (adr.indexOf("G=") > -1)
   {
   if (adr.substr(2,1) > "9")
      {
      adr = Umlsond(adr) //26.07.2010 hierher auch verschoben (steht jetzt pro benötigtem Fall einzeln)
      for (i = 0; i < gebiete.length; i++)
         {
         wert = gebiete[i].split(";")
         if (wert[0] == adr.substr(2,20)) { nr = wert[2]; if (nr.length == 3) nr = "0"+nr; break } 
         }
      }
   else //25.07.2010
      {
      p = adr.indexOf("G=") //13.09.2010
      nr = adr.substr(p+2,4)
      for (i = 0; i < gebiete.length; i++)
         {
         wert = gebiete[i].split(";")
         if (wert[2] == nr)  { adr = "G="+wert[0]; break } 
         }
      }

   if(obj.length == 0) obj = adr.substr(2,60)

   title = "Zum Stadtplanausschnitt\nGemarkung "+obj+"\n"+urheber
   document.write("<a href='http://stadtplan.dresden.de/?POS-OBJ=VA_GEMARKUNG|"+nr+"&POS-OFFSET=200&POS-MARK=TRUE&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");
   document.write("<img src='"+path+"/B/"+icon+sch+".gif' style='border-style:none;'></a>")

   return
   }

//------------------------- Adresse über Koordinaten aus Adressdatei oder durch direkte Vorgabe (ab 18.01.2009)

if(adr.indexOf("R=") > -1)
   {
   p   = adr.indexOf("R=")
   xgk = adr.substr(p+2,7)
   ygk = adr.substr(p+12,7)

   er1 = er2 = ""                      //ff. obj mit Anmerkungen vor und nach Koordinaten aus adr belegen (aus adressen[])
   er1 = adr.substr(0,p-1)

   er2 = adr.substr(p+20,120)

   if (gemeinde+"" != "" && gemeinde+"" != "undefined" && adr.substr(0,2) >= "01" &&  adr.substr(0,2) <= "99") //20.01.2010
      er1 = adr.substr(0,5)+" "+gemeinde+", "+adr.substr(6,p-7) //19.01.2010 wegen Koordinaten bei Nachbargemeinden von Dresden

   if (er1.substr(er1.length-1,1) == " ") er1 = er1.substr(0,er1.length-1) //16.03.2010 Leerzeichen am Ende entfernen!
   if (er1.substr(er1.length-1,1) == ",") er1 = er1.substr(0,er1.length-1) //19.07.2010 Komma am Ende entfernen!

   if(er2.substr(0,1) == " ") er2 = er2.substr(1,120)
   er2 = er2.replace(/\(/g,"") //30.08.2011
   er2 = er2.replace(/\)/g,"") //30.08.2011

   if (er1.length > 0 && er2.length > 0)
      erg = er1+", "+er2
   else
      {
      erg = ""   
      if (er1.length > 0) erg = er1
      if (er2.length > 0) erg = er2
      }

   if (erg.length > 0)
      {
      if (obj.length > 0)
         obj = obj+"\n"+erg                  // "\n" statt ", "
      else
         obj = erg
      } 

// obj = str_replace("|","\n",obj) //02.08.2010 erneut, da obj neu aus adr (über erg) gebildet wurden sein kann
   obj = obj.replace(/\|/g,"\n") //30.08.2011, erneut, da obj neu aus adr (über erg) gebildet wurden sein kann
   
   if (1 == 1) //Stadtplan LHD (immer)
      {
      if (obj.length > 0) obj = obj+"\n"
      obj = obj.replace(/\[/g,"") //29.05.2011 //30.08.2011 siehe auch oben
      obj = obj.replace(/\]/g,"") //29.05.2011
      
      title = "zum Stadtplan\n"+obj+"Koordinaten "+adr.substr(p,19)+"\n"+urheber
      document.write("<a href='http://stadtplan.dresden.de/?POS-XY="+xgk+"|"+ygk+"&POS-OFFSET=500&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");
      }
   else      //Google Map (nur vorbereitet)
      {
      lp = ''; bp = ''; lw = ''; bw = ''
      rw = xgk
      hw = ygk
      gk2geo(rw,hw)
      pot2wgs(lp,bp)
      title = "zu Google Map\n"+obj+"\nWGS84-Koordinaten\n"+bw+"|"+lw
      if (obj.length == 0) obj = "ohne Benennung"
      document.write("<a href='http://maps.google.com/?hl=de&ie=UTF8&z=16&t=h&iwloc=B&q="+bw+","+lw+"+("+obj+")' target='_blank' title='"+title+"'>")
      }

   document.write("<img src='"+path+"/B/"+icon+sch+".gif' style='border-style:none;'></a>")
   return
   }

//------------------------- Adresse über Straße bzw. Straße und Haus-Nr.

if(adr.substr(0,3) == "014" && adr.substr(0,5) != "01462" && adr.substr(0,5) != "01465") return //PLZ=014 nur LB und CB //hier ab 29.09.2010

if (adr.substr(0,2) >= "01" && adr.substr(0,2) <= "99" && adr.substr(1,4).indexOf(".") == -1)    // Adresse in PLZ und Straße splitten
   {
   plz = adr.substr(0,5)+" "; //Hier Leerschritt direkt anhängen!
   if (adr.substr(5,1) == "+") //18.01.2010 bei zwei PLZ, z.B. bei Brücken
      {
      plz = adr.substr(0,11)+" "; //Hier Leerschritt direkt anhängen!
      str = adr.substr(12,120)    //120 ab 02.02.2010
      }
   else
      {
      plz = adr.substr(0,5)+" "; //Hier Leerschritt direkt anhängen!
      str = adr.substr(6,120)    //120 ab 02.02.2010
      }
   if (str.substr(0,1) == " ") str = str.substr(1,60);
   }
else
   {
   plz = ""
   str = adr
   }

while(str.substr(str.length-1,1) == " ") str = str.substr(0,str.length-1,1) //28.08.2007

str_ges = str.replace(/\|/g,"\n") //replace 24.03.2010

os_liste = new Array("(CB)","(SW)","(LB)","(SB)","(WX)","(OW)") //OS-Zusätze bei Straßennamen

var e = 0
i = 0
while (i < 6)
  {
  if(str.indexOf(os_liste[i]) > -1) e = 1 //Klammerzzusatz wie (CB) im folgenden nicht abtrennen!
  i++
  }

str_save=str //alert(str)

if (obj != "") obj = obj+"\n" 

p = str.indexOf("|")                   //Bemerkung nach | abtrennen, obj bleibt leer (Bemerkungen bleiben aber in title über str_ges erhalten)
if (p > -1) str = str.substr(0,p)

p = str.indexOf("/")                   //Bemerkung nach / abtrennen, obj bleibt leer (Bemerkungen bleiben aber in title über str_ges erhalten)
if (p > -1) str = str.substr(0,p)
p = str.indexOf(",")                   //Bemerkung nach , abtrennen, obj bleibt leer (Bemerkungen bleiben aber in title über str_ges erhalten)
if (p > -1) str = str.substr(0,p)
p = str.indexOf("(")                   //Bemerkung nach ( abtrennen, obj bleibt leer (Bemerkungen bleiben aber in title über str_ges erhalten)
if (p > -1 && e == 0) str = str.substr(0,p) //wegen OS-Zusatz wie (CB)

if (str.substr(str.length-1,1) == " ") //Leerschritt am Ende entfernen
   str = str.substr(0,str.length-1)

str_ges = str_ges.replace(/\|/g,"<br>") //06.08.2010

p  = str.lastIndexOf(" ")              //letztes Leerz. für evtl. Abtrennen der Haus-Nr.
if (p > -1)
   {
   if (str.substr(p+1,1) < "0" || str.substr(p+1,1) > "9") //ohne Haus-Nr. (nach Leerz.)
      {
      str = str
      hnr = ""
      }
   else                                                    // mit Haus-Nr. (nach Leerz.)
      {
      hnr = str.substr(p+1,4);
      str = str.substr(0,p)
      p = hnr.indexOf("-")
      if (p > -1) hnr = hnr.substr(0,p)
      p = hnr.indexOf("+")
      if (p > -1) hnr = hnr.substr(0,p)
      }
   }
else                                                       //ohne Haus-Nr. (ohne Leerz.)
   {
   str = str
   hnr = ""
   }

if (1!=2) //Stadtplan LHD
   {
   if (str.substr(str.length-3,3).toLowerCase() == "str")  str = str+"a&szlig;e" //15.01.2012 //16.01.2012 wegen UTF-8 bei dd4kids
   if (str.substr(str.length-4,4).toLowerCase() == "str.") str = str.substr(0,str.length-1)+"a&szlig;e" //15.01.2012 //16.01.2012 wegen UTF-8 bei dd4kids
   title = "zum Stadtplan\n"+obj+plz+"Dresden, "+str_ges+"\n"+urheber
   document.write("<a href='http://stadtplan.dresden.de/?STRASSE="+str+"&NR="+hnr+"&POS-OFFSET=500&BM=TOPSACHSEN_VECTOR' target='"+target+"' title='"+title+"'>");
   }
else      //Google Map
   {
   title = "zu Google Map\n"+obj+plz+"Dresden, "+str_ges; //Leerschritt nach (vorhandener) PLZ wird entfernt
   document.write("<a href='http://maps.google.com/?hl=de&ie=UTF8&z=16&t=h&iwloc=B&q="+plz.substr(0,5)+"+Dresden+"+str+" "+hnr+"' target='_blank' title='"+title+"'>")
   }

document.write("<img src='"+path+"/B/"+icon+sch+".gif' style='border-style:none;'></a>")

}

//#######################################################################################################################

function Kopf(titel,english,farbe)
{

titel = titel+""
english = english+""
farbe   = farbe+""
modi = ""

if (english.substr(0,1) == "#")
   farbe = english
else
   if (lang == "en" && (window.location.href.indexOf("Lexikon-en") == -1 || window.location.href.indexOf("Meldung.php") > -1) && english != "ST") titel = english

buch = Umlback(buch) //05.02.2012

zusatz = window.location.search.substr(1,120) //04.02.2012

if (buch == "Innenstadtplan")
   buch = buch+" "+zusatz.substr(0,4) //05.02.2012
 
if (buch+"" != "undefined" && buch.length > 0) titel = Synonyme(buch,2) //04.02.2012 - Ermittlung buch (blanker Dateiname mit Umlaute) siehe ganz oben!

//if (window.location.href.indexOf("Denkmale") > -1) alert(buch+" >> "+titel) //05.02.2012 TEST !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

if (buch == "Personen" && zusatz.indexOf("suche=wichtige") > -1) titel = "Wichtige "+titel //04.02.2012 dieser Block
if (buch == "Personen" && zusatz.indexOf("w=1")            > -1) titel = "Wichtige "+titel
if (buch == "Personen" && zusatz.indexOf("w=on")           > -1) titel = "Wichtige "+titel
if (lang == "en") titel = titel.replace(/Wichtige/g,"Important")

//if (window.location.href.indexOf("Religion") > -1) 
//   document.write("<p class=s6b>"+window.location.href)
// document.write("<p class=s6b>"+buch+"|"+buch.length+" >> "+titel) //04.02.2012 TEST
  
if ((titel == "undefined" & file.substr(1,1) == ".") || titel.length == 1)
   {
   if (titel.length == 1)
      zeich = titel
   else
      zeich = file.substr(0,1)

   if (lang == "en")
      {
      if (self.location.href.indexOf("Sachsen") > -1)
         titel = "Encyclopedia of Saxony ["+zeich+"]"
      else
         titel = "City Encyclopedia ["+zeich+"]"
      }
   else
      {
      if (self.location.href.indexOf("Sachsen") > -1)
         titel = "Sachsen-Lexikon ["+zeich+"]"
      else
         titel = "Stadt-Lexikon ["+zeich+"]"
      }
   }

if (titel == "undefined") titel = "<span class=s6r>Zeile ist der Behebung des IE-6-Problems geschuldet!</span>" //28.01.2008

titel = titel.replace(/\&\#/g,"***") //10.10.2010 Sonderzeichen von "class=detail" ausnehmen
titel = titel.replace(/##/g,"<span class=detail>")+"</span>"   //16.05.2011 zusätzlich doppeltes Doppelkreuz

if (titel.indexOf("#") > -1 && titel.indexOf("='#") == -1)     //16.05.2011 wegen Anker bei Link in Titeltext
   titel = titel.replace(/#/g,"<span class=detail>")+"</span>" //15.03.2010 vor Zusätzen in kleiner Schrift 

titel = titel.replace(/\*\*\*/g,"&#")

//bei rein englischen Seiten steht der Titel unter titel

if (english == "ST") modi = "ST" 

sax = 0; if(parent.location.href.indexOf("Sachsen") > 0) sax = 1
if(sax == 1) modi = "ohne" 

kopftext = titel; //alert(titel)
if (titel.substr(0,3) == "OS " && titel.length < 19) kopftext = "Ortschaft "+titel.substr(3,60); //19.08.2008 Leerschritt
if (titel.substr(0,3) == "OS " && titel.length > 18) kopftext = "<span class=detail>Ortschaft</span> "+titel.substr(3,60); //27.07.2009
if (titel.substr(0,3) == "OA " && titel.length < 19) kopftext = "Ortsamt "  +titel.substr(3,60);

//alert(titel+"|"+self.name+"|"+modi)              //alert("|"+titel+"|"+english+"|"+farbe+"|"+lang+"|"+modi+"|");

if (lang == "en" && exst == 0 && (english.length == 0 || english == "ST"))
   kopftext = kopftext+"<span class=s6r style='margin-left:15;'>Page exists only in German!</span>"

document.write("<table class=k style='width:100%;'>")
if (farbe+"" != "undefined" & farbe+"" != "") document.write("<tr bgcolor='"+farbe+"'>")
document.write("<td class=k style='height:25;'>"+kopftext+"</td>")

//....................................... nur für Stadtteilseiten: Stadtplanlinks und Moduswechsel, rechte Zelle: Symbole für Plan() und Wechsel

if (modi == "ST")
   {
   titel = str_replace("</span>","",titel) //19.03.2010 woher das </span> kommt, ist noch unklar !!!

// oname = titel //25.02.2010 Umspeicherung muss sein wegen titel in Bild()

   var gebiet = Umlsond(titel) //22.07.2010 //26.09.2011 //darf nicht lokal (var) sein wegen Übergabe (s.u.) an KartenFenster(gebiet)

   if (gebiet.indexOf("Hellerau") > -1)                gebiet = "Hellerau"       //26.07.2010
   if (gebiet.indexOf("Helfenberg") > -1)              gebiet = "Helfenberg"     //26.07.2010  
   if (gebiet.indexOf("Bühlau") > -1)                  gebiet = "Bühlau"         //25.09.2011  
   if (gebiet.indexOf("Unbewohnte Stadtgebiete") > -1) gebiet = "Dresdner Heide" //26.07.2010 

   oname = gebiet //unten zu übergebende Variable darf nicht lokal sein (also mit var () wie gebiet oder als Übergabeparameter wie titel, Grund ???)
      
   document.write("<td class=tkr style='vertical-align:middle; font-size:10px; border-style:none; padding-right:8;'>") 

   if (gebiet.substr(0,3) == "OA " || gebiet.substr(0,3) == "OS ")
      {
      document.write("<script>Plan('O="+gebiet.substr(3,30)+"')</script>&nbsp;") //22.07.2010
      }
   else
      {
      var nr1 = nr2 = "n.v." //Standardzuweisungen zur Sicherheit z.B. wegen Kötzschenbroda und Oberlößnitz, die nicht in gebiete()  stehen!
      for (i = 0; i < gebiete.length; i++) //25.07.2010 Block
         {
         wert = gebiete[i].split(";")

         wert[0] = wert[0].replace(/, Stadt/g,"") //24.09.2011

         if (wert[0] == gebiet) //24.09.2011 rückgängig (ohne Umlsond() )
            {
            nr1 = wert[2]; nr2 = wert[3]; break
            } 
         }
      zuerst = "Gkg"                                                  //Gemarkung (Standardannahme)
      if (nr1 == "") zuerst = "NO"                                    //24.09.2011 Nachbargemeinde
      if (nr1.substr(0,1) == "(") zuerst = "ST"                       //26.07.2010 Gemarkung in Klammer = Stadtteil zuerst darstellen

//document.write("<p class=s6b style='margin-left:15;'>"+nr1+"|"+nr2+"|"+zuerst)

      if (nr1.substr(0,1) == "(") nr1 = nr1.substr(1,4)               //nr1 Gemarkungs-Nr.
      if (nr1.length == 3)        nr1 = "0"+nr1
      if (nr2.length == 1)        nr2 = "0"+nr2                       //nr2 Stat. Stadtteil-Nr.
      if (nr2.substr(1,1) == ",") nr2 = "0"+nr2
      
      if (zuerst == "ST")                                             //26.07.2010 hier generell ohne Objektbezeichnung (wird in Plan() zugewiesen)
         {
         document.write(" <script>Plan('S="+nr2+"')</script>&nbsp;")  //25.07.2010 Plan() Stadtteile der Innenstadt
         document.write("(<script>Plan('G="+nr1+"')</script>)&nbsp;") //25.07.2010 Plan() Gemarkungen in Klammer
         }
      else
         {
         if (zuerst == "NO") //24.09.2011 Programm verbessert (Reihenfolge u.ä.)
            {

//document.write("<span class=s6r>"+titel+"|"+gebiet+"|"+oname+" </span>")
//document.write("<span class=s6r>"+title.length+"|"+gebiet.length+"|"+oname.length+" </span>")

//          document.write("<a href='javascript:KartenFenster(titel)' onmouseout='MeinFenster2.close()' title='Lageplan ") //titel Fehler??? 
//          document.write(gebiet+" öffnen\nwird bei Verlassen dieses Symbols durch den Mauszeiger automatisch wieder geschlossen'>")
//          document.write("<img src='"+path+"/B/M.gif'></a>&nbsp;")           //25.07.2010 Plan() Nachbarorte

//          document.write("<a href=javascript:KartenFenster('"+gebiet+"')' onmouseout='MeinFenster2.close()' title='Lageplan ") //oname und auch gname i.O.
//          document.write(gebiet+" öffnen\nwird bei Verlassen dieses Symbols durch den Mauszeiger automatisch wieder geschlossen'>")
//          document.write("<img src='"+path+"/B/M.gif'></a>&nbsp;")           //25.07.2010 Plan() Nachbarorte

            document.write("<a href=javascript:KartenFenster('"+oname+"') onmouseout='MeinFenster2.close()' title='Lageplan ") //gebiet Fehler??? 
            document.write(gebiet+" öffnen\nwird bei Verlassen dieses Symbols durch den Mauszeiger automatisch wieder geschlossen'>")
            document.write("<img src='"+path+"/B/M.gif'></a>&nbsp;")           //25.07.2010 Plan() Nachbarorte

            }
         else
            {
            document.write(" <script>Plan('G="+nr1+"')</script>&nbsp;")  //25.07.2010 Plan() Gemarkungen der Außengebiete
            document.write("(<script>Plan('S="+nr2+"')</script>)&nbsp;") //25.07.2010 Plan() Stadtteile in Klammer
            }
         }
      }
   document.write("</td>");   
   }

//else document.write("<td class=tk>"+buch+"</td>") //04.02.2012 TEST

 

document.write("</table>");

//alert("OK") //document.write("<p class=s6b>"+window.location.href+"</p>") //04.10.2011

}

//#######################################################################################################################

//function Fuss(bu1) wird über End() aufgerufen! siehe unten vor End()

//#######################################################################################################################

function Zitat(znr)
{

znr = znr+"" //02.08.2011, falls Anführungszeichen im Parameter vergessen sind!
//document.write("<span class=red>"+znr+"</span>")

if (znr.substr(0,1) < "0" || znr.substr(0,1) > "9") //02.08.2011, bisher nur Abfrage nach "W"
   {
   if (znr+"" == "W")  
      document.write("<a class=none href='http://de.wikipedia.org/wiki/' title='Quellenangabe: Wikipedia'>[W]</a>")
   else
      document.write("<span class=blue title='"+znr+"'>[*]</span>") //02.08.2011 //18.01.2012 Test sup statt span
   }
else
   {
   zitate[znr] = str_replace("|","\n",zitate[znr])
   document.write("<a class=none href='../Service/Zitat.htm?"+znr+"' title='Quellenangabe ["+znr+"]\n"+zitate[znr]+"'>")
   document.write("["+znr+"]</a>")
   }
}

//#######################################################################################################################

function Special(text,farbe,breite,border) //Funktion ist  Auslaufmodell
{
if (farbe/1 > 99 && farbe/1 < 371) breite = farbe
text = text+"<br>(Funktion Special() umstellen, da Auslaufmodell!)"
document.write("<p class=l15><table style='width:"+breite+"'><td style='border-style:solid; background-color:red;'>"+text+"</td></table>")
}

//#######################################################################################################################

function Tabelle(farbe,breite,border,htmtxt,ueberschrift) //vorrangig für Tabellen mit Zeilen über List()
{
if (border+"" != "undefined" && border.length > 1) { ueberschrift = border; border = 0 }

if (farbe+""   == "undefined") farbe  = "i" //wie Seitentabelle  //breite undefined in Breite(), s.u.
if (border+""  == "undefined") border = 0
if (htmtxt+""  == "undefined") htmtxt = 0 //20.12.2009

//alert(farbe+"|"+breite+"|"+border+"|")

Rahmen(farbe,breite,border,htmtxt,ueberschrift) //weiter wie Rahmen()
}

//#######################################################################################################################

function Rahmen(farbe,breite,border,htmtxt,ueberschrift) //vorrangig für HTML-Text im Außenrahmen
{

// farbe        Farbe über Tabellenklasse wie table class=s (Standard), i, h
// breite       Tabellenbreite (Standard 370), wenn nicht benötigt, kann hier auch Angabe für border stehen
// border       Tabellenrand bzw. Rahmen (Außenrahmen), 0 = ohne, 1 = mit Rahmen (hier kann ggf. auch die Überschrift stehen)
// htmtxt       1 = html-text im Außenrahmen (bei border = 0 keine Farbangabe möglich, d.h. Blindtabellenfarbe wie Hintergrund)
// ueberschrift Sonderüberschrift zur Tabelle (linksbündig, kann wie htmtxt entfallen)

if (farbe == "/") 
   {
   document.write("</table></td></tr></table>")
   return
   }

if (border+"" != "undefined" && border.length > 1) { ueberschrift = border; border = 1 }

vorschub = 1
if (ueberschrift+"" == "undefined") ueberschrift = ""
if (ueberschrift.length > 0)
   {
   document.write("<p class=detail>"+ueberschrift) //Ausgabe interne Überschrift
   vorschub = 0
   }
if(vorschub == 1) vorschub = "" //es wird der Vorschub aus table.class=s verwendet

//document.write("<p class=s6b>"+farbe) //29.08.2011

if (farbe+"" == "undefined")         farbe = "s" //wie Special
if (farbe == "")                     farbe = "x" //wie Seitenhintergrund, ohne Rahmen
if (farbe == " " || farbe == "|")    farbe = "j" //wie Seitenhintergrund, mit Rahmen

//document.write("<p class=s6r>"+farbe) //29.08.2011

if (border+""  == "undefined") border = 1; if(breite < 2) border = breite
if (htmtxt+""  == "undefined") htmtxt = 1 //20.12.2009

//document.write("<p class=s6b>"+farbe) //29.08.2011

iclass = ifarbe = farbe
if (farbe == "x") border = 0
if (border == 0)  farbe = "x" //kein Außenrahmen >> farbe = "x" >> tclass >> "x" bzw. farbe = "" (nächste Zeile)

tclass = "s"; if (farbe.length == 1) { tclass = farbe; farbe = "" }

tfarbe = farbe //16.01.2010

bstyle = "solid"; if(border == 0) bstyle = "none"

breite = Breite(breite)

//document.write("<br>"+farbe+"|"+breite+"|"+border+"|"+bstyle+"|"+tclass+"|"+htmtxt+"|"+vorschub)

//document.write("<HR style='height:10px; width:30px; text-align:left; color:red; margin:0 0 -10 15; '><P>") //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

//document.write("<p class=s6b>"+tclass+"|"+farbe+"|"+bstyle) //29.08.2011

if(border == 0 && ueberschrift.length == 0) document.write("<p class=l15>") //18.10.2009

//Sichtbare Außentabelle
document.write("<table class="+tclass+" style='margin-top:"+vorschub+"; background-color:"+farbe+"; border-style:"+bstyle+"; width:"+breite+"; '>") //29.08.2011
document.write("<tr><td class=h>") //einzige Zelle der Außentabelle mit unsichtbarer Innentabelle [darin z.B. List()-Zeilen], Zellen oder HTML-Text

//document.write("<span class=detail>&nbsp;<span class=red>"+tclass+"|"+tfarbe+"|"+iclass+"|"+ifarbe+"</span></span><br>") //TEST 16.01.2010
//document.write("<span class=detail>&nbsp;<span class=red>"+breite+"</span></span><br>") //TEST 16.01.2010

if (htmtxt == 0) //kein HTML-Text im Außenrahmen, Wiederholung Farbe im Innenrahmen!
   {
   document.write("<table class="+iclass+" style='background-color:"+ifarbe+"; margin:0; border-style:none; width:100%;'>") //wenn z.B. List()-Zeilen
   }
else
   {
   document.write("<table class=x style='border-style:none; width:100%;'><tr><td class=s>")  //wenn z.B. HTML-Text
   }
} 

//#######################################################################################################################

function Zeile(spalten,typ) //Tabellenzeilen - 17.11.2009 überarbeitet, spalten ist ein Array mit allen Spaltenwerten!
{
i = 0
document.write("<tr class="+typ+">")

while(i < spalten.length)
  {

//alert(spalten[i])

//if(i == 1) document.write("<p class=s6r>1 "+spalten[1]+"</p>") //29.03.2010

  rechts = 0
  if (typeof(spalten[i]) != "number") 
     {
     spalten[i] = spalten[i].replace(/\|/g,"<br>")+"" //22.03.2010

//if(i == 1) document.write("<p class=s6r>2 "+spalten[1]+"</p>")

     if (spalten[i].substr(0,1) == ">") 
        {
        rechts = 1
        spalten[i] = spalten[i].substr(1,100)
        }
     }

//if(i == 1) document.write("<p class=s6r>3 "+spalten[1]+"</p>")

  if(typeof(spalten[i]) == "number" || rechts == 1)
     document.write("<td class=tkr>"+spalten[i]+"</td>")
  else
     document.write("<td class=tk>"+spalten[i]+"</td>")
  i++;
  }
document.write("</tr>")
}

//#######################################################################################################################

function Breite(breite)
{
s = location.href.indexOf(".htm"); // für was?
z = location.href.substr(s-1,1);   // für was?
if(breite < 100 || breite+"" == "undefined") breite = 370; //Standard
return breite
}

//#######################################################################################################################

function Anzeige(id,rahmen,grafikname,grafiktext,grafiklink,button) //breite kann nicht angegeben werden! mit grafikname: title
{
if (fkz != "?-~")
{
var r=0
if (rahmen.substr(0,1) == "|") r=1
var grafiktext = ""+grafiktext
var grafiklink = ""+grafiklink

title_para = ""
p = grafikname.indexOf("' title='") //24.11.2008 künftig nur noch title verwenden!

if(p > -1)
  {
  title_para = grafikname.substr(p+9,300)
  if (title_para.length > 40) 
      title_para = str_replace(" - "," -\n",title_para) //29.09.2009
  grafikname = grafikname.substr(0,p)
  }

p = title_para.indexOf("|") //15.01.2010
title_para = str_replace("|","\n",title_para) //15.01.2010

switch(button)
{
case "li": document.write("<table style='margin:0;' align=left>"); break //21.12.2011
default:   document.write("<table style='margin:0;'>"); break //21.12.2011
}

if (rahmen.substr(1,1) != "-")
   {
   document.write("<tr><td class=anz style='padding:0; xxxborder-style:solid;'>")
   if (grafiktext.substr(0,1) == "-")
      {
      Text(grafiktext,grafiktext)
      grafiktext = "" //hier rücksetzen, damit Text nicht nochmals als "Bildunterschrift" erscheint (s.u.)
      }
   else
      Text("-Anzeige-","-Advertisement-")
   document.write("</td></tr>")
   }
else
   {
   if (window.location.href.indexOf("Titel.htm") > -1) //21.12.2011 Abfrage
      document.write("<tr><td style='padding:0 0 0 0;'></td></tr>") //21.12.2011
   else
      document.write("<tr><td style='padding:2 0 3 0;'></td></tr>") //06.09.2011 
   }
   
button = button+""; //alert(button.indexOf("b"))
if (button.indexOf("b") > -1)
   document.write("<tr><td class=x style='xxborder-style:none;'>")
else
   document.write("<tr><td class=x style='xxborder-style:none;padding-right:5;'>")

if (grafiklink.length > 0) //Link darstellen, falls vorhanden 
   {
   if (grafiklink.substr(0,4) == "www.") grafiklink = "http://"+grafiklink

   title = grafiklink.substr(7,300) //02.02.2011 diese und folgende Zeile hierher verschoben
   if (title_para.length > 0) title = title+"\n"+title_para //separat ab 10.07.2008

   zhp = "zur Homepage"; if (lang == "en") zhp = "to homepage"; if (window.location.href.indexOf("PL-") > -1) zhp = "na stronie internetowej"

   document.write("<a href='"+grafiklink+"' target='_blank' title='"+zhp+"\n"+title+"' ")
   document.write("onClick=top.leer.location.href='../scripte/addclick.php?id="+id+"'>")
   }

document.write("<img src='"+grafikname+"' border="+r+" style='border-color:black'>") //Grafik anzeigen

if (grafiklink.length > 0) document.write("</a>")

document.write("</td>")

if (grafiktext.length > 0)
   {
   if (button != "re") document.write("</tr><tr>")
   document.write("<td class=x style='vertical-align:bottom; '><span class=red>"+grafiktext+"</span></td>")
   }
   
document.write("</tr></table>")

if (button.indexOf("p") > -1) document.write("<P style='margin:5 0 0 0; '>") //22.01.2008 //09.02.2011
}
}

//#######################################################################################################################

function Dias(fnr,erst,text,marke,button) //ersetzt durch Show() in show.js
{


}

//#######################################################################################################################

function Weiter(name) //zu Dias, ersetzt durch Show() in show.js
{
//alert(ii+"|"+zz+"|"+bilder[ii]);

//texte[ii] = str_replace("|","<br>",texte[ii]) //17.05.2009

if (ii > zz) ii = 0;
name.src = bilder[ii].src; //alert(name.src);
document.all.Bildtext.innerHTML = texte[ii];
ii = ii + 1;
window.setTimeout("Weiter("+name1+")",5000);
}

//#######################################################################################################################

function Fotoschau(ort,auto,takt,startnr,fall) //ersetzt durch Show() in show.js
{
if (fall=="" || fall+"" == "undefined") fall = ":";
if (startnr=="" || startnr+"" == "undefined") startnr = "1";
document.write("<span class=red>Fotoimpressionen</span> ");
document.write("<A href='../Stadtteile/Fotoschau.htm?"+auto+takt+fall+ort+"-"+startnr+"' title='Fotoschau in anderer Spalte aufrufen'>");
document.write("<img src='../B/F.gif' style='border-style:none;' title=''></a>");
}

//#######################################################################################################################

function Buch(adr,titel,autor,breite,hgfarbe)
{
id = "ddb="+adr; //10.07.2008 einschl. onClick (s.u.)
breite = Breite(breite); //kann auch kleiner als 370 sein, z.B. in de Chronik!
keys  = titel+".";
keys  = keys.substr(0,keys.indexOf("."))
keys  = str_replace("</b>","",keys) //04.06.2008 wegen DDBUCH, obwohl dort HTML-Tags ebenfalls entfernt werden
keys  = str_replace(",","",keys)
keys  = str_replace(".","",keys)
keys  = str_replace("-"," ",keys)
keys  = str_replace("<br>"," ",keys)
keys  = str_replace("Pl&auml;ne","",keys)
keys  = str_replace("Stadtpl&auml;ne","Stadtplan",keys)
keys  = str_replace("  "," ",keys)

text  = "Buchtipp";
titel = str_replace("#","<span class=detail>",titel)
titel = str_replace("|","<br>",titel)
autor = str_replace("|","<br>",autor)

if (autor.indexOf(",") > -1) //06.06.2011
   {
   wert = autor.split(",")
   autor = "von "+wert[1]+" "+wert[0]
   }

//document.write(adr+"<br>")

if (adr.length <  5)
   {
   if (adr == "none") 
      {
      adr = "http://www.ddbuch.de";
      title = "Liefermöglichkeit erfragen bei\nDRESDEN BUCH - \nSpezialbuchhandlung für Dresden-Literatur";
      }
   else
      {
      adr = "www.ddbuch.de/katalog/product_info.php?info=p"+adr;
      title = "zur Beschreibung und Onlinebestellung bei\nDRESDEN BUCH - \nSpezialbuchhandlung für Dresden-Literatur";
      }
   }

if (adr.length == 10) 
   {
   adr = "www.amazon.de/exec/obidos/ASIN/"+adr+"/dresdenlexiko-21";
   title = "zur Beschreibung und Onlinebestellung bei AMAZON.de"
   }

//if ((adr.length > 11)
   {
//   adr = "www.ddbuch.de/katalog/advanced_search_result.php?keywords="+keys;
//   title = "zur Beschreibung und Onlinebestellung bei DDBUCH.de - Spezialbuchhandlung für Dresden-Literatur";
   }

if (adr.substr(0, 3) == "www") adr = "http://" + adr;

// (adr.substr(7,13) == "www.amazon.de") title = "zu Amazon.de";

//document.write("<P class=l15>"); //06.08.2010 muss wegen Opera und Google-Chrome stehen //02.09.2010 gestrichen
document.write("<TABLE class=a width="+breite+"><TR><TD class=a>");  //23.03.2010 bei sondertafel.css text-indent:0 wegen Rundgang.htm bei Google Chrome
document.write("<A HREF='"+adr+"' target=_blank><img src='../B/A.gif' style='border-style:none;' title='"+title+"' onClick=top.leer.location.href='../scripte/addclick.php?id="+id+"'></A>&nbsp;");

if (lang == "en") 
   {
   text = "recommendation for related literature";
   if(autor.substr(0,4) == "von ") autor = "from"+autor.substr(3,100);
   if(autor.substr(0,8) == "<br>von ") autor = "<br>by"+autor.substr(7,100);
   }
document.write("<B>"+text+"</B><BR><b>"+titel+"</b>. "+autor+"</TD></TR></TABLE>");
}

//#######################################################################################################################

function Spec(grafik,adr,text,znr,title,ziel,breite)
{
breite = Breite(breite) //vor allem für rechtsbündige Überschrift wie -Anzeige-

vorschub = 1;
if (grafik.length > 2 || (grafik.length == 2 && "AW".indexOf(grafik.substr(1,1)) > -1)) //grafik enthält ggf. zusätzlich Überschrift
   {
   links = vorschub = 0
   p = grafik.indexOf("-"); if(p == -1) p = links = grafik.indexOf("=") //z.B. "H=Zusatztext", nur "Zusatztext" wird links ausgegeben

   switch(grafik.substr(1,60))                                          //z.B. "H Zusatztext",   "H Zusatztext" wird ausgegeben
      {
      case "A": anztxt = "Anzeige"; p = 1; break
      case "W": anztxt = "Werbung"; p = 1; break
      default:  anztxt = grafik.substr(p+1,60); break
      }

   grafik = grafik.substr(0,p)
   if (links < 1)
     document.write("<table class=x width="+breite+"><td class=anz>-"+anztxt+"-</td></table>") //rechtsbündig bei links = 0 und links = -1
   else
     document.write("<table class=x width="+breite+"><td class=anz style=text-align:left; >"+anztxt+"</td></table>")   //linksbündig  bei links = 1
   }

//alert(breite+"|"+vorschub); 

List(breite,vorschub) //Tabelleneröffnung immer mit class=s in List()
List(grafik,adr,text,znr,title,ziel)
List("/")
}

//#######################################################################################################################

function List(grafik,adr,text,znr,title,ziel) //List() NEU direkt ohne Spec() 
{
if (grafik+"" == "undefined")         grafik = "~"
if (grafik == "~")                    breite = 370
if (grafik >= 100 && grafik <= 800) { breite = Breite(grafik); grafik = "~" }

switch (grafik+"")
   {
   case "~":  vorschub = adr
              ueberschrift = text
              if (vorschub     +"" == "undefined") vorschub = 1
              if (ueberschrift +"" == "undefined") ueberschrift = ""

//document.write("<HR style='height:10px; width:30px; text-align:left; color:lawngreen; margin:0 0 -10 15; '><P>") //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

              if (vorschub.length > 2)
                 {
                 vorschub  = 0
                 ueberschrift = adr
                 }
              if (ueberschrift.length > 1)
                 document.write("<p class=detail>"+ueberschrift) //hier interne Überschrift 19.10.2009
              if(vorschub == 1) vorschub = "" //es wird der Vorschub aus table.class=s verwendet
//document.write("|"+vorschub+"|")

//breite = breite+1 //29.08.2010 nur für Chrome

              document.write("<table class=s width="+breite+" style='margin-top:"+vorschub+"'><tr><td class=h><table class=x>"); break
   case "":   document.write("<tr><td class=s colspan=2>"+text); break
   case "/":  document.write("</table></td></tr></table>"); break

   default:   document.write("<tr><td class=s style='padding:0 2 0 4; width:15;'>") //1. Zelle

              if (adr +"" == "undefined") adr = ""
              if (adr.substr(0,3) == "www")     adr = "http://"+adr
              if (adr.substr(0,7) == "http://") web = adr.substr(7,60); else web = adr
              if (znr +"" == "undefined") znr  = ""                       //Zitatnummer, wohl auch tclass bei Bedarf
              if (ziel+"" == "undefined") ziel = ""

              artikel = Artikelname(adr)

              switch (grafik)
                 {
                 case " ": document.write(" "); break
                 case "-": document.write("—"); break
                 default: 
                    
//               document.write("<a href='"+adr+"' target='"+ziel+"'><img src='../B/"+grafik+"' style='border-style:none;' title='"+title+"'></a>"); break
       
                 if (grafik.substr(0,1) == "H" || adr.substr(0,7) == "http://" || adr.substr(0,4) == "www.")
                    {
                    Home(adr,title,grafik,ziel) //11.11.2009 auf Home() umgestellt! //Länge title muss mind. 4 sein, sonst als grafik gewertet
                    }
                 else
                    {
//                    if (grafik.substr(0,1) == "M")
//                       Plan(adr,grafik) 
//                    else
                       Link(adr,title,grafik,ziel) //11.11.2009 auf Link() umgestellt!
                    }
                 }
              document.write("</td>")

              if (text.indexOf("||") > -1) //09.02.2010 ganzer Block
                 {
                 twert = text.split("||");
                 text = twert[0]; if(lang == "en") text = twert[1]
                 }

              text = text.replace(/\#/g,"<span class=detail>")   //04.06.2011
              text = text.replace(/\*/g,"<span class=red>")      //04.06.2011
//              text = text.replace(/\|/g,"<P class=t5>")          //10.01.2012 TEST  style:'margin:5 0 0 0;'
              text = text.replace(/\|/g,"<br>")                  //04.06.2011
              text = text.replace(/\/\//g,"<i>")                 //04.06.2011
              text = text.replace(/\/\>/g,"</i>")                //04.06.2011
              
              document.write("<td class=s style='padding:0 2 0 2; width:100%;'>"+text) //2. Zelle

              if (znr.length > 0) { document.write(" "); Zitat(znr) } //02.04.2011
                    
              document.write("</td></tr>")
   }
}

//#######################################################################################################################

function Mail(link,title,grafik,ziel,obj)
{
if (title+"" == "undefined") title = "";
if (title.length < 3) grafik = title;

if (grafik == "" || grafik+"" == "undefined") grafik = "EM" //05.07.2011 EM statt E.gif
if (grafik.indexOf(".") == -1) grafik = grafik +".gif"

if(link.indexOf("@") == -1 && link.indexOf("[at]") == -1)
  {
  adrfile = 1
  AdrSuch(link,obj) //siehe oben
//mail kann in AdrSuch noch nicht bereitgestellt werden, da es noch nicht im array_adr.js (bzw. .php) vorhanden ist!!!
  }
else
  mail = link.replace(/\mailto:/g,"")

if (title == "" || title.length == 1) title = "Mit E-Mail-Programm an "+mail+" schreiben" 
document.write("<a href='mailto:"+mail+"' target='"+ziel+"'>")
document.write("<img class=icon src='../B/"+grafik+"' style='border-style:none;' title='"+title+"'></a>")
}

//#######################################################################################################################

function Home(link,obj,grafik,ziel,title) //19.02.2009 Parameter obj und title (bisher alt) getauscht
{ 

//if(link.indexOf("www.das-neue-dresden.de") > -1) document.write("<p class=s6r>"+obj)

adressen = dresden //TEST 01.09.2009 //18.10.2010 gestr. //erneut ab 03.03.2011

if(obj+""    == "undefined") obj    = ""
if(grafik+"" == "undefined") grafik = ""
if(ziel+""   == "undefined") ziel   = ""
if(title+""  == "undefined") title  = ""

if(obj.length > 0 && obj.length < 4 && obj.substr(0,1) != "+") { grafik = obj; obj = "" } //01.09.2008 <3 //08.12.2008 <4 //01.09.2009

//alert(grafik+"|1")

if(link.substr(0,7) == "http://" || link.substr(0,3) == "www")
  {
  adrfile = 0
  if(link.substr(0,7) == "http://")
    www = link.substr(7,240)
  else
    www = link
  }
else
  {
  adrfile = 1

  AdrSuch(link,obj) //siehe oben vor Plan()

  if(adrfile == 1 && obj == "") obj = ob2 //04.09.2009 neuer Standard: voller Datensatzinhalt als obj bei gefunden, wenn obj leer oder nicht angegeben

  if(obj == "-")   obj = ""  //04.09.2009
  if(obj == "+")   obj = link
  if(obj == "++")  obj = ob1
  if(obj == "+++") obj = ob2 //Standard
 
  if(lnk.substr(0,7) == "http://")
    www = lnk.substr(7,120)
  else
    www = lnk
  }

if(obj.length > 0) obj = obj+"\n"

link = "http://"+www

//alert(grafik+"|2")


obj = obj.replace(/\/\//g,"") //23.11.2011
obj = obj.replace(/\|/g," ")  //23.11.2011 ???


if (www.substr(www.length-1,1) == "/") www = www.substr(0,www.length-1)
if (ziel   == "") ziel   = "_blank"
if (title  == "") title  = "zur Homepage\n"+obj+www //12.05.2011 replace
if (grafik == "") { if (adrfile == 1) grafik = "Hf.gif"; else grafik = "H.gif" }
if (grafik.indexOf(".") == -1) grafik = grafik +".gif"

//alert(grafik+"|3")

if(link.indexOf("www.das-neue-dresden.de") > -1) //16.03.2011 überarbeitet, jetzt auch für kleine das-neue-dresden-Icons

   {
   if (grafik == "Hfk.gif") grafik = "Hrk.gif"; else grafik = "Hr.gif"
   title  = "Zum betreffenden Artikel in &quot;Das Neue Dresden&quot;\nwww.das-neue-dresden.de"
   }

document.write("<a href='"+link+"' target='"+ziel+"'>")
document.write("<img src='../B/"+grafik+"' title='"+title+"' style='border-style:none;'></a>")

}

//#######################################################################################################################

function Link(link,title,grafik,ziel)
{
//alert(link+"|"+title+"|"+grafik+"|"+ziel);

link = link.replace(/\'/g,'"') //05.05.2011
artikel = Artikelname(link) //05.05.2011 nach neuer Zeile verschoben

wert = link.split("=") //28.09.2007 wegen title == "T", geht aber noch für alle ohne Fehlermeldung
if (title == "T") var gebiet = wert[1].substr(0,1).toUpperCase()+wert[1].substr(1,30); //30.01.2008

if(title+"" == "undefined") title = ""

if (grafik+"" == "" || grafik+"" == "undefined")
   if (title.length+"" > 0 && title.length+"" < 3) {grafik = title; title = ""} else grafik = "L" 

if (title == "")
   {
   switch(grafik)
      {
      case "A":  title = "zur Anmerkung "+artikel; break
      case "B":  title = "zum Bild / zur Grafik"; break
      case "Ch": title = "Termine anzeigen"; break
      case "E":  title = "E-Mail schreiben"; break
      case "F0": title = "Hilfe in anderer Spalte"; break
      case "H":  title = "zur Homepage\n"+link; if (ziel == "") ziel = "_blank"; break //kommt nur bei Link() direkt vor
      case "Hk": title = "zur Homepage\n"+link; if (ziel == "") ziel = "_blank"; break //kommt nur bei Link() direkt vor
      case "Hx": title = "zur Homepage\n"+link; if (ziel == "") ziel = "_blank"; break //kommt nur bei Link() direkt vor
      case "K":  title = "zum Kommentar "+artikel; break
      case "L":  title = "zum Artikel "+artikel+" im Stadt-Lexikon"; break
      case "Lk": title = "zum Artikel "+artikel+" im Stadt-Lexikon"; break
      case "Ls": title = "Sound wiedergeben"; break
      case "M":  title = "Karte(n) anzeigen"; break //kommt nur bei Link() direkt vor
      case "Mg": title = "Karte(n) anzeigen"; break //kommt nur bei Link() direkt vor
      case "Mk": title = "Karte(n) anzeigen"; break //kommt nur bei Link() direkt vor
      case "Mr": title = "Karte(n) anzeigen"; break //kommt nur bei Link() direkt vor
      case "Mx": title = "Karte(n) anzeigen"; break //kommt nur bei Link() direkt vor
      case "O":  title = "nach oben zum Seitenanfang"; break
      case "P":  title = "zur Personendatenbank"; break
      case "Pn": xxx   = info; break
      case "Px": xxx   = info; break
      case "Q":  title = "zur Detailansicht"; break
      case "Qm": title = "zur Detailansicht"; break //mit email-Adresse
      case "R":  title = "zur Doppelseite "+artikel+" in der Stadtteil-Tour"; break
      case "S":  title = "zur Sondertafel "+artikel+" im Stadt-Lexikon"; break
      case "Sk": title = "zur Sondertafel "+artikel+" im Stadt-Lexikon";  break
      case "St": title = "zur Auswahlliste Stadtteile"; break
      case "T":  title = "zum Datenblatt Gewerbegebiet "+gebiet; break
      case "Tr": title = "zu den ÖPNV-Plänen"; break
      case "U":  title = "nach unten zum Abschnitt"; break
      case "Vi": title = "Videoplayer anzeigen"; break
      case "Z":  title = "zur Sondertafel "+artikel+" im Stadt-Lexikon"; break
      case "m":  title = "zum Gastbeitrag"; grafik = "S"; ziel = "main"; break
      default:   title = "zum Artikel "+artikel+" im Stadt-Lexikon"; break
      }
   }

if (grafik == "" || grafik+""  == "undefined") grafik = "L.gif"
if (grafik.indexOf(".") == -1) grafik = grafik +".gif"
if (ziel == "" || ziel+""  == "undefined") ziel = "";
if (ziel == "self") ziel = "_self" //14.02.2010

document.write("<a href='"+link+"' target='"+ziel+"'>")
document.write("<img src='"+path+"/B/"+grafik+"' title='"+title+"' style='border-style:none;'></a>") //13.01.2012
}

//#######################################################################################################################

function Artikelname(link) //ermittelt Artikelbezeichung "Artikel" aus Artikeladresse "A.htm#Artikel" bzw. "Artikel.htm#Marke"
{

artikel = link

if (artikel.indexOf('("') > -1) //05.05.2011 Hochkomata getauscht
   artikel = artikel.substr(artikel.indexOf('("')+2,60) //falls über js-Funktion Lexikon()
if (artikel.indexOf('")') > -1) //05.05.2011 Hochkomata getauscht
   artikel = artikel.substr(0,artikel.indexOf('")')) 

if (artikel.indexOf("/") > -1) 
   {
   p = artikel.lastIndexOf("/")
   file = artikel.substr(p+1,100)
   }
else
   file = artikel

wert = file.split(".")
file = wert[0]               //entweder Main oder Dateiname in Lexikon, Zahlen usw. ohne Typ
len  = file.length

wert = artikel.split("#")

if (self.name == "main")     //aus Frame main z.B. aus Titel.htm
   {
   artikel = wert[0]         //d.h. vor #
   wert = artikel.split("?")
   artikel = wert[1]
   wert = artikel.split(".")
   artikel = wert[0]
   }
else
   {
   if (len == 1)
      artikel = wert[1]      //d.h. nach #
   else
      artikel = file
   }

if (artikel.indexOf("?") > -1) //Zweig 13.06.2008
   {
   p = artikel.indexOf("?")
   artikel = link.substr(p+1,100)
   }

if (artikel.indexOf("&") > -1)
   artikel = artikel.substr(0,artikel.indexOf("&"))

artikel = Umlback(artikel) //20.09.2011

return artikel
}

//#######################################################################################################################

function Person(id,grafik,title) //20.02.2009 von infos[] auf personen[] umgestellt
{

if (grafik+"" == "undefined" || grafik.length == 0)  grafik = "Pn";
//grafik2 = "Pr" //04.06.2010, auch unten auf Variable umgestellt //grafik2 konstant ab 17.10.2010 //ab 05.07.2011 in rot, s.u. als Standard

UL = new Array("&Auml;","&Ouml;","&Uuml;","&auml;","&ouml;","&uuml;","&szlig;","&eacute;");
SZ = new Array("Ä","Ö","Ü","ä","ö","ü","ß","é");

n=0;
while (n < 9) //Umlaute wie $auml; konvertieren
  {
  while (id.indexOf(UL[n]) > -1)
    {
    p  = id.indexOf(UL[n]);
    id = id.substr(0,p)+SZ[n]+id.substr(p+UL[n].length,60);
    }
  n = n +1;
  }

if (title+"" != "undefined" && title.length > 0) //05.07.2011
   {
   document.write("<img src='../B/"+grafik+"' title='"+title+"'>")
   return
   }

i = 0; g = 0; title = "kein Datensatz vorhanden, auch \nkeine lokal eingetragenen Lebensdaten";

while (g == 0 && i < personen.length)
   {

   feld = personen[i].split(";")
   vn_name = feld[0]+" "+feld[1]+" "+feld[2]

   if (vn_name.indexOf(id) > -1) //übergebene id im Datensatz des arrays personen[] gefunden!   
      {
      feld[14] = "."+feld[14]
      feld[15] = "."+feld[15]

      geb  = feld[14].substr(feld[14].lastIndexOf(".")+1,4)
      gest = feld[15].substr(feld[15].lastIndexOf(".")+1,4); //alert(geb+"-"+gest)
      geb  = str_replace(" ","",geb)
      gest = str_replace(" ","",gest)

      if (geb.substr(0,1) == "?" || geb.length == 0)
         {
         if (gest.length == 0 || gest == "!")       //kein Geburtjahr und kein Sterbejahr (auch lebende Person) 
            gebgest = ""
         else                                       //nur Sterbejahr   
            gebgest = "?-"+gest
         }
      else
         {
         switch(gest)
            {
            case "!": gebgest = geb+" geb.";  break //nur Geburtjahr für lebende Person
            case "" : gebgest = geb+"-"+"?";  break //nur Geburtjahr für verstorbene Person
            default:  gebgest = geb+"-"+gest; break //Geburtjahr und Sterbejahr 
            }
         }

      if (gebgest != "") gebgest= " ("+gebgest+")"
      title = feld[1]+" "+feld[2]+gebgest+": "+feld[5]+" "+feld[4] //feld[4] 06.04.2009 //18.10.2010 feld[3] entfernt

      if (feld[3].length > 0) title = feld[3]+" "+title //18.10.2010

      g = 1; break;
      }
   i = i +1;
   }

if (g == 1) 
   Link("../Zahlen/Personendetail.php?id="+id+"&login=1",title,grafik); //17.03.2010 login=1
else 
   document.write("<img src='../B/Pr' title='"+title+"'>")
// Link("../Zahlen/Personen.php?s=N35",title,grafik2); //17.03.2010 Personeliste.php
}

//#######################################################################################################################

function UL()
{
if(navigator.appName == "Netscape")
   document.write("<ul class=nc>")
else
   document.write("<ul>")
}

//#######################################################################################################################

function P(fnr,aus)
{
if(aus+"" == "undefined")  
   aus = "<P class=l15>"; //Standard f&uuml;r Bild aus

//alert(fnr+"|"+fkz+"|"+fkz.length+"|"+aus);

if (fkz.indexOf(fnr) > -1 || (fkz.length == 0 && fnr < "2"))
   aus = "<P class=ba>";  //Bild an
document.write(aus); //alert("|"+fnr+"|"+aus.substr(1,10)");
}

//#######################################################################################################################

function Bild(fnr,grafikname,grafiktext,marke,button,link) //unter link kann eine Linkadresse oder eine Zitat-Nr. stehen
{
//alert(fnr+"|"+grafikname+"|"+grafiktext+"|"+marke+"|"+button+"||"+fkz+"|"+anker);
//if(window.location.href.indexOf("Adressen.php") > -1) alert("|"+fkz+"|"+fnr+"|");

s = grafiktext.indexOf("||") //2 Striche seit 23.03.2007 für Trennung de/en
if (s > -1)
   {
   if (lang == "en")
      grafiktext = grafiktext.substr(s+2,100) //23.03.2007
   else
      grafiktext = grafiktext.substr(0,s)
   }

var link   = ""+link //23.02.2011
if (link.substr(0,7) == "http://") link = link.substr(7,60) //04.07.2011

var marke  = ""+marke
var button = ""+button

if (button.substr(0,9) == "undefined") button = "re" //27.03.2010 "re"  statt "te" 
if (button == "x") button = "rex"                    //27.03.2010 "rex" statt "tex"

var kzbeg  = button.substr(0,1); if (kzbeg == "a") kzbeg = "v"

if (button.indexOf("b") > -1) //egal wo "b" steht
   var breite = "b";

if ((button.indexOf("b") > -1 || button.indexOf("S") > -1) && button.indexOf("c") == -1)
   if (grafiktext.substr(0,1) != "|" && grafiktext.substr(0,4) != "<br>" && grafikname.length > 1) grafiktext = "<br>"+grafiktext; //04.01.2011

if ("almnsvtz".indexOf(kzbeg) > -1 && grafiktext.substr(0,1) != "|" && grafiktext.substr(0,4) != "<br>"  && grafikname.length > 1 && button.indexOf("c") == -1)
   grafiktext = "<br>"+grafiktext; //15.01.2010

zeilen = 1
if (kzbeg == "m") zeilen = 2
if (kzbeg == "n") zeilen = 3
if (kzbeg == "v") zeilen = 2 //31.05.2011
if(button.substr(1,1) > 1 && button.substr(1,1) < 9) zeilen = button.substr(1,1) //15.01.2010 dieser Block

//if (window.location.href.indexOf("1-TEST.htm") > -1) //TEST 14.09.2011
//   document.write("<span class=s6b>"+kzbeg+"|"+zeilen+"|</span>")

buttons = (button+"--").split("-")

abstand = ""
if (buttons[1].length > 0) abstand = buttons[1]
if (buttons[2].length > 0) abstand = abstand+","+buttons[2]; 

abstand = abstand.replace(/\i/g,"v") //06.04.2011, kann später wieder entfallen, wenn alle i und j in Bild()-Aufrufen entfallen sind
abstand = abstand.replace(/\j/g,"h")

abstand = abstand.replace(/ /g,",") //08.04.2011
button  = buttons[0]

if (button.indexOf("e") > -1) 
   var kzend  = "e";

//-------------------------------------------------------- Standardzuweisungen für alle Abstände (Vorschübe)

var ptv = 5                                                                               //p.. (oben) und l.. (links) können angegeben werden!
var ltv = 15; if (buch.length == 1) ltv = 0 //if (window.location.href.indexOf("/Vorschau/") > -1)  ltv = 0
var rtv = 8;  if (buch.length == 1) rtv = 3 //+5 aus padding in lexikon.css               //rtv kann nicht angegeben werden! nur hier änderbar!

if (window.location.href.indexOf("Ausflugsziele") > -1)  ltv = 0 //18.01.2012 weil hier Bilder wie bei ABC-Seiten in Tabelle sind >> kein linker Rand!

var pzv = 0
var lzv = 0;  if (kzbeg == "S") lzv = 25; if (kzbeg == "s") lzv = 10; if (grafikname.substr(0,1) == "u") lzv = 0
var rzv = 5;  if (kzbeg == "S" || grafikname.substr(0,1) == "u" || breite == "b") rzv = 0 //rzv kann angegeben werden!

var pzh = 0
var lzh = 0;  if (kzbeg == "v") lzh = 10 
var rzh = 0                                                                                //rzh kann nicht angegeben werden! ist unten konstant

var pth = 0
var lth = 15; if (buch.length == 1) lth = 0
var rth = 0                                                                                //rth kann nicht angegeben werden! ist unten konstant

var bzw = 10; var bzh = 0; var bzc = ""

var vorsch_tv = vorsch_th = vorsch_zv = vorsch_zh = 0 //05.04.2011 neue Variablennamen: Vorschub vor/nach Tabelle, Vorschub in Zelle vor/nach Text

var randzelle = 0 //31.05.2011

//if (window.location.href.indexOf("/Vorschau/") > -1) document.write("<p class=s6r>"+"|"+buch+"|"+buch.length+"|"+ltv+"|</span>")  

//-------------------------------------------------------- Werte für Vorschub vor Tabelle

if ("lmnvtrbu".indexOf(kzbeg) > -1) var vorsch_tv = 1     //17.04.2011 bei Tabelleneröffnung immer!

if (abstand.indexOf("t") > -1)
   {
   var vorsch_tv = 1
   s = abstand.indexOf("t")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",").split(",")     
      ptv  = wert[0]/1
      if (wert[1].length > 0 && "0123456789".indexOf(wert[1].substr(0,1)) > -1) ltv  = wert[1]/1
      }
   }

//if (window.location.href.indexOf("1.htm") > -1)
//   document.write("<span class=s6b>"+ptv+"|"+ltv+"|</span>")
   
//-------------------------------------------------------- für Vorschub vor Bild bzw. Text in Zelle

if (button.indexOf("s") > -1) var vorsch_zv = 1 //Standardzuweisung für Zellen mit s in button (i.d.R. Folgezellen)

if (abstand.indexOf("v") > -1)
   {
   var vorsch_zv = 1  
   s = abstand.indexOf("v")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",,").split(",")
      pzv  = wert[0]/1
      if (wert[1].length > 0 && "0123456789".indexOf(wert[1].substr(0,1)) > -1) lzv  = wert[1]/1
      if (wert[2].length > 0 && "0123456789".indexOf(wert[2].substr(0,1)) > -1) rzv  = wert[2]/1 //18.04.2011
      }
   }
else
   vorsch_zv = 1 //18.04.2011 Vorschub derzeit immer realisieren! 

//if (window.location.href.indexOf("1.htm") > -1)
//   document.write("<span class=s6b>|"+"|"+pzv+","+lzv+","+rzv+"|</span>")  

//-------------------------------------------------------- für rechten Rand nach Bild bzw. Text in Zelle, aber vorher analog v angegeben //18.04.2011

if (abstand.indexOf("r") > -1)
   {
   vorsch_zv = 1   
   s = abstand.indexOf("r")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",").split(",")
      rzv  = wert[0]/1
      }
    }

//if (window.location.href.indexOf("1.htm") > -1 && (abstand.indexOf("r") > -1 || abstand.indexOf("v") > -1))
//   document.write("<span class=s6b>|"+rzv+"|</span>")  

//-------------------------------------------------------- für Vorschub nach Bild bzw. Text in Zelle, bei kzbeg = v wirkt es vor (!) folgendem Fließtext!

if (abstand.indexOf("h") > -1)
   {
   var vorsch_zh = 1
   s = abstand.indexOf("h")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",").split(",")
      pzh  = wert[0]/1
      if (wert[1].length > 0 && "0123456789".indexOf(wert[1].substr(0,1)) > -1) lzh  = wert[1]/1
      }
   }

//-------------------------------------------------------- für Vorschub nach Tabelle bei kzend = e, in anderen Zellen wie Variante h

if (abstand.indexOf("p") > -1)
   {
   var vorsch_th = 1
   s = abstand.indexOf("p")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",").split(",")
      pth  = wert[0]/1
      if (wert[1].length > 0 && "0123456789".indexOf(wert[1].substr(0,1)) > -1) lth  = wert[1]/1
      }
   }

//-------------------------------------------------------- Breite und Höhe für Randzelle (Blindzelle)

if (abstand.indexOf("c") > -1 || button.indexOf("c") > -1)
   {
   var randzelle = 1
   s = abstand.indexOf("c")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,13)+",,").split(",")
      bzw  = wert[0]/1
      bzh  = wert[1]/1
      if (wert[2].length > 0) bzc  = wert[2]
      }

//if (window.location.href.indexOf("Kleinpestitz.htm") > -1)
//   document.write("<span class=s6b>|"+wert[0]/1+"|"+wert[1]/1+"|"+wert[2]+"|</span>")  

   }

 
//-------------------------------------------------------- Breite und Höhe für Randzelle (Blindbild ---> 31.05.2011 ebenfalls Blindzelle)

if (abstand.indexOf("d") > -1 || button.indexOf("d") > -1)
   {
   var randzelle = 1
   s = abstand.indexOf("d")
   if ("0123456789".indexOf(abstand.substr(s+1,1)) > -1 && abstand.substr(s+1,1).length > 0)
      {
      wert = (abstand.substr(s+1,10)+",").split(",")
      bzw  = wert[0]/1
      bzh  = wert[1]/1
      }
  
//if (window.location.href.indexOf("1.htm") > -1)
//   document.write("<span class=s6b>|"+bzw+"|"+bzh+"|</span>")  
   
   }
 
 //--------------------------------------------------------
   
//if (window.location.href.indexOf("1.htm") > -1)
//   document.write("<span class=s6b>"+ptv+","+ltv+"|"+pzv+","+lzv+","+vorsch_zv+"|"+pzh+","+lzh+"|"+pth+","+lth+"|</span>")  

//--------------------------------------------------------

if (marke == "undefined") var marke = Umlaute(grafiktext)

marke = "#"+marke
shows = "#ABCDEF"

if (fkz.indexOf("*") > -1)
   fkz = "0123456789AGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz|!" // §$%&=|

if (fnr == "!" || fnr == "|" || window.location.href.indexOf("Doku/Bilder.htm") > -1)
   var r = "solid"
else
   var r = "none"

//if (window.location.href.indexOf("1.htm") > -1)
//   document.write("<span class=s6b>"+r)

if (marke.toLowerCase() == anker.toLowerCase() && fkz.indexOf("-") == -1) //Bild des Artikels laut Marke 08.02.2010
   {
// document.write("<br>"+fkz+"|"+fnr+"<br>")
   if (fkz.indexOf(fnr) == -1) fkz = fkz+fnr
   }

var s = fkz.indexOf(fnr)

//################################################################################# Tabellen- bzw. Zelleneröffnung bei Bild eingeschaltet

if (s >= 0 || (fnr == "!" && shows.indexOf(fkz.substr(1,1)) < 1)) // || (marke.toLowerCase() == anker.toLowerCase() && fkz.indexOf("-") == -1))
   {
   if (s >= 0)
      fkn = fkz.substr(0,s)+fkz.substring(s+1,fkz.length)+"-"
   else
      fkn = "?-"

//--- ===Vorschub=== vor Tabelle (top und links) 

if (vorsch_tv == 1)
   document.write("<p style='margin:"+ptv+" "+rtv+" 0 "+ltv+";text-indent:0;'>") //17.04.2011, prüfen ob Vorschub immer darstellen

//--- Tabellen- bzw. Zelleneröffnung

   if (kzbeg == "l")
      document.write("<table class=f align=left><tr>") //06.04.2011 kurzeitig mit <p>, stört aber bei Bild mitten im Fließtext, ggf. in button regeln!
   if (kzbeg == "m" || kzbeg == "n")
      document.write("<table class=f><tr>           <!td class=x style='vertical-align:top;' rowspan="+zeilen+">") //26.07.2011 td nach unten in Gruppe
   if (kzbeg == "v")
      document.write("<table class=f><tr>           <!td class=x style='vertical-align:top;' rowspan="+zeilen+">") //31.05.2011 zeilen variabel
   if (kzbeg == "t" || kzbeg == "r" || kzbeg == "b")
      document.write("<table class=f xxxstyle='border-style:solid;'><tr>")
   if (kzbeg == "u")
      document.write("<table class=f><tr>") //Bildunterschrift rechts in gleicher Zelle
   if (kzbeg == "h")
      document.write("</td></tr><tr>")
   if (kzbeg == "s" || kzbeg == "S")
      document.write("</td>")
   if (kzbeg == "w")
      document.write("</td></tr><tr>")
   if (kzbeg == "z")
      document.write("</td></tr><tr>")
   if (kzbeg == "e")
    { document.write("<span class=s6r>"+grafiktext+"</span></td></tr></table>"); return } //Ende Tab. ohne Ein/Aus und mit kleiner Schrift, für was?

   if ("#bhlmnrsStuvwz".indexOf(kzbeg) > 0) //26.07.2011 mit den Fällen m und v (bessere Einbindung grafikname == "u")
      {
      valign  = "top"; if (grafikname.substr(0,1) == "u" || breite == "b") valign = "bottom" //19.04.2011
      spalten = 1; if (grafikname == "u") spalten = 2  //19.04.2011

      if (grafiktext.substr(0,2) == "##") //03.05.2011
         document.write("<td class=x colspan="+spalten+" rowspan="+zeilen+" style='vertical-align:"+valign+";padding:0 0 3 0;line-height:8px;'>")
      else
         document.write("<td class=x colspan="+spalten+" rowspan="+zeilen+" style='vertical-align:"+valign+";xxxborder-style:solid;'>") //19.04.2011 var. Anz. spalten/zeilen
      }            

//--- Bildunterschrift (= Grafiktext) aufbereiten, u.a. Anmerkungsnummer für häufig vorkommende Quellen (teilweiss mit Link) sowie Steuerzeichen

   gmkg = gmkg.toLowerCase(); 
   if (gmkg.substr(0,3) == "os-") gmkg = gmkg.substr(3,30);

   if (button.substr(2,3).indexOf("1") > -1) //08.02.2011
      grafiktext = grafiktext+" ["+DeEn("Sammlung","Collection")+": Rohland <a href='http://www.rohlands.com/hobby/index.html' target='_blank' title='zur Homepage\nwww.rohlands.com'><img src='../B/Hk.gif'></a>]";
  
   if (button.substr(2,3).indexOf("2") > -1) //08.02.2011
      grafiktext = grafiktext+" ["+DeEn("Quelle","Source")+": fotos-aus-der-luft.de <a href='http://www.fotos-aus-der-luft.de' target='_blank' title='zur Homepage\nwww.fotos-aus-der-luft.de'><img src='../B/Hk.gif'></a>]" //08.02.2011

   if (button.substr(2,3).indexOf("3") > -1) //23.02.2011
      grafiktext = grafiktext+" ["+DeEn("Skizze","Sketch")+": Kai Tempel <a href='http://www.kai-tempel.de' target='_blank' title='zur Homepage\nwww.kai-tempel.de'><img src='../B/Hk.gif'></a>]"

   if (button.substr(2,3).indexOf("4") > -1) //27.02.2011
      grafiktext = grafiktext+" ["+DeEn("Sammlung","Collection")+": A.D. <a href='http://www.altes-dresden.de' target='_blank' title='zur Homepage\nwww.altes-dresden.de'><img src='../B/Hk.gif'></a>]"

   if (button.substr(2,3).indexOf("5") > -1) //27.02.2011
      grafiktext = grafiktext+" ["+DeEn("Foto","Photo")+": Sandig]"
   
   if (button.substr(2,3).indexOf("6") > -1) //31.03.2011 Das Neue Dresden
      grafiktext = grafiktext+" ["+DeEn("Quelle","Source")+": Das Neue Dresden <a href='http://www.das-neue-dresden.de' target='_blank' title='zur Homepage\nwww.das-neue-dresden.de'><img src='../B/Hk.gif'></a>]"
      
   if (button.substr(2,3).indexOf("7") > -1) //10.04.2011 SLUB/Deutsche Fotothek
      grafiktext = grafiktext+" ["+DeEn("Foto","Photo")+": SLUB/DF <a href='http://www.slub-dresden.de/sammlungen/deutsche-fotothek' target='_blank' title='zur Homepage\nwww.slub-dresden.de/sammlungen/deutsche-fotothek'><img src='../B/Hk.gif'></a>]"
      
   grafikwert = grafiktext.split("[") //26.03.2011 dieser Block
   grafiktext = grafikwert[0]
   grafikfoto = grafikwert[1]

   if (grafikfoto+"" == "undefined") grafikfoto = ""

   br = "" //falls keine der folgenden Varianten
   if (grafiktext.substr(grafiktext.length-1,1) == " ")
      {
      grafiktext = grafiktext.substr(0,grafiktext.length-1) 
      br = " "
      }
   if (grafiktext.substr(grafiktext.length-1,1) == "|")
      {
      grafiktext = grafiktext.substr(0,grafiktext.length-1) 
      br = "<p style='text-indent:0;margin:1 "+rzv+" 3 "+lzv+";'>"
      }
   if (grafiktext.substr(grafiktext.length-4,4) == "<br>")  //02.04.2011 //04.05.2011
      {
      grafiktext = grafiktext.substr(0,grafiktext.length-4) 
      br = "<p style='text-indent:0;margin:1 "+rzv+" 3 "+lzv+";'>"        //04.05.2011
      }

//if (window.location.href.indexOf("1.htm") > -1) //################################################### TEST 03.05.2011
//   document.write("<span class=s6b>"+grafiktext)

   grafikfoto = grafikfoto.replace(/\|/g,"<br>") //04.04.2011
   
   grafiktext = grafiktext.replace(/\##\|/g,"<p class=detail style='color:red;margin:1 "+rzv+" 3 "+lzv+";line-height:8px;'>") //03.05.2011 red wichtig! //04.05.2011
   grafiktext = grafiktext.replace(/\|/g,"<br>")
   grafiktext = grafiktext.replace(/\_/g,"&nbsp;")
   grafiktext = grafiktext.replace(/\*/g,"<span class=red>") //rot ohnehin Standard
   grafiktext = grafiktext.replace(/\/\//g,"<i>")  //04.06.2011
   grafiktext = grafiktext.replace(/\/\>/g,"</i>") //04.06.2011
   
   grafiktext = grafiktext.replace(/\##/g,"<span class=detail style='line-height:10px;'>") //03.05.2011 line-height:8px //16.09.2011 10px

//--- ===Vorschub=== in Zelle vor (!) Text //18.04.2011 vorsch_zv immer 1 (s.o.), also Vorschub immer ausführen (bis 03.05.2011)

   if (vorsch_zv == 1)
      document.write("<p style='margin:"+pzv+" "+rzv+" 0 "+lzv+";text-indent:0;'>") //14.-18.04.2011 
     
//--- Ausgabe Text (Fälle tuvxz) oder Grafik (Fall default)

   switch(grafikname.substr(0,1))
      {
      case "t": document.write("<span class=red>"  +grafiktext+"</span>"); break //06.04.2011 angepasst an folgende Fälle (pv drüber bei auslaufend)
      case "u": document.write("<span class=red>"  +grafiktext+"</span>"); break //bottom, kein l10 (s.o.), alle folgenden top
      case "v": document.write("<span class=red>"  +grafiktext+"</span>"); break //17.06.2008 für Video, derzeit wie u, aber top und l10
      case "x": document.write("<span class=blue> "+grafiktext+"</span>"); break //03.04.2011 li10
      case "z": document.write("<span class=black>"+grafiktext+"</span>"); break //18.08.2009 ebenfalls Vorschub top 5
                                                                                          //************************************************************
      default: document.write("<img src='"+grafikname+"' style='border-style:"+r+";'>"); //************** hier eigentliche Grafikanzeige **************
                                                                                          //************************************************************
                if (kzbeg == "r") document.write("</td><td class=x style='vertical-align:bottom;'>") //hier Extrazelle für rechte "Bildunterschrift"
                
                if (randzelle == 1) //Bild und Unterschrift sind 2 Zellen untereinander, oben rechts daneben die farbige Blindzelle mit class=f
                   {
                   document.write("</td><td class=f style='width:"+bzw+";height:"+bzh+";padding-top:"+pzv+";background-color:#"+bzc+"'></td></tr>")
                   document.write("<tr><td class=x colspan=2 style='vertical-align:top;'>") //Bildtext geht immer über Bild- und Blindzelle, falls letztere vorhanden!
                   document.write("<p style='margin:0 0 0 "+lzv+";text-indent:0;'>") //analoger Vorschub links wie Bild in Zelle
                   }
                
                document.write("<span class=red>"+grafiktext+"</span>");
                break;
      }

   if (link.length < 4) { document.write(" "); Zitat(link) } //06.02.2011 //03.04.2011

//--- Link für Unterschrift (außer bei grafikfoto) 

   if (grafikfoto.length == 0 && link != "undefined" && link.length > 3) //04.07.2011
      document.write(" <a href='http://"+link+"' target='_blank'  title='zur Homepage\n"+link+"'><img src='../B/H.gif'></a>")
      
//--- Button zum Schlie&szlig;en der Grafik (in der aktuellen Zelle)
   if (button.indexOf("x") == -1)
      {
      switch(grafikname.substr(0,1))
         {
         case "v": title='Video aus'; break;
         case "x": title='Kommentar aus'; break;
         case "z": title='Veranstaltungsliste aus'; break;
         default:  title='Bild(er) bzw. Grafik(en) aus'; break;
         }

      fkn = "?"+fkn //12.12.2010

      document.write("&nbsp;<a href='"+window.location.href.substr(0,window.location.href.indexOf("?"))+fkn+"&l="+lang+marke+"' target='_self'>") //28.01.2012 lang
      document.write("<img src='../B/X.gif' style='border-style:none;' title='"+title+"'></a>");
      }

//if (window.location.href.indexOf("1.htm") > -1) document.write("<span class=s6r>"+randzelle)

//--- 26.03.2011 hier neuer Zweig für [Foto: ...], [Quelle:...] u.ä. 

   if (grafikfoto.length > 0) //04.07.2011
      {
      if (link != "undefined" && link.length > 3)
         {
         grafikfoto = grafikfoto.replace(/\]/g,"")
         if (grafikfoto.length > 0) grafikfoto = grafikfoto+" " //nach Entfernung der schließenden Klammer (])
         grafikfoto = grafikfoto+"<a href='http://"+link+"' target='_blank'  title='zur Homepage\n"+link+"'><img src='../B/Hk.gif'></a>]"
         }
      document.write(br+"<span class=s6r style='line-height:10px;text-indent:0;'>["+grafikfoto+"</span>") // ] ist in grafikfoto enthalten
      }

//--- ===Vorschub=== in Zelle nach (!) Text - wirkt aber bei kzbeg == v vor (!) dem eingeschlossenen Text!

   if (vorsch_zh == 1)
      document.write("<p style='margin:"+pzh+" 0 0 "+lzh+";text-indent:0;'>")

//--- Zelleneröffnung für eingeschobenen Fließtext //04.04.2011 mit linkem Standardabstand 10 (+5 von der vorigen Zelle rechts)

   if (kzbeg == "v")
      document.write("</td><td class=x colspan=2 style='vertical-align:top;'><P style='margin:"+pzh+" 0 0 "+lzh+";text-indent:0;'>") //31.05.2011 colspan

//--- Tabelle schließen

   if (kzend == "e")
      document.write("</td></tr></table>")

//--- ===Vorschub=== nach Tabelle (top und links) //ggf. nur bei kzend = e

   if (vorsch_th == 1)
      document.write("<p style='margin:"+pth+" 0 0 "+lth+";text-indent:0;'>")

   }

else //--------------------------------------------------------------------------------- Bild, Grafik bzw. Kommentar ist AUS

   {

   if (fkz.length == 0) fkz = "?" //angepasst an Video() 07.02.2010
   
   fkz = fkz.replace(/&/g,"") //Zwangsentfernung aus alter Bilderliste, Herkunft unklar!
   
   fkn = fkz+fnr.substr(0,1)

//alert(fkz+"+"+fnr+">>"+fkn)

   if (shows.indexOf(fkn.substr(1,1)) > 0)
      fkn = fkn.substr(0,1)+fkn.substring(2,fkn.length) //2. Zeichen fkz in "ABCDEF" enthalten und aus fkn entfernen, prüfen!!!

   var s = fkn.indexOf("-");
   fkn = fkn.substr(0,s)+fkn.substring(s+1,fkn.length);

   fkn = "?"+fkn //12.12.2010

   if (button.indexOf("x") == -1) //Parameter Bildsteuerung enthält kein x
      {
      switch(grafikname.substr(0,1))
         {
         case "x": document.write("<a href='"+window.location.pathname+fkn+"&l="+lang+marke+"' target='_self'>") //28.01.2012 3x lang
                   document.write("<img src='../B/K.gif' style='border-style:none;' title='Kommentar oder Anmerkung'></a>"); break;
         case "z": document.write("<a href='"+window.location.pathname+fkn+"&l="+lang+marke+"' target='_self'>")
                   document.write("<img src='../B/K.gif' style='border-style:none;' title='10 aktuelle Veranstaltungen'></a>"); break;
         default:  document.write("<a href='"+window.location.href.substr(0,window.location.href.indexOf("?"))+fkn+"&l="+lang+marke+"' target='_self'>")
                   document.write("<img src='../B/B.gif' style='border-style:none;' title='Bild(er) bzw. Grafik(en) an'></a>"); break;
         }
      }

//document.write("<p class=s6r>"+kzbeg+"|"+button+"|"+button.indexOf("a"))     

   if (kzbeg == "v" && button.indexOf("a") == -1) document.write("<p class=l15>") //04.04.2011, wird nicht am Artikelanfang benötigt! (kein a!)
   }
}

//#######################################################################################################################

function Video(fnr,videoname,videotext,marke,button,quelle,link,hinweis)
{
// fnr = G,H, I ... bei mehreren parallelen Videoplayern verwenden, da A bis F in Bild() sich gegenseitig ausschalten!
//document.write("<P class=l15>"+fnr+"<br>")

if (button+""  == "undefined") button  = ""
if (quelle+""  == "undefined") quelle  = ""
if (link+""    == "undefined") link    = ""
if (hinweis+"" == "undefined") hinweis = ""

wert  = button.split("x")
breit = wert[0]; if (breit+"" == "undefined") breit = 370
hoehe = wert[1]; if (hoehe+"" == "undefined") hoehe = 280
lrand = wert[2]; if (lrand+"" == "undefined") lrand = 1

marke = "#"+marke

if (fkz.indexOf("*") > -1)
   fkz = "?0123456789AGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz" //damit fnr auch bei alles (*) gefunden wird! // §$%&=|

if (fkz.indexOf(fnr) > -1) //Videoplayer ist an
   {

//document.write("<p class=detail>OK<br>") //10.02.2010 Test

   videotext = videotext.replace(/\|/g,"<br>")                //23.03.2010 //20.07.2010
   videotext = videotext.replace(/\#/g,"<span class=detail>") //05.03.2011

   if (hinweis.length > 0) document.write("<p class=anz>-"+hinweis+"-<p style=margin-top:-5; >") //05./06.02.2010

   p = fkz.indexOf(fnr)
   fkn = fkz.substr(0,p)+fkz.substr(p+1,120)

   type = "application/x-mplayer2"; if (videoname.indexOf("youtube") > -1) type = "application/x-shockwave-flash"
                                    if (videoname.indexOf(".rm")     > -1) type = "audio/x-pn-realaudio-plugin"  //console="video1" //11.02.2010
                                    if (videoname.indexOf(".flv")    > -1) type = "audio/x-pn-realaudio-plugin"  //console="video1" //11.02.2010
                                    if (videoname.indexOf(".swf")    > -1) type = "application/x-shockwave-flash" //28.08.2010
//                                  if (videoname.indexOf(".swf")    > -1) type = "audio/x-pn-realaudio-plugin" //28.08.2010

   if (dabei.length > 1 && lrand == 1)
      document.write('<P class=l15>')
   else
      document.write('<P class=x style="margin-top:5; ">')



   if (videoname.indexOf("www.youtube.com")    > -1) //24.12.2011
      document.write('<iframe width="'+breit+'" height="'+hoehe+'" src="'+videoname+'" frameborder="0" allowfullscreen></iframe>')



   else
      document.write('<embed src="'+videoname+'" name=MediaPlayer width="'+breit+'" height="'+hoehe+'" type="'+type+'" console="video1" controls="ImageWindow, ControlPanel, StatusBar" menue=1 autostart=1 showcontrols=1 showstatusbar=1 autorewind=1 showdisplay=0 bgcolor="#CCCCCC"></embed>')

//console="video1" controls="ImageWindow, ControlPanel, StatusBar" - nur wegen RealPlayer!!!

   document.write("<P class=red>"+videotext) //Bildunterschrift
   document.write("<a href='"+window.location.pathname+"?"+fkn+marke+"' target='_self'>")
   document.write("&nbsp;<img src='../B/X.gif' title='Videoplayer ausblenden' style='border-style:none;'></a>")

   if (quelle.length+link.length > 0) //Quelle
      {
      document.write("<P class=quelle>Quelle: "+quelle)
      document.write("&nbsp;<scr"+"ipt>Home('"+link+"','Hk')</scr"+"ipt>")
      }
   }
else //Videoplayer ist aus
   {
   icon = "Y"; if (hinweis.length > 0) icon = icon+"-"+hinweis //z.B. für "Werbung" in Kopfzeile

   videotext = videotext.replace(/\|/g,"<br>") //06.02.2010 //23.03.2010 hierher verschoben
   if (hoehe > 45)
      videotext = "<i>Videobeitrag:</i> "+videotext //20.09.2011 Abfrage
   else
      icon = "Ls"

   if (fkz.length == 0) fkz = "?"
   fkn = fkz+fnr.substr(0,1)

   s = fkn.indexOf("-");
   fkn = fkn.substr(0,s)+fkn.substring(s+1,fkn.length);

   Spec(icon,window.location.pathname+"?"+fkn+marke,videotext,"","Videoplayer einblenden","_self") //10.02.2011 "?"
   }
}

//#######################################################################################################################

function GemNavig(button,suche)
{
//document.write("<p class=s6b>"+button+"|"+suche) //04.10.2011

document.write("<P class=l15>"); //06.08.2010 muss wegen Opera und Google-Chrome stehen
document.write("<TABLE class=s width=370 height=20>")
document.write("<TR><TD class=i>")
document.write("<A class=detail href='#strab' target='_self'>&Ouml;PNV</A> ")
document.write("<A class=detail href='#struktur' target='_self'>Wohnen</A> ")
document.write("<A class=detail href='#kultur' target='_self'>Kultur & Freizeit</A> ")
document.write("<A class=detail href='#einkaufen' target='_self'>Einkaufen & Einkehren</A> ")
document.write("<A class=detail href='#schulen' target='_self'>Lernen</A> ")
document.write("<A class=detail href='#arbeiten' target='_self'>Arbeiten</A> ")
document.write("</TD></TR></TABLE>")

if (button+"" == "undefined") button = "!l"      //20.03.2011 //24.08.2011

if (suche+""  == "undefined")
   {
   suche  = document.URL //27.03.2011 //20.09.2011 möglicher Fehler: ".htm" fehlt in URL
   
   var s = suche.lastIndexOf("/")
   suche = suche.substr(s+1,suche.lastIndexOf(".")-s-1)
   
//if (window.location.href.indexOf("Leubnitz") > -1) 
//document.write("<p class=s6>"+suche+"|"+button)
   suche = Umlback(suche) //s.o.
//if (window.location.href.indexOf("Leubnitz") > -1) 
//document.write("<p class=s6r>"+suche+"|"+button) //09.10.2011
   suche = Umlsond(suche) //s.o.
   }

//if (window.location.href.indexOf("Leubnitz") > -1)
//document.write("<p class=s6b>"+suche+"|"+button) //09.10.2011

if (suche.substr(0,2) == "OA" || suche.substr(0,2) == "OS") suche = suche.substr(3,60) //30.11.2010

document.write('<script>Show("A","'+suche+'","'+suche+'","top","'+button+'","200")</script>') //20.03.2011
}

//#######################################################################################################################

function GebLinks(ort)
{
for (ii = 0; ii < gebiete.length; ii++)
   {
   var wert = gebiete[ii].split(";")

   wert[0] = wert[0].replace(/\(/g,"") 
   wert[0] = wert[0].replace(/\)/g,"")

   wert[6] = wert[6].toLowerCase() 

   gg = 0; if (wert[0] == Umlsond(ort)) { gg = 1; break }
   }

document.write("<P class=l15>"); //06.08.2010 muss wegen Opera und Google-Chrome stehen
document.write("<TABLE class=h width=370><TR><TD class=h>") //03.08.2010 h statt s (vorübergehend um neue Funktion zu erkennen)

if (gg == 0)
   {
   document.write("<span class=red>&nbsp;Ort "+ort+" nicht in Datenbank vorhanden!</span></TD></TR></TABLE>")
   }
else
   {

   document.write("<TABLE class=x>")
   if (lang == "en")
      document.write("<TR><TD class=s colspan=2>You find <i>interesting</i> over <b>"+ort+"</b> also under</TD></TR>")
   else
      document.write("<TR><TD class=s colspan=2><i>Wissenswertes</i> über <b>"+ort+"</b> finden Sie auch bei</TD></TR>")

// --------------------------------------- www.dresdner-stadtteile.de

   adr = "http://www.dresdner-stadtteile.de"
   if (wert[5] != "-")
      adr = adr+"/"+wert[5]+".html"
   document.write("<TR><TD class=s width=5%>")
   Home(adr,"umfangreiche private Seite zu (fast) allen Stadtteilen")
   document.write("</TD><TD class=s><b>www.dresdner-stadtteile.de</b></TD></TR>")

// --------------------------------------- www.dresden-bilder.de

   adr = "http://www.dresden-bilder.de"
   if (wert[6] != "-")
      adr = adr+"/dd/stadtteile/"+wert[6]+".shtml"
   document.write("<TR><TD class=s>")
   Home(adr,"viele Bilder und Texte zu (fast) allen Stadtteilen")
   document.write("</TD><TD class=s><b>www.dresden-bilder.de</b></TD></TR>")

// --------------------------------------- www.dresden-und-sachsen.de

   adr = "http://dresden-und-sachsen.de/dresden/"+wert[7]+".htm"
   document.write("<TR><TD class=s>")
   Home(adr,"umfangreiche private Seite zu (fast) allen Stadtteilen")
   document.write("</TD><TD class=s><b>www.dresden-und-sachsen.de</b></TD></TR>")


   document.write("</TABLE>")
   }

document.write("</TABLE>")
}

//#######################################################################################################################

function Fuss(bu1) //wird nur über End() aufgerufen! bu1 = Buchstabe der lfd. ABC-Seite
{
buli="ABCDEFGHIJKLMNOPQRSTUVWZA";
bu2 = buli.substr(buli.indexOf(bu1)+1,1);

document.write("<tr><td class=x><p class=x><table class=w width=100%>");
document.write("<tr><td class=w align=right height=25><b><a href='"+bu2+".htm?*'>"); //?* ab 19.03.2010
document.write("<img src='../B/S.gif' style='border-style:none;' title='zum n&auml;chsten Buchstaben'>&nbsp;"+bu2+"</a></td></tr></table></td></tr>");
}

//#######################################################################################################################

function End(langlocal,links) //Parameter links unbenutzt! 01.09.2011 Verwendung der globalen variablen lang
{

//if(window.location.href.indexOf("Bahnen") > -1) alert(window.location.href)
//if(window.location.href.indexOf("Test-Umlaute") > -1) document.write("<p class=s6r>"+lang)

if (buch.length == 1 && window.location.href.indexOf("Service/Meldung.php") == -1) Fuss(buch) //buch ist gleich gmkg, also gleich Seitenname ohne Ordner 

suche = location.href;
s = suche.lastIndexOf("/");
suche = suche.substr(s+1,30);
s = suche.lastIndexOf(".htm");
if (s > -1)
suche = suche.substr(0,s); //alert(suche);

document.write("<TR><TD class=x style='border-style:none;'>")

//document.write(window.location.href+"<br>")

if (window.location.href.indexOf("/Lexikon/") > -1 || window.location.href.indexOf("/Lexikon-en/") > -1)
//&& window.location.href.indexOf("/Service/Meldung.php") == -1)
   {
   if (buch.length > 1 && window.location.href.indexOf("Chronik") == -1) document.write("<HR>")

   document.write("<P style='margin-left:15; text-indent:0; '><span class=detail>")

   if (lang == "en")
      {
      document.write("The about links (")
      Plan("Rathaus","","","k") 
      Plan("01067 Dr.-Külz-Ring 19","","","k")
      document.write("...) offered City Plan snippets<br>from www.dresden.de (")
      Home("Landeshauptstadt","Hfk")
      document.write(") provided.</span>")
      } 
   else
      {
      document.write("Die &uuml;ber Links (")
      Plan("Rathaus","","","k") 
      Plan("01067 Dr.-Külz-Ring 19","","","k")
      document.write("...) angebotenen Stadtplanausschnitte<br>werden von www.dresden.de (")
      Home("Landeshauptstadt","Hfk")
      document.write(") zur Verf&uuml;gung gestellt.</span>")
      }
   }
   
if (window.location.href.indexOf("/Sachsen/") > -1)
   {
   if (buch.length == 1)
   document.write("<P class=quelle style='margin-left:15; text-indent:0; '>Quelle Gemeindefl&auml;chen und Einwohner: SLA  Sachsen<br>[Fl&auml;che "+qu_fl+", Ew. "+qu_ew+"]")
   }

document.write("<P class=l15 style='margin:1060 0 0 15; text-indent:0; '><img src='../B/G.gif' style='border-style:none;' title='Hi'>");

if (lang == "en")
   document.write("&nbsp;What else did you expect here?</TD></TR>");
else
   document.write("&nbsp;Was haben Sie denn hier noch erwartet?</TD></TR>");

suche = anker.substr(1,60); //alert(suche+"|"+document.anchors.length);

fund = 0
if (suche == "top") 
   fund = 1;
else
   for (i = 0; i < document.anchors.length; i++) if (document.anchors[i].name == anker.substr(1,60)) fund = 1

//document.write(fund+"|<br>") //Test 01.09.2010

if (fund == 0) location.href = "../Lexikon/Artikel-fehlt.htm?"+suche+"|"+anchors
}

//#######################################################################################################################

function Browser() 
   {
   if (navigator.appName == "Microsoft Internet Explorer")      browser = "IE"
   if (navigator.appName == "Opera")                 browser = "Opera"
   if (navigator.userAgent.indexOf("Firefox") > -1)  browser = "Firefox"
   if (navigator.userAgent.indexOf("Chrome") > -1)   browser = "Chrome"
   if (navigator.userAgent.indexOf("Netscape") > -1) browser = "Netscape Chrome"
   return browser
   }

//#######################################################################################################################

function BewegeLiniennetz(xB,yB) // von Marco Präg
{
iframe.scrollBy(xB,yB);
return
}

function BewegeLiniennetzMitte()
{
iframe.scrollTo(305,333);
return
}

function BewegeLiniennetzEcke()
{
iframe.scrollTo(0,0);
return
}

function PlanNavi()
{
document.write("<table>")
document.write("<tr><td class=x><a class=none href='javascript:BewegeLiniennetzEcke()' target='_self'><span class=s6>&#8968;</span></a></td>")
document.write("<td class=x><a class=none href='javascript:BewegeLiniennetz(0,-50)' target='_self'><span class=s6>&#8593;</span></a></td></tr>")
document.write("<tr><td class=x><a class=none href='javascript:BewegeLiniennetz(-50,0)' target='_self'><span class=s6>&#8592;&nbsp;</span></a></td>")
document.write("<td class=x><a class=none href='javascript:BewegeLiniennetzMitte()' target='_self'><span class=s6>o</span></a></td>")
document.write("<td class=x><a class=none href='javascript:BewegeLiniennetz(50,0)' target='_self'><span class=s6>&nbsp;&#8594;</span></a></td></tr>")
document.write("<tr><td class=x></td><td class=x><a class=none href='javascript:BewegeLiniennetz(0,50)' target='_self'><span class=s6>&#8595;</span></a></td></tr>")
document.write("</table>")
return
}

//#######################################################################################################################

function number_format(number,laenge,sep,th_sep) // von J. Struebig
{

//function /*out: String*/ number_format( /* in: float   */ number,
//                                        /* in: integer */ laenge,
//                                        /* in: String  */ sep,
//                                        /* in: String  */ th_sep ) {

var pre = "";
if (number < 0)
   {
   pre = "-";
   number *= (-1)
   }
//document.write("2<br>")

number = Math.round( number * Math.pow(10, laenge) ) / Math.pow(10, laenge);
str_number = number+"";
arr_int = str_number.split(".");
if(!arr_int[0]) arr_int[0] = "0";
if(!arr_int[1]) arr_int[1] = "";
if(arr_int[1].length < laenge)
  {
  nachkomma = arr_int[1];
  for(var i = arr_int[1].length+1; i <= laenge; i++)
     nachkomma += "0";
  arr_int[1] = nachkomma;
  }
//document.write("3<br>")
if(th_sep != "" && arr_int[0].length > 3)
  {
  Begriff = arr_int[0];
  arr_int[0] = "";
  for(var j = 3; j < Begriff.length ; j+=3)
    {
    Extrakt = Begriff.slice(Begriff.length - j, Begriff.length - j + 3);
    arr_int[0] = th_sep + Extrakt +  arr_int[0] + "";
    }
  str_first = Begriff.substr(0, (Begriff.length % 3 == 0)?3:(Begriff.length % 3));
  arr_int[0] = str_first + arr_int[0];
  }
//document.write("4<br>")

return arr_int[0]+sep+arr_int[1];
}

//#######################################################################################################################