" /* --------------------------------------------------------- // Alles weitere sind Interna // --------------------------------------------------------- */ // Globales Menue-Objekt var smMenue = new Array(); /* --------------------------------------------------------- // function smMenueEintrag(pfad,url) // Erzeugt einen Menüeintrag mit // pfad == "level1/level2/level3/.../levelN" // und url ist ein URL der Seite, die beim Anklicken // von 'levelN' geladen wird. // ACHTUNG: level1 bis levelN-1 müssen bereits existieren! // --------------------------------------------------------- */ function smMenueEintrag(pfad,url) { // lokale Variablen var bezeichnung,status,vorgaenger = ""; // evtl führende und abschließende Slashes von pfad entfernen: if (pfad.charAt(0) == smMenueTrennzeichen) pfad = pfad.substring(1,pfad.length); if (pfad.charAt(pfad.length-1) == smMenueTrennzeichen) pfad = pfad.substring(0,pfad.length-1); var letztesTrennzeichen = pfad.lastIndexOf(smMenueTrennzeichen); if (letztesTrennzeichen <= 0) // top-level menueeintrag { bezeichnung = pfad; versteckt = true; vorgaenger = ""; // kein vorgaenger, da top-level } else { bezeichnung = pfad.substring(letztesTrennzeichen+1,pfad.length); versteckt = true; vorgaenger = pfad.substring(0,letztesTrennzeichen); } InternErzeugeMenueEintrag(smMenue,pfad,pfad,url,bezeichnung,versteckt,vorgaenger); } /* --------------------------------------------------------- // function InternErzeugeMenueEintrag(menueObjekt,rest,pfad,url,bezeichnung,versteckt,vorgaenger) // Interne Fkt. für einen Menü-Eintrag. // Parameter: // - menueObjekt: der Objektbezeichner der Menüebene; falls // ein Top-Level eintragt gemacht wird, ist // menueObjekt == smMenue (globale Variable), // sonst menueObjekt == smMenue[l1].sub[l2]...sub // - rest: ist der Rest des ursprünglichen Pfades; falls rest // keine Trennzeichen mehr enthält, ist rest == bezeichnung // - pfad: der volle Pfad des Menüeintrages // - url: s.o. // - bezeichnung: Der letzte Teil des Pfades, also der // eigentliche Eintrag im Menü // - versteckt: Boolescher Wert // - vorgaenger: pfad ohne bezeichnung // --------------------------------------------------------- */ function InternErzeugeMenueEintrag(menueObjekt,rest,pfad,url,bezeichnung,versteckt,vorgaenger) { if (rest.indexOf(smMenueTrennzeichen) == -1) menueObjekt[rest] = new InternMenueEintrag(pfad,url,bezeichnung,versteckt,vorgaenger); else { var menueLevel = rest.substring(0,rest.indexOf(smMenueTrennzeichen)); var neuerRest = rest.substring(rest.indexOf(smMenueTrennzeichen)+1,rest.length); InternErzeugeMenueEintrag(menueObjekt[menueLevel].sub,neuerRest,pfad,url,bezeichnung,versteckt,vorgaenger); } } /* --------------------------------------------------------- // function InternMenueEintrag(pfad,url,bezeichnung,versteckt,vorgaenger) // Interner Objekt-Konstruktor // --------------------------------------------------------- */ function InternMenueEintrag(pfad,url,bezeichnung,versteckt,vorgaenger) { this.pfad = pfad; this.url = url; this.bez = bezeichnung; this.hidden = versteckt; this.parent = vorgaenger; this.sub = new Array(); } /* --------------------------------------------------------- // function InternNaechstenLevelAusgeben(M,indent) // Interne Ausgabefunktion für einen Menülevel. // Parameter: // - M: Menüobjekt // - indent: Integer, der die Einrücktiefe angibt // --------------------------------------------------------- */ function InternNaechstenLevelAusgeben(M,indent) { var indentString = ""; for (i in M) // for (i=0; i < M.length; i++) { indentString = ""; for (j = indent; j > 0; j--) indentString += smMenueEinschub+" "; //self.baum.document.writeln(indentString,M[i].pfad,M[i].url,M[i].bez,M[i].hidden,M[i].parent); var statuswechsel=smMenueEinschub+" "; var laenge=0; for (j in M[i].sub) ++laenge; // sollte eigentlich gleich M[i].sub.length sein, ist es aber nicht!? if (laenge > 0) // => es gibt submenue-eintrage if (! M[i].hidden) // nicht versteckt { statuswechsel = ""+smMenueAufgeklappt+" "; } else { statuswechsel = ""+smMenueZugeklappt+" "; } // if ((M[i].url == "aktuell.htm") || (M[i].url == "aktuell.gif") || (M[i].url == "aktuell.jpg")) if (M[i].url.substr(M[i].url.length-3,3) == "htm") var ziel="tabelle"; // var ziel="grafik"; /* ziel in grafik ändern, wenn Tabellen und Grafiken im gleichen Frame ausgegeben werden sollen! else var ziel="grafik"; if ((M[i].pfad == "Startseite") || (M[i].pfad == "Start page") || (M[i].pfad == "Page Start") || (M[i].pfad == "Pagina. iniziale") || (M[i].url.substr(0,4).toLowerCase() == "http")) var ziel="_parent"; if (M[i].url == "wstation.html") var ziel="_blank"; if (M[i].url == "current.html") var ziel="_blank"; if (M[i].url != "") var anchorStart = ""; else var anchorStart = ""; var anchorEnd = ""; self.baum.document.writeln(indentString,statuswechsel,anchorStart,M[i].bez,anchorEnd,"
"); if (laenge > 0 && (! M[i].hidden)) // zu 'laenge' s.o. InternNaechstenLevelAusgeben(M[i].sub,indent+1); } } /* --------------------------------------------------------- // function smMenueAusgeben() // Ausgabefunktion für das gesamte Menü. // Arbeitet mit globalem Objekt smMenue // --------------------------------------------------------- */ function smMenueAusgeben() { self.baum.document.open(); // self.baum.document.linkColor = "red"; // self.baum.document.vlinkColor = "green"; // self.baum.document.alinkColor = "blue"; // self.baum.document.writeln(''); self.baum.document.writeln(smMenueHTMLKOPF); InternNaechstenLevelAusgeben(smMenue,0); self.baum.document.writeln(smMenueHTMLFUSS); // self.baum.document.writeln(''); self.baum.document.close(); } /* --------------------------------------------------------- // function InternVerstecken(menueObjekt,restpfad,zustand) // Interne Funktion zum Setzten der hidden-Eigenschaft. // --------------------------------------------------------- */ function InternVerstecken(menueObjekt,restpfad,zustand) { if (restpfad.indexOf(smMenueTrennzeichen) == -1) menueObjekt[restpfad].hidden = zustand; else { var menueLevel = restpfad.substring(0,restpfad.indexOf(smMenueTrennzeichen)); var neuerRest = restpfad.substring(restpfad.indexOf(smMenueTrennzeichen)+1,restpfad.length); InternVerstecken(menueObjekt[menueLevel].sub,neuerRest,zustand); } } /* --------------------------------------------------------- // submenueVerstecken(pfad) // Versteckt ein Submenü, das über den vollen Pfad // spezifiziert wird. // Analog: function submenueZeigen(pfad) // --------------------------------------------------------- */ function submenueVerstecken(pfad) { InternVerstecken(smMenue,pfad,true); //smMenueAusgeben(); } function submenueZeigen(pfad) { InternVerstecken(smMenue,pfad,false); //smMenueAusgeben(); } smMenueEintrag("Info","info.html") smMenueEintrag("Page Start","") smMenueEintrag(" ","") smMenueEintrag("Page météo","current.html") smMenueEintrag("Display","minidisplay.gif") smMenueEintrag("Actuelle","") smMenueEintrag("Actuelle/Tableau","aktuell.htm") smMenueEintrag("Actuelle/Graphiques","aktuell.gif") smMenueEintrag("Actuelle/Mini","") smMenueEintrag("Actuelle/Mini/Temp. 9","mini_currentt9.gif") smMenueEintrag("Actuelle/Semaine","") smMenueEintrag("Actuelle/Semaine/Température","mini_weekt.gif") smMenueEintrag("Actuelle/Semaine/P.atmo.","mini_weekd.gif") smMenueEintrag("Actuelle/Semaine/P. de rosée","mini_weekdp.gif") smMenueEintrag("Actuelle/Dir. du vent","ddis_current.gif") smMenueEintrag(" ","") smMenueEintrag("Tableau","") smMenueEintrag("Tableau/Semaines","") smMenueEintrag("Tableau/Semaines/2007","") smMenueEintrag("Tableau/Semaines/2007/S 9","w2007_09.htm") smMenueEintrag("Tableau/Semaines/2007/S 10","w2007_10.htm") smMenueEintrag("Tableau/Semaines/2007/S 11","w2007_11.htm") smMenueEintrag("Tableau/Semaines/2007/S 12","w2007_12.htm") smMenueEintrag("Tableau/Semaines/2007/S 13","w2007_13.htm") smMenueEintrag("Tableau/Semaines/2007/S 18","w2007_18.htm") smMenueEintrag("Tableau/Semaines/2007/S 19","w2007_19.htm") smMenueEintrag("Tableau/Mois","") smMenueEintrag("Tableau/Mois/2007","") smMenueEintrag("Tableau/Mois/2007/mars","m200703.htm") smMenueEintrag("Tableau/Mois/2007/avril","m200704.htm") smMenueEintrag("Tableau/Mois/2007/avril/min. max.","minmax200704.htm") smMenueEintrag("Tableau/Mois/2007/mai","m200705.htm") smMenueEintrag("Tableau/Mois/2007/mai/min. max.","minmax200705.htm") smMenueEintrag("Tableau/Années","") smMenueEintrag("Tableau/Années/2007","") smMenueEintrag("Tableau/Années/2007","y2007.htm") smMenueEintrag("Tableau/Années/2007/min. max.","minmax2007.htm") smMenueEintrag("Graphiques","") smMenueEintrag("Graphiques/Semaines","") smMenueEintrag("Graphiques/Semaines/2007","") smMenueEintrag("Graphiques/Semaines/2007/S 9","w2007_09.gif") smMenueEintrag("Graphiques/Semaines/2007/S 9/Distribution","ddis_w2007_09.gif") smMenueEintrag("Graphiques/Semaines/2007/S 10","w2007_10.gif") smMenueEintrag("Graphiques/Semaines/2007/S 10/Distribution","ddis_w2007_10.gif") smMenueEintrag("Graphiques/Semaines/2007/S 11","w2007_11.gif") smMenueEintrag("Graphiques/Semaines/2007/S 11/Distribution","ddis_w2007_11.gif") smMenueEintrag("Graphiques/Semaines/2007/S 12","w2007_12.gif") smMenueEintrag("Graphiques/Semaines/2007/S 12/Distribution","ddis_w2007_12.gif") smMenueEintrag("Graphiques/Semaines/2007/S 13","w2007_13.gif") smMenueEintrag("Graphiques/Semaines/2007/S 13/Distribution","ddis_w2007_13.gif") smMenueEintrag("Graphiques/Semaines/2007/S 18","w2007_18.gif") smMenueEintrag("Graphiques/Semaines/2007/S 19","w2007_19.gif") smMenueEintrag("Graphiques/Mois","") smMenueEintrag("Graphiques/Mois/2007","") smMenueEintrag("Graphiques/Mois/2007/Résumé1","minmax2007_1.gif") smMenueEintrag("Graphiques/Mois/2007/Résumé2","minmax2007_2.gif") smMenueEintrag("Graphiques/Mois/2007/février","m200702.gif") smMenueEintrag("Graphiques/Mois/2007/février/Température","m200702t.gif") smMenueEintrag("Graphiques/Mois/2007/février/Hum.","m200702f.gif") smMenueEintrag("Graphiques/Mois/2007/février/P.atmo.","m200702d.gif") smMenueEintrag("Graphiques/Mois/2007/février/Vent","m200702v.gif") smMenueEintrag("Graphiques/Mois/2007/février/Dir. du vent","m200702wd.gif") smMenueEintrag("Graphiques/Mois/2007/février/Pluie","m200702p.gif") smMenueEintrag("Graphiques/Mois/2007/février/P. de rosée","m200702dp.gif") smMenueEintrag("Graphiques/Mois/2007/février/Temp au vent","m200702wc.gif") smMenueEintrag("Graphiques/Mois/2007/février/Rafales","m200702gu.gif") smMenueEintrag("Graphiques/Mois/2007/mars","m200703.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Température","m200703t.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Hum.","m200703f.gif") smMenueEintrag("Graphiques/Mois/2007/mars/P.atmo.","m200703d.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Vent","m200703v.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Dir. du vent","m200703wd.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Pluie","m200703p.gif") smMenueEintrag("Graphiques/Mois/2007/mars/P. de rosée","m200703dp.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Temp au vent","m200703wc.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Rafales","m200703gu.gif") smMenueEintrag("Graphiques/Mois/2007/mars/Distribution","ddis_m200703.gif") smMenueEintrag("Graphiques/Mois/2007/avril","m200704.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Température","m200704t.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Hum.","m200704f.gif") smMenueEintrag("Graphiques/Mois/2007/avril/P.atmo.","m200704d.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Vent","m200704v.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Dir. du vent","m200704wd.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Pluie","m200704p.gif") smMenueEintrag("Graphiques/Mois/2007/avril/P. de rosée","m200704dp.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Temp au vent","m200704wc.gif") smMenueEintrag("Graphiques/Mois/2007/avril/Rafales","m200704gu.gif") smMenueEintrag("Graphiques/Mois/2007/mai","m200705.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Température","m200705t.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Hum.","m200705f.gif") smMenueEintrag("Graphiques/Mois/2007/mai/P.atmo.","m200705d.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Vent","m200705v.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Dir. du vent","m200705wd.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Pluie","m200705p.gif") smMenueEintrag("Graphiques/Mois/2007/mai/P. de rosée","m200705dp.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Temp au vent","m200705wc.gif") smMenueEintrag("Graphiques/Mois/2007/mai/Rafales","m200705gu.gif") smMenueEintrag("Graphiques/Années","") smMenueEintrag("Graphiques/Années/2007","") smMenueEintrag("Graphiques/Années/2007/Température","y2007t.gif") smMenueEintrag("Graphiques/Années/2007/Hum.","y2007f.gif") smMenueEintrag("Graphiques/Années/2007/P.atmo.","y2007d.gif") smMenueEintrag("Graphiques/Années/2007/Vent","y2007v.gif") smMenueEintrag("Graphiques/Années/2007/Dir. du vent","y2007wd.gif") smMenueEintrag("Graphiques/Années/2007/Pluie","y2007p.gif") smMenueEintrag("Graphiques/Années/2007/P. de rosée","y2007dp.gif") smMenueEintrag("Graphiques/Années/2007/Temp au vent","y2007wc.gif") smMenueEintrag("Graphiques/Années/2007/Rafales","y2007gu.gif") smMenueEintrag("Graphiques/Années/2007/Distribution","ddis_y2007.gif") smMenueEintrag("Climatologie","clima_y.gif") smMenueEintrag("Valeurs sur long terme","") smMenueEintrag("Valeurs sur long terme/Mois","monthlongtime.gif") smMenueEintrag("Valeurs sur long terme/Total","longtimecalculated.gif") smMenueHTMLKOPF = " Menu des données météo;\n" smMenueHTMLKOPF += '

© 2007 Werner Krenn

Données météo
Sélection

\n' smMenueHTMLKOPF += '' smMenueHTMLFUSS = '



' //--> Données météo