5000) {
#
#
## inlezen van de nieuwste synopbron
#
# $dir = "http://www.uradio.ku.dk/~ct/eurovejr/";
# $minimumfilesize = '40';
#
# if (@$fp = fopen ("$dir?M=A","r")) {
#
# while (! feof ($fp)) {
# $line = fgets($fp,1024);
# if ((strstr($line, "EURO")) && (substr ($line,-6,2) >= $minimumfilesize)) {
# $laatstgewijzigd = $line;
# }
# }
# fclose($fp);
#
## echo $laatstgewijzigd;
#
# $ookdetijdcode= explode("EURO",$laatstgewijzigd);
# $tijdcode = substr($ookdetijdcode[1],0,4);
## echo $ookdetijdcode[1];
## echo $tijdcode;
#
# $fr = @fopen ("$dir/EURO$tijdcode","r") or die ("deze weerserver is tijdelijk niet beschikbaar.
");
# $fq = fopen ("werkbestand.txt", "w");
#
# while (! feof ($fr)) {
# $line = fgets($fr,1024);
# fputs ($fq, $line);
# }
# fclose($fr);
# fclose($fq);
#
#
# }
#
#
#
#} #hierna werkbestand.txt gebruiken als synopbron
###poging tot invoegen HAM data
if ($inhoud[HAMsinds]) {
include ("../holiday-weather/weather/vertaal.php");
$HAMtaal = 'en';
$rss = 'ff een truukje';
$oranje="cccccc";
$plaats="$inhoud[Place]";
include ("../HAM/HAMinlezen.php");
include ("../HAM/HAMvandaag2.php");
} else {
# $synopbron = "http://131.54.133.44/cgi-bin/ProductSearch.cgi?current=0&fmt=ll&form=20&frame=_top&prdid=AC&T=l&sub=SN+SM+SI&B1=+SUBMIT+&icao=$station";
$synopbron = "werkbestand1.txt";
if (@$fp = fopen ($synopbron,"r")) {
while (! feof ($fp))
{$line = fgets($fp,1024);
if (strstr($line, "$station"))
{ if (!strstr($line,"NIL")) {
$SynopRegel = $line;
while (!strstr($SynopRegel,"=")) {
$line = fgets($fp,1024);
$SynopRegel .= " ";
$SynopRegel .= $line;
}
}
}
if (strstr($line, "S"))
{ $TijdRegel = $line;
}
}
fclose($fp);
#print $TijdRegel .'
';
$TijdArray = explode (" ",$TijdRegel);
$GMThh = substr($TijdArray[2],2,2);
## omrekenen naar tijd in NL
$MEzT = $GMThh + 2;
if ($MEzT > 24) {$MEzT = $MEzT - 24;}
#print ''.$SynopRegel .'
';
# voor als er geen info is dan sorry
if ($SynopRegel !='') {
$SynopArray = explode (" ",$SynopRegel);
$SynopBlokje=3;
while ($SynopArray[$SynopBlokje])
{
if ($SynopArray[$SynopBlokje]=='333') {BREAK;}
if ($SynopArray[$SynopBlokje]=='222') {BREAK;}
if ($SynopArray[$SynopBlokje]=='555') {BREAK;}
$kengetal=substr($SynopArray[$SynopBlokje],0,1);
if ($kengetal=="1")
{ // temperatuursbepaling
print "Temperature : ";
if (substr($SynopArray[$SynopBlokje],1,1)==1){print "-";}
if (substr($SynopArray[$SynopBlokje],2,1)!=0){print substr($SynopArray[$SynopBlokje],2,1);}
print substr($SynopArray[$SynopBlokje],3,1);
print ",";
print substr($SynopArray[$SynopBlokje],4,1);
print " degrees Celcius
";
}
if ($kengetal=="7")
{ // weerbeeld
if (substr($SynopArray[$SynopBlokje],1,1)=='0'){
$ww = substr($SynopArray[$SynopBlokje],2,1);
} else {
$ww = substr($SynopArray[$SynopBlokje],1,2);}
# print "$plaatsen[$plaats]";
if ($iconen[$ww]=='email')
{ if ($ww<10)
{$ww='0';
} else
{$datum = date("j F Y - H:i:s",time());
# mail ("weer@pagina.nl","onbekende synop","$datum onbekende weerbeeld $inhoud[Plaats] : $ww");
}
} else
{ print "![$inhoud[Plaats] : $weertekst[$ww]](iconen/$iconen[$ww].jpg) ";
}
}
$SynopBlokje++;
}
if(!$ww)
{ // als geen weerbeeld dan wolkendek
$achtsten = substr($SynopArray[2],0,1);
if ($achtsten == '/') {$achtsten='8';}
print "![$inhoud[Plaats] : $achtsten eightst clouded](iconen/$bewolking[$achtsten].jpg) ";
}
if($ww=='05'||$ww=='10')
{ // als nevelig
$achtsten = substr($SynopArray[2],0,1);
if ($achtsten == '/') {$achtsten='8';}
print "";
}
$ww="";
$SynopWind = $SynopArray[2];
if (substr($SynopWind,1,1)=='0'){
$uit = substr($SynopWind,2,1);
} else {
$uit = substr($SynopWind,1,2);
}
print "
Wind : ";
print "$richting[$uit]";
print " force ";
if (substr($SynopWind,3,1)) {$kracht=substr($SynopWind,3,2);} else {$kracht=substr($SynopWind,4,1);}
print "$beaufort[$kracht]";
} else {echo "Unfortunately our weather servers are currently down.";}
} else {echo "Unfortunately our weather servers are currently down.";}
?>
last update : hr CET
This is what our pages look like.
The current weather conditions in a certain European city, accompanied by hyperlinks to weather forecasts and statistical weather data.
For an overview of all the places we provide weatherinformation click here
As there is room for announcements targeted on a certain place or country, it is a perfect place for your banner or hyperlink.
This concept has already proofed itself in the Dutch version : www.vakantieweer.pagina.nl ";
?>
|
Currently in for instance ";} echo "$inhoud[Place]";?>
Compensate CO2 emission of your trip