<?
# http://jacob.slompinfo.nl
if($actie == "weer"){
echo "<div align='center'>";
$stadcode="$code";
$fd=file("http://www.weeronline.nl/cgi-bin/citybild?WMO=$stadcode&LANG=nl");
$weer=array();
$plaatje=array();
for($i=0;$i<count($fd);$i++){
if(eregi("de verwachting",$fd[$i])){
$line=$fd[$i];
$start=strpos($line, "de verwachting voor de regio/plaats:");
$start+=37;
$stop=strpos($line,"</b>");
$stop=$stop-$start;
$plaats=substr($line,$start,$stop);
};
if(eregi("°",$fd[$i])){
$line=$fd[$i];
$stop=strpos($line, "°");
$stop2=strpos($line, "<b>");
$stop3=$stop-$stop2-3;
$eind=strpos($line, "</b>");
$eind=$eind-$stop;
$temp=Substr($line, $stop-$stop3, $eind);
$weer[]=$temp;
};
if(eregi("/daten/symbole/",$fd[$i])){
$line=$fd[$i];
$start=strpos($line, "/daten/symbole/");
$start1=strpos($line, "ALT=") + 5;
$eind=strpos($line, "ALT=") - 2;
$eind1=strpos($line, "</td>") - 28;
$eind=$eind - $start;
$eind1=$eind1 - $start1;
$temp=Substr($line, $start, $eind);
$temp1=Substr($line, $start1, $eind1);
$temp2="<img src='http://www.weeronline.nl$temp' ALT=$temp1>";
$plaatje[]=stripslashes($temp2);
};
};
echo"
<b><font face='verdana' size='1' >Het weer in: $plaats</font></b>
<table border=0>
<tr>
<td></td>
<td><font class=\"txt\"><font class=\"txt\">vandaag</font></td>
<td><font class=\"txt\">morgen</font></td>
<td><font class=\"txt\">overmorgen</font></td>
</tr>
<tr>
<td><font class=\"txt\">Min Temp</font></td>
<td><font class=\"txt\">$weer[0]</font></td>
<td><font class=\"txt\">$weer[1]</font></td>
<td><font class=\"txt\">$weer[2]</font></td>
</tr>
<tr>
<td><font class=\"txt\">Max Temp</font></td>
<td><font class=\"txt\">$weer[3]</font></td>
<td><font face='verdana' size='1' >$weer[4]</font></td>
<td><font class=\"txt\">$weer[5]</font></td>
</tr>
<tr>
<td><font class=\"txt\">Ochtend</font></td>
<td>$plaatje[0]</td>
<td>$plaatje[1]</td>
<td>$plaatje[2]</td>
</tr>
<tr>
<td><font class=\"txt\">Middag</font></td>
<td>$plaatje[3]</td>
<td>$plaatje[4]</td>
<td>$plaatje[5]</td>
</tr>
</table>";
echo "<br><center><font face='verdana' size='1' ><a href='weer.php'>Zoek Opnieuw</a></font></center>";
} else {
echo "<script language=\"JavaScript\">
function goto_url(val) {
url = \"weer.php?actie=weer&code=\" + val; document.location.href = url;
}
</script>";
echo "<form method=\"post\"><select name=\"code\" class='invoerveld' onChange=\"javascript:goto_url(this.value)\">
<option value=\"06266\">[Kies een plaats]
<option value=\"06266\">Almere
<option value=\"06283\">Achterhoek
<option value=\"06243\">Alkmaar
<option value=\"06289\">Almelo
<option value=\"06250\">Ameland
<option value=\"06265\">Amersfoort
<option value=\"06240\">Amsterdam
<option value=\"06272\">Apeldoorn
<option value=\"06275\">Arnhem
<option value=\"06284\">Assen
<option value=\"06340\">Breda
<option value=\"06346\">Delft
<option value=\"06369\">Den Bosch
<option value=\"06211\">Den Haag
<option value=\"06235\">Den Helder
<option value=\"06282\">Drenthe ZW
<option value=\"06274\">Ede
<option value=\"w0637\">Egmond
<option value=\"06370\">Eindhoven
<option value=\"06287\">Emmen
<option value=\"06290\">Enschede
<option value=\"06273\">Friese Meren
<option value=\"06281\">Friesl. ZO
<option value=\"06378\">Geleen
<option value=\"06345\">Gouda
<option value=\"u0637\">Groene Hart
<option value=\"06280\">Groningen
<option value=\"06241\">Haarlem
<option value=\"06291\">Hengelo
<option value=\"06270\">Leeuwarden
<option value=\"06210\">Leiden
<option value=\"06269\">Lelystad
<option value=\"06380\">Maastricht
<option value=\"06279\">Meppel
<option value=\"06376\">Nijmegen
<option value=\"06254\">Noordwijk
<option value=\"a0637\">Peel
<option value=\"06377\">Roermond
<option value=\"06344\">Rotterdam
<option value=\"b6370\">Scheveningen
<option value=\"06277\">Schiermonnikoog
<option value=\"06251\">Terschelling
<option value=\"06229\">Texel
<option value=\"06350\">Tilburg
<option value=\"06260\">Utrecht
<option value=\"b0637\">Veluwemeer
<option value=\"06262\">Veluwe/Mid.
<option value=\"06263\">Veluwe N.
<option value=\"06261\">Veluwe Z
<option value=\"06242\">Vlieland
<option value=\"06310\">Vlissingen
<option value=\"06375\">Volkel
<option value=\"06276\">Wageningen
<option value=\"w6240\">Zaanstad
<option value=\"v0637\">Zandvoort
<option value=\"a6370\">Zeeland
<option value=\"u6370\">Zuid-Limburg
<option value=\"x0637\">Zwolle
</select>
</form>";
}?>