var welcher;
 stunden = new Array("h00", "h01", "h02", "h03", "h04", "h05", "h06", "h07", "h08", "h09", "h10", "h11",
                     "h12", "h13", "h14", "h15", "h16", "h17", "h18", "h19", "h20", "h21", "h22", "h23",
                     "m00", "m01", "m02", "m03", "m04", "m05", "m06", "m07", "m08", "m09", "m10", "m11",
                     "m12", "m13", "m14", "m15", "m16", "m17", "m18", "m19", "m20", "m21", "m22", "m23");

 function aktkarte(sprache)
   {
   w=document.formular.gebiet.selectedIndex;
   geb=document.formular.gebiet.options[w].value;
   if (geb == "DB"){geb="db";}
   if (geb == "NO"){geb="no";}
   if (geb == "WO"){geb="wo";}
   if (geb == "OS"){geb="os";}
   location.href=geb+"/"+geb+"mittel"+sprache+".htm";
   }
 function archivkarte(w)
   {
   w=document.formular.gebiet.selectedIndex;
   if (w < 0) w=0;
   geb=document.formular.gebiet.options[w].value;
   w=document.formular.jah.selectedIndex;
   jahr=document.formular.jah.options[w].value;
   w=document.formular.mon.selectedIndex;
   monat=document.formular.mon.options[w].value;
   w=document.formular.tag.selectedIndex;
   tag=document.formular.tag.options[w].value;
   datum="20"+jahr+monat+tag;

   jetzt = new Date();     //Datum nach heute?
   heute = jetzt.getFullYear()*10000 + (jetzt.getMonth()+1)*100 + jetzt.getDate();
   if (datum > heute)
   {alert('Die letzte Datei in unserem Archiv ist von heute');}
   else
   {endung=".gif";         // ab 1.5.2006 jpeg-Dateien im Archiv
    if (datum >= "20060501") {endung=".jpeg";}
    location.href="http://www.bsh.de/aktdat/modell/stroemungen/archiv/"+geb+datum+endung;
   }
   }

//----------
// button-Aussehen:
//----------
function hover(wen)
{
 alert(wen);
 alert(document.menue1.name);
}
//----------
// Fehler:
//----------
function zeigeFehler(wer)
{
 alert("There are no data for this date");
}
//----------
// Steuer:
//----------
// Day_of_the_year
function doy(y,m,d)
{
  return ymd2julian(y,m,d)-ymd2julian(y,1,1)+1;
}
// Berechnung für Day_of_the_year
function ymd2julian(y, m, d)
{
  if (m < 3)
    var f = -1;
  else
    var f = 0;
   return Math.floor((1461*(f+4800+y))/4)
       + Math.floor(((m-2-(f*12))*367)/12)
       - Math.floor(3*Math.floor((y+4900+f)/100)/4)
       + d
       - 32075;
}

function laden(wer)
{
// bilder ab heute plus 2 Tage und einige vor heute
//  Zeit berechnen
 anfang=20040830;
 monat_text =
 Array(" Jan "," Feb ","Mar "," Apr "," Mai ","Jun ",
 "Jul "," Aug "," Sep "," Okt "," Nov "," Dez ");
 jetzt = new Date();
 jahr = jetzt.getFullYear();
 tag=jetzt.getDate();
 monat=jetzt.getMonth()+1;
 heute=jahr*10000+monat*100+tag;
 jahrtag=doy(jahr,monat,tag);
 anfdat = new Date(jahr,monat-1,tag);

 if (wer.search(/std/) != -1)
 {
   abw=1;
   for(m=0; m<=document.menue1.stag.length-1; m++)
   {
     m_min=(abw-m)/82-0.5;
     // wegen Zeitumstellungen wird noch etwas draufaddiert!!: 20000000
     zw=anfdat-1000*60*60*24*m_min+20000000;
     d = new Date(zw);
     jahr = d.getFullYear();
     tag=d.getDate();
     monat=d.getMonth()+1;
     sheute=jahr*10000+monat*100+tag;
     stunde=m-Math.floor(m/24)*24;
     if (stunde <= 9) {stunde="0"+stunde;}
     sheute_text=tag+"."+monat+". "+stunde;
     // englisch:
     if (wer.search(/e_std/) != -1) {sheute_text=tag+"."+monat+". "+stunde;}
     // Plattdeutsch:
     if (wer.search(/platt_std/) != -1) {sheute_text=tag+"."+monat+". "+stunde;}
     document.menue1.stag.options[m]=new Option(sheute_text);
   }
 }
 else if (wer.search(/W_0/) != -1)
 {
   abw=1;
   for(m=0; m<=document.menue1.stag.length-1; m++)
   {
     m_min=(abw-m)/2-0.5;
     // wegen Zeitumstellungen wird noch etwas draufaddiert!!: 20000000
     zw=anfdat-1000*60*60*24*m_min+20000000;
     d = new Date(zw);
     jahr = d.getFullYear();
     tag=d.getDate();
     monat=d.getMonth()+1;
     sheute=jahr*10000+monat*100+tag;
     sheute_text=tag+"."+monat_text[monat-1]+jahr;
     if (tag <= 9) {sheute_text="  "+sheute_text;}
     document.menue1.stag.options[m]=new Option(sheute_text);
   }
 }
 else if (wer.search(/stroe/) != -1)
 {
  abw=7;
  for(m=0; m<=document.menue1.stag.length-1; m++)
  {
   m_min=abw-m;
   // wegen Zeitumstellungen wird noch etwas draufaddiert!!: 20000000
   zw=anfdat-1000*60*60*24*m_min+20000000;
   d = new Date(zw);
   jahr = d.getFullYear();
   tag=d.getDate();
   monat=d.getMonth()+1;
   sheute=jahr*10000+monat*100+tag;
   sheute_text=tag+"."+monat_text[monat-1]+jahr;
   if (tag <= 9) {sheute_text="  "+sheute_text;}
   document.menue1.stag.options[m]=new Option(sheute_text);
  }
 }
 else if (wer.search(/met/) != -1)
 {
  abw=7;
  for(m=0; m<=document.menue1.stag.length-1; m++)
  {
     m_min=(abw-m)/2-3.0;
     // wegen Zeitumstellungen wird noch etwas draufaddiert!!: 20000000
     zw=anfdat-1000*60*60*24*m_min+20000000;
     d = new Date(zw);
     jahr = d.getFullYear();
     tag=d.getDate();
     monat=d.getMonth()+1;
     sheute=jahr*10000+monat*100+tag;
     sheute_text=tag+"."+monat_text[monat-1]+jahr;
     if (tag <= 9) {sheute_text="  "+sheute_text;}
     document.menue1.stag.options[m]=new Option(sheute_text);
  }
 }
 else{
  abw=2;
  for(m=0; m<=document.menue1.stag.length-1; m++)
  {
   m_min=abw-m;
   // wegen Zeitumstellungen wird noch etwas draufaddiert!!: 20000000
   zw=anfdat-1000*60*60*24*m_min+20000000;
   d = new Date(zw);
   jahr = d.getFullYear();
   tag=d.getDate();
   monat=d.getMonth()+1;
   sheute=jahr*10000+monat*100+tag;
   sheute_text=tag+"."+monat_text[monat-1]+jahr;
   if (tag <= 9) {sheute_text="  "+sheute_text;}
   document.menue1.stag.options[m]=new Option(sheute_text);
  }
 }

if (wer.search(/std/) != -1){document.menue1.stag.selectedIndex=8;}
else                        {document.menue1.stag.selectedIndex=0;}
datum=sheute_text;
for(m=0; m<=document.menue1.stag.length-1; m++)
{
   if(document.menue1.stag.options[m].value == datum){document.menue1.stag.selectedIndex=0;}
}

//  Karten vorladen
if(wer.search(/std/) != -1)
{
    schonmal=1;
    var teil = wer.substr(3,11);
    for (i = 1; i <=letztergif; i+=1)
    { istd=i-1;
      bild[i] = new Image();
//      test="http://www.bsh.de/aktdat/modell/stroemungen/" + teil + "/s" + stunden[istd] + teil + ".gif"; alert(test);
      bild[i].src ="http://www.bsh.de/aktdat/modell/stroemungen/" + teil + "/s" + stunden[istd] + teil + ".gif";
    }
}
else if(wer == "HW_0" || wer == "NW_0")
{
    schonmal=1;
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://atlantis/www-gif/wasserstand/" + wer + i + ".gif";
    }
}
else if(wer == "stroe_1")
{
    schonmal=1;
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://localwww.bsh.de/www-gif/stroemung/stroe_" + i + ".gif";
    }
}
else if(wer == "stroe_3")
{
    schonmal=1;
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://localwww.bsh.de/www-gif/stroemung/stroe_" + i + "_3.gif";
    }
}
else if(wer == "temp_ku" || wer == "temp_no")
{
    schonmal=1;
    bildindex = location.search.substring(1);
    if (bildindex > 0 && bildindex != "")
      {document.karte.src = "http://atlantis/www-gif/"+wer+"_" + bildindex + ".gif";}
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://atlantis/www-gif/"+wer+"_" + i + ".gif";
    }
}
else if(wer == "salz_ku" || wer == "salz_no")
{
    schonmal=1;
    bildindex = location.search.substring(1);
    if (bildindex > 0 && bildindex != "")
      {document.karte.src = "http://atlantis/www-gif/"+wer+"_" + bildindex + ".gif";}
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://atlantis/www-gif/"+wer+"_" + i + ".gif";
    }
}
else if(wer == "met")
{
    schonmal=1;
    bildindex = location.search.substring(1);
    if (bildindex > 0 && bildindex != "")
      {document.karte.src = "http://atlantis/www-gif/met/karte_" + bildindex + ".gif";}
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://atlantis/www-gif/met/karte_" + i + ".gif";
    }
}
else if(wer == "eis_ku" || wer == "eis_no")
{
    schonmal=1;
    bildindex = location.search.substring(1);
    if (bildindex > 0 && bildindex != "")
      {document.karte.src = "http://atlantis/www-gif/"+wer+"_" + bildindex + ".gif";}
    for (i = 1; i <=letztergif; i+=1)
    {
      bild[i] = new Image();
      bild[i].src ="http://atlantis/www-gif/"+wer+"_" + i + ".gif";
    }
}

}

//----------
// Karten-Austausch durch Direktwahl:
//----------
/*
function austausch_karten(welcher,wer)
   {
    j=welcher+1;
    document.karte.src = bild[j].src; 
    adresse=document.karte.src;
      if(wer.search(/std/) == -1)
      {
      if (wer == "stroe_1" || wer == "stroe_3"){adresse="http://localwww.bsh.de/www-gif/stroemung/stroe_";}
      else if (wer == "HW_0" || wer == "NW_0"){adresse="http://atlantis/www-gif/wasserstand/"+wer;}
      else if (wer == "temp_ku" || wer == "temp_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      else if (wer == "salz_ku" || wer == "salz_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      else if (wer == "met"){adresse="http://atlantis/www-gif/met/karte_";}
      else if (wer == "eis_ku" || wer == "eis_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      adresse=adresse.concat(j);
      if (wer == "stroe_3") adresse=adresse.concat("_3");
      adresse=adresse.concat(".gif");
      document.karte.src=adresse;
      }
   }
*/

function austausch_karten(welcher,wer)
   {
    adresse=document.karte.src;
    adstring=document.karte.src;
      if (wer == "stroe_1" || wer == "stroe_3"){adresse="http://localwww.bsh.de/www-gif/stroemung/stroe_";}
      else if (wer == "HW_0" || wer == "NW_0"){adresse="http://atlantis/www-gif/wasserstand/"+wer;}
      else if (wer == "temp_ku" || wer == "temp_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      else if (wer == "salz_ku" || wer == "salz_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      else if (wer == "met"){adresse="http://atlantis/www-gif/met/karte_";}
      else if (wer == "eis_ku" || wer == "eis_no"){adresse="http://atlantis/www-gif/"+wer+"_";}
      adresse=adresse.concat(welcher+1);
      if (wer == "stroe_3") adresse=adresse.concat("_3");
      if(wer.search(/std/) != -1)
      { var teil = wer.substr(3,11);
        adresse ="http://www.bsh.de/aktdat/modell/stroemungen/" + teil + "/s"+ stunden[welcher] + teil;
      }
      adresse=adresse.concat(".gif");
      document.karte.src=adresse;
      j=welcher+1;
   }

function austausch_mittel(welcher,wer)
    {
    adresse=document.karte.src;
    if (welcher == 0){adr = adresse.replace(/..gif/,"g.gif");}
    if (welcher == 1){adr = adresse.replace(/..gif/,"h.gif");}
    if (welcher == 2){adr = adresse.replace(/..gif/,"m.gif");}
    document.karte.src=adr;
    }

//----------
// Ausdruck-Fenster:
//----------
function druck(wer)
   {
      bild_adr = bild[document.menue1.stag.selectedIndex+1].src;
//      var bild_druck = bild_adr;
      if(wer.search(/std/) != -1) {var bild_druck = bild_adr.replace(/gif$/,"jpeg");}
      else {var bild_druck = bild_adr.replace(/gif$/,"pdf");}
      w=window.open(bild_druck,"Druckqualitaet","titlebar=no,toolbar=yes,menubar=yes,resizable,scrollbars,width=850,height=screen.height,left=10,top=10");
      w.focus();
   }
function druck_mittel(wer)
   {
      adresse=document.karte.src;
      var bild_druck = adresse.replace(/gif$/,"jpeg");w=window.open(bild_druck,"Druckqualitaet","titlebar=no,toolbar=yes,menubar=yes,resizable,scrollbars,width=850,height=screen.height,left=10,top=10");
      w.focus();
   }
//----------
// Animation:
//----------
function Animation()
   {
    clearTimeout(timer);
    inani=1;
    if((j > letztergif) || (j <= 0))
    {bildindex=letztergif; timer=0; document.menue1.stag.selectedIndex=letztergif-1;}
    else
    { document.karte.src = bild[j].src;
      document.menue1.stag.selectedIndex=j-1;
      j += 1;
      timer=window.setTimeout("Animation()",delay);
    }
   }
function Animationneu()
   {
    if (timer == 0 )
    {
     if (typeof schonmal == "undefined"){laden();}
     inani=1;
     j=1;
     document.karte.src = bild[j].src;
     document.menue1.stag.selectedIndex=j-1;
     j += 1;
     timer=window.setTimeout("Animation()",delay);
    }
   }
function einmalneu(increm)
   {
    if (typeof schonmal == "undefined")
    {
      nl();
    }
    if (inani == 1) {clearTimeout(timer);inani=0;j=j-1;timer=0;}
    j+=increm;
    if (j>letztergif) { j=1; }
    if (j<=0)        { j=letztergif; }
    document.karte.src = bild[j].src;
    document.menue1.stag.selectedIndex=j-1;bildindex=j;
   }
 function AO(rand)
   {
    if (typeof schonmal == "undefined"){laden();}
    if (inani == 1) {clearTimeout(timer);inani=0;timer=0;}
    if (rand == -1) {j=1;}
    else          {  j=letztergif;}
    document.karte.src = bild[j].src;
    document.menue1.stag.selectedIndex=j-1;bildindex=j;
   }
 function stop()
   {
    if (inani == 1)
     {clearTimeout(timer);
     document.menue1.stag.selectedIndex=j-2;
     j=j-1;
     inani=0;bildindex=j;
     timer=0;
    }
   }
 function tempo(faktor)
   {
    delay=delay+faktor*(delay/2.5);
    delay=Math.floor(delay);
    if (delay<10) {delay=10;}
   }