// Globale Variablen ("Konstanten")
var _titel='Segelflugkommission Rheinland-Pfalz - ';  // Webseitentitel-Vorbau
var _tabwidth='100%'; // Tabellebreite, auch Pixel "800" usw. möglich
var _tabborder=0; // tabellenrahmen (0=nichts, 10=sehr dick usw.)
var _navigwidth='165'; // Navigationsmenü-Breite in Pixeln
var _navigfont='<font face="arial" size=2>'; // Navigationszeichensatz
//var _webbase='/uwe/lsvrp/seko/'; // TEST
var _webbase='/seko/';    // REAL LIVE

// Dimensioniert String-Arrays
function makearray(n){
 this.length=n;
 for(var i=1;i<=n;i++)
  this[i]=0;
 return this;
};

var printok=0;
var par='';

// Anzahl der Navigationslinks
// Achtung: Zu hoher Wert produziert Javascript-Fehler
//          Zu kleiner Wert lässt Navigationslinks verschwinden
navigc=79;

// Definition der Navigations-Arrays
n_level=new makearray(navigc);
n_eintrag=new makearray(navigc);
n_link=new makearray(navigc);
n_target=new makearray(navigc);

// Definition der heruasselektierten Navigations-Array
n_row=new makearray(navigc);
n_viewok=new makearray(navigc);

// Übernahme eines Navigationeintrags (Parameterdef. weiter unten)
function setnav(level,eintrag,link,target){
  n_level  [nc]=level;
  n_eintrag[nc]=eintrag;
  n_link   [nc]=link;
  n_target [nc]=target;
  nc=nc+1;
}

//*********************************************************************************
// Füllen der Navigationseinträge
// Parameter:
//   level  : Tiefe der Navigation 
//            (Basis=1, 1.Untermenü=2, 2. Untermenü=3 (mehr geht nicht)
//   Eintrag: Text, der als klickbarer Link in Navigationsleiste erscheint
//   Links  : URL-Pfad auf mit Link adressierte Webpage
//   Target : "", wenn Link in gleichen Browser verweis, 
//            "irgendetwas", wenn neues Browserfenster geöffnet werden soll
// ACHTUNG: immer nc=1 vor erstem Aufruf von setnav setzen!
//*********************************************************************************
nc=1;   

setnav(1,'Start',_webbase+'../index.htm','');
setnav(1,'Home',_webbase+'index.htm','');
setnav(1,'Wir &uuml;ber uns',_webbase+'wiruns.htm','');
setnav(2,'Jahresbericht 2004',_webbase+'jbericht04.htm','');
setnav(2,'Jahresbericht 2003',_webbase+'jbericht03.htm','');
setnav(1,'Aktuelles',_webbase+'news.htm','');
setnav(1,'Streckenflugtraining',_webbase+'trainer.htm','');
setnav(1,'Wettbewerbe',_webbase+'wettbewerbe.htm','');
setnav(2,'JuniorenQuali2009','http://wettbewerb.sfg-wershofen.de/','_blank');
setnav(2,'S&uuml;d/West Deutsche 08','http://www.landau-wettbewerb.de','_blank');
setnav(2,'Damen-DM 08','http://www.dsmf2008.de','_blank');
setnav(2,'JuniorenQuali2007','http://www.jmrlp07.de','_blank');
setnav(2,'Quali2007 Landau','http://www.landau-wettbewerb.de','_blank');
//setnav(3,'Bestimmungen',_webbase+'landau2006_afb.htm','');
//setnav(3,'Meldeformular',_webbase+'landau2006_melde.htm','');
//setnav(3,'Gewicht Club',_webbase+'landau2006_gc.htm','');
setnav(2,'Jugend VGL Landau 03',_webbase+'ju_vgl.htm','');
setnav(2,'LM 02 Pirmasens',_webbase+'lm02.htm','');
setnav(2,'Süd/West Deutsche 01',_webbase+'block2001.htm','');
setnav(3,'Wertung FAI',_webbase+'marpi2001_fai.htm','');
setnav(3,'Wertung Std',_webbase+'marpi2001_std.htm','');
setnav(3,'Wertung Dosi',_webbase+'hihai2001_doppel.htm','');
setnav(3,'Wertung Club',_webbase+'hihai2001.htm','');
setnav(3,'Bericht Marpingen',_webbase+'bericht_marpi01.htm','');
setnav(2,'Kunstflug 01',_webbase+'kunstflug2001.htm','');
setnav(2,'LM 00 Mainz',_webbase+'lm2000.htm','');
setnav(2,'Block 99 Lachen',_webbase+'block99.htm','');
setnav(2,'DMST',_webbase+'dmst.htm','');
setnav(3,'2007','http://www.onlinecontest.org/olc-2.0/gliding/getScoring.html?scoringId=120&country=DE&subcountry=','_blank');
setnav(3,'2006','http://www.daec.de/se/breitensport/dmst/dmst-online.php','DMST2006');
setnav(3,'2005','http://www.daec.de/se/breitensport/dmst/dmst-online.php?http://www.onlinecontest.org/olcphp/2005/ausw_klassen.php?olc=dmst&ein_kl=keine&spr=de','_blank');
setnav(3,'2004','http://www.daec.de/se/breitensport/dmst/dmst-online.php?http://www.onlinecontest.org/olcphp/2004/ausw_klassen.php?olc=dmst&ein_kl=keine&spr=de','DMST2004');
setnav(3,'2003','http://www.daec.de/se/breitensport/dmst/dmst-online.php?http://www.onlinecontest.org/olcphp/2003/ausw_klassen.php?olc=dmst&ein_kl=keine&spr=de','DMST2003');
setnav(3,'2002',_webbase+'dmst02.htm','');
setnav(3,'2001',_webbase+'dmst01.htm','');
setnav(3,'2000',_webbase+'dmst00.htm','');
setnav(3,'1999',_webbase+'dmst99.htm','');
setnav(3,'1998',_webbase+'dmst98.htm','');
setnav(3,'1997',_webbase+'dmst97.htm','');
setnav(3,'1996',_webbase+'dmst96.htm','');
setnav(2,'OLC','http://www3.onlinecontest.org/olc-2.0/gliding/getScoring.html?scoringId=1&today','_blank');
setnav(2,'Bundesliga','http://www.onlinecontest.org/olc-2.0/gliding/league.html?st=olc-league&r=total&ltp=first&rt=olc&c=DE&sc=&sp=2010','_blank');
setnav(1,'Ignatz Bernauer Pokal',_webbase+'ib_pokal.htm','');
setnav(1,'Förderverein',_webbase+'fv.htm','');
setnav(2,'Aufnahmeantrag',_webbase+'fv_anmeldepdf.php','');
setnav(3,'Online-Formular',_webbase+'fv_mailformular.php','');
setnav(2,'Förderflugzeuge',_webbase+'ff.htm','');
setnav(2,'ASW-20 JO',_webbase+'jo_asw20.htm','');
setnav(2,'LS-1f RP',_webbase+'rp_ls1f.htm','');
setnav(2,'Vergabe',_webbase+'vergabe.htm','');
setnav(1,'D-Kader',_webbase+'dkader.htm','');
setnav(2,'Mitglieder',_webbase+'dkader_mitglieder.htm','');
setnav(2,'Treffen 2007',_webbase+'dkader_m2007.htm','');
setnav(1,'Flugberichte',_webbase+'flugbericht.htm','');
setnav(2,'St. Auban 2003',_webbase+'flugbericht_stauban03.htm','');
setnav(2,'500km als Rolli-Flieger',_webbase+'flugbericht_rolli500.htm','');
setnav(2,'Training Wilsche 1',_webbase+'flugbericht_lutz_b.htm','');
setnav(2,'Training Wilsche 2',_webbase+'flugbericht_wilsche.htm','');
setnav(2,'Hunsrückwelle',_webbase+'flugbericht_welle_huns.htm','');
setnav(2,'St. Auban 2000  I',_webbase+'dkader_lager.htm','');
setnav(2,'St. Auban 2000 II',_webbase+'dkader_stauban.htm','');
setnav(2,'..mit Eric Napoleon',_webbase+'flugbericht_marc_eric.htm','');
setnav(2,'805km von Serres',_webbase+'flugbericht_230799.htm','');
setnav(2,'465km von Speyer',_webbase+'flugbericht_465.htm','');
setnav(1,'Kunstflug','http://www.kunstflieger.de/rp.htm','kf');
setnav(1,'Links',_webbase+'links.htm','');
setnav(2,'Flieger&auml;rzte',_webbase+'mediziner.htm','');
setnav(1,'Download',_webbase+'download2.htm','');
setnav(2,'Download DAeC','http://www.daec.de/down/index.php3?sparte=110','_blank');
setnav(1,'EMail','mailto:mail@uwe-melzer.de?subject=SEKO+Mail','');

//Bodydefinition
function wrbody(){
  var s=titel.toLowerCase();
  document.writeln('<body bgcolor=#ccffff text=#000000 link=#0000a0 vlink=000080>');
     //background="'+_webbase+'LV_hintergrund2.jpg" bgproperties="fixed" 
};

function wrstyle(){
  document.writeln('<STYLE type="text/css">');
  document.writeln('a:link    {text-decoration:none;}');
  document.writeln('a:active  {text-decoration:none;}');
  document.writeln('a:visited {text-decoration:none;}');
  document.writeln('a:hover   {text-decoration:none;color:#a00000;}');
  document.writeln('</STYLE>');
};

function wrhead(){
  document.writeln('<head>');
  document.writeln('<title>');
  document.writeln(_titel+titel);
  document.writeln('</title>');
  wrstyle();
  document.writeln('</head>');
};

// Prozedur zum Anzeigen der zuvor definierten Navigationsleiste
function wrnavig(){
  var tit=titel.toLowerCase();  // umwandlung der titelvariable in kleinschrift

  // Definition der Navigations-Tabellenzelle
  document.writeln('<td width="'+_navigwidth+'" align=left valign=top>');
  document.writeln('<br><br>');
  document.writeln(_navigfont);

  p=location.pathname;

  // Durchlaufe Linkliste und finde Link heraus, der angeklickt wurde
  // Die Identizierung erfolgt über die Variable titel, die in
  // Webseite gesetzt werden muss
  foundc=0; 
  foundok=0;
  sss='';
  for(c=navigc-1;c>0;c--){

    // Prüfe, ob Untermenü vorliegt
    // Rücke Text je Levelstufe um zwei Tabs ("&nbsp;" ) nach vorne
    // Wenn kein Untermenü vorlig (level==1), dann bleibt lev leer
    lev='';
    level=n_level[c];
    for(cc=1;cc<level;cc++){
      lev=lev+'&nbsp;&nbsp;';
    };

    if((foundok==0)&&(p==n_link[c])){
      foundok=1;  // Ok, angeklickter Menüpunkt wurde identifiuziert
    };
    
    if(foundok==1){
    
      // Aktiver Menüpunk: Schreibe nur Text statt Referenz

      if(lev!=''){
        // Aktiver Menüpunkt ist Untermenü, rücke ihn entsprechend vor
        ss=lev+'<b>- '+n_eintrag[c]+'</b><br>';
      }
      else{
        ss='<li><b>'+n_eintrag[c]+'</b><br>';
      }
      foundok=2;
      foundc=c;
    }
    else{

      // Inaktiver Menüpunk: Schreibe Referenz statt Text
      if(lev!=''){
        // Menüpunkt ist Untermenü, rücke ihn entsprechend vor
        ss=
          lev+'<a href="'+n_link[c]+'" target="'+n_target[c]+'">- '+
          n_eintrag[c]+'</a><br>';
      }
      else{
        ss=
          '<li><a href="'+n_link[c]+'" target="'+n_target[c]+'">'+
          n_eintrag[c]+'</a><br>';
      }
    };
    n_row[c]=ss;   // Kopiere generierten Refeferenz- bzsw. Textstring
    n_viewok[c]=0; // setze Sichtbar-Bool-Wert vorerst auf false
  };

  // Setze alle Sichtbar-Bool-Werte von Basislinks auf 1; 
  // diese sind immer sichtbar
  for(c=1;c<navigc;c++){
    if(n_level[c]==1){
      n_viewok[c]=1;
    };
  };

  // Aktiver Menüpunkt ist ein Untermenü?
  if(n_level[foundc]>1){

    // Ja. Setze alle Untermenüs des gleichen Levels auf sichtbar
    lev=n_level[foundc];
    for(c=foundc;c<navigc;c++){
      if(n_level[c]<=lev){
        n_viewok[c]=1;
        if(n_level[c]==2){lev=2;};
      };
      if(n_level[c]==1)
        break;
    };


    lev=n_level[foundc];
    for(c=foundc-1;c>0;c--){
      if(n_level[c]<=lev){
        n_viewok[c]=1;
        if(n_level[c]==2){lev=2;};
      };
      if(n_level[c]==1)
        break;
    };

  };

  // hat aktives (Unter-)Menü Untermenüs?
  // Wenn ja, setze alle diese Untermenüs auf sichtbar
  lev=n_level[foundc]+1;
  for(c=foundc+1;c<navigc;c++){
    if(n_level[c]==lev)
      n_viewok[c]=1;
    if(n_level[c]<lev)
      break;
  };

  // Durchlaufe Liste der Menüpunkt und schreibe alle
  // sichtbaren in das document; nichtsichtbare werden ignoriert
  for(c=1;c<navigc;c++){
    if(n_viewok[c]==1)
      document.writeln(n_row[c]);
  };
  document.writeln('<br><br><br>');
  document.writeln('<img src="img/glder21v2.gif">');
  document.writeln('</td>');
 
};

// Schreibt Tabellenkopf
function wrtabhead(){
  document.writeln('<table border='+_tabborder+' width="'+_tabwidth+'" cellpadding=0 cellspacing=0>');

  document.writeln('<tr>');
  document.writeln('<td width=125>');
  document.writeln('<center><img src="'+_webbase+'lsvrp_logo.gif">');
  document.writeln('</td>');

  document.writeln('<td>');
  document.writeln('<center><font face="arial" size=4>'+_titel+titel+'</font></center>');

  document.writeln('<br>');
  document.writeln('<table width=100% border=0 cellspacing=0 cellpadding=0>');
  document.writeln('<tr><td width=100% height="3" bgcolor=#330033></td></tr>');
  document.writeln('<tr><td width=100% height="3" bgcolor=#1122dd></td></tr>');
  document.writeln('<tr><td width=100% height="3" bgcolor=#11aadd></td></tr>');
  document.writeln('</table>');

  document.writeln('</td>');
  document.writeln('</tr>');

  document.writeln('<tr>');
  wrnavig();
  document.writeln('<td align=left valign=top>');
};

// Schreibt Tabellenende
function wrtabfeed(){

  document.writeln('<br>');
  document.writeln('<table width=100% border=0 cellspacing=0 cellpadding=0>');  
  document.writeln('<tr><td width=100% height="3" bgcolor=#11aadd></td></tr>');
  document.writeln('<tr><td width=100% height="3" bgcolor=#1122dd></td></tr>');
  document.writeln('<tr><td width=100% height="3" bgcolor=#330033></td></tr>');
  document.writeln('</table>');

  document.writeln('<font face="arial" size=1>');

  document.writeln('<center><a href="'+par[0]+'#p" target="pw">Druckversion</a>');
  document.writeln('- SEKO Rheinland-Pfalz - '+par[0]);

  document.writeln('</td>');
  document.writeln('</tr>');
  document.writeln('</table>');
};

function rdparam(){
  var urlinhalt=location.href;
  par=urlinhalt.split('#');
  if(par[1]=="p"){
    printok=1;
  }
  else{
   printok=0;
  }
};

//*********************************************************************************
// Erfolgt in Webseite VOR eigenem HTML-Src der Webseite
// Aufruf: 
//   <script>
//     var titel='Hello World';   Titelvariable muss gesetzt werden!
//                                Muss die in Navigation verwendeten 
//                                Ident/Ident2/Ident3-Wörter enthalten!
//     var pfad='./';             Pfadvariable für Links,
//                                Verweist i.d.R. immer auf Rootverzeichnis,
//                                Befindet sich die Webseite z.B. in einem
//                                Unterverzeichnis ist Pfad="../'
//     wrjsstart();
//   </script>
//*********************************************************************************
function wrjsstart(){
  rdparam();
  wrhead();
  wrbody();
  if(printok==0){
    wrtabhead();
  };
};

//*********************************************************************************
// Erfolgt in Webseite NACH eigenem HTML-Src der Webseite
// Aufruf: <script>wrjsende();</script>
//*********************************************************************************
function wrjsende(){
  if(printok==0){
    wrtabfeed();
  };
  document.writeln('</body></html>');
};