// Globale Variablen ("Konstanten")
var _titel='Luftsportverband Rheinland-Pfalz e.V. - '; // 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=''; // Navigationszeichensatz
//var _webbase='/_LSVRP/'; // TEST
var _webbase='/'; // 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=39; //letzter Eintrag Uwe 22.01.01
// 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,'Verband',_webbase+'verband.htm','');
setnav(2,'Präsidium',_webbase+'praesi.htm','');
setnav(2,'Gesamtvorstand',_webbase+'vorstand.htm','');
setnav(2,'Geschäftstelle',_webbase+'gestelle.htm','');
setnav(3,'Satzung',_webbase+'satzung.htm','');
setnav(3,'Versicherung',_webbase+'versicherung.htm','');
setnav(3,'Links',_webbase+'links.htm','');
setnav(2,'Frauen',_webbase+'frauen/index.htm','');
setnav(2,'Jugend','http://www.lsj-rp.de/','_blank');
setnav(2,'Medizin',_webbase+'medizin/index.htm','');
setnav(2,'Presse',_webbase+'presse/index.htm','');
setnav(2,'Technik',_webbase+'technik/index.htm','');
setnav(2,'Umwelt',_webbase+'umwelt/index.htm','');
setnav(1,'Termine',_webbase+'termine_uwe.htm','');
setnav(1,'Aktuelles',_webbase+'news.htm','');
setnav(2,'Archiv',_webbase+'news_archiv.htm','');
//setnav(1,'Bilder','http://www.lsvrp.de/album/index.php','_blank');
setnav(1,'Bilder',_webbase+'album/index.php','_blank');
setnav(1,'Vereine',_webbase+'verein_links.htm','');
//setnav(2,'Karte',_webbase+'rlp-karte.htm','');
//setnav(2,'Modell-Vereine',_webbase+'mverein_links.htm','');
//setnav(3,'Karte',_webbase+'rlpm-karte.htm','');
setnav(1,'Flugsicherheit',_webbase+'fsi.htm','');
setnav(2,'Unfallgeschehen',_webbase+'unfall2010.htm','');
setnav(3,'2010',_webbase+'unfall2010.htm','');
setnav(3,'2009',_webbase+'unfall2009b.htm','');
setnav(1,'LTB II-B 10',_webbase+'ltb/index.htm','');
setnav(1,'Luftraum',_webbase+'luftraum.htm','');
setnav(1,'Download',_webbase+'download.htm','');
setnav(1,'Marktplatz',_webbase+'verkauf.htm','');
setnav(1,'Mail','mailto:info@lsvrp.de?subject=LSVRP-Mail','');
setnav(1,'Gästebuch',_webbase+'gaesteb.php','');
//setnav(2,'Anmeldung','http://cgi06.puretec.de/cgi-bin/fb_form?clsid=787f7e188c4105fb0512365759bd562a','fm');
//Bodydefinition
function wrbody(){
var s=titel.toLowerCase();
document.writeln('');
// background="'+_webbase+'LV_hintergrund2.jpg" bgproperties="fixed"
};
function wrstyle(){
document.writeln('');
};
function wrhead(){
document.writeln('');
document.writeln('');
document.writeln(_titel+titel);
document.writeln('');
document.writeln('');
};
// Prozedur zum Anzeigen der zuvor definierten Navigationsleiste
function wrnavig(){
var tit=titel.toLowerCase(); // umwandlung der titelvariable in kleinschrift
// Definition der Navigations-Tabellenzelle
document.writeln('');
document.writeln('
');
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 (" " ) nach vorne
// Wenn kein Untermenü vorlig (level==1), dann bleibt lev leer
lev='';
level=n_level[c];
for(cc=1;cc- '+n_eintrag[c]+'
';
}
else{
ss=''+n_eintrag[c]+'
';
}
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+'- '+
n_eintrag[c]+'
';
}
else{
ss=
''+
n_eintrag[c]+'
';
}
};
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;c1){
// Ja. Setze alle Untermenüs des gleichen Levels auf sichtbar
lev=n_level[foundc];
for(c=foundc;c0;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');
};
// Schreibt Tabellenkopf
function wrtabhead(){
document.writeln('');
document.writeln('');
document.writeln('');
document.writeln(' ');
document.writeln(' | ');
document.writeln('');
document.writeln(''+_titel+titel+'');
document.writeln('
');
document.writeln('');
document.writeln(' | ');
document.writeln(' | ');
document.writeln(' | ');
document.writeln(' ');
document.writeln(' | ');
document.writeln(' ');
document.writeln('');
wrnavig();
document.writeln('');
};
// Schreibt Tabellenende
function wrtabfeed(){
document.writeln('
');
document.writeln('');
document.writeln(' | ');
document.writeln(' | ');
document.writeln(' | ');
document.writeln(' ');
document.writeln('');
document.writeln('Druckversion');
document.writeln('- Luftsportverband Rheinland-Pfalz e. V. - '+par[0]);
document.writeln(' | ');
document.writeln(' ');
document.writeln(' ');
};
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:
//
//*********************************************************************************
function wrjsstart(){
rdparam();
wrhead();
wrbody();
if(printok==0){
wrtabhead();
};
};
//*********************************************************************************
// Erfolgt in Webseite NACH eigenem HTML-Src der Webseite
// Aufruf:
//*********************************************************************************
function wrjsende(){
if(printok==0){
wrtabfeed();
};
wrstyle();
document.writeln(' |