'.date('H:i',$line[time]).' '.$line[icons].'
'.$line[tempbox].$line[chline].'
'.$line[dewp].'°
'.showprecipt($line[prectot],$uoms[1],$washowzeroprecip,get_lang("No precip")).'
'.fixSnowTS(max($snows),$line[snow],$uoms[4],thunderproc2($line[maxkiw])).'
'.$line[wline].'
'.sprintf("%01.1f", $line[avpres]).' '.$uoms[3].'
'.fixuvimg($line[maxuv],$line[dn],$minuvtoshow).'
'.$line[maxcover].'%
'.$line[minvis].' '.$uoms[5].'
';
return;
}
function get_threehourrow() {
global $tbl3,$line,$hr3,$hrtable3,$daychanges;
global $snows,$washowzeroprecip,$minuvtoshow,$uoms;
$hr3++;
// Header
if($hr3==1){
$hrtable3 = '';
}
if(max($snows) > 0) {$colspan=9;}else{$colspan=8;}
// Dateline
if($hr3==1 || in_array($line[time],$daychanges)) {
$hrtable3.='
'.$line[sunstr].'
'.$line[dateline].'
'.date('H:i',$line[time]).' '.$line[icons].'
'.$line[tempbox].$line[chline].'
'.showprecipt($line[prectot],$uoms[1],$washowzeroprecip,get_lang("No precip")).' ';
if(max($snows) > 0) {$hrtable3.=''.fixsnow(max($snows),round($line[snow]),$uoms[4]).' ';}
$hrtable3.=''.$line[wline].'
'.sprintf("%01.1f", $line[avpres]).' '.$uoms[3].'
'.fixuvimg($line[maxuv],$line[dn],$minuvtoshow).'
'.$line[condtxt].'
';
return;
}
function get_grassrow() {
global $tbl3,$line,$hr3,$grsstable,$daychanges,$tempuom;
global $sgdepth1,$sgdepth2,$washowzeroprecip,$minuvtoshow,$uoms;
// Header
if($hr3==1){
$grsstable = '';
}
// Dateline
if($hr3==1 || in_array($line[time],$daychanges)) {
$grsstable.='
'.$line[sunstr].'
'.$line[dateline].'
'.date('H:i',$line[time]).' '.round($line[temp]).'°
'.showprecipt($line[prectot],$uoms[1],$washowzeroprecip,get_lang("No precip")).'
'.round($line[grass]).'°
'.round($line[surface]).'°
'.round($line[soil1t]).'°
'.get_lang("Moisture").':'.round($line[soil1m]).'%
'.round($line[soil2t]).'°
'.get_lang("Moisture").':'.round($line[soil2m]).'%
';
}
########################################################
# Put together the graph
$icstart = $jstart-(round(($jstop-$jstart)/($mainwidth-20)*15));
$jsdata='
';
$graph='
';
if($baroonmain){$graph.=''.get_lang("Temp./Prec./Baro.").' ';}
else{$graph.=''.get_lang("Temp./Prec.").' ';}
if(max($snows)>0) {$graph.=''.get_lang("Snowdepth").' ';}
$graph.=''.get_lang("Thunder/Dewp.").'
'.get_lang("Solar/UV").'
'.get_lang("Max/min temp.").'
'.get_lang("Compare").'
';
##############################################################
# Put together the output-variables
$wxallmain='
'.get_lang("Overview").'
'.get_lang("Hour-by-hour").'
'.get_lang("Detailed").' 48 '.get_lang("hrs").' ';
if($showgraph == true){
$wxallmain.='
'.get_lang("Meteogram").' ';
}
if($sgactive == true) {
$wxallmain.='
'.get_lang("Grass & Soil").' ';
}
$wxallmain.='
'.$shorttable.'
'.$hrtable3.'
'.$hrtable1.'
';
if($showgraph == true){$wxallmain.='
'.$graph.'
';}
$wxallmain.='
'.$grsstable.'
';
if($usemc){$wxallmain.='Meteoconsult comparedata provided by Hetweeractueel and Meteoconsult . ';}
$wxallmain.='YR.NO-comparedata provided by YR.NO and
NRK . '.$discl;
$wxallgraph=$graph;
$cssage = filemtime($wxallmainfolder.'css/wxall.css');
$wxallhead = '
time()) {
$html = file_get_contents($cacheName);
} else {
$html = file_get_contents($URLS);
file_put_contents($cacheName,$html);;
chmod($cacheName, 0666);
}
$xml=xml2ary($html);
$xml = $xml['Verwachting'][_c]['Plaatsen'][_c]['Plaats'][_c]['Verwachtingen'][_c]['Verwachting'];
$howmany = count($xml);
for ($i = 0; $i < $howmany; $i++) {
$day = $xml[$i][_a]['datum'];
$hour = $xml[$i][_a]['uur'];
$time = strtotime($day.' '.$hour.':00:00 CET');
$jstime = (($time+$utcdiff)*1000);
$tempjson[] = array($jstime,round($xml[$i][_c]['temperatuur'][_v],1));
}
}else{return array();}
return $tempjson;
}
function get_yrdata() {
global $lat,$long,$utcdiff,$jsstop,$fmiplace,$cachedir;
$URLS = "http://api.yr.no/weatherapi/locationforecast/1.8/?lat=$lat&lon=$long"; // URL to the ENGLISH page on yr.no where location is
$cacheName = $cachedir.'yrfrcst_'.md5($lat.$long).'.txt'; // prototype for path/filename for cache file
$fetchSeconds = 3600; // refresh every hour
if (file_exists($cacheName) and filemtime($cacheName) + $fetchSeconds > time()) {
$html = file_get_contents($cacheName);
} else {
$html = file_get_contents($URLS);
file_put_contents($cacheName,$html);;
chmod($cacheName, 0666);
}
$xml=xml2ary($html);
$xml = $xml['weatherdata'][_c];
$forecasts = $xml[product][_c][time];
$howmany = count($forecasts);
for ($i = 0; $i < $howmany; $i++) {
if(isset($forecasts[$i][_c][location][_c][temperature][_a][value])){
$validfr = $forecasts[$i][_a][from];
$jstime = ((strtotime($validfr)+$utcdiff)*1000);
if($jstime<$jsstop){
$tempjson[] = array($jstime,round($forecasts[$i][_c][location][_c][temperature][_a][value],1));
}
}
}
return $tempjson;
}
function microtime_float(){
list($usec, $sec) = explode(" ", microtime());
return ((float)$usec + (float)$sec);
}
?>