"
title=""
width="48" height="48" style="border: 0;" />
| - : & | ||||||||
|
||||||||
| - : & | ||||||||
|
||||||||
![\"$msg\"](\"{$imagesDir}rising.gif\" "\\"$msg\\"")
";
} else {
// today is lesser
$msg = sprintf($textDN,$absDiffStr);
$image = "![\"$msg\"](\"{$imagesDir}falling.gif\" "\\"$msg\\"")
";
}
if ($Legend) {
return ($diff . $Legend . $image);
} else {
return $image;
}
}
//=========================================================================
// decode UV to word+color for display
function get_UVrange ( $inUV ) {
// figure out a text value and color for UV exposure text
// 0 to 2 Low
// 3 to 5 Moderate
// 6 to 7 High
// 8 to 10 Very High
// 11+ Extreme
if(strpos($inUV,',') !== false ) {
$uv = preg_replace('|,|','.',$inUV);
} else {
$uv = $inUV;
}
switch (TRUE) {
case ($uv == 0):
$uv = langtransstr('None');
break;
case (($uv > 0) and ($uv < 3)):
$uv = ' ' . langtransstr('Low') . ' ';
break;
case (($uv >= 3) and ($uv < 6)):
$uv = ' ' . langtransstr('Medium') . ' ';
break;
case (($uv >=6 ) and ($uv < 8)):
$uv = ' ' . langtransstr('High') . ' ';
break;
case (($uv >=8 ) and ($uv < 11)):
$uv = ' ' . langtransstr('Very High') . ' ';
break;
case (($uv >= 11) ):
$uv = ' ' . langtransstr('Extreme') . ' ';
break;
} // end switch
return $uv;
} // end get_UVrange
//=========================================================================
// change the hh:mm AM/PM to h:mmam/pm format
function fixup_time ( $WDtime ) {
global $timeOnlyFormat,$DebugMode;
if ($WDtime == "00:00: AM") { return ''; }
$t = explode(':',$WDtime);
if (preg_match('/p/i',$WDtime)) { $t[0] = $t[0] + 12; }
if ($t[0] > 23) {$t[0] = 12; }
if (preg_match('/^12.*a/i',$WDtime)) { $t[0] = 0; }
$t2 = join(':',$t); // put time back to gether;
$t2 = preg_replace('/[^\d\:]/is','',$t2); // strip out the am/pm if any
$r = date($timeOnlyFormat , strtotime($t2));
if ($DebugMode) {
$r = "" . $r;
$r = '' . $r . '';
}
return ($r);
}
//=========================================================================
// adjust WD date to desired format
//
function fixup_date ($WDdate) {
global $timeFormat,$timeOnlyFormat,$dateOnlyFormat,$WDdateMDY,$DebugMode;
$d = explode('/',$WDdate); // expect ##/##/## form
if(!isset($d[2])) {$d = explode('-',$WDdate); } // try ##-##-#### form instead
if(!isset($d[2])) {$d = explode('.',$WDdate); } // try ##.##.#### form instead
if ($d[2] > 70 and $d[2] <= 99) {$d[2] += 1900;} // 2 digit dates 70-99 are 1970-1999
if ($d[2] < 99) {$d[2] += 2000; } // 2 digit dates (left) are assumed 20xx dates.
if ($WDdateMDY) {
$new = sprintf('%04d-%02d-%02d',$d[2],$d[0],$d[1]); // M/D/YYYY -> YYYY-MM-DD
} else {
$new = sprintf('%04d-%02d-%02d',$d[2],$d[1],$d[0]); // D/M/YYYY -> YYYY-MM-DD
}
$r = date($dateOnlyFormat,strtotime($new));
if ($DebugMode) {
$r = "" . $r;
$r = '' . $r . '';
}
return ($r);
}
//=========================================================================
// strip trailing units from a measurement
// i.e. '30.01 in. Hg' becomes '30.01'
function strip_units ($data) {
preg_match('/([\d\,\.\+\-]+)/',$data,$t);
return (float) $t[1]; // Wim suggestion 26-Jul-2018
}
//=========================================================================
// decode WD %moonage% tag and return a text description for the moon phase name
// "Moon age: 10 days,10 hours,41 minutes,80%"
function moonphase ($WDmoonage) {
preg_match_all('|(\d+)|is',$WDmoonage,$matches);
// print "\n";
$mdays = $matches[1][0];
$mhours = $matches[1][1];
$mmins = $matches[1][2];
$mpct = $matches[1][3];
$mdaysd = $mdays + ($mhours / 24) + ($mmins / 1440);
// Definitions from http://www.answers.com/topic/lunar-phase
// * Dark Moon - Not visible
// * New Moon - Not visible, or traditionally, the first visible crescent of the Moon
// * Waxing Crescent Moon - Right 1-49% visible
// * First Quarter Moon - Right 50% visible
// * Waxing gibbous Moon - Right 51-99% visible
// * Full Moon - Fully visible
// * Waning gibbous Moon - Left 51-99% visible
// * Third Quarter Moon - Left 50% visible
// * Waning Crescent Moon - Left 1-49% visible
// * New Moon - Not visible
if ($mdaysd <= 29.53/2) { // increasing illumination
$ph = "Waxing";
$qtr = "First";
} else { // decreasing illumination
$ph = "Waning";
$qtr = "Last";
}
if ($mpct < 1 ) { return("New Moon"); }
if ($mpct <= 49) { return("$ph Crescent"); }
if ($mpct < 51) { return("$qtr Quarter"); }
if ($mpct < 99) { return("$ph Gibbous"); }
return("Full Moon");
}
//=========================================================================
// pick the NOAA style condition icon based on iconnumber
function newIcon($numb) {
global $condIconDir,$condIconType;
$iconList = array(
"skc.jpg", // 0 imagesunny.visible
"nskc.jpg", // 1 imageclearnight.visible
"bkn.jpg", // 2 imagecloudy.visible
"sct.jpg", // 3 imagecloudy2.visible
"nbkn.jpg", // 4 imagecloudynight.visible
"sct.jpg", // 5 imagedry.visible
"fg.jpg", // 6 imagefog.visible
"hazy.jpg", // 7 imagehaze.visible
"ra.jpg", // 8 imageheavyrain.visible
"few.jpg", // 9 imagemainlyfine.visible
"mist.jpg", // 10 imagemist.visible
"nfg.jpg", // 11 imagenightfog.visible
"nra.jpg", // 12 imagenightheavyrain.visible
"novc.jpg", // 13 imagenightovercast.visible
"nra.jpg", // 14 imagenightrain.visible
"nshra.jpg", // 15 imagenightshowers.visible
"nsn.jpg", // 16 imagenightsnow.visible
"ntsra.jpg", // 17 imagenightthunder.visible
"ovc.jpg", // 18 imageovercast.visible
"sct.jpg", // 19 imagepartlycloudy.visible
"ra.jpg", // 20 imagerain.visible
"ra.jpg", // 21 imagerain2.visible
"shra.jpg", // 22 imageshowers2.visible
"ip.jpg", // 23 imagesleet.visible
"ip.jpg", // 24 imagesleetshowers.visible
"sn.jpg", // 25 imagesnow.visible
"sn.jpg", // 26 imagesnowmelt.visible
"sn.jpg", // 27 imagesnowshowers2.visible
"skc.jpg", // 28 imagesunny.visible
"scttsra.jpg", // 29 imagethundershowers.visible
"hi_tsra.jpg", // 30 imagethundershowers2.visible
"tsra.jpg", // 31 imagethunderstorms.visible
"nsvrtsra.jpg", // 32 imagetornado.visible
"wind.jpg", // 33 imagewindy.visible
"ra1.jpg", // 34 stopped rainning
"windyrain.jpg" // 35 windy/rain
);
$tempicon = $iconList[$numb];
if($condIconType <> '.jpg') {
$tempicon = preg_replace('|\.jpg|',$condIconType,$tempicon);
}
return($tempicon);
}
// Function to process %Currentsolarcondition% string and
// remove duplicate stuff, then fix capitalization, and translate from English if needed
//
function fixupCondition( $inCond ) {
global $DebugMode;
$Cond = str_replace('_',' ',$inCond);
$Cond = strtolower($Cond);
$Cond = preg_replace('| -|','',$Cond);
$Cond = trim($Cond);
$dt = '';
$vals = array();
if(strpos($Cond,'/') !==false) {
$dt .= "\n";
$vals = explode("/",$Cond);
}
if(strpos($Cond,',') !==false) {
$dt .= "\n";
$vals = explode(",",$Cond);
}
$ocnt = count($vals);
if($ocnt < 1) { return(langtransstr(trim($inCond))); }
foreach ($vals as $k => $v) {
if($DebugMode) { $dt .= "\n"; }
$v = ucfirst(strtolower(trim($v)));
$vals[$k] = langtransstr($v);
if($DebugMode) { $dt .= "\n"; }
}
if($vals[0] == '') {$junk = array_shift($vals);}
if(isset($vals[2]) and $vals[0] == $vals[2]) {$junk = array_pop($vals);}
reset($vals);
$t = join(', ',$vals);
// return($Cond . "' orig=$ocnt n=" . count($vals) ." t='$t'");
if($DebugMode) {
$t = "" . $dt . $t;
}
return($t);
}
// end of functions
//=========================================================================
?>