function Umwandeln(Zahl)
{
 if (Zahl<10)
  return '0'+Zahl;
 else
  return Zahl;
}

function PresseMitteilung(Nr)
{
 if (Datum[Nr].substring(10,11)=='m')
  Name=Datum[Nr].substring(0,11);
 else
  Name=Datum[Nr].substring(0,10);
 window.open('presse/'+Name+'.htm','presseinfo','width=720,height=480,scrollbars=yes');
}

function Programm()
{
 Heute=new Date();

 Jahr=Heute.getYear();
 if (Jahr<200)
  Jahr=Jahr+1900;

 Jetzt=Jahr+'-'+Umwandeln(Heute.getMonth()+1)+'-'+Umwandeln(Heute.getDate())+'-'+Umwandeln(Heute.getHours());

 Daten();

 laufend=false;
 laufend_ausgegeben=false;
 heute_naechster=false;
 weitere=false;
 Pressezaehler=1;
 for (var i=1;i<Pos+1;i++)
  if (Datum[i]>=Jetzt)
  {
   if ((Datum[i].substring(10,11)=='m')&&(laufend==false))
    if (Datum[i].substring(11,21)<=Jetzt.substring(0,10))
    {
     if (laufend_ausgegeben==false)
     {
      document.writeln('<h2>Laufender Termin:</h2>');
      laufend_ausgegeben=true;
     }
    }
    else
     laufend=true;
   else
    laufend=true;
   if (Datum[i].substring(0,10)>Jetzt.substring(0,10))
    if ((laufend==true)&&(heute_naechster==true)&&(weitere==false))
    {
     document.writeln('<br>');
     document.writeln('<div class="startbilder">');
     document.writeln('  <img src="../bilder/kleine/flyer.jpg" title="Ausschnitt des Flyers &#39;Biologische Invasionen&#39;">');
     document.writeln('  <img src="../bilder/kleine/crocus.jpg" title="Crocus etruscus">');
     document.writeln('  <img src="../bilder/kleine/zaubernuss.jpg" title="Zaubernuss">');
     document.writeln('  <img src="../bilder/kleine/konzert.jpg" title="Wandelkonzert">');
     document.writeln('</div>');
     document.writeln('<h2>Weitere Termine:</h2>');
     weitere=true;
    }
   if ((laufend==true)&&(heute_naechster==false))
   {
    if (Datum[i].substring(0,10)==Jetzt.substring(0,10))
     document.writeln('<h2>Heutiger Termin:</h2>');
    else
     document.writeln('<h2>N&auml;chster Termin:</h2>');
    heute_naechster=true;
   }
   document.writeln('<p><b>'+Termin[i]+'</b><br>'+Thema[i]+'<br>'+Weiteres[i]+'</p>');
   if (Presse[i]=='ja')
   {
    if (Pressezaehler==1)
     Zusatz='aktuellen ';
    else
     Zusatz='';
    Pressezaehler++;
    document.writeln('<p>weitere Informationen: <a href="javascript:PresseMitteilung('+i+')" title="Link zur '+Zusatz+'Pressemitteilung">Pressemitteilung</a></p>');
   }
  }
}