function SprachWechsel(Sprache)
{
  var SubSeite = parent.HF.location.href;
  var i = SubSeite.indexOf('#');
  if (i!=-1) SubSeite = SubSeite.slice(0,i); //Sprungmarke rausnehmen
  if (SubSeite.charAt(SubSeite.length-6) == '_')
  {
    i=6;
  } else
  {
    i=4;
  }
  if (SubSeite.length!=0)
  {
    top.window.location.href = "index"+Sprache+".htm?"+SubSeite.slice(0,SubSeite.length-i)+Sprache+".htm";
  }
}


  var doc;
  var geladen=false;
  var Zeichnen=true;
  var MenuRoot;
  var AlleMP=new Array()
  var HostName=window.location.host; if (HostName=="") HostName="(lokal)";
  var SZDefault=HostName+' - Die Dampflokseite!';
  var mFarbe = 'yellow';

  function SetStatus(Zusatz)
  {
    if (Zusatz=="")
      window.status=SZDefault
    else
      window.status=HostName+" - "+Zusatz;
  }

  function NeuerMP(iParent,iEbene,iPic,iName,iURL)
  {
    this.parent  = iParent;
    this.ID      = AlleMP.length;
    this.Ebene   = iEbene;
    this.Pic     = iPic;
    this.Name    = iName;
    this.URL     = iURL;
    this.iFeld   = new Array();
    this.offen   = false;
    this.sichtbar= false;
    this.marked  = false;
    AlleMP[AlleMP.length]=this;
  }

  function AddMP(parentMP,iPic,iName,iURL)
  {
    var NrMP=parentMP.iFeld.length;
    parentMP.iFeld[NrMP]=new NeuerMP(parentMP,parentMP.Ebene+1,iPic,iName,iURL);
    return parentMP.iFeld[NrMP];
  }

  function Laden(Sprache)
  {
    var MP1,MP2,MP3;

    MenuRoot=new NeuerMP(MenuRoot,-1,"Root","#");

  if (Sprache!="_e")
  {
    MP1=AddMP(MenuRoot,"deu","Deutschland","#");
      MP2=AddMP(MP1,"","Rbd Berlin","#");
        AddMP(MP2,"","Frankfurt/O.","d_fko.htm");
        AddMP(MP2,"","Schöneweide","d_swv.htm");
        AddMP(MP2,"","Wustermark","d_wur.htm");
      MP2=AddMP(MP1,"","Rbd Cottbus","#");
        AddMP(MP2,"","Bautzen","d_bz.htm");
        AddMP(MP2,"","Cottbus","d_cs.htm");
        AddMP(MP2,"","Elsterwerda","d_ew.htm");
        AddMP(MP2,"","Raw Görlitz","d_rag.htm");
        AddMP(MP2,"","Weißwasser","d_wem.htm");
        AddMP(MP2,"","Zittau","d_zi.htm");
        AddMP(MP2,"","ZOJE","d_zoje.htm");
      MP2=AddMP(MP1,"","Rbd Dresden","#");
        AddMP(MP2,"","Aue(Sachs)","d_aue.htm");
        AddMP(MP2,"","Glauchau","d_gla.htm");
        AddMP(MP2,"","Hainsberg","d_hbg.htm");
        AddMP(MP2,"","Hilbersdorf","d_hil.htm");
        AddMP(MP2,"","Mügeln","d_mue.htm");
        AddMP(MP2,"","Nossen","d_no.htm");
        AddMP(MP2,"","Potschappel","d_pot.htm");
        AddMP(MP2,"","Radebeul","d_rbo.htm");
        AddMP(MP2,"","Zwickau","d_zw.htm");
        AddMP(MP2,"","Wilischthal","d_wli.htm");
        AddMP(MP2,"","Wolkenstein","d_wo.htm");
      MP2=AddMP(MP1,"","Rbd Erfurt","#");
        AddMP(MP2,"","Saalfeld","d_sf.htm");
      MP2=AddMP(MP1,"","Rbd Greifswald","#");
        AddMP(MP2,"","Angermünde","d_agm.htm");
        AddMP(MP2,"","Eberswalde","d_ebw.htm");
        AddMP(MP2,"","Putbus","d_put.htm");
      MP2=AddMP(MP1,"","Rbd Halle","#");
        AddMP(MP2,"","Engelsdorf","d_lr.htm");
        AddMP(MP2,"","Falkenberg","d_fak.htm");
      MP2=AddMP(MP1,"","Rbd Magdeburg","#");
        AddMP(MP2,"","Brandenburg(H)","d_bn.htm");
        AddMP(MP2,"","Güsten","d_gt.htm");
        AddMP(MP2,"","Halberstadt","d_hlb.htm");
        AddMP(MP2,"","Haldensleben","d_had.htm");
        AddMP(MP2,"","Wernigerode","d_wer.htm");
      MP2=AddMP(MP1,"","Rbd Schwerin","#");
        AddMP(MP2,"","Kühlungsborn","d_kue.htm");
        AddMP(MP2,"","Wittenberge","d_wit.htm");

    MP1=AddMP(MenuRoot,"bos","Bosnien","bos1.htm");
      AddMP(MP1,"","Tuzla","bos1.htm");

    MP1=AddMP(MenuRoot,"bul","Bulgarien","#");
      AddMP(MP1,"","Bojcinovci","bul1.htm");
      AddMP(MP1,"","Pernik","bul1.htm#bul_per");
      AddMP(MP1,"","Kalojanovec","bul2.htm");
      AddMP(MP1,"","Asenovo","bul2.htm#bul_asv");

    MP1=AddMP(MenuRoot,"mya","Burma","#");
      AddMP(MP1,"","Bago","my_bag.htm");
      AddMP(MP1,"","Insein","my_ins.htm");
      AddMP(MP1,"","Mottama","my_mot.htm");
      AddMP(MP1,"","Pyuntaza","my_py.htm");

    MP1=AddMP(MenuRoot,"chi","China","#");
      AddMP(MP1,"","Tangshan","china1.htm");
      AddMP(MP1,"","Anshan","china2.htm");
      AddMP(MP1,"","Tonghua","china3.htm");
      AddMP(MP1,"","Sujiatun","china4.htm");
      AddMP(MP1,"","Jingpeng","china5.htm");
      AddMP(MP1,"","Tongchuan","china6.htm");

    MP1=AddMP(MenuRoot,"jug","Jugoslawien","#");
      AddMP(MP1,"","Jagodina","ju_jag.htm");
      AddMP(MP1,"","Kolubara","ju_kba.htm");
      AddMP(MP1,"","Kostolac","ju_kos.htm");
      AddMP(MP1,"","Mokra Gora","ju_sarg.htm");
      AddMP(MP1,"","Smederevo","ju_smd.htm");

    MP1=AddMP(MenuRoot,"kub","Kuba","#");
      AddMP(MP1,"","G.A.Manalich","kub207.htm");
      AddMP(MP1,"","Australia","kub303.htm");
      AddMP(MP1,"","Cuba Libre","kub306.htm");
      AddMP(MP1,"","J.S.Comas","kub315.htm");
      AddMP(MP1,"","Mal Tiempo","kub403.htm");
      AddMP(MP1,"","Espartaco","kub413.htm");
      AddMP(MP1,"","Ifrain Alfonso","kub440.htm");
      AddMP(MP1,"","Pepitoy Tey","kub443.htm");

    MP1=AddMP(MenuRoot,"let","Lettland","#");
      AddMP(MP1,"","Jerike","lv_jer.htm");
      AddMP(MP1,"","Mitau","lv_mit.htm");
      AddMP(MP1,"","Riga","lv_rig.htm");

    MP1=AddMP(MenuRoot,"mol","Moldawien","mol1.htm");
      AddMP(MP1,"","Ungheni","mol1.htm");

    MP1=AddMP(MenuRoot,"pol","Polen","#");
      MP2=AddMP(MP1,"","Masowien","#");
        AddMP(MP2,"","Marcule","pl_mcl.htm");
      MP2=AddMP(MP1,"","Masuren","#");
        AddMP(MP2,"","Korschen","pl_kor.htm");
        AddMP(MP2,"","Lyck","pl_ly.htm");
      MP2=AddMP(MP1,"","Pommern","#");
        AddMP(MP2,"","Arnswalde","pl_arw.htm");
        AddMP(MP2,"","Greifenberg","pl_gb.htm");
      MP2=AddMP(MP1,"","Schlesien","#");
        AddMP(MP2,"","Dittersbach","pl_dch.htm");
        AddMP(MP2,"","Glatz","pl_glz.htm");
        AddMP(MP2,"","Königszelt","pl_kzt.htm");
        AddMP(MP2,"","Neisse","pl_nei.htm");
        AddMP(MP2,"","Peiskretscham","pl_ps.htm");
        AddMP(MP2,"","Sagan","pl_sag.htm");
        AddMP(MP2,"","Wojkowice","pl_woj.htm");
      MP2=AddMP(MP1,"","Wartheland","#");
        AddMP(MP2,"","Gnesen","pl_gne.htm");
        AddMP(MP2,"","Kempen","pl_ow.htm");
        AddMP(MP2,"","Neu Bentschen","pl_nbn.htm");
        AddMP(MP2,"","Jarotschin","pl_ja.htm");
        AddMP(MP2,"","Schmiegel","pl_skb.htm");
        AddMP(MP2,"","Wollstein","pl_wo1.htm");
      MP2=AddMP(MP1,"","Westpreußen","#");
        AddMP(MP2,"","Berent","pl_dzv.htm");
        AddMP(MP2,"","Bromberger KB","pl_wkb.htm");
        AddMP(MP2,"","Westpr.KB","pl_wkag.htm");

    MP1=AddMP(MenuRoot,"rum","Rumänien","#");
      AddMP(MP1,"","Brad","ro_brd.htm");
      AddMP(MP1,"","Broos","ro_ora.htm");
      AddMP(MP1,"","Cimpu Cetatii","ro_tis.htm#rum_cic");
      AddMP(MP1,"","Covasna","ro_cov.htm");
      AddMP(MP1,"","Deesch","ro_desch.htm");
      AddMP(MP1,"","Gavodia","ro_lug.htm#rum_gav");
      AddMP(MP1,"","Lugosch","ro_lug.htm");
      AddMP(MP1,"","Moldovita","ro_mol.htm");
      AddMP(MP1,"","Oberwischau","ro_vis.htm");
      AddMP(MP1,"","Petrosani","ro_sub.htm#rum_pet");
      AddMP(MP1,"","Subcetate","ro_sub.htm");
      AddMP(MP1,"","Tismana","ro_tis.htm");

    MP1=AddMP(MenuRoot,"rus","Russland","#");
      AddMP(MP1,"","Heiligenbeil","russ1.htm");
      AddMP(MP1,"","Pr.Eylau","russ1.htm#rus_pre");
      AddMP(MP1,"","Gerdauen","russ1.htm#rus_ger");
      AddMP(MP1,"","Birkenfeld","russ2.htm");
      AddMP(MP1,"","Gumbinnen","russ2.htm#rus_gum");
      AddMP(MP1,"","Insterburg","russ2.htm#rus_ig");

    MP1=AddMP(MenuRoot,"cz","Tschechien","#");
      AddMP(MP1,"","Blosdorf","cz_blo.htm");

    MP1=AddMP(MenuRoot,"ukr","Ukraine","#");
      AddMP(MP1,"","Baureihen","ukr1.htm");
      AddMP(MP1,"","Sonderfahrten","ukr2.htm");

    MP1=AddMP(MenuRoot,"ung","Ungarn","ungarn.htm");
  }
  else
  {
    MP1=AddMP(MenuRoot,"deu","Germany","#");
      MP2=AddMP(MP1,"","Rbd Berlin","#");
        AddMP(MP2,"","Brandenburg(H)","d_bn_e.htm");
        AddMP(MP2,"","Frankfurt/O.","d_fko_e.htm");
        AddMP(MP2,"","Schoeneweide","d_swv_e.htm");
        AddMP(MP2,"","Wustermark","d_wur_e.htm");
      MP2=AddMP(MP1,"","Rbd Cottbus","#");
        AddMP(MP2,"","Bautzen","d_bz_e.htm");
        AddMP(MP2,"","Cottbus","d_cs_e.htm");
        AddMP(MP2,"","Elsterwerda","d_ew_e.htm");
        AddMP(MP2,"","Raw Goerlitz","d_rag_e.htm");
        AddMP(MP2,"","Weisswasser","d_wem_e.htm");
        AddMP(MP2,"","Zittau","d_zi_e.htm");
        AddMP(MP2,"","ZOJE","d_zoje_e.htm");
      MP2=AddMP(MP1,"","Rbd Dresden","#");
        AddMP(MP2,"","Aue(Sachs)","d_aue_e.htm");
        AddMP(MP2,"","Glauchau","d_gla_e.htm");
        AddMP(MP2,"","Hainsberg","d_hbg_e.htm");
        AddMP(MP2,"","Hilbersdorf","d_hil_e.htm");
        AddMP(MP2,"","Muegeln","d_mue_e.htm");
        AddMP(MP2,"","Nossen","d_no_e.htm");
        AddMP(MP2,"","Potschappel","d_pot_e.htm");
        AddMP(MP2,"","Radebeul","d_rbo_e.htm");
        AddMP(MP2,"","Zwickau","d_zw_e.htm");
        AddMP(MP2,"","Wilischthal","d_wli_e.htm");
        AddMP(MP2,"","Wolkenstein","d_wo_e.htm");
      MP2=AddMP(MP1,"","Rbd Erfurt","#");
        AddMP(MP2,"","Saalfeld","d_sf_e.htm");
      MP2=AddMP(MP1,"","Rbd Greifswald","#");
        AddMP(MP2,"","Angermuende","d_agm_e.htm");
        AddMP(MP2,"","Eberswalde","d_ebw_e.htm");
        AddMP(MP2,"","Putbus","d_put_e.htm");
      MP2=AddMP(MP1,"","Rbd Halle","#");
        AddMP(MP2,"","Engelsdorf","d_lr_e.htm");
        AddMP(MP2,"","Falkenberg","d_fak_e.htm");
      MP2=AddMP(MP1,"","Rbd Magdeburg","#");
        AddMP(MP2,"","Guesten","d_gt_e.htm");
        AddMP(MP2,"","Halberstadt","d_hlb_e.htm");
        AddMP(MP2,"","Haldensleben","d_had_e.htm");
        AddMP(MP2,"","Wernigerode","d_wer_e.htm");
      MP2=AddMP(MP1,"","Rbd Schwerin","#");
        AddMP(MP2,"","Kuehlungsborn","d_kue_e.htm");
        AddMP(MP2,"","Wittenberge","d_wit_e.htm");

    MP1=AddMP(MenuRoot,"bos","Bosnia","bos1_e.htm");
      AddMP(MP1,"","Tuzla","bos1_e.htm");

    MP1=AddMP(MenuRoot,"bul","Bulgaria","#");
      AddMP(MP1,"","Bojcinovci","bul1_e.htm");
      AddMP(MP1,"","Pernik","bul1_e.htm#bul_per");
      AddMP(MP1,"","Kalojanovec","bul2_e.htm");
      AddMP(MP1,"","Asenovo","bul2_e.htm#bul_asv");

    MP1=AddMP(MenuRoot,"mya","Burma","#");
      AddMP(MP1,"","Bago","my_bag_e.htm");
      AddMP(MP1,"","Insein","my_ins_e.htm");
      AddMP(MP1,"","Mottama","my_mot_e.htm");
      AddMP(MP1,"","Pyuntaza","my_py_e.htm");

    MP1=AddMP(MenuRoot,"cz","Czech Rep.","#");
      AddMP(MP1,"","Mladejov","cz_blo_e.htm");

    MP1=AddMP(MenuRoot,"chi","China","#");
      AddMP(MP1,"","Tangshan","china1_e.htm");
      AddMP(MP1,"","Anshan","china2_e.htm");
      AddMP(MP1,"","Tonghua","china3_e.htm");
      AddMP(MP1,"","Sujiatun","china4_e.htm");
      AddMP(MP1,"","Jingpeng","china5_e.htm");
      AddMP(MP1,"","Tongchuan","china6_e.htm");

    MP1=AddMP(MenuRoot,"kub","Cuba","#");
      AddMP(MP1,"","G.A.Manalich","kub207_e.htm");
      AddMP(MP1,"","Australia","kub303_e.htm");
      AddMP(MP1,"","Cuba Libre","kub306_e.htm");
      AddMP(MP1,"","J.S.Comas","kub315_e.htm");
      AddMP(MP1,"","Mal Tiempo","kub403_e.htm");
      AddMP(MP1,"","Espartaco","kub413_e.htm");
      AddMP(MP1,"","Ifrain Alfonso","kub440_e.htm");
      AddMP(MP1,"","Pepitoy Tey","kub443_e.htm");

    MP1=AddMP(MenuRoot,"jug","Yugoslavia","#");
      AddMP(MP1,"","Jagodina","ju_jag_e.htm");
      AddMP(MP1,"","Kolubara","ju_kba_e.htm");
      AddMP(MP1,"","Kostolac","ju_kos_e.htm");
      AddMP(MP1,"","Mokra Gora","ju_sarg_e.htm");
      AddMP(MP1,"","Smederevo","ju_smd_e.htm");

    MP1=AddMP(MenuRoot,"let","Latvia","#");
      AddMP(MP1,"","Jelgava","lv_mit_e.htm");
      AddMP(MP1,"","Jerike","lv_jer_e.htm");
      AddMP(MP1,"","Riga","lv_rig_e.htm");

    MP1=AddMP(MenuRoot,"mol","Moldavia","mol1_e.htm");
      AddMP(MP1,"","Ungheni","mol1_e.htm");

    MP1=AddMP(MenuRoot,"pol","Poland","#");
      MP2=AddMP(MP1,"","Masovia","#");
        AddMP(MP2,"","Marcule","pl_mcl_e.htm");
      MP2=AddMP(MP1,"","Masuria","#");
        AddMP(MP2,"","Elk","pl_ly_e.htm");
        AddMP(MP2,"","Korsze","pl_kor_e.htm");
      MP2=AddMP(MP1,"","Pommerania","#");
        AddMP(MP2,"","Choszczno","pl_arw_e.htm");
        AddMP(MP2,"","Gryfice","pl_gb_e.htm");
      MP2=AddMP(MP1,"","Silesia","#");
        AddMP(MP2,"","Klodzko","pl_glz_e.htm");
        AddMP(MP2,"","Jaworzyna Sl.","pl_kzt_e.htm");
        AddMP(MP2,"","Nysa","pl_nei_e.htm");
        AddMP(MP2,"","Pyskowice","pl_ps_e.htm");
        AddMP(MP2,"","Walbrzych","pl_dch_e.htm");
        AddMP(MP2,"","Wojkowice","pl_woj_e.htm");
        AddMP(MP2,"","Zagan","pl_sag_e.htm");
      MP2=AddMP(MP1,"","Western Prussia","#");
        AddMP(MP2,"","Bydgoszcz NG","pl_wkb_e.htm");
        AddMP(MP2,"","Koscierzyna","pl_dzv_e.htm");
        AddMP(MP2,"","Westpr.NG","pl_wkag_e.htm");
      MP2=AddMP(MP1,"","Wartheland","#");
        AddMP(MP2,"","Gniezno","pl_gne_e.htm");
        AddMP(MP2,"","Jarocin","pl_ja_e.htm");
        AddMP(MP2,"","Kepno","pl_ow_e.htm");
        AddMP(MP2,"","Smigiel","pl_skb_e.htm");
        AddMP(MP2,"","Wolsztyn","pl_wo1_e.htm");
        AddMP(MP2,"","Zbaszynek","pl_nbn_e.htm");

    MP1=AddMP(MenuRoot,"rum","Romania","#");
      AddMP(MP1,"","Brad","ro_brd_e.htm");
      AddMP(MP1,"","Cimpu Cetatii","ro_tis_e.htm#rum_cic");
      AddMP(MP1,"","Covasna","ro_cov_e.htm");
      AddMP(MP1,"","Gavodia","ro_lug_e.htm#rum_gav");
      AddMP(MP1,"","Lugoj","ro_lug_e.htm");
      AddMP(MP1,"","Moldovita","ro_mol_e.htm");
      AddMP(MP1,"","Orastie","ro_ora_e.htm");
      AddMP(MP1,"","Petrosani","ro_sub_e.htm#rum_pet");
      AddMP(MP1,"","Subcetate","ro_sub_e.htm");
      AddMP(MP1,"","Tismana","ro_tis_e.htm");
      AddMP(MP1,"","Viseu de Sus","ro_vis_e.htm");

    MP1=AddMP(MenuRoot,"rus","Russia","#");
      AddMP(MP1,"","Mamonowo","russ1_e.htm");
      AddMP(MP1,"","Bagrationowsk","russ1_e.htm#rus_pre");
      AddMP(MP1,"","Schlesnijdorosch.","russ1_e.htm#rus_ger");
      AddMP(MP1,"","Krasnowka","russ2_e.htm");
      AddMP(MP1,"","Gusew","russ2_e.htm#rus_gum");
      AddMP(MP1,"","Tschernjachowsk","russ2_e.htm#rus_ig");

    MP1=AddMP(MenuRoot,"ukr","Ukraine","#");
      AddMP(MP1,"","classes","ukr1_e.htm");
      AddMP(MP1,"","trains","ukr2_e.htm");

    MP1=AddMP(MenuRoot,"ung","Hungary","ungarn_e.htm");
  }

    for (var i=0; i<MenuRoot.iFeld.length; i++)
      MenuRoot.iFeld[i].sichtbar=true;

    geladen=true;
    PaintMenu();
  }

  function zuMP(aMP)
  {
    aMP.offen=false;
    aMP.marked=false;
    for (var i=0; i<aMP.iFeld.length; i++)
    {
      if (aMP.iFeld[i].Ebene!=0)
        aMP.iFeld[i].sichtbar=false;
      zuMP(aMP.iFeld[i]);
    }
  }

  function ShowMP(aMP)
  {
    zuMP(MenuRoot);
    aMP.marked=true;
    aMP.sichtbar=true;
    while (aMP.parent.ID!=0)
    {
      aMP = aMP.parent;
      aMP.offen=true;
      aMP.sichtbar=true;
      for (var i=0; i<aMP.iFeld.length; i++)
        aMP.iFeld[i].sichtbar=true;
    }
  }

  function aufMP(aMP)
  {
    ShowMP(aMP);
    aMP.offen=true;
    for (var i=0; i<aMP.iFeld.length; i++)
      aMP.iFeld[i].sichtbar=true;
  }

  function rein(mNr)
  {
    SetStatus(AlleMP[mNr].Name);
  }

  function raus(mNr)
  {
    SetStatus('');
  }

  function rauf(mNr)
  {
    Zeichnen=false; //vermeidet doppeltes Zeichnen durch Seitenaufruf
    if (AlleMP[mNr].URL!='#')
      parent.HF.location.href=AlleMP[mNr].URL;

    if (AlleMP[mNr].offen)
    {
      if (AlleMP[mNr].marked) zuMP(AlleMP[mNr]);
    }
    else
    {
      aufMP(AlleMP[mNr]);
    }
    Zeichnen=true;
    PaintMenu();
    SetStatus('');
  }

function PaintPic(aPic)
{
  doc.write('<img src="menu/'+aPic+'.gif" align="top" border="0">');
}

function PaintMP(aMP)
{
  for (var i=0; i<aMP.iFeld.length; i++)
    if (aMP.iFeld[i].sichtbar)
  {
    doc.write('<a href="#" onmouseover="parent.rein('+aMP.iFeld[i].ID+'); return true" onmouseout="parent.raus('+aMP.iFeld[i].ID+'); return true" onclick="parent.rauf('+aMP.iFeld[i].ID+'); return false"');
    if (aMP.iFeld[i].marked) doc.write(' style="color:'+mFarbe+'"');
    doc.write('>');
    if (aMP.iFeld[i].Pic||"")
      PaintPic(aMP.iFeld[i].Pic)
    else
    {
      var k=0;
      while (k<aMP.iFeld[i].Ebene)
      {
        PaintPic('gerade');
        k++;
      }
      if (aMP.iFeld[i].iFeld.length>0)
      {
        if (aMP.iFeld[i].offen)
          PaintPic('abzwb')
        else
        if (i!=aMP.iFeld.length-1)
          PaintPic('abzw');
        else
          PaintPic('abzwe');
      }
      else
      if (i!=aMP.iFeld.length-1)
        PaintPic('zweig')
      else
        PaintPic('ende');
    }
    doc.writeln('&nbsp;'+aMP.iFeld[i].Name+'</a><br>');
    PaintMP(aMP.iFeld[i]);
  }
}

function PaintMenu()
{
  if (geladen && ((window.document.frames) || (navigator.appVersion.substring(0,1) >= "4")))
  {
    doc=parent.HM.window.document;
    doc.open('text/html')
    doc.writeln('<html>');
    doc.writeln('<head>');
    doc.writeln('  <meta name="author" content="Frank Engel">');
    doc.writeln('  <meta name="robots" content="noindex,follow">');
    doc.writeln('  <meta http-equiv="expires" content="100000">');
    doc.writeln('  <title>'+HostName+'</title>');
    doc.writeln('  <style>');
    doc.writeln('    body      {background-color:#408080; margin-top:0px;}');
    doc.writeln('    p.frei    {text-align:center; margin-top:0px; margin-bottom:0px;}');
    doc.writeln('    p.frei a  {font:bold 10pt MS Sans Serif;}');
    doc.writeln('    p.menu    {border-style:none; color:silver; border-width:1px; margin-top:0px; margin-bottom:0px;}');
    doc.writeln('    a         {font:bold 8pt MS Sans Serif; text-decoration:none;}');
    doc.writeln('    a:link    {color:#FFFFFF;}');
    doc.writeln('    a:visited {color:#FFFFFF;}');
    doc.writeln('    a:hover   {color:#C0C0C0;}');
    doc.writeln('  </style>');
    doc.writeln('  <base target="HF">');
    doc.writeln('</head>');
    doc.writeln('<body>');
    doc.writeln('<p class="menu"><nobr>');
    PaintMP(MenuRoot);
    doc.writeln('<hr><div align="center">');
    doc.writeln('<a href="http://www.feldbahnseite.de/" target="_blank">Feldbahnseite</a>');
    doc.writeln('</div><hr>');
    doc.writeln('</nobr></p>');
    doc.writeln('</body></html>');
    doc.close();
  }
}

function SetMenuByName(iURL)
{
  if (geladen)
  {
    for (var i=0; i<AlleMP.length; i++)
      if (AlleMP[i].URL==iURL)
      {
         if (AlleMP[i].offen)
           aufMP(AlleMP[i])
         else
           ShowMP(AlleMP[i]);
      }
    PaintMenu();
  }
}




var Anfang=false;

function SitemapMP(aMP)
{
  for (var i=0; i<aMP.iFeld.length; i++)
  {
    if (aMP.iFeld[i].Ebene==0)
    {
      if (Anfang)
      {
        doc.writeln('    </td>');
        doc.writeln('  </tr>');
      }
      doc.writeln('  <tr>');
      doc.writeln('    <td>'+aMP.iFeld[i].Name+'</td>');
      doc.writeln('    <td>');
      if (aMP.iFeld[i].URL!='#') doc.writeln('      <a href="'+aMP.iFeld[i].URL+'">'+aMP.iFeld[i].Name+'</a><br>');
      Anfang=true;
    }
    else
    {
      doc.write('      ');
      var k=0;
      while (k<aMP.iFeld[i].Ebene)
      {
        doc.write('&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;');
        k++;
      }
      doc.writeln('<a href="'+aMP.iFeld[i].URL+'">'+aMP.iFeld[i].Name+'</a><br>');
    }
    SitemapMP(aMP.iFeld[i]);
  }
}

function Sitemap()
{
//  doc=parent.HF.window.document;
  doc=window.document;
  doc.open('text/html');
  doc.writeln('<html>');
  doc.writeln('<head>');
  doc.writeln('  <meta name="author" content="Frank Engel">');
  doc.writeln('  <title>'+HostName+' - Sitemap</title>');
  doc.writeln('  <link rel="stylesheet" type="text/css" href="allg.css">');
  doc.writeln('</head>');
  doc.writeln('<body>');
  doc.writeln('<h1>Sitemap</h1>');
  doc.writeln('<hr>');
  doc.writeln('<table class="klein">');
  SitemapMP(MenuRoot);
  doc.writeln('    </td>');
  doc.writeln('  </tr>');
  doc.writeln('</table>');
  doc.writeln('</body></html>');
  doc.close();
}