Changeset 624174

Timestamp:

11/12/2012 07:47:35 PM (12 years ago)

Author:

grudgeuk

Message:

Major update version 2.0

Location:

wxsim-forecast/trunk

Files:

• WXSIMforecast.php (modified) (41 diffs)
• plaintext-parser-data.txt (modified) (2 diffs)
• readme.txt (modified) (3 diffs)

wxsim-forecast/trunk/WXSIMforecast.php

@@ -3 +3 @@
  * @package WXSIM-Forecast
  * @author Rob Douglass
- * @version 1.0
+ * @version 2.0
  */
 /*
@@ -10 +10 @@
 Description: This Plugin is just a port from Saratoga weather scripts for use in Wordpress
 Author: Rob Douglass
-Version: 1.0
+Version: 2.0
 Author URI: http://www.jmrwebsolutions.co.uk
 */
@@ -38 +38 @@
                 'showhumidex' => 'false',
                 'showfrost' => 'false',
-                'showheatidx' => 'false');
-            
+                'showheatidx' => 'false',
+                'showHotIconF' => '100',
+                'showHotIconC' => '37.7',
+                'showWindChill' => 'true',
+                'showColdvalF' => '26',
+                'showColdvalC' => '-3',
+                'uomTemp' => 'C',
+                'ourTZ' => 'America/Los_Angeles',
+                'animatedimage' => 'false');
+                            
             $WXSIMOptions = get_option($this->adminOptionsName);
             if (!empty($WXSIMOptions)) {
@@ -86 +94 @@
                         } 
                         if (isset($_POST['WXSIMshowheatidx'])) {
-                            $devOptions['showheatidx'] = apply_filters('content_save_pre', $_POST['WXSIMshowheatidx']);
+                            $devOptions['showheatidx'] = $_POST['WXSIMshowheatidx'];
                         } 
-                
+                        if (isset($_POST['WXSIMshowHotIconF'])) {
+                            $devOptions['showHotIconF'] = $_POST['WXSIMshowHotIconF'];
+                        } 
+                        if (isset($_POST['WXSIMshowHotIconC'])) {
+                            $devOptions['showHotIconC'] = $_POST['WXSIMshowHotIconC'];
+                        } 
+                        if (isset($_POST['WXSIMshowWindChill'])) {
+                            $devOptions['showWindChill'] = $_POST['WXSIMshowWindChill'];
+                        } 
+                        if (isset($_POST['WXSIMshowColdvalF'])) {
+                            $devOptions['showColdvalF'] = $_POST['WXSIMshowColdvalF'];
+                        } 
+                        if (isset($_POST['WXSIMshowColdvalC'])) {
+                            $devOptions['showColdvalC'] = $_POST['WXSIMshowColdvalC'];
+                        }
+                        if (isset($_POST['WXSIMuomTemp'])) {
+                            $devOptions['uomTemp'] = $_POST['WXSIMuomTemp'];
+                        }   
+                        if (isset($_POST['WXSIMourTZ'])) {
+                            $devOptions['ourTZ'] = $_POST['WXSIMourTZ'];
+                        }                               
+                        if (isset($_POST['WXSIManimatedimage'])) {
+                            $devOptions['animatedimage'] = apply_filters('content_save_pre', $_POST['WXSIManimatedimage']);
+                        } 
+
                         update_option($this->adminOptionsName, $devOptions);
                        
@@ -154 +186 @@
                         <label for="WXSIMshowheatidx_no"><input type="radio" id="WXSIMshowheatidx_no" name="WXSIMshowheatidx" value="false" 
                         <?php if ($devOptions['showheatidx'] == "false") { _e('checked="checked"', "WXSIMForecast"); }?>/> No</label></p>
+    
+                        <h3>Show Hot icon if Heat-Index >= value (Fahrenheit)</h3>
+                        <p>Heat Icon will be displayed if the value is equal to or greater than the value entered (Fahrenheit)</p>
+                        <textarea name="WXSIMshowHotIconF" style="width: 10%; height: 30px;"><?php _e(apply_filters('format_to_edit',$devOptions['showHotIconF']), 'WXSIMForecast') ?></textarea>
+
+                        <h3>Show Hot icon if Heat-Index >= value (Celcius)</h3>
+                        <p>Heat Icon will be displayed if the value is equal to or greater than the value entered (Celcius)</p>
+                        <textarea name="WXSIMshowHotIconC" style="width: 10%; height: 30px;"><?php _e(apply_filters('format_to_edit',$devOptions['showHotIconC']), 'WXSIMForecast') ?></textarea>
                         
+                        <h3>Show Windchill?</h3>
+                        <p>Selecting "No" will disable Windchill from being displayed.</p>
+                        <p><label for="WXSIMshowWindChill_true"><input type="radio" id="WXSIMshowWindChill_true" name="WXSIMshowWindChill" value="true"
+                        <?php if ($devOptions['showWindChill'] == "true") { _e('checked="checked"', "WXSIMForecast"); }?> /> Yes</label>&nbsp;&nbsp;&nbsp;&nbsp;
+                        <label for="WXSIMshowWindChill_false"><input type="radio" id="WXSIMshowWindChill_false" name="WXSIMshowWindChill" value="false"
+                        <?php if ($devOptions['showWindChill'] == "false") { _e('checked="checked"', "WXSIMForecast"); }?>/> No</label></p>
+                        
+                        <h3>Show Cold! if Wind-Chill <= value (Fahrenheit)</h3>
+                        <p>Cold Icon will be displayed if the value is less than or greater than the value entered (Fahrenheit)</p>
+                        <textarea name="WXSIMshowColdvalF" style="width: 10%; height: 30px;"><?php _e(apply_filters('format_to_edit',$devOptions['showColdvalF']), 'WXSIMForecast') ?></textarea>
+                        
+                        <h3>Show Cold! if Wind-Chill <= value (Celcius)</h3>
+                        <p>Cold Icon will be displayed if the value is less than or greater than the value entered (Celcius)</p>
+                        <textarea name="WXSIMshowColdvalC" style="width: 10%; height: 30px;"><?php _e(apply_filters('format_to_edit',$devOptions['showColdvalC']), 'WXSIMForecast') ?></textarea>
+                        
+                        <h3>UOM Temperature</h3>
+                        <p>Selecting either &deg;C or &deg;F this value should match forecast temperature</p>
+                        <p><label for="WXSIMuomTemp_C"><input type="radio" id="WXSIMuomTemp_C" name="WXSIMuomTemp" value="C" 
+                        <?php if ($devOptions['uomTemp'] == "C") { _e('checked="checked"', "WXSIMForecast"); }?> /> &deg;C</label>&nbsp;&nbsp;&nbsp;&nbsp;
+                        <label for="WXSIMuomTemp_F"><input type="radio" id="WXSIMuomTemp_F" name="WXSIMuomTemp" value="F" 
+                        <?php if ($devOptions['uomTemp'] == "F") { _e('checked="checked"', "WXSIMForecast"); }?>/> &deg;F</label></p>
+                        
+                        <h3>Language</h3>
+                        <p>Please enter your timezone (http://php.net/manual/en/timezones.america.php)</p>
+                        <textarea name="WXSIMourTZ" style="width: 10%; height: 30px;"><?php _e(apply_filters('format_to_edit',$devOptions['ourTZ']), 'WXSIMForecast') ?></textarea>
+                        
+                        <h3>Show Animated images?</h3>
+                        <p>Selecting "No" will show static images and selecting "Yes" will show animated images.</p>
+                        <p><label for="WXSIManimatedimage_yes"><input type="radio" id="WXSIManimatedimage" name="WXSIManimatedimage" value="true" 
+                        <?php if ($devOptions['animatedimage'] == "true") { _e('checked="checked"', "WXSIMForecast"); }?> /> Yes</label>&nbsp;&nbsp;&nbsp;&nbsp;
+                        <label for="WXSIManimatedimage_no"><input type="radio" id="WXSIManimatedimage_no" name="WXSIManimatedimage" value="false" 
+                        <?php if ($devOptions['animatedimage'] == "false") { _e('checked="checked"', "WXSIMForecast"); }?>/> No</label></p>
+
                         <div class="submit">
                             <input type="submit" name="update_WXSIMForecastSettings" value="<?php _e('Update Settings', 'WXSIMForecast') ?>" /></div>
@@ -191 +264 @@
 }   
 
-function WXSIMforecast_func() {
-
-// plaintext-parser.php script by Ken True - [email protected]
+?>
+
+<?php
+
+function WXSIMforecast_func( $atts) {
+
 //
 // Version 0.90 - 24-Mar-2007 - Pre-release - testing and commments version
@@ -221 +297 @@
 // Version 1.18 - 09-Jul-2010 - added support for Humidex and frost forecast optional displays
 // Version 1.19 - 12-Aug-2010 - added support for Heat-index and 'hot' icon for Heat-index/humidex above specified values
-//
-$Version = "plaintext-parser.php Version 1.19 - 12-Aug-2010";
+// Version 1.20 - 18-Oct-2010 - Corrected Frost display wording below icons
+// Version 1.21 - 01-Jan-2011 - added support for Wind-chill and 'Cold!' for windchill below specified value
+// Version 1.22 - 03-Jan-2011 - added formatting to windchill, heatidx, humidex and frost arrays
+// Version 1.23 - 23-Jan-2011 - corrected display for frost when windchill also exists
+// Version 1.24 - 15-Feb-2011 - corrected display for snow conditions not being selected
+// Version 1.25 - 18-Feb-2011 - added lang=en for optional translation and fixed 'snow likely' not showing snow icon
+// Version 1.26 - 22-Feb-2011 - added more Wind-Chill processing for WXSIM 12.8.5+
+// Version 1.27 - 01-Oct-2011 - added support for alternative animated icon set from http://www.meteotreviglio.com/
+// Version 1.28 - 27-Dec-2011 - added support for RTL languages (Hebrew)
+//
+$Version = "plaintext-parser.php Version 1.28 - 27-Dec-2011";
 //
 // error_reporting(E_ALL);  // uncomment to turn on full error reporting
@@ -289 +374 @@
 // $WXSIMtext[$i]   - text of forecast (translated)
 // $WXSIMuv[$i]     - UV index value (number)
-//      note: you can use 'set_UV_string($WXSIMuv[$i])' to get a UV N and meaning text
+//      note: you can use 'PPset_UV_string($WXSIMuv[$i])' to get a UV N and meaning text
 // $WXSIMtemp[$i]   - Temperature with translated text and formatting
 // $WXSIMpop[$i]    - Number - Probabability of Precipitation ('',10,20, ... ,100)
@@ -303 +388 @@
 // $WXSIMBeaufort[$i]  - Beaufort scale for max wind speed 'n Bft' or 'Light air' (translated)
 // $WXSIMhumidex[$i] - humidex number (or '' if not present in forecast)
-// $WXSIMfrost[$i]  - frost forecast (or ''' if not present in forecast)
-// $WXSIMheatidx[$i]  - heat-index forecast (or ''' if not present in forecast)
+// $WXSIMfrost[$i]  - frost forecast (or '' if not present in forecast)
+// $WXSIMheatidx[$i]  - heat-index forecast (or '' if not present in forecast)
+// $WXSIMwindchill[$i] - wind-chill forecast (or '' if not present in forecast)
 // Note:
 //
+
 // Settings ---------------------------------------------------------------
+
 global $LanguageLookup, $doTranslate;
 $WXSIMOptions = get_option(WXSIMForecastAdminOptions);  //Load array from wordpress options table
+
+// Attributes
+
+extract( shortcode_atts( array(
+    'lang' => $WXSIMOptions['language']
+), $atts ) );
+$WXSIMlang = $lang;
+//return $lang;
+
 
 $iconDir ='./wp-content/plugins/wxsim-forecast/images/';           // directory for carterlake icons
 $WXSIMstation = $WXSIMOptions['station'];                          // name of your weather station
 $plaintextFile = $WXSIMOptions['plaintextfile'];                   // location of the WXSIM plaintext.txt
-$lang = $WXSIMOptions['language'];                                 // default language is 'en' = English
+//$lang = $WXSIMOptions['language'];                                 // default language is 'en' = English
+$lang = $WXSIMlang; 
+
 $tempDegrees = '&deg;' . $WXSIMOptions['tempdegrees'];             // set to '' to omit degree sign
 //                                                                 //   or set to '&deg;', '&deg;F' or '&deg;C'
@@ -330 +429 @@
 if ($WXSIMOptions['showheatidx'] == "true") {$showHeatIDX = true;}
                     
-$showHotIconF = 100;                                               // show Hot icon if Heat-Index >= value
-$showHotIconC = 37.7;                                              // show Hot icon if Humidex >= value
-// ---- end of settings ---------------------------------------------------
+$showHotIconF = $WXSIMOptions['showHotIconF'];                     // show Hot icon if Heat-Index >= value
+$showHotIconC = $WXSIMOptions['showHotIconC'];                                               // show Hot icon if Humidex >= value
+
+$showWindChill = true;                                              // =true to display Wind-Chill, =false to suppress display
+if ($WXSIMOptions['showWindChill'] == "true") {$showWindChill = true;}
+$showColdvalF = $WXSIMOptions['showColdvalF'];                      // show Cold! if Wind-Chill <= value in F
+$showColdvalC = $WXSIMOptions['showColdvalC'];                      // show Cold! if Wind-Chill <= value in C
+$uomTemp   = $WXSIMOptions['uomTemp'];                        // ='C' if forecast temperature in Centigrade, ='F' if in Fahrenheit
+$ourTZ     = 'America/Los_Angeles';      // your timezone
+
+//Icon type
+$iconType = '.jpg';        // default type='.jpg' -- use '.gif' for animated icons from http://www.meteotreviglio.com/
+if ($WXSIMOptions['animatedimage'] == "true") {$iconType = '.gif';}
+
 // ---- end of settings ---------------------------------------------------
 //
@@ -338 +448 @@
 global $SITE;
 if (isset($SITE['fcsticonsdir']))   {$iconDir = $SITE['fcsticonsdir'];}
+if (isset($SITE['fcsticonstype']))  {$iconType = $SITE['fcsticonstype'];}
 if (isset($SITE['defaultlang']))    {$lang = $SITE['defaultlang'];}
+if (isset($SITE['uomTemp']))        {$uomTemp = $SITE['uomTemp'];}
+if (isset($SITE['tz']))         {$ourTZ = $SITE['tz'];}
 // end of overrides from Settings.php
 //
@@ -357 +470 @@
    exit;
 }
+# Set timezone in PHP5/PHP4 manner
+if (!function_exists('date_default_timezone_set')) {
+  putenv("TZ=" . $ourTZ);
+  } else {
+  date_default_timezone_set("$ourTZ");
+ }
+
 $Status = "<!-- $Version -->\n";
 $doTranslate = true;                      
 if (isset($_REQUEST['lang']) ) {
   $lang=strtolower($_REQUEST['lang']);
-  if ($lang == 'en') { $doTranslate = false; };
+//  if ($lang == 'en') { $doTranslate = false; };
 }
 global $doDebug;
@@ -402 +522 @@
 
 $useCharSet = 'iso-8859-1';
-$UTFLang = ',gr,ru,cn,jp,';  // languages needing UTF-8 character set for display
+$UTFLang = ',gr,ru,cn,jp,he,';  // languages needing UTF-8 character set for display
+$RTLlangs = ',he,cn,jp,';       // languages needing right-to-left display
+$doRTL = (strpos($RTLlangs,$lang) !== false)?true:false;
 $timeFormat = 'd-M-Y h:i a'; // default to USA format
 // load the config file
 $config = file("./wp-content/plugins/wxsim-forecast/plaintext-parser-data.txt");  // 
 // load and merge the language file (if it exists)
-if ($doTranslate and $lang <> 'en' and file_exists("./wp-content/plugins/wxsim-forecast/plaintext-parser-lang-$lang.txt") ) {
+if ($doTranslate and file_exists("./wp-content/plugins/wxsim-forecast/plaintext-parser-lang-$lang.txt") ) {
   $lfile = file("./wp-content/plugins/wxsim-forecast/plaintext-parser-lang-$lang.txt");
   foreach ($lfile as $val) {
@@ -416 +538 @@
 } else {
   $doTranslate = false;
-  if($lang <> 'en') {
+//  if($lang <> 'en') {
     $Status .= "<!-- translation file for '$lang' not found -->\n";
     $lang = 'en';
-  }
-}
+//  }
+}
+
+$showColdVal = preg_match('|C|i',$uomTemp)?$showColdvalC:$showColdvalF;
+$Status .= "<!-- using $showColdVal for wind-chill test -->\n";
 
 // Initialize -- read in control file and place in $Conditions and $Precip
@@ -538 +663 @@
  'frost' => 'plaintext-frost.txt',
  'hot' => 'plaintext-hot.txt',
+ 'nl-frost' => 'plaintext-nl-frost.txt',
+ 'wc' => 'plaintext-wc.txt',
+ 'wc2' => 'plaintext-wc2.txt',
+ 'nl4' => 'plaintext-nl4.txt',
+ 'nl5' => 'plaintext-nl5.txt',
+ 'sn4' => 'plaintext-sn4.txt',
+ 'sn5' => 'plaintext-sn5.txt',
+ 'wc3' => 'plaintext-wc3.txt',
 );
+$linksList = '';
+if (isset($_REQUEST['testlinks'])) {
+    $thisTest = isset($_REQUEST['test'])?$_REQUEST['test']:'notspecified';
+    foreach ($testFiles as $name => $fname) {
+        $linksList .= "<a href=\"?testlinks&amp;test=$name&amp;lang=$lang\">";
+        if($thisTest == $name) {
+            $linksList .= "<b><span style=\"font-size: 14pt;\">$name</span></b></a>&nbsp; ";
+        } else {
+            $linksList .= "$name</a>&nbsp; ";
+        }
+    }
+
+}
  
 if (isset($_REQUEST['test']) ) { // for testing only
@@ -575 +721 @@
 // Find city and update date
 if (preg_match('|WXSIM text forecast for (.*), initialized at\s+(.*)|i',$plaintext,$matches)) {
-  $WXSIMcity = get_lang(trim($matches[1]));
+  $WXSIMcity = PPget_lang(trim($matches[1]));
   $wdate = trim($matches[2]);
   $Status .= "<!-- wdate '$wdate' -->\n";
@@ -614 +760 @@
     $Status .= "<!-- updated '$wdate'-->\n";
     $d = strtotime($wdate);
-    $WXSIMupdated = get_lang(date('l',$d)) . ', ' . gmdate($timeFormat,$d) . ' UTC';
+    $WXSIMupdated = PPget_lang(date('l',$d)) . ', ' . gmdate($timeFormat,$d) . ' UTC';
   } else {
     $wdate = "$wDay-$wMon-$wYear $wTime " . date('O',time());
     $Status .= "<!-- updated '$wdate'-->\n";
     $d = strtotime($wdate);
-    $WXSIMupdated = get_lang(date('l',$d)) . ', ' . date($timeFormat,$d);
+    $WXSIMupdated = PPget_lang(date('l',$d)) . ', ' . date($timeFormat,$d);
   }
 }
@@ -648 +794 @@
  $WXSIMfrost[$i] = '';
  $WXSIMheatidx[$i] = '';
+ $WXSIMwindchill[$i] = '';
  
  // make the period 'pretty' with HTML breaks.
- $WXSIMtitles[$i] = preg_replace('! (\S+)$!',"<br />\\1",get_lang($WXSIMday[$i]));
+ $WXSIMtitles[$i] = preg_replace('! (\S+)$!',"<br />\\1",PPget_lang($WXSIMday[$i]));
  if (! preg_match('!<br />!',$WXSIMtitles[$i])) {
    $WXSIMtitles[$i] .= '<br />';  // add line break to 'short' day titles
@@ -670 +817 @@
  }
 
- // extract Wind direction, values
+// extract Wind-chill value
+ if (preg_match('/Wind chill (down to|ranging from) (\S+)/i',$WXSIMtext[$i],$mtemp) ) {
+   $WXSIMwindchill[$i] = $mtemp[2];
+ }
+
+// extract Wind direction, values
  $testwind = str_replace('Wind chill','Wind-chill',$WXSIMtext[$i]);
  if (preg_match('|Wind (.*)\.|Ui',$testwind,$mtemp) ) {
@@ -725 +877 @@
   
   }
-   $WXSIMBeaufort[$i] = displayBeaufort(getBeaufort($maxWind,$WXSIMwindunits[$i])) ;
+   $WXSIMBeaufort[$i] = PPdisplayBeaufort(PPgetBeaufort($maxWind,$WXSIMwindunits[$i])) ;
 //   $Status .= "<!-- dir='" . $WXSIMwinddir[$i] . "' wind='" . $WXSIMwind[$i] . 
      "' gust='" . $WXSIMgust[$i] . "' units='" . $WXSIMwindunits[$i] . 
@@ -733 +885 @@
  // extract temperature High/Low values
  if (preg_match('!(high|low) ([-|\d]+)[\.|,]!i',$WXSIMtext[$i],$mtemp)) {
-   $WXSIMtemp[$i] = get_lang($mtemp[1] .':') . ' ' . $mtemp[2] . $tempDegrees;
+   $WXSIMtemp[$i] = PPget_lang($mtemp[1] .':') . ' ' . $mtemp[2] . $tempDegrees;
    if ($tempDegrees) {  // fix up degrees in the text
       $WXSIMtext[$i] = preg_replace(
@@ -767 +919 @@
  if (preg_match('!with\s+(.*)\s+frost.!is',$WXSIMtext[$i],$mtemp)) {
 //   print "<pre>" . print_r($mtemp,true) . "</pre>\n";
-   $WXSIMfrost[$i] = 'Frost '.$mtemp[1];
+   $WXSIMfrost[$i] = ucfirst($mtemp[1]) . ' frost';
   if ($doTranslate) {
     // perform optional translation if $Language has entries
@@ -785 +937 @@
  reset($Conditions);  // Do search in load order
  foreach ($Conditions as $cond => $condrec) { // look for matching condition
+ if ($doDebug) {
+   $Status .= "<!-- check '$cond' -->\n";
+ }
    
    if(preg_match("!$cond!i",$WXSIMtext[$i],$mtemp)) {
      list($dayicon,$nighticon,$condition) = explode("\t",$condrec);
      if (preg_match('!chance!i',$condition) and $WXSIMpop[$i] < $minPoP) {
+       if ($doDebug) {
+         $Status .= "<!-- skip-chance -->\n";
+       }
        continue; // skip this one
      }
-     if (preg_match("|$cond level|i",$WXSIMtext[$i]) ) {
+     if (preg_match("|$cond level|i",$WXSIMtext[$i]) and !preg_match("/(chance of $cond|$cond likely|$cond very likely)/i",$WXSIMtext[$i]) ) {
+       if ($doDebug) {
+         $Status .= "<!-- skip $cond level -->\n";
+       }
        continue; // skip 'snow level' and 'freezing level' entries
      }
-     $WXSIMcond[$i] = get_lang($condition);
+     if ($doDebug) {
+       $Status .= "<!-- $cond / $condition selected -->\n";
+     }
+     $WXSIMcond[$i] = PPget_lang($condition);
      if (preg_match('|night|i',$WXSIMday[$i])) {
        $WXSIMicon[$i] = $nighticon;
@@ -828 +992 @@
  
 //  now fix up the full icon name and PoP if available
-  $curicon = $WXSIMicon[$i]  . '.jpg';
+  $curicon = $WXSIMicon[$i]  . $iconType;
   if ($WXSIMpop[$i] > 0) {
-    $testicon = preg_replace("|\.jpg|","$WXSIMpop[$i].jpg",$curicon);
+    $testicon = preg_replace('|'.$iconType.'|',$WXSIMpop[$i].$iconType,$curicon);
 //  print "<pre>testicon='$testicon'</pre>\n";
     if (file_exists($iconDir . $testicon)) {
@@ -840 +1004 @@
     $WXSIMicon[$i] = $curicon;
   }
-
+  
   if ($WXSIMtempdirect[$i] <> '') {
      $tempdirect = 'up.gif';
@@ -858 +1022 @@
     // put back translated text, fixing capitalization for sentence starts (except the first one).
     $WXSIMtext[$i] = preg_replace('!\.\s+([a-z])!es',"'.  ' . strtoupper('\\1')",$text);
-    $WXSIMday[$i] = get_lang($WXSIMday[$i]);
-    $wdirs = get_lang('NESW');  // default directions
-    if(strlen($wdirs) == 4) {
-      $WXSIMwinddir[$i] = strtr($WXSIMwinddir[$i],'NESW',$wdirs); // do translation
-    } elseif (preg_match('|,|',$wdirs)) { //multichar translation
-      $wdirsmc = explode(',',$wdirs);
-      $wdirs = array('N','E','S','W');
-      $wdirlook = array();
-      foreach ($wdirs as $n => $d) {
-        $wdirlook[$d] = $wdirsmc[$n];
-      } 
-      $tstr = ''; // get ready to pass once through the string
-      for ($n=0;$n<strlen($WXSIMwinddir[$i]);$n++) {
-        $c = substr($WXSIMwinddir[$i],$n,1);
-        if(isset($wdirlook[$c])) {
-          $tstr .= $wdirlook[$c]; // use translation
-        } else {
-          $tstr .= $c; // use regular
-        }
+    $WXSIMday[$i] = PPget_lang($WXSIMday[$i]);
+    if($doRTL and isset($LanguageLookup['NESW-N'])) { // handle RTL language type
+      $Status .= "<!-- RTLtrans input WXSIMwinddir[$i] = '".$WXSIMwinddir[$i]."' -->\n";
+      $tstr = preg_replace('|&rarr;|',"\t",$WXSIMwinddir[$i]);
+      $twdirs = explode("\t",$tstr);
+      foreach ($twdirs as $n => $twdir) {
+          $twdirs[$n] = isset($LanguageLookup['NESW-'.$twdir])?$LanguageLookup['NESW-'.$twdir]:$twdir;
       }
-      $WXSIMwinddir[$i] = $tstr; // do translation
+      $WXSIMwinddir[$i] = join('&larr;',array_reverse($twdirs));
+      $Status .= "<!-- RTLtrans output WXSIMwinddir[$i] = '".$WXSIMwinddir[$i]."' -->\n";
+      if(preg_match('|&rarr;|',$WXSIMwind[$i])) { 
+        $Status .= "<!-- RTLtrans input WXSIMwind[$i] = '".$WXSIMwind[$i]."' -->\n";
+        $tstr = preg_replace('|&rarr;|',"\t",$WXSIMwind[$i]);
+        $twspds = explode("\t",$tstr);
+        $WXSIMwind[$i] = join('&larr;',array_reverse($twspds));
+        $Status .= "<!-- RTLtrans output WXSIMwind[$i] = '".$WXSIMwind[$i]."' -->\n";
+      }
+      
+    } else { // handle non-RTL language type
     
+      $wdirs = PPget_lang('NESW');  // default directions
+      if(strlen($wdirs) == 4) {
+        $WXSIMwinddir[$i] = strtr($WXSIMwinddir[$i],'NESW',$wdirs); // do translation
+      } elseif (preg_match('|,|',$wdirs)) { //multichar translation
+        $wdirsmc = explode(',',$wdirs);
+        $wdirs = array('N','E','S','W');
+        $wdirlook = array();
+        foreach ($wdirs as $n => $d) {
+          $wdirlook[$d] = $wdirsmc[$n];
+        } 
+        $tstr = ''; // get ready to pass once through the string
+        for ($n=0;$n<strlen($WXSIMwinddir[$i]);$n++) {
+          $c = substr($WXSIMwinddir[$i],$n,1);
+          if(isset($wdirlook[$c])) {
+            $tstr .= $wdirlook[$c]; // use translation
+          } else {
+            $tstr .= $c; // use regular
+          }
+        }
+        $WXSIMwinddir[$i] = $tstr; // do translation
+      
+      }
     }
     // translate speed and wind units based on lang entries in one pass
     $text = ' ' . $WXSIMwind[$i] . " \t " . $WXSIMwindunits[$i] . ' '; // make test string.
-    reset ($Language); // process in order of the file
-    foreach ($Language as $key => $replacement) {
-      $text = str_replace($key,$replacement,$text);
-    }
-    $key = explode("\t",$text);
+    reset ($Language); // process in order of the file
+    foreach ($Language as $key => $replacement) {
+      $text = str_replace($key,$replacement,$text);
+    }
+    $key = explode("\t",$text);
     $WXSIMwind[$i] = trim($key[0]);
     $WXSIMwindunits[$i] = trim($key[1]);    
-
+  
   }
-
- // override icon with hot.jpg if high heat-index or humidex 
- if($WXSIMheatidx[$i] >= $showHotIconF or $WXSIMhumidex[$i] >= $showHotIconC) {
-     $WXSIMicon[$i] = 'hot.jpg';
-     $WXSIMcond[$i] .= "<br/>\n<span style=\"color:red;\"><strong>" . get_lang('Hot!') . "</strong></span>";
- }
+   // override icon with hot.jpg if high heat-index or humidex 
+   if($WXSIMheatidx[$i] >= $showHotIconF or $WXSIMhumidex[$i] >= $showHotIconC) {
+       $WXSIMicon[$i] = 'hot.jpg';
+       $WXSIMcond[$i] .= "<br/>\n<span style=\"color:red;\"><strong>" . PPget_lang('Hot!') . "</strong></span>";
+   }
+   
+   if($WXSIMheatidx[$i] <> '') {
+       $WXSIMheatidx[$i] = "<span style=\"color: red;\">".PPget_lang('Heat').": $WXSIMheatidx[$i]$tempDegrees</span>\n";
+       
+   }
   
- // make HTML for full icon with condition description
- $WXSIMicons[$i] = "$WXSIMtitles[$i]<br />
- <img src=\"$iconDir$WXSIMicon[$i]\" alt=\"".strip_tags($WXSIMcond[$i])."\"  title=\"".
- strip_tags($WXSIMcond[$i]) ."\" /><br />
- $WXSIMcond[$i]";
+   if($WXSIMhumidex[$i] <> '') {
+       $WXSIMhumidex[$i] = "<span style=\"color: red;\">".PPget_lang('Hmdx').": $WXSIMhumidex[$i]</span>\n";
+   }
+  
+   // process Wind-chill
+   if ($WXSIMwindchill[$i] <= $showColdVal and $WXSIMwindchill[$i] <> '') {
+       $WXSIMcond[$i] .= "<br/>\n<span style=\"color:blue;\"><strong>" . PPget_lang('Cold!') . "</strong></span>";
+  //     $WXSIMicon[$i] = 'cold.jpg';
+   }
+   
+  
+   if($WXSIMwindchill[$i] <> '') {
+       $WXSIMwindchill[$i] = "<span style=\"color: blue;\">".PPget_lang('WCh').": $WXSIMwindchill[$i]$tempDegrees</span>\n";
+   }
+   
+   if ($WXSIMfrost[$i] <> '') {
+      $WXSIMfrost[$i] = "<span style=\"color: blue;\">$WXSIMfrost[$i]</span>\n";
+   }
+
+
+   // make HTML for full icon with condition description
+   $WXSIMicons[$i] = "$WXSIMtitles[$i]<br />
+   <img src=\"$iconDir$WXSIMicon[$i]\" alt=\"".strip_tags($WXSIMcond[$i])."\"  title=\"".
+   strip_tags($WXSIMcond[$i]) ."\" /><br />
+   $WXSIMcond[$i]";
  
 } // end of main loop -------------------------
@@ -930 +1138 @@
 preg_match('|(\d+)(.*)|',$maxWidth,$widthparts);
 //$Status .= "<!-- widthparts\n" . print_r($widthparts,true) . " -->\n";
-//$nTD = count($WXSIMicon);
-$nTD = $maxIcons;
+$nTD = count($WXSIMicon);
 if ($nTD < 1) { $nTD = 1; }
 $wTD = round($widthparts[1]/$nTD,0) . $widthparts[2];
@@ -948 +1155 @@
 }
 if ($printHeading) {
+    $RTL = $doRTL?'style="unicode-bidi: embed;"':'';
+
 ?>
-    <tr align="center">
-      <td><b><?php echo get_lang("WXSIM Forecast for:");?> </b><span style="color: green;">
+    <tr>
+      <td align="center"<?php echo $RTL; ?>><b><?php echo PPget_lang("WXSIM Forecast for:");?> </b><span style="color: green;">
        <?php echo $WXSIMcity; ?></span><br />
-        <?php echo get_lang("Issued by:"); ?> <?php echo $WXSIMstation; ?>
+        <?php echo PPget_lang("Issued by:"); ?> <?php echo $WXSIMstation; ?>
       </td>
     </tr>
     <tr>
-      <td align="center"><?php echo get_lang("Updated:");?> <?php echo $WXSIMupdated; ?>
+      <td align="center"<?php echo $RTL; ?>><?php echo PPget_lang("Updated:");?> <?php 
+        if($doRTL) { echo "<span style=\"unicode-bidi: bidi-override; direction: ltr;\">";}
+        echo $WXSIMupdated;
+        if($doRTL) { echo "</span>";}
+      ?>
       </td>
     </tr>
@@ -966 +1179 @@
     <tr>
       <td align="center">&nbsp;
-        <table width="<?php echo $maxWidth; ?>" border="0" cellpadding="0" cellspacing="0">  
+        <table width="100%" border="0" cellpadding="0" cellspacing="0">  
           <tr valign ="top" align="center">
     <?php
       for ($i=0;$i<min(count($WXSIMicons),$maxIcons);$i++) {
-        print "<td style=\"width: $wTD;\"><span>$WXSIMicons[$i]</span></td>\n";
+        print "<td style=\"width: $wTD;\"><span style=\"font-size: 8pt;\">$WXSIMicons[$i]</span></td>\n";
       }
     ?>
@@ -978 +1191 @@
       for ($i=0;$i<min(count($WXSIMprecip),$maxIcons);$i++) {
         print "<td style=\"width: $wTD; color: green;\">$WXSIMprecip[$i]</td>\n";
-        }
+      }
       ?>
           </tr>
@@ -989 +1202 @@
           </tr>
           
-      <?php if ($showHumidex or $showFrost or $showHeatIDX) { 
-          print "<tr valign =\"top\" align=\"center\">";
-      
+      <?php if ($showHumidex or $showHeatIDX or $showWindChill) { ?>
+          <tr valign ="top" align="center">
+      <?php
       for ($i=0;$i<min(count($WXSIMhumidex),$maxIcons);$i++) {
-        $temp = '';
-        if ($WXSIMhumidex[$i] <> '') {$temp = get_lang('Hmdx').': ';
-          print "<td style=\"width: $wTD; color: red;\">$temp$WXSIMhumidex[$i]</td>\n";
+        $flag = 0;
+        if ($showHumidex and $WXSIMhumidex[$i] <> '') {$flag++;
+          print "<td style=\"width: $wTD;\">$WXSIMhumidex[$i]</td>\n";
+          
         }
-        if ($WXSIMheatidx[$i] <> '') {$temp = get_lang('Heat').': ';
-          print "<td style=\"width: $wTD; color: red;\">$temp$WXSIMheatidx[$i]$tempDegrees</td>\n";
+        if ($showHeatIDX and $WXSIMheatidx[$i] <> '') {$flag++;
+          print "<td style=\"width: $wTD;\">$WXSIMheatidx[$i]</td>\n";
         }
-        if ($WXSIMfrost[$i] <> '') {
-          $temp = 'Frost ';
-          print "<td style=\"width: $wTD; color: blue;\">$WXSIMfrost[$i]</td>\n";
+        if ($showWindChill and $WXSIMwindchill[$i] <> '') {$flag++;
+          print "<td style=\"width: $wTD;\">$WXSIMwindchill[$i]</td>\n";
+            
         }
-        if($temp == '') {
+        if($flag < 1) { // print spacer row
           print "<td style=\"width: $wTD;\">&nbsp;</td>\n";
           
@@ -1011 +1225 @@
       ?>
           </tr>
-      <?php } // end of showHumidex or showFrost ?>
+      <?php } // end of showHumidex/showHeatidx/showWindchill ?>
+      <?php if ($showFrost and strlen(implode('',$WXSIMfrost)) > 1) { ?>
+          <tr valign ="top" align="center">
+      <?php
+      for ($i=0;$i<min(count($WXSIMfrost),$maxIcons);$i++) {
+        
+        if ($WXSIMfrost[$i] <> '') {$flag++;
+          print "<td style=\"width: $wTD;\">$WXSIMfrost[$i]</td>\n";
+        } else {
+          print "<td style=\"width: $wTD;\">&nbsp;</td>\n";
+        }
+      }
+      ?>
+         </tr>         
+     <?php } // end of showFrost ?>
           <tr valign ="top" align="center">
       <?php
@@ -1027 +1255 @@
       <?php
       for ($i=0;$i<min(count($WXSIMuv),$maxIcons);$i++) {
-        print "<td style=\"width: $wTD;\">" . set_UV_string($WXSIMuv[$i]) . "</td>\n";
+        print "<td style=\"width: $wTD;\">" . PPset_UV_string($WXSIMuv[$i]) . "</td>\n";
       }
       ?>
@@ -1047 +1275 @@
 if ($printText) {
 ?>
-<div class="WXSIMforecastcontent">
+<div class="WXSIMforecascontent">
 
 <table style="border: 0" width="<?php echo $maxWidth; ?>">
     <?php
+      $rAlign = $doRTL?' text-align: right;':'';
       for ($i=0;$i<count($WXSIMday);$i++) {
         print "<tr valign =\"top\" align=\"left\">\n";
-        print "<td style=\"width: 20%;\"><b>$WXSIMday[$i]</b><br />&nbsp;<br /></td>\n";
-        print "<td style=\"width: 80%;\">$WXSIMtext[$i]</td>\n";
+        print "<td style=\"width: 20%;$rAlign\"><b>$WXSIMday[$i]</b><br />&nbsp;<br /></td>\n";
+        print "<td style=\"width: 80%;$rAlign\">$WXSIMtext[$i]</td>\n";
         print "</tr>\n";
       }
     ?>
 </table>
-</div><?php 
+
+<p><small><a href="http://www.wxsim.com/">WXSIM</a> 
+<?php echo PPget_lang("forecast formatting script by");?>
+<a href="http://saratoga-weather.org/scripts.php"> Saratoga-Weather.org</a>
+<?php if($iconType <> '.jpg') {
+    print "<br/>";
+    echo PPget_lang("Animated forecast icons courtesy of"); 
+    print " <a href=\"http://www.meteotreviglio.com/\">www.meteotreviglio.com</a>.";
+} 
+?>
+ 
+</small></p></div><?php 
 } // end printText
-
 
 if (! $IncludeMode) { 
@@ -1069 +1308 @@
 <?php
 } // print above only if not include mode
-}
+}  // END FORECAST FUNCTION
 // Functions -----------------------------------------------------------------------
 
 //  replace text with language lookup text if available
-function get_lang( $text ) {
+function PPget_lang( $text ) {
   global $LanguageLookup, $doTranslate;
+  
   if ($doTranslate && isset($LanguageLookup[$text])) {
     $newtext = $LanguageLookup[$text];
@@ -1084 +1324 @@
 //  decode UV to word+color for display
 
-function set_UV_string ( $uv ) {
+function PPset_UV_string ( $uv ) {
 // figure out a text value and color for UV exposure text
 //  0 to 2  Low
@@ -1096 +1336 @@
      break;
      case (($uv > 0) and ($uv < 3)):
-       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; background-color: #A4CE6a;">&nbsp;' . get_lang("Low") .'&nbsp;</span>';
+       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; background-color: #A4CE6a;">&nbsp;' . PPget_lang("Low") .'&nbsp;</span>';
      break;
      case (($uv >= 3) and ($uv < 6)):
-       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px;background-color: #FBEE09;">&nbsp;' . get_lang("Medium") .'&nbsp;</span>';
+       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px;background-color: #FBEE09;">&nbsp;' . PPget_lang("Medium") .'&nbsp;</span>';
      break;
      case (($uv >=6 ) and ($uv < 8)):
-       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; background-color: #FD9125;">&nbsp;' . get_lang("High") .'&nbsp;</span>';
+       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; background-color: #FD9125;">&nbsp;' . PPget_lang("High") .'&nbsp;</span>';
      break;
      case (($uv >=8 ) and ($uv < 11)):
-       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; color: #FFFFFF; background-color: #F63F37;">&nbsp;' . get_lang('Very&nbsp;High') . '&nbsp;</span>';
+       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; color: #FFFFFF; background-color: #F63F37;">&nbsp;' . PPget_lang('Very&nbsp;High') . '&nbsp;</span>';
      break;
      case (($uv >= 11) ):
-       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; color: #FFFF00; background-color: #807780;">&nbsp;' . get_lang("Extreme") .'&nbsp;</span>';
+       $uv = "UV: $uv<br/>" . '<span style="border: solid 1px; color: #FFFF00; background-color: #807780;">&nbsp;' . PPget_lang("Extreme") .'&nbsp;</span>';
      break;
    } // end switch
@@ -1116 +1356 @@
 
 // determine Beaufort number based on wind speed and units
-function getBeaufort ( $wind, $units) {
+function PPgetBeaufort ( $wind, $units) {
 
 global $showBeaufort,$BeaufortMPH,$BeaufortKPH,$BeaufortKTS,$BeaufortMS,$doDebug,$Status;
@@ -1141 +1381 @@
    return($Bft);
 
-}// end getBeaufort
+}// end PPgetBeaufort
 
 // perform Beaufort display if desired by showBeaufort setting
-function displayBeaufort ($Bft) {
+function PPdisplayBeaufort ($Bft) {
   global $showBeaufort, $BeaufortText;
   if ($Bft < 0 or $Bft > 12 ) { return(""); }
 
-  if ($showBeaufort == 'T') { return( get_lang($BeaufortText[$Bft]) ); }
+  if ($showBeaufort == 'T') { return( PPget_lang($BeaufortText[$Bft]) ); }
 
   if ($showBeaufort == 'V') { return("$Bft Bft"); }
@@ -1154 +1394 @@
   return("");
 
-}// end displayBeaufort
-
-
-
-
-
-
-
-    
-    
+}// end PPdisplayBeaufort
+
 
 
@@ -1181 +1413 @@
 
 
-
-
 ?>

wxsim-forecast/trunk/plaintext-parser-data.txt

@@ -1 +1 @@
 #
 # data file for plaintext-parser.php -- used to determine caption and base icon for forecast
-# Version 1.05 - 29-Jan-2007
+# Version 1.06 - 01-Jan-2011
 #
 # select default date format by putting a '#' in front of the ones NOT to be used.  
@@ -43 +43 @@
 cond|fog after midnight|sctfg|nbknfg|Fog late|
 cond|fog|fg|nfg|Fog|
-cond|wind chill down to -|cold|cold|Very Cold|
-cond|heat index up to 1|hot|hot|Very Hot|
 cond|partly cloudy|sct|nsct|Partly Cloudy|
 cond|mostly cloudy|bkn|nbkn|Mostly Cloudy|

wxsim-forecast/trunk/readme.txt

@@ -4 +4 @@
 Donate link: http://www.jmrwebsolutions.co.uk
 Tags: weather, wxsim, forecast
-Requires at least: 2.8
-Tested up to: 3.0.1
-Stable tag: 1.0
+Requires at least: 3.3
+Tested up to: 3.4.2
+Stable tag: 2.0
 
 Displays WXSIM forecast on a specific page of your wordpress site.
@@ -29 +29 @@
 10. Minimum Probability of Precipitation(PoP) - PoP percentage must equal this value or above to display rain icon, otherwise the sky icon with PoP is displayed.
 11. Display Beaufort - Set to V' for no Beaufort and set to 'T' for translated name
+12. Show Humidity Index - Selecting "No" will disable the humidity index from being displayed.
+13. Show Frost - Selecting "No" will disable the Frost from being displayed.
+14. Show Heat Index - Selecting "No" will disable the heat index from being displayed.
+15. Show Hot icon - Heat Icon will be displayed if the value is equal to or greater than the value entered (Fahrenheit)
+16. Show Hot icon - Heat Icon will be displayed if the value is equal to or greater than the value entered (Celcius)
+17. Show Windchill - Selecting "No" will disable Windchill from being displayed.
+18. Show Cold - Cold Icon will be displayed if the value is less than or greater than the value entered (Fahrenheit)
+19. Show Cold - Cold Icon will be displayed if the value is less than or greater than the value entered (Celcius)
+20. UOM Temperature - Selecting either °C or °F this value should match forecast temperature
+21. TimeZone - Please enter your timezone Visit the following to identify the correct value http://php.net/manual/en/timezones.america.php
+22. Show Animated images - Selecting "No" will show static images and selecting "Yes" will show animated images.
 
-To add the widget to a posts and/or pages use the shortcode [forecast].
+To add the widget to a posts and/or pages use the shortcode [forecast]
+You can now pass a language parameter in the shortcode to allow for multilinguaal forecast throughout your site [forecast lang = cy]. You must have a valid plaintext-parser-lang file for this to work.
 
 == Frequently Asked Questions ==
 
-= A question that someone might have =
-
-An answer to that question.
-
-= What about foo bar? =
-
-Answer to foo bar dilemma.
+1. This will only work if you are running WXSIM and upload data from this to the web, IT IS NOT A STANDALONE PLUGIN
 
 == Screenshots ==
 
+None
 
 == Changelog ==
+
+= 2.0 - 12.11.2012 =
+* Fixed numerous bugs in code
+* Added a number of additional configuration items
+* Added shortcode parameter for multilingual functionality
+* Included animated images
 
 = 1.0 - 21.10.2010  =
@@ -70 +83 @@
 
 == A brief Markdown Example ==
-
-Ordered list:
-
-1. 
-
-Unordered list:
-
-* 
-
-Here's a link to [WordPress](http://wordpress.org/ "Your favorite software") and one to [Markdown's Syntax Documentation][markdown syntax].
-Titles are optional, naturally.
-
-[markdown syntax]: http://daringfireball.net/projects/markdown/syntax
-            "Markdown is what the parser uses to process much of the readme file"
-
-Markdown uses email style notation for blockquotes and I've been told:
-> Asterisks for *emphasis*. Double it up  for **strong**.
-
-`<?php code(); // goes in backticks ?>`