check-fetch-times.php Version 1.57 - 28-Aug-2024

Website PHP information

Running on webhost 'selincolnwx.info' @ IP='72.46.49.74' (reverse IP Name='72-46-49-74.lnk02-oa01.lnk.ne.allofiber.net')
Webserver OS: Linux GWWDebianServer 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64
PHP Version: 7.0.33-0+deb9u12 built for Linux
PHP cmd location: /usr/bin/php
Document root: /var/www/selincolnwx.info/public_html/
Template root: /var/www/selincolnwx.info/public_html
allow_url_fopen = ON
allow_url_include = off
request_order = GP
Stream support for http is available
Stream support for https is available
Streams supported: compress.bzip2, compress.zlib, data, file, ftp, ftps, glob, http, https, phar, php, zip
Socket transports: ssl, sslv2, tcp, tls, tlsv1.0, tlsv1.1, tlsv1.2, udg, udp, unix

Contents of Website Structure files

top.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188 		<?php
############################################################################
# A Project of TNET Services, Inc. and Saratoga-Weather.org (Base-* template sets)
############################################################################
#
#    Project:    Sample Included Website Design
#    Module:        top.php
#    Purpose:    Provides the initial top section of the website
#     Authors:    Kevin W. Reed <kreed@tnet.com>
#                TNET Services, Inc.
#               Ken True <webmaster@saratoga-weather.org>
#               Saratoga-Weather.org
#
#     Copyright:    (c) 1992-2007 Copyright TNET Services, Inc.
############################################################################
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA
############################################################################
#    This document uses Tab 4 Settings
############################################################################
require_once("Settings.php");
require_once("common.php");
global    $TITLE;
//Version  V3.01 - 03-Mar-2011 - added Content-Type header for charset switching
//Version  V3.02 - 23-Jul-2011 - added WXtags upload copy capability
//Version  V3.03 - 17-Nov-2011 - added support for right-to-left presentation format
//Version  V3.04 - 05-Feb-2013 - added support for HTML5+UTF8
//Version  V3.05 - 13-May-2020 - fix validation for UTF8 usage
//Version  V3.06 - 14-May-2021 - added WeeWX native support for AJAX
############################################################################
$cookie         = 'gwwmobile_skip';          // or use your own name
#
$redirect_mobi  = 'https://www.gwwilkins.org/cell.php';  // set to your mobile site/page
#
$mobile     = false;                        // default we do not go to the mobile site
if (!isset ($_COOKIE[$cookie])) {
  require_once 'Mobile_Detect.php';       // credits : https://mobiledetect.net/  
  $detect = new Mobile_Detect;
  if( $detect->isMobile() && !$detect->isTablet() ){
    $mobile = true; 
    if (isset ($_REQUEST['pcSite']) || isset ($_SESSION['pcSite']) ) {
      $mobile         = false;
    }  // eo if pcSite
  }  // eo detect mobile
  if ($mobile == true) {
    header ("Location: $redirect_mobi");    // go to the mobile site            
      exit;
  } // eo is mobile    
}  // eo cookie set
setcookie($cookie, "skip", time()+3600);        // cookie expires in 1 hour
if ($mobTitle == '') {
    header("Content-Type: text/html; charset=".strtoupper($SITE['charset'])); // Avoid mobile error
}
if(isset($useUTF8) and function_exists('set_langtrans_UTF8') ) {
    set_langtrans_UTF8(); // convert langrans items to UTF-8
}
header("Content-Type: text/html; charset=".strtoupper($SITE['charset']));
if(isset($useHTML5) and $useHTML5) {
  print "<!DOCTYPE html>\n";
  print "<html";
  if (isset($SITE['ISOLang'][$SITE['lang']])) { // 
    $olang = $SITE['ISOLang'][$SITE['lang']];
    echo " lang=\"$olang\""; 
  }
  print ">\n";
} else {
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
   "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<?php 
} // end HTML5 v.s. XHTML 1.0 Transitional header
?>
<?php
 if(isset($SITE['WXtags']) and $SITE['WXtags'] <> '') {
    // see if upload copy should be done
    $siteUploadFile = preg_replace('|\.php$|','-new.php',$SITE['WXtags']);
    if(file_exists($siteUploadFile) and 
       is_writable($SITE['WXtags']) and
       filesize($siteUploadFile) > filesize($SITE['WXtags']) - 1023 and
       filemtime($siteUploadFile) > filemtime($SITE['WXtags']) ) {
         $didCopy = copy($siteUploadFile,$SITE['WXtags']);
         if($didCopy) {
             print "<!-- WXtags file updated successfully from $siteUploadFile -->\n";
         } else {
             print "<!-- WXtags file update failed from $siteUploadFile -->\n";
         }
    }
    if (isset($_REQUEST['debug']) and strtolower($_REQUEST['debug']) == 'y') {
      $canWriteTags = is_writable($SITE['WXtags'])?"is":"IS NOT";
      print "<!-- WXtags '".$SITE['WXtags']. "' $canWriteTags writeable. -->";
    }
    include_once($SITE['WXtags']);
 }
 $doIconvUTF8 = ($SITE['charset'] == 'UTF-8' and $SITE['origCharset'] <> 'UTF-8')?true:false;
?>
  <head>
<style type="text/css"> div.center {  width:100%;  margin-left: auto;  margin-right: auto; display:block }</style>
<?php if(isset($SITE['ajaxScript'])) { ?>
    <!-- ##### start AJAX mods ##### -->
    <script type="text/javascript" src="<?php echo $SITE['ajaxScript']; ?>"></script>
    <!-- AJAX updates by Ken True - http://saratoga-weather.org/wxtemplates/ -->
    <?php if($SITE['WXsoftware'] == 'WEEWX') { ?>
    <script type="text/javascript"> var usingWeeWX = true; </script>
    <?php } else { ?>
    <script type="text/javascript"> var usingWeeWX = false; </script>
    <?php } // end using WeeWX ?>
<?php } // end if ajaxScript ?>
<?php if (isset($showGizmo) and $showGizmo) { ?>
    <script type="text/javascript" src="ajaxgizmo.js"></script>
<?php if (isset($SITE['UV']) and !$SITE['UV']) {  // turn gizmo uv display off ?>
    <script type="text/javascript"> showUV = false; </script>
<?php   }  // end of turn gizmo uv display off ?>
<?php } // end of showGizmo ?>
<?php if (file_exists("language-". $SITE['lang'] . ".js") and (!$doIconvUTF8) ) { ?>
    <script type="text/javascript" src="language-<?php echo $SITE['lang']; ?>.js"></script>
    <!-- language for AJAX script included -->
<?php }
  if(isset($useUTF8) and $useUTF8 and file_exists("language-". $SITE['lang'] . ".js") and $doIconvUTF8) {
    $tjsfile = file("language-". $SITE['lang'] . ".js");
    $sceCharset = $SITE['origCharset']; // set in common.php when useUTF8 invoked
    print "    <script type=\"text/javascript\">\n// <![CDATA[ /* converted to UTF-8 from $sceCharset */\n";
    foreach ($tjsfile as $n => $line) {
        print iconv($sceCharset,'UTF-8//TRANSLIT',$line);
    }
    print "// converted ".count($tjsfile)." lines of language-".$SITE['lang'].".js from $sceCharset to UTF-8 inline -->\n// ]]>\n    </script>\n"; 
  }
?>
    <meta name="referrer" content="always" />
    <meta name="description" content="Personal weather station." />
    <meta http-equiv="Content-Type" content="text/html; charset=<?php echo strtoupper($SITE['charset']); ?>" />
<!--        <meta name=viewport content="width=device-width, initial-scale=1">
-->    <link rel="stylesheet" type="text/css" href="<?php echo $SITE['CSSscreen']; ?>" media="screen" title="screen" />
    <link rel="stylesheet" type="text/css" href="<?php echo $SITE['CSSprint']; ?>" media="print" />
        <link rel="stylesheet" type="text/css" href="/weather-rounded-corners.css" media="screen" title="screen" />
    <link rel="shortcut icon" href="/favicon.ico" type="image/x-icon" />
<?php 
if(isset($useHTML5) and $useHTML5) { // no pragma/cache-control for us

} else { ?>
    <meta http-equiv="Pragma" content="no-cache" />
<!--        <meta name=viewport content="width=device-width, initial-scale=1">
-->    <meta http-equiv="Cache-Control" content="no-cache" />
<?php } // end HTML5 check 

if(isset($SITE['showTitleTemp']) and $SITE['showTitleTemp'] and isset($temperature)) {
  $dispTUOM = $temperature . '&deg;'.strtoupper(preg_replace('|[^CF]+|i','',$uomtemp)). ' - ';
} else {
  $dispTUOM = '';
}
if( isset ($TITLE) ) {
    echo "    <title>$dispTUOM" . $TITLE . "</title>\n";
} else {
    echo "    <title>$dispTUOM" . langtransstr($SITE['organ']) . "</title>\n";
}

if (isset($SITE['flyoutmenu']) and $SITE['flyoutmenu'] or
    isset($_REQUEST['menu']) and strtolower($_REQUEST['menu']) == 'test' ) {
  $SITE['flyoutmenu'] = true;
  $PrintFlyoutMenu = false;
  $genDiv =false;
  global $FlyoutCSS, $FlyoutMenuText;
  include_once('flyout-menu.php');
  print $FlyoutCSS;
}
// Right-to-left language CSS mod
if(isset($SITE['CSS-RTL']) and file_exists($SITE['CSS-RTL']) and isset($SITE['RTL-LANG']) and 
   (strpos($SITE['RTL-LANG'],$SITE['lang']) !== false) ) { // use the override CSS
   print "<!-- lang='".$SITE['lang']."' using RTL CSS Override -->\n"; 
  // print "<style type=\"text/css\">\n";
  // readfile($SITE['CSS-RTL']);
  // print "</style>\n";
  print "<link rel=\"stylesheet\" type=\"text/css\" href=\"".$SITE['CSS-RTL']."\"/>\n";
} // end Right-to-left CSS override 
?>
<!-- World-ML template from http://saratoga-weather.org/wxtemplates/ -->
<!-- end of top -->

header.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219 		<?php
############################################################################
# A Project of TNET Services, Inc. and Saratoga-Weather.org (WD-World-ML template set)
############################################################################
#
# Project: Sample Included Website Design
# Module:  header.php
# Purpose: Provides the displayable top of the website
# Authors: Kevin W. Reed <kreed@tnet.com>
# TNET Services, Inc.
# Ken True <webmaster@saratoga-weather.org>
# Saratoga-Weather.org
#
#  Copyright: (c) 1992-2007 Copyright TNET Services, Inc.
###########################################################################
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA
############################################################################
# This document uses Tab 4 Settings
############################################################################
require_once("Settings.php");
# Establish our page width here to override the css settings.
require_once("common.php");
// add support for noCron=true fetch of nws-alerts to get current alerts
if(isset($SITE['NWSalertsCodes']) and count($SITE['NWSalertsCodes']) > 0) {
  include_once("nws-alerts-config.php"); // load the configuration for nws-alerts
  if(isset($noCron) and $noCron) {
 print "<!-- nws-alerts noCron=true .. running nws-alerts.php inline -->\n";
 include_once("nws-alerts.php");
  }
}
############################################################################
if (isset($SITE['uomTemp']) ) {
 $tuom = $SITE['uomTemp'];
} else {
$tuom = split('°',$temperature);  // extract units
$tuom = '&deg;' . $tuom[1];
}
###################### Code to Determine Day/Night #########################
$twilightAdjust = true; // Adjust sun times xx min. for twilight at dawn and dusk
$twAdjMinutes = 20;  // Adjust twilight this number of minutes (must be <60 !!!)
$dirname = bannerdir(); // Select proper banner directory for time of day and season
/* The directories, subdirectories of './Banners', are named for the seasons with day and night subdirectories:

/Banners/Winter/Day
/Banners/Winter/Night
/Banners/Spring/Day
/Banners/Spring/Night
/Banners/Summer/Day
/Banners/Summer/Night
/Banners/Fall/Day
/Banners/Fall/Night

This directory tree is where the seasonal and day/night banners are placed.
*/
#################### End Code to Determine Day/Night #######################
?>
<div id="page" class="center" style="width: <?php echo ($_SESSION['CSSwidescreen']!=1 ? 800 : 'calc(100%-114)') ?>px; height:auto padding:0px"><!-- page wrapper with standard 114px menubar -->
<!-- header -->
 <div id="go_home" style="height:0px; width:1px"></div>
 <div id="header" class="center" style="padding:0px">
  <div class="headerTitle" style="padding-left:0px; padding-right:0px; text-align:center">


<script type="text/javascript">
// This function reads in the appropriate directory's Header Images and then randomly displays one of those Images
function random_imglink(){
 <?php // Use php to build image array
 function returnimages() {
  global $dirname;
  $pattern="/jpg|jpeg|png|gif|bmp$/i";
  $files = array();
  $curimage=0;
  if($handle = opendir($dirname)) {
    while(false !== ($file = readdir($handle))){
      if(preg_match($pattern, $file)){
        echo 'myimages[' . $curimage .']="' . $dirname . $file . '";' . "\n";
        echo 'myimagesf[' . $curimage .']="'. $file . '";' . "\n";
        $curimage++;
      }
    }
    closedir($handle);
  }
  return($files);
 }
 print "var myimages=new Array();" . "\n";
 print "var myimagesf=new Array();" . "\n";
 returnimages();
 ?>
 // <![CDATA[
 var ry=Math.floor(Math.random()*myimages.length); // Select a random image
 var title = myimagesf[ry]; // Use filename as 'title'
 document.write('<img src="'+myimages[ry]+'" alt="" title="'+myimagesf[ry]+'" style="cursor:crosshair"/>'); // and display it
 // ]]>
}random_imglink(); // Call the function after declaring it.
// End Function to Display Random Header Image
</script>
</div>
 <div class="headerTemp">
 <span class="doNotPrint">
   <span class="ajax" id="ajaxbigtemp" style="padding-left: 10px"><?php print isset($tempnodp)?"$tempnodp$tuom":"&nbsp;"; ?>
   </span>
 </span>
 </div>
  <div id="outer"><a href="#go_home" title="To Top of Page"><span style="font-size:75%">^^<br/>Top</span></a></div>
  <div class="subHeader" style="width: auto">
 <span style="font-weight: bold; font-style: normal; text-decoration: none; font-size: 12pt;">
 <script type="text/javascript">
  // <![CDATA[
   var d = new Date()
   var time = d.getHours()
   if (time>=0 && time<5){document.write("Hello Night Owls! ")}
   else if (time>=5 && time<12){document.write("Good Morning! ")}
   else if (time>=12 && time<18){document.write("Good Afternoon! ")}
   else{document.write("Good Evening! ")}
  // ]]>
  </script>
  </span>
  <?php echo $SITE['location']; ?>
  <?php if($SITE['allowLanguageSelect']) { // insert code for language select ?>
  <br />
  <!-- begin language select -->
  <?php echo print_language_selects(); ?>
  <!-- end language select -->
  <?php } // end code for language select ?>
 </div>
 <div class="subHeaderRight" style="width: auto; padding-left:5px">
 <?php 
  if (isset($showGizmo) and $showGizmo) {
  include_once("ajax-gizmo.php");
  } else {
  print "&nbsp;<br/><br/>\n"; // needed as placeholder if no gizmo
  } ?>
  </div><!-- end subHeaderRight -->
</div>
<!-- end of header --> 
<?php
######################### Select Banner Directory Function ##########################
function bannerdir() {
    global $twilightAdjust;
    global $twAdjMinutes;
    global $SITE;
    global $marchequinox;
    global $junesolstice;
    global $sepequinox;
    global $decsolstice;
    global $nextSeason;
    global $next_season;
//    global $localTR;
     $lat = $SITE['latitude'];
    $lon = $SITE['longitude'];
    $_dST = date("I");
    $theTime = explode(":",date("H:i"));
    $_sunRise = date_sunrise(time(), SUNFUNCS_RET_STRING,$lat,$lon); // Compute local sunrise
    $sRtime = explode(":",$_sunRise); // Separate hours and minutes via an array
    $sRtime[0] = $sRtime[0] + $_dST; // Adjust for DST
    $_sunSet = date_sunset(time(), SUNFUNCS_RET_STRING,$lat,$lon); // Compute local sunset
    $sStime = explode(":",$_sunSet); // Separate hours and minutes via an array
    $sStime[0] = $sStime[0] + $_dST; // Adjust for DST
    if ($twilightAdjust) { // Do we adjust for twilight?
     if ($sRtime[1]<$twAdjMinutes) { // We don't have enough minutes
        $sRtime[0]-=1;                // so borrow 60 minutes
        $sRtime[1]+=(60-$twAdjMinutes); // and carry the remainder after adjusting for twilight.
     } else {                        // Otherwise
        $sRtime[1]-=$twAdjMinutes;    // subtract the adjustment.
     }
     if ($sStime[1]+$twAdjMinutes>=60) { // If we have too many minutes
        $sStime[0]+=1;                    // add 60 minutes via 1 hour
        $sStime[1]-=(60-$twAdjMinutes);    // and subtract the remainder after adjusting for twilight.
     } else {                            // Otherwise
        $sStime[1]+=$twAdjMinutes;        // add the adjustment.
     }
    }
    ##################### End of Code to Determine Day/Night ############################
    ########################## Code to Determine Seasons ################################
    // Modified by SE Lincoln Weather from code by Cienega32 - LasCruces-Weather.com
    // Use WD's testtags.php solstice and equinox variables to extract the date and time for seasons
    // They are formatted '05:05 UTC 21 June 2013' e.g.  The months are always the same.
    $now= date('H:i d F Y'); // Format needed for season compare--UTC conversion done in season-check()
    $nowString = strtotime($now);
    // Compare WD season to $now and determine seasons and next traversal
    if (($nowString>=season_check($marchequinox)) && ($nowString<season_check($junesolstice))) {
        $nextSeason = "Summer";
        $currentSeason = "Spring";
        $next_season = $junesolstice;
    }    elseif (($nowString>=season_check($junesolstice)) && ($nowString<season_check($sepequinox))) {
        $nextSeason = "Autumn";
        $currentSeason = "Summer";
        $next_season = $sepequinox;
    }    elseif (($nowString>=season_check($sepequinox)) && ($nowString<season_check($decsolstice))) {
        $nextSeason = "Winter";
        $currentSeason = "Fall";
        $next_season = $decsolstice;
    }    else {$nextSeason = "Spring";
        $currentSeason = "Winter";
        $next_season = $marchequinox;
    }
    ###################### End of Code to Determine Seasons #############################
    if (($sRtime[0]==$theTime[0] && $sRtime[1]<$theTime[1]) || ($sRtime[0]<$theTime[0])  &&  ($sStime[0]>$theTime[0] || ($sStime[0]==$theTime[0] && $sStime[1]>$theTime[1]))) {
        $dirname = "./Banners/".$currentSeason."/Day/"; // The payoff--seasonal directory selection for day,
    }
    else {
     $dirname = "./Banners/".$currentSeason."/Night/";// and night!
    }
    #echo '$dirname = '.$dirname.'<br/>'; // Debug Code
    return $dirname;
}
?>

menubar.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418 		<?php /*
//--self downloader --
if (isset($_REQUEST['sce']) && ( strtolower($_REQUEST['sce']) == 'view' or
    strtolower($_REQUEST['sce']) == 'show') ) {
   $filenameReal = __FILE__;
   $download_size = filesize($filenameReal);
   header('Pragma: public');
   header('Cache-Control: private');
   header('Cache-Control: no-cache, must-revalidate');
   header("Content-type: text/plain");
   header("Accept-Ranges: bytes");
   header("Content-Length: $download_size");
   header('Connection: close');

   readfile($filenameReal);
   exit;
} */
############################################################################
# A Project of TNET Services, Inc. and Saratoga-Weather.org (WD-World-ML template set)
############################################################################
#
#    Project:    Sample Included Website Design
#    Module:        menubar.php
#    Purpose:    Provides the menubar for the system
#     Authors:    Kevin W. Reed <kreed@tnet.com>
#                TNET Services, Inc.
#               Ken True <webmaster@saratoga-weather.org>
#               Saratoga-Weather.org
#
#     Copyright:    (c) 1992-2007 Copyright TNET Services, Inc.
############################################################################
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA
############################################################################
#    This document uses Tab 4 Settings
############################################################################
require_once("Settings.php");
require_once("common.php");
############################################################################
?>
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.3/jquery.min.js"></script>
<!-- menubar -->
<div class="doNotPrint">
      <div class="leftSideBar">
        <p class="sideBarTitle"><?php langtrans('Navigation'); ?></p>
<?php 
// NOTE: when adding new links to the site, put them in as <li></li> entries in
//   the <ul></ul> shown below.  The order of the links is the order they appear
//   in the left navigation menu.  
// Be careful to only use html as shown below, otherwise the program that
//   automatically shows which page you're on won't work quite right.
// Don't use single-quotes in the following area unless you prefix it with a 
//   backslash.
//   Correct:  "Steve\'s page"
//   Wrong:    "Steve's page"    <=== this will cause a PHP error in menubar.php
//
// Be sure to include a title="..." tag so folks can see more info via a tooltip
//   as they mouse over the link in the menu.
//Don't change the next line in any way
$html = '
        <ul>
          <li><a href="index.php" title="Home">Home</a></li>
          <li><a href="wxforecast.php" title="5-day Forecast">Forecast</a></li>
          <li><a href="wxsimforecast.php" title="WXSIM Forecast">WXSIM Forecast</a></li>
          <li><a href="wxradar.php" title="Radar">Radar</a></li>
          <li><a href="wxadvisory.php" title="Watches, Warnings, Advisories">Advisories</a></li>
          <li><a href="wxtrends.php" title="Daily weather statistics">Daily Stats</a></li>
          <li><a href="wxgraphs.php" title="24, 72, &amp; Monthly Graphs">Graphs</a></li>
          <li><a href="wxastronomy.php" title="Sun and Moon Data">Astronomy</a></li>
          <li><a href="wxlinks.php" title="Useful Links">Links</a></li>
          <li><a href="wxabout.php" title="About This Site">About Us</a></li>
        </ul>
'; // end of links set for site. Don't change this line in any way
 if (isset($SITE['flyoutmenu']) and $SITE['flyoutmenu']) {
   global $FlyoutMenuText;
   print "<div class=\"flyoutmenu\">\n";
   print $FlyoutMenuText;
   print "</div>\n";
 } else {
    gen_navlinks($html); // generate the links set with highlight for the current page
 }
?>
<?php 

 if(isset($showSidebar) and $showSidebar) {
    include_once("ajax-sidebar.php");
 } 
# Note: add other links and stuff to the left sidebar above the </div><!-- end leftSidebar -->
# as shown in the sample below.
# Keep in mind that the width allowed is about 110px
#
# if you don't want anything to appear extra here, just delete the lines
# <!-- external links -->
#   down to and including
# <!-- end external links -->
# Parking for 'New' Image: <img src="/images/new_icon.gif" alt="'New' Image"/>
?>
<!-- AtomFeed icons 
<p class="sideBarTitle" style="text-align: center; text-decoration: none;">Alerts</p>
-->
<div style="text-align:center;">

<?php if(
isset($SITE['NWSalertsSidebar']) and $SITE['NWSalertsSidebar'] and
isset($SITE['NWSalertsCodes']) and count($SITE['NWSalertsCodes']) > 0) { ?>
<!-- nws-alerts icons -->
<p class="sideBarTitle" style="text-align:center"><?php langtrans('Alerts'); ?></p>
<?php
include_once("nws-alerts-config.php"); // include the config file
include($cacheFileDir.$iconFileName); // include the big icon file
// construct menu bar icons
$bigIcos = '<div style="text-align:center">'."\n";
foreach($bigIcons as $bigI) {
$bigIcos .= $bigI;
}
$bigIcos .= " <br />\n</div>\n<!-- end nws-alerts icons -->\n";
echo $bigIcos; ?>
<?php } // end of NWS alerts sidebar ?>
<!-- end nws-alert icons--> 
<!-- AtomArray icons
<?php //include_once("AtomArray.php"); foreach($top_icons as $alertIcons){ print $alertIcons;} ?>
-->
</div>
<!-- <p>&nbsp;</p> -->
<!-- end AtomFeed icons -->
<!-- Mobile Link -->
    <p class="sideBarTitle"><?php langtrans('Mobile Weather'); ?></p>
    <div class="sideBarText" style="font-weight:lighter; margin-bottom:5px; margin-top:5px">
    <p class="thisPage" style="font-size:80%; font-weight:lighter; text-align:center; margin-bottom:0px; margin-top:0px">Get SE LincolnWx SmartPhone Weather 
     <img src="GWWMobileQRCode2.png" title="Alternate Smartphone Compatible Mobile Weather" alt="QRCode2" height="107" width="107"/>Scan With Phone's Bar Code Reader</p> 
</div>
<!-- end Mobile Link -->
<!-- US Extremes -->
<!-- NWS --> 
<?php include_once('worldextremes.php')?>
<div class="thisPage" style="font-weight:lighter">
  <p class="sideBarTitle">
    <?php langtrans('US Weather Extremes');?><br/><?php #langtrans('Past 24 Hours'); ?>
  </p>
  <table class="center" style="text-align:center; width:110px; padding-top:0; padding-bottom:0; line-height:90%">
  <tr><td><span style="font-size: 95%; font-weight:bold">==========</span></td></tr>
  <tr><td><span style="font-size: 110%; font-weight:bold">USA</span></td></tr>
  <tr><td><span style="font-size: 90%; font-weight:bold; color: red;">High Temp</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php print $usahigh; ?></span></td></tr>
<!--
  <tr><td><span style="font-size: 90%; font-weight:bold; color: red;">High Heat Index</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php #print $usaheatIndex; ?></span></td></tr>
-->
  <tr><td><span style="font-size: 90%; font-weight:bold; color: blue;">Low Temp</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php print $usalow; ?></span></td></tr>
<!--
  <tr><td><span style="font-size: 90%; font-weight:bold; color: blue;">Low Wind Chill</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php #print $usawindChill; ?></span></td></tr>
  -->
  <tr><td><span style="font-size: 90%; font-weight:bold; color: green;">Precipitation</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php print $usaprecip; ?></span></td></tr>
  <!--
  <tr><td><span style="font-size: 90%; font-weight:bold; color: orange;">High Wind</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php #print $usawind1.'<br/>'.$usawind2; ?></span></td></tr>
  <tr><td><span style="font-size: 95%; font-weight:bold">==========</span></td></tr>
  <tr><td><span style="font-size: 110%; font-weight:bold">World</span></td></tr>
  <tr><td><span style="font-size: 90%; font-weight:bold; color: red;">High Temp</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php #print $worldhigh; ?></span></td></tr>
  <tr><td><span style="font-size: 90%; font-weight:bold; color: blue;">Low Temp</span></td></tr>
  <tr><td><span style="font-size: 80%"><?php #print $worldlow; ?></span></td></tr>
-->
  <tr><td><span style="font-size: 95%; font-weight:bold">==========</span></td></tr>
</table>
</div>
<!--- end US Extremes -->
<!-- begin NE Extremes -->
<?php #include_once('stateextremes.php')?>
<div class="thisPage" style="font-weight:lighter">
  <p class="sideBarTitle">
    <?php echo $selectState; langtrans(' Weather Extremes');?><br/><?php #langtrans('Past 24 Hours'); ?>
  </p>
  <table class="center" style="text-align:center; width:110px; padding-top:0; padding-bottom:0; line-height:90%">
  <tr><td><span style="font-size: 95%; font-weight:bold">==========</span></td></tr>
  <tr><td><span style="font-size: 110%; font-weight:bold">NE</span></td></tr>

  <tr><td style="text-align: center;font-size: 8pt;">for   
  <?php $rdate =preg_replace('|,|',',<br/>',$stateReportDate,1);
  echo $rdate; ?>
  </td></tr>
 <tr><td><span style="font-size: 90%; font-weight:bold; color: red;">High Temp</span></td></tr>
  <tr><td style="text-align: center; font-size: 80%;"><span class="data"><?php echo $statehigh; ?></span></td></tr>
  <tr><td><span style="font-size: 90%; font-weight:bold; color: blue;">Low Temp</span></td></tr>
  <tr><td style="text-align: center;font-size: 80%;"><span class="data"><?php echo $statelow; ?></span></td></tr>
  <tr><td><span style="font-size: 90%; font-weight:bold; color: green;">Precipitation</span></td></tr>
  <tr><td style="text-align: center;font-size: 80%;"><span class="data"><?php echo $stateprecip; ?></span></td></tr>
  <tr><td><span style="font-size: 95%; font-weight:bold">==========</span></td></tr>
  <tr><td style="text-align: center;font-size: 8pt;">Data from <a href="https://www.cpc.noaa.gov/products/analysis_monitoring/cdus/prcp_temp_tables/">NWS CPC</a></td></tr>
</table></div>
<!-- end NE Extremes -->
<!-- external links -->
<p class="sideBarTitle"><?php langtrans('External Links'); ?></p>
<ul>
   <li><a href="https://www.wunderground.com/" title="Weather Underground" target="_blank" style="margin-left:5px">Weather Underground</a></li>
   <li><a href="https://www.wxforum.net/" title="WXForum" target="_blank" style="margin-left:5px">WXforum.net</a></li>
   <li><a href="https://www.weather-watch.com/smf/index.php" title="Wx Display Forum" target="_blank" style="margin-left:5px">Wx Display Forum</a></li>
</ul>
<!-- end external links -->
<!-- Other Links -->
<div class="sideBarTitle"><?php langtrans('Other Links'); ?></div>
<ul>
    <li><a href="Win7themepacks.php" title="My Windows 7 Theme Packs" target="_blank" style="margin-left:5px">Windows 7 Theme Packs</a></li>
  <li><a href="gwwScripts.php" title="Select SE Lincoln Weather Scripts" target="_blank" style="margin-left:5px">SE Lincoln Wx Scripts</a></li>
  <li><a href="http://www.tubaforum.net" title="Tuba-Euphonium Forum" target="_blank" style="margin-left:5px">Tuba-Euphonium Forum</a></li>
</ul>
<!-- end Other Links -->
<p class="sideBarTitle"><?php langtrans('Local Sunlight Hours'); ?></p>
    <div class="sideBarText" style="font-weight:lighter; font-size: 6.5pt; text-align: center; margin-bottom:4px; line-height:135%">
          <?php
#            include("heavens.php"); 
            $hrsOfSunLight = array(); // [0] = yesterday, [1] = today, [2] = tomorrow
            $theChanges = get_changeinday();
            $changeinday2 = $theChanges[0];
            $hrsOfSunLight = $theChanges[1];
#            $changeinday2 = get_changeinday();
#           echo '$changeinday2 = '.$changeinday2.'<br/>'; // Debug Code
           //Make piechart
            $timebits = explode(":", $hrsOfSunLight[1]); // Today
            $testresult = $timebits[0] + $timebits[1]/60;
            $test1jus=round(($testresult/24)*100,1);
            $testmorker=100-$test1jus;
        ?>
            <span class="thisPage" style="position: relative; font-weight:lighter">
          <?php
           $time_arr = explode(':', $changeinday2);
           $time_arr[0]>0?$cidsign = '+': $cidsign ='-';
           if ($time_arr[1]< 5) {
                        if ($displayYesterday) {
                            $time_arr2 = explode(':', $hrsOfSunLight[0]); // Yesterday
                            echo (int)$time_arr2[0] . " hrs " . (int)$time_arr2[1] . " min " . (int)$time_arr2[2]." sec";
                            echo '<br/>Sunlight Yesterday<br/>';
                        }
            $time_arr = explode(':', $hrsOfSunLight[1]); // Today
            echo (int)$time_arr[0] . " hrs " . (int)$time_arr[1] . " min " . (int)$time_arr[2]." sec";
            echo '<br/>of Sunlight Today';
        ?>
                        <?php echo '<br/>Which is ';
            $time_arr = explode(':', $changeinday2);
                        echo (((int)$time_arr[1]>0)?('<br/>'.(int)$time_arr[1] . ' min '):' ') . $time_arr[2];
                        echo (substr($time_arr[0],0,1) != "-")?' sec Longer':' sec Shorter'; // '-' when getting shorter
            echo ('<br/>Than Yesterday');
                        if ($displayTomorrow) {
                            $time_arr3 = explode(':', $hrsOfSunLight[2]); // Tomorrow
                            echo (int)$time_arr3[0] . " hrs " . (int)$time_arr3[1] . " min " . (int)$time_arr3[2]." sec";
                            echo '<br/>Sunlight Tomorrow<br/>';
                        } ?>
            </span>
            <div id="PieChart">
            <?php 
              include ("heavens.php");
            ?>
            <table style="width:105px">
              <tr style="text-align:center; font-size:7px">
                <td style="vertical-align:bottom">
                  <span class="thisPage">(Noon)</span>
                </td>
              </tr>
              <tr>
                <td style="text-align:left; vertical-align:middle">
                  <a href="<?php echo $sunLightPieLink?>" target="_blank" title="Astronomy Page in New Tab"><img src="<?php echo getUniqueImageURL('./cache/heavenpie.png')?>" height="100" width="100" id="sunPie" alt="Day-Night Graphic"/></a>
                </td>
              </tr>
              <tr style="text-align:center; font-size:7px">
                <td style="vertical-align:top">
                  <span class="thisPage">(Midnight)</span>
                </td>
              </tr>
            </table>
            </div>
            <span class="ajax" id="pieChartreLoader">
            <script type="text/javascript"><!--
            //<![CDATA[
                            var jq = jQuery.noConflict();
              function reloadPieChart() {
                                // if (ajaxUpdates < update.maxupdates) { // Stop and start updating with ajaxUpdates
                    jq("#PieChart").load("menubar.php" + " #PieChart");
                                //} // Omitted 4/25/16 to allow continuous processing
                setTimeout('reloadPieChart()',120000);
              }
              setTimeout('reloadPieChart()',120000);
              //]]>
              -->
            </script>
            </span>
            <span class="thisPage" style=" position:relative; font-weight:lighter">
            <a style="cursor:pointer; text-align:center; width:109px" onmouseover="showspLegend('block')" onmouseout="showspLegend('none')">Legend</a><img id="spLegend" style="display:none" src="./images/heavensLegend.png" alt="Legend"/>
          </span>
        <?php } 
                ?>
      </div>  
<!--
    <p class="sideBarTitle"><?php langtrans('Pollen Level'); ?></p>
    <div class="sideBarText" style="font-weight:lighter; margin-bottom:5px; margin-top:5px">
    <div class="thisPage" style="font-weight: lighter">
      <form name="PollenForecast3" action="Javascript:PollenPopUp3()" method="post" onsubmit="PollenPopUp3();" style="width:107px;" accept-charset="utf-8">
        <input type="hidden" name="AffiliateID" value="10164" />
        <div><img src="http://www.pollen.com/images/attractor3.gif" width="107" height="99" border="0" alt="Pollen"/></div>
        <div style="text-align:center;">
          <input type="text" name="zip" value="68506" size="5" maxlength="5" />
          <input type="submit" name="Logon" value="Enter" />
        </div>
      </form>
        </div>
  </div>
-->
<?php if($SITE['allowThemeSwitch']) { // insert code for theme switcher ?>
  <!-- begin Color Theme Switcher Plugin http://www.642weather.com/weather/scripts.php -->
  <div class="thisPage" style="margin-left: 5px; font-weight: normal;">
  <?php print_css_style_menu(1); ?>
  </div>
  <!-- end Color Theme Switcher Plugin http://www.642weather.com/weather/scripts.php -->
<?php } // end code for theme switcher ?>
      </div><!-- end leftSidebar -->
</div><!-- end doNotPrint -->    
<!-- end of menubar -->
<?php 

if (isset($_REQUEST['show']) and strtolower($_REQUEST['show']) == 'settings') {
  print "<!-- current settings\n" . htmlentities(print_r($SITE,true)) . " -->\n";
}

// generate navigation links script - Ken True - webmaster@saratoga-weather.org

function gen_navlinks($html) {
 preg_match('|<ul>(.*)</ul>|is', $html, $betweenspan); // find the navigation div
 $rawlinks  = $betweenspan[1]; 

 // Chop up each link and place in array 
 preg_match_all("/<li.*>(.*)<\/li>/Uis", $rawlinks, $betweenspan);  
 $links = $betweenspan[1]; 

 $ourPage = $_SERVER['PHP_SELF'];
 $doDebug = false;
 echo "<!-- this page='$ourPage' -->\n";
 if (isset($_REQUEST['page']) ) { // support testing
   $ourPage = $_REQUEST['page'];
   echo "<!-- using page='$ourPage' as test -->\n";
   $doDebug = true;
 }
 if (isset($_REQUEST['debug']) ) { // support testing
   $doDebug = true;
 }
  $t = pathinfo($ourPage); // extract base filename from link
  if ($doDebug) {print "<!-- pathinfo\n" . print_r($t,true) . "-->\n"; }
  $ourPage = $t['basename'];
  
// Now generate the code 
 print "<!-- navigation links -->\n";
 print "<ul>\n";
 
 foreach ($links as $i => $link) {
   if (preg_match('|<a.*href="([^"]+)"[^>]*>(.*)</a>|i',$link,$matches) ) {
       if($doDebug) {  print "<!-- Matches for i=$i '$link': \n" . print_r($matches,true) . "-->\n"; }
    
     //Matches: Array
     //(
     //   [0] => <a href="index.php" title="Current Conditions/Home">Home</a>
     //   [1] => index.php
     //   [2] => Home
     //)
    
      if ($matches[1] == $ourPage) {
        // we're on our page
        print "<li><span class=\"thisPage\">" . langtransstr($matches[2]) . "</span></li>\n";
      } else {
        $t = langtransstr($matches[2]);
        print "<li>" . str_replace($matches[2],$t,$matches[0]) . "</li>\n";
      }
    } else { // must be just text
      print "<li>" . $link . "</li>\n";
    } // end if has an <a href=
 }
 print "</ul>\n<!-- end of navigation links -->\n";
 } // end of gen_navlinks function
?>
<script language="Javascript" type="text/javascript">
function showspLegend(doit)
   {
   document.getElementById("spLegend").style.display= doit;
   }
</script>
<script language="javascript" type="text/javascript">
<!--
function PollenPopUp3() {
    var frm = document.PollenForecast3;
    var URL = "https://www.pollen.com/forecast_oneday.asp?AffiliateID="+frm.AffiliateID.value+"&zip="+frm.zip.value+"&ft=1&pop=1";
    var desktop = window.open(URL,"forecast","status,scrollbars,status,width=308,height=356");
}
// -->
</script>
    <script type="text/javascript"><!--
    //<![CDATA[
    function reloadSunPie() { // Reloads pie chart in case it has been updated by another script
        var now = new Date();
        if (document.images) { // Continue updating without regard to 'ajaxUpdates < update.maxupdates'
            document.images.sunPie.src = './cache/heavenpie.png?' + now.getTime();
        }
        setTimeout('reloadSunPie()',15000);
    }
    setTimeout('reloadSunPie()',15000);
    //]]>
    -->
</script>

footer.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134 		<?php
############################################################################
# A Project of TNET Services, Inc. and Saratoga-Weather.org (WD-USA-ML template set)
############################################################################
#
#    Project:    Sample Included Website Design
#    Module:        footer.php
#    Purpose:    Provides the bottom section of the website
#     Authors:    Kevin W. Reed <kreed@tnet.com>
#                TNET Services, Inc.
#               Ken True <webmaster@saratoga-weather.org>
#               Saratoga-Weather.org
#
#     Copyright:    (c) 1992-2007 Copyright TNET Services, Inc.
############################################################################
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA
############################################################################
#    This document uses Tab 4 Settings
############################################################################
//Version 1.01 - 05-Feb-2012 - fixup for HTML5 validation
//Version 1.02 - 22-Apr-2017 - use HTTPS for validation links
require_once("Settings.php");
require_once("common.php");
############################################################################
?>
    <!-- ##### Footer ##### -->

    <div id="footer" style="padding:0px">
      <div class="doNotPrint">
        <a href="#header"><?php langtrans('Top'); ?></a> |

        <a href="wxcontact.php" title="E-mail us"><?php langtrans('Contact Us'); ?></a>
        <script type="text/javascript">
        <!--
        if (navigator.appName == 'Microsoft Internet Explorer' && 
        parseInt(navigator.appVersion) >= 4)
        {
        document.write('| <a href=\"#\" onclick=\"javascript:window.external.AddFavorite        (location.href,document.title)\">');
        document.write('<?php langtrans('Bookmark Page'); ?></a>');
        }else
        {var msg = '| <a href="" title="<?php langtrans('Bookmark Page'); ?>" onClick="alert(' + "'Hit CTRL-D to bookmark this page'"+ ');"><?php langtrans('Bookmark Page'); ?></a>';
        if(navigator.appName == "Netscape") msg += " (CTRL-D)";
document.write(msg);
        }
        // -->
        </script>
      </div><!-- end doNotPrint -->
      <!--
       <div style="text-align:center" class="center">
          <br/><a href="whos-online-maps.php" target="_blank"><?php #echo $wo_record_array['now'];?></a> (in past 15 min., including robots)<br />
          <?php #echo $wo_record_array['today'];?><br />
          <?php #echo $wo_record_array['month'];?><br />
          <?php #echo $wo_record_array['year'];?><br />
          <?php #echo $wo_record_array['all'];?><br />
        </div>
        -->
        <div style="text-align:center" class="center">
          <!-- Histats.com  START  (standard)
          <script type="text/javascript">document.write(unescape("%3Cscript src=%27http://s10.histats.com/js15.js%27 type=%27text/javascript%27%3E%3C/script%3E"));</script>
          <a href="http://www.histats.com" target="_blank" title="invisible hit counter" ><script  type="text/javascript" >
          try {Histats.start(1,2990742,4,101,172,22,"00011111");
          Histats.track_hits();} catch(err){};
          </script></a>&nbsp;(Histats Tabulated Since March 3, 2015)<br/>
          <noscript><![CDATA[ <a href="http://www.histats.com" target="_blank"><img  src="http://sstatic1.histats.com/0.gif?2990742&101" alt="invisible hit counter" border="0"></a>]]></noscript>
          Histats.com  END  -->
               <br/>
<!--          <a href="http://info.flagcounter.com/OBut"><img src="//s10.flagcounter.com/count/OBut/bg_4F4F4F/txt_FFFFFF/border_696969/columns_4/maxflags_24/viewers_Unique+Visitors/labels_1/pageviews_1/flags_1/percent_0/" alt="Flag Counter" border="0"></a>
-->
          <a href="https://s01.flagcounter.com/more/wj2" target="blank"><img src="https://s01.flagcounter.com/count/wj2/bg_4F4F4F/txt_FFFFFF/border_696969/columns_4/maxflags_24/viewers_Unique+Visitors/labels_1/pageviews_1/flags_1/" alt="free counters"/></a>
          <br/>
            <a href="https://mapmyvisitors.com/web/1bwp3" title="Visit tracker"><img src="https://mapmyvisitors.com/map.png?d=kLiReG3btstykaUMs6ubNJ4V3Sz4meSFCTw6uJmqIKc&amp;cl=ffffff" alt="global visitors"/></a>
        </div>
      <div style="width:100%;margin-left:auto;margin-right:auto">
            <table style="width: 100%; margin-left: auto; margin-right: auto">
           <tr class="center" style="text-align:center; vertical-align:middle">
        <!--
           <td>
                    <a href="http://www.mad-weather.com/topsites/" target="_blank" title="Opens in New Tab"><span style="border:0px"><img src="http://www.mad-weather.com/topsites/button.php?u=gwwilk" alt="World Weather Websites"/></span></a>
        </td>
           <td>
          <a href="https://usaweatherfinder.com/"><img src="https://usaweatherfinder.com/button.php?u=gwwilk" alt="USA Weather Finder" style="border:0px" /></a>
        </td>
-->
        <td align="center">
          <?php
            $link = (isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] === 'on' ? 
                "https" : "http") . "://" . $_SERVER['HTTP_HOST'] .  
                $_SERVER['REQUEST_URI']; 
          ?> 
          <a href="https://validator.w3.org/check?uri=<?php echo $link?>"><img src="/images/valid-xhtml10.png" alt="Valid XHTML 1.0 Transitional" style=" height:31px; width:88px; vertical-align:middle"/></a><a href="https://jigsaw.w3.org/css-validator/check/referer"><img style="width:88px;height:31px; vertical-align:middle" src="/images/vcss.gif" alt="Valid CSS!" /></a>
          <span id="siteseal" style="vertical-align: bottom"><script type="text/javascript" src="https://seal.godaddy.com/getSeal?sealID=DPMCnMXwmUKIukN8RqXdmYicZuYUIlTusCUaV9YhMJr7BLwDgwWK470pvCOg"></script></span>
        </td>
        </tr></table>
        </div>
        <?php print $SITE['copyr'] ?><span class="doNotPrint"> |  
          <a href="<?php echo $SITE['WXsoftwareURL']; ?>" title="Powered by <?php echo $SITE['WXsoftwareLongName']; ?>"><?php echo $SITE['WXsoftwareLongName'];?>
          <?php if(isset($wdversion)) {echo " (".$wdversion.")";} ?> </a> |
          <a href="https://validator.w3.org/check?uri=<?php echo $link?>"><?php langtrans('Valid'); ?> 
          <?php  print (isset($useHTML5) and $useHTML5)?'HTML5':'XHTML 1.0'; ?></a> |
          <a href="https://jigsaw.w3.org/css-validator/check/referer"><?php langtrans('Valid'); ?> CSS</a> 
          </span><br class="doNotPrint" />
      <br/><?php langtrans('This website is neither affiliated with nor endorsed by the National Weather Service or any
                      other government agency. The weather data contained herein is offered without any warranties
                      express or implied, and is meant to only supplement, not replace, official NWS weather
                      forecasts and information'); ?>.<br class="doNotPrint" />
    </div><!-- end id="footer" -->
  </div> <!-- end id="page" wrapper -->
  </body>
</html>
<?php 
# Leave this code here .. it will help you see what language translations are missing by running any page on your
# website with a ?show=missing argument
#
  global $missingTrans,$SITE;
  if(isset($_REQUEST['show']) and strtolower($_REQUEST['show']) == 'missing') {
    echo "<!-- missing langlookup entries for lang=".$SITE['lang']." \n";
    foreach ($missingTrans as $key => $val) {
        echo "langlookup|$key|$key|\n";
    }
    echo "\n ".count($missingTrans)." entries.  End of missing langlookup entries -->\n";
  }
?>

common.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939 		<?php
############################################################################
# A Project of TNET Services, Inc. and Saratoga-Weather.org (Canada/World-ML template set)
############################################################################
#
#    Project:    Sample Included Website Design
#    Module:        common.php
#    Purpose:    Provides common functions used throughout the website
#     Authors:    Kevin W. Reed <kreed@tnet.com>
#                TNET Services, Inc.
#               Ken True <webmaster@saratoga-weather.org>
#               Saratoga-Weather.org
#
#     Copyright:    (c) 1992-2007 Copyright TNET Services, Inc.
############################################################################
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA
############################################################################
#    This document uses Tab 4 Settings
############################################################################
require_once("Settings.php");
global $forwardTrans,$reverseTrans,$missingTrans;
############################################################################
# Version 1.04 - 29-Nov-2011 - improved language translations for conditions
# Version 1.05 - 01-Dec-2012 - minor fix to cGetSeasonInfo
# Version 1.06 - 05-Feb-2013 - added UTF-8 conversion features for ISO-8859-n language files
# Version 1.07 - 09-Feb-2013 - added tman1991 cGetMoonInfo() mods for cell.php add-on
# Version 1.07a - 21-Dec-2013 - added get_changeinday() for Sunlight Calculations/Pie Chart
# Version 1.08 - 12-Aug-2015 - fixed deprecated /e preg_replace with preg_replace_callback
# Version 1.09 - 17-Aug-2015 - fixed HTML5 validation for print_language_selects()
# Version 1.10 - 19-Apr-2019 - updated season/moon tables for 2018-2030 years
# Version 1.11 - 07-Dec-2020 - minor fix for PHP 8.0.0
# Version 1.12 - 02-Jun-2021 - added cookie for persistent language selection (lang=)
# Version 1.13 - 29-Nov-2021 - add SameSite=Lax to lang= browser cookie
# Version 1.14 - 27-Dec-2022 - fixes for PHP 8.2
$CMNVersion = 'common.php - Version 1.14 - 27-Dec-2022';
# Common Functions
############################################################################

function Mklink($url, $title, $desc, $remote) {
    global $SITE;

    if ($remote) {
        echo "<div class='link'>";
        echo "<a href='{$url}' title='{$title}' \n";
        echo "$SITE[remote] >";
        echo "$desc</a> <img src=\"./images/offsite.gif\" alt=\"*EXT*\" /></div>";

    } else {
        echo "<a href='{$url}' title='{$title}'>{$desc}</a>";
    }
}

#####################################################################
function langtrans ( $item ) {
  global $LANGLOOKUP,$missingTrans;
  
  if(isset($LANGLOOKUP[$item])) {
     echo $LANGLOOKUP[$item];
  } else {
     if(isset($item) and $item <> '') {$missingTrans[$item] = true; }
     echo $item;
  }

}
#####################################################################
function langtransstr ( $item ) {
  global $LANGLOOKUP,$missingTrans;
  
  if(isset($LANGLOOKUP[$item])) {
     return $LANGLOOKUP[$item];
  } else {
      if(isset($item) and $item <> '') {$missingTrans[$item] = true; }
     return $item;
  }

}
#####################################################################
function langtranssubs ( $item ) {
  global $LANGSUBS;

    reset ($LANGSUBS); // process in order of the file
    $text = $item;
    foreach ($LANGSUBS as $key => $replacement) {
      $text = str_replace($key,$replacement,$text);
    }
    // put back translated text, fixing capitalization for sentence starts (except the first one).
    if(count($LANGSUBS) >=1) {
      $text = preg_replace_callback('!\.\s+([a-z])!s',
      function($matches) { return('.  ' . strtoupper($matches[1]) ); }
      ,$text);
    }
    if (isset($_REQUEST['debug']) ) { echo "<!-- translated '$item' to '$text' -->\n"; }
 
  return($text);

}

#####################################################################
# load language translation settings (if any)

function load_langtrans () {
  global $LANGLOOKUP, $LANGSUBS, $SITE, $forwardTrans, $reverseTrans, $missingTrans,$CMNVersion;
  $LANGLOOKUP = array();
  $LANGSUBS = array();
  $forwardTrans = array();
  $reverseTrans = array();
  $missingTrans = array();
  
  $Status = "<!-- $CMNVersion -->\n";

  $lang = 'en'; // default language
    $setCookieLang = false;
    $Status .= "<!-- input load_langtrans ";
  if (isset($SITE['lang']) ) {    $lang_input = strtolower($SITE['lang']); 
       $Status .= "SITE['lang'] = '".$SITE['lang']."; ";}
  if (isset($_SESSION['lang'])) { $lang_input = strtolower($_SESSION['lang']); 
       $Status .= "SESSION['lang'] = '".$_SESSION['lang']."; ";}
    if (isset($_COOKIE['lang']))  { $lang_input = strtolower($_COOKIE['lang']); 
       $Status .= "COOKIE['lang'] = '".$_COOKIE['lang']."; ";}
  if (isset($_REQUEST['lang'])) { $lang_input = strtolower($_REQUEST['lang']); $setCookieLang = true;
       $Status .= "REQUEST['lang'] = '".$_REQUEST['lang']."; ";}
         $Status .= " -->\n";

  # allow valid input only
  # allows en, en-us, en-gb, dk, etc.
  if ((isset($lang_input) && preg_match('/^[a-z]{2}$/', $lang_input))
  || (isset($lang_input) && preg_match('/^[a-z]{2}-[a-z]{2}$/', $lang_input)) ) {
        $Status .= "<!-- lang_input='$lang_input' used for \$lang -->\n";
    $lang = $lang_input;
  }
#  if($setCookieLang or !isset($_COOKIE['lang']) or $_COOKIE['lang'] !== $lang) {
        $Status .= "<!-- set_lang_cookie ".set_lang_cookie('lang',$lang)." -->\n";;
#        $_COOKIE['lang'] = $lang;
#    }

  # always store in a PHP Session
  $_SESSION['lang'] = $lang;
  $_REQUEST['lang'] = $lang;  // establish for other scripts too
  $SITE['lang'] = $lang;

    $Status .= "<!-- result load_langtrans ";
  if (isset($SITE['lang']) ) { 
       $Status .= "SITE['lang'] = '".$SITE['lang']."; ";}
  if (isset($_SESSION['lang'])) { 
       $Status .= "SESSION['lang'] = '".$_SESSION['lang']."; ";}
    if (isset($_COOKIE['lang']))  { 
       $Status .= "COOKIE['lang'] = '".$_COOKIE['lang']."; ";}
  if (isset($_REQUEST['lang'])) {
       $Status .= "REQUEST['lang'] = '".$_REQUEST['lang']."; ";}
         $Status .= " -->\n";


  $langfile = 'language-' . $lang . '.txt';
  if (! file_exists($langfile) ) {
        $Status .= "<!-- load_langtrans fail. language-$lang.txt file not found. Using 'en' for language -->\n";
    $_SESSION['lang'] = 'en';
    $_REQUEST['lang'] = 'en';  // establish for other scripts too
    $Status .= "<!-- load_langtrans finished -->\n";
    if (isset($_REQUEST['debug']) ) { echo $Status; }
    return; // use english throughout
  }

  $lfile = file($langfile);
  $Status .= "<!-- langfile '$langfile' loading -->\n";
  
  $langfile = 'language-' . $lang . '-local.txt';
  if (file_exists($langfile)) { // load local translation file if it exists
     $lfile2 = file($langfile); 
     $Status .= "<!-- langfile '$langfile' loading -->\n";
     $lfile = array_merge($lfile,$lfile2);
   }
/*  $langfile = 'plaintext-parser-lang-' . $lang . '.txt';
   if (file_exists($langfile)) { // load local translation file if it exists
     $lfile2 = file($langfile); 
     $Status .= "<!-- langfile '$langfile' loading -->\n";
     $lfile = array_merge($lfile,$lfile2);
   }
*/  
  $n = 0;
  $nsite = 0;
  $nlang = 0;
  $langDefaultCharset = 'iso-8859-1';  // overall default
  $transtable = get_html_translation_table(HTML_ENTITIES,ENT_NOQUOTES);
  $doLoadTrans = false;
  
  foreach ($lfile as $rec) {  // process the control file(s)
    $recin = trim($rec);
    if (substr($recin,0,1) <> '#' and $recin <> '') { // process non blank, non comment records
        list($type, $item,$translation) = explode('|',$recin . '|||||');
        $type = trim($type);
        $item = trim($item);
        $translation = trim($translation);
        if (strtolower($type) == 'conditions' and strtolower($item) == 'begin' ) {
            $doLoadTrans = true;
            continue;
        }
        if (strtolower($type) == 'conditions' and strtolower($item) == 'end' ) {
            $doLoadTrans = false;
            continue;
        }
        if (isset($type) and strtolower($type) == 'charset' and isset($item)) {
            $SITE['charset'] = trim($item);
            $SITE['langDefaultCharset'] = trim($item); // save for language conversion
            $Status .= "<!-- using charset '" . $SITE['charset'] . "' -->\n";
            continue;
        }
        if ($type == 'langlookup' and $item and $translation) {
            $LANGLOOKUP[$item] = strtr($translation,$transtable);
            $LANGLOOKUP[$item] = $translation;
            $LANGLOOKUP[$item] = preg_replace('|\&amp;nbsp;|Uis','&nbsp;',$LANGLOOKUP[$item]);
            if ($doLoadTrans) {
               $forwardTrans[$item] = $translation;
               $reverseTrans[$translation] = $item;
               $t = ucfirst(strtolower($item));
               if(strcmp($item,$t) !== 0) {
                 $LANGLOOKUP[$t]= $translation; // add case normalize translation English term
                 $Status .= "<!-- added langlookup|$t|$translation| for '$item' entry -->\n";
               }
               $t = strtolower($item);
               if(strcmp($item,$t) !== 0) {
                 $LANGLOOKUP[$t]= $translation; // add case normalize translation English term
                 $Status .= "<!-- added langlookup|$t|$translation| for '$item' entry -->\n";
               }
               $t = ucwords(strtolower($item));
               if(strcmp($item,$t) !== 0) {
                 $LANGLOOKUP[$t]= $translation; // add case normalize translation English term
                 $Status .= "<!-- added langlookup|$t|$translation| for '$item' entry -->\n";
               }
            }
            $n++;
            continue;
        }
        if ($type == 'lang' and $item and $translation) {
          $LANGSUBS[$item] = $translation;
          $nlang++;
        } 
        
        if ($type == 'site' and $item and $translation) {
            $SITE[$item] = $translation;
            $nsite++;
            $Status .= "<!-- override site['$item'] = '$translation' -->\n";
            continue;
        }
    
    } // end if nonblank, non comment

  } // end foreach

  $Status .= "<!-- loaded $n langtrans entries, $nsite site entries -->\n";
  if (isset($SITE['langCharset'][$lang])) {
    $SITE['charset'] = $SITE['langCharset'][$lang];
  }
  $SITE['lang'] = $lang;
  
  # Change WU Forecast url for language if we have enough data for it
 if(isset($SITE['fcsturlWU']) and isset($SITE['WULanguages'][$lang])) {
    $Status .= "<!-- WU URL is '".$SITE['fcsturlWU']."' -->\n";
     $SITE['fcsturlWU'] = preg_replace('|http://([^\.]+)\.(.*)$|is',
        "http://".$SITE['WULanguages'][$lang].".\\2",
        $SITE['fcsturlWU']);
    $Status .= "<!-- WU URL set to '".$SITE['fcsturlWU']."' -->\n";
  
  }
  if (isset($_SESSION['lastLang']) and $_SESSION['lastLang'] <> $lang) {
    $_REQUEST['force'] = "1";  // trick WU-forecast into cache reload with new language
    $Status .= "<!-- lastLang ='".$_SESSION['lastLang'].
    "' - requesting cache refresh for WU-forecast for $lang=".$SITE['WULanguages'][$lang]." -->\n";
  }
   $_SESSION['lastLang'] = $lang;
   
   $SITE['xlateCOP'] = langtransstr('Chance of precipitation');

   if(file_exists("language-".$lang.".js")) { // load extra translations from JavaScript spec
     $langEntries = array(
       'langMonths',
       'langDays',
       'langUVWords',
       'langBaroTrend',
       'langBeaufort',
       'langHeatWords',
       'langWindDir'
     );
     $Status .= "<!-- loading language-$lang.js -->\n";  
     $jsfile = file("language-".$lang.".js");
     $recs = implode('',$jsfile);
     $recs = preg_replace('|new Array|Uis','array',$recs);
     $recs = preg_replace('|var lang(\S+)\s+|Uis','$JSV[\'lang\\1\']',$recs);
     $recs = preg_replace('|langTransLookup|Uis','// langTransLookup',$recs);
     if(isset($_REQUEST['show']) and $_REQUEST['show'] == 'eval') {
         print "<!-- eval request is\n".print_r($recs,true)."\n-->\n";
     }
     eval($recs);
     foreach ($langEntries as $l) {
        if(isset($JSV[$l])) {
            $SITE[$l] = $JSV[$l];
          $Status .= "<!-- $l='" . print_r($SITE[$l],true) . " -->\n";
        } else {
          $Status .= "<!-- '$l' not found in JS conversion -->\n";
        }
     }
     if(isset($SITE['langWindDir'])) { // use JavaScript winddir defs for PHP too
       $cardinalDirs = array(
           "N", "NNE", "NE", "ENE", 
        "E", "ESE", "SE", "SSE", 
        "S", "SSW", "SW", "WSW", 
        "W", "WNW", "NW", "NNW");
     
       foreach ($SITE['langWindDir'] as $n => $trans) {
         $LANGLOOKUP[$cardinalDirs[$n]] = $trans;
       
       }
     
     } // if translated winddirs exist
     
     if(isset($SITE['langHeatWords'])) { // use JavaScript defs for PHP too
       $engWords = array(
        'Unknown', 'Extreme Heat Danger', 'Heat Danger', 'Extreme Heat Caution', 'Extremely Hot', 
        'Uncomfortably Hot',  'Hot', 'Warm', 
        'Comfortable', 
        'Cool', 'Cold', 'Uncomfortably Cold', 'Very Cold', 'Extreme Cold'
        );
       foreach ($SITE['langHeatWords'] as $n => $trans) {
         $LANGLOOKUP[$engWords[$n]] = $trans;
       
       }
     } // if translated langHeatWords exist
     
     if(isset($SITE['langBeaufort'])) { // use JavaScript defs for PHP too
       $engWords = array ( /* Beaufort 0 to 12 in array */
         "Calm", "Light air", "Light breeze", "Gentle breeze", "Moderate breeze", "Fresh breeze",
         "Strong breeze", "Near gale", "Gale", "Strong gale", "Storm",
         "Violent storm", "Hurricane"
       );
       foreach ($SITE['langBeaufort'] as $n => $trans) {
         $LANGLOOKUP[$engWords[$n]] = $trans;
       
       }
     } // if translated langBeaufort exists

     if(isset($SITE['langMonths'])) { // use JavaScript defs for PHP too
       $engWords = array ( /* English Months */
       "January","February","March","April","May",
            "June","July","August","September","October","November","December");
       foreach ($SITE['langMonths'] as $n => $trans) {
         $LANGLOOKUP[ucwords($engWords[$n])] = $trans;
       
       }

     } // if translated langMonths exists

     if(isset($SITE['langDays'])) { // use JavaScript defs for PHP too
       $engWords = array ( /* English Days */
       "Sun","Mon","Tue","Wed","Thu","Fri","Sat","Sun");
       foreach ($SITE['langDays'] as $n => $trans) {
         $LANGLOOKUP[ucwords($engWords[$n])] = $trans;
       
       }

     } // if translated langDays exists

     if(isset($SITE['langBaroTrend'])) { // use JavaScript defs for PHP too
       $engWords = array ( /* English Baro Trend */
       "Steady", "Rising Slowly", "Rising Rapidly", "Falling Slowly", "Falling Rapidly");
       foreach ($SITE['langBaroTrend'] as $n => $trans) {
         $LANGLOOKUP[$engWords[$n]] = $trans;
//         $Status .= "<!-- baro '".$engWords[$n]."'='$trans' -->\n";
       }

     } // if translated langBaroTrend exists
     
   }
   
   $Status .= "<!-- load_langtrans finished -->\n";
   if (isset($_REQUEST['debug']) ) { echo $Status; }

} // end load_langtrans function
#####################################################################
# set a language memory cookie
function set_lang_cookie ($name, $val) {
   global $SITE;
   # this function sets a cookie
   # set expiration date 6 months ahead
   $expire = strtotime("+6 month");
   if ( isset($SITE['cookie_path']) ) {
     $path = $SITE['cookie_path']; // this can be set in Settings.php
   } else {
     $scripturlparts = explode('/', $_SERVER['PHP_SELF']);
     $scriptfilename = $scripturlparts[count($scripturlparts)-1];
     $scripturl = preg_replace("/$scriptfilename$/i", '', $_SERVER['PHP_SELF']);
     $path = $scripturl;
   }
 
   if(!headers_sent()) {
             if(PHP_VERSION_ID < 70300) {
                 $didit = setcookie("$name",$val,$expire,$path.'; SameSite=Lax');
             } else {
                 $arr_cookie_options = array (
                        'expires' => $expire,
                        'path' => $path,
                    #    'domain' => $_SERVER['SERVER_NAME'], // leading dot for compatibility or use subdomain
                        'secure' => false,     // or true
                        'httponly' => false,    // or true
                        'samesite' => 'Lax' // None || Lax  || Strict
                 );
                 $didit = setcookie("$name",$val,$arr_cookie_options);
             }
         } else {
         $didit = false;
         }
    $rtn = "setcookie('$name','$val'); ";
  $rtn .= $didit?"was successful":"was NOT successful";
    return($rtn);
}

#####################################################################
# convert language translation to UTF-8

function set_langtrans_UTF8 () {
  global $LANGLOOKUP, $LANGSUBS, $SITE, $forwardTrans, $reverseTrans;
  if($SITE['charset'] == 'UTF-8') {
      if (isset($_REQUEST['debug']) ) { echo "<!-- set_langtrans_UTF8 no conversion performed -- already in UTF-8 -->\n"; }
      $SITE['origCharset'] = $SITE['charset'];
      return; // nothing to do
  }
  $Debug = '';
  // convert the existing $LANGLOOKUP array to UTF-8
  $sceCharset = $SITE['charset'];
  $SITE['convertJS'] = true;  // indicate that the language-LL.js is to be converted too
  
  foreach ($LANGLOOKUP as $english => $trans) {
      $LANGLOOKUP[$english] = iconv($sceCharset,'UTF-8//TRANSLIT',$trans);
  }
  $Debug .= "<!-- set_langtrans_UTF8 - converted '$sceCharset' to 'UTF-8' for ".count($LANGLOOKUP). " langtrans entries -->\n";
  // now convert the other likely used items created by load_langtrans
       $langEntries = array(
       'langMonths',
       'langDays',
       'langUVWords',
       'langBaroTrend',
       'langBeaufort',
       'langHeatWords',
       'langWindDir'
     );

  foreach ($langEntries as $idx => $key) {
      
      if(isset($SITE[$key])) {
          foreach ($SITE[$key] as $n => $val) {
              $SITE[$key][$n] = iconv($sceCharset,'UTF-8//TRANSLIT',$val);
          }
          $Debug .= "<!-- set_langtrans_UTF8 - converted ".count($SITE[$key])." SITE $key for UTF-8 -->\n";
      }
  }
  if(count($forwardTrans)>0) {
    foreach ($forwardTrans as $english => $trans) {
        $forwardTrans[$english] = iconv($sceCharset,'UTF-8//TRANSLIT',$trans);
    }
    $Debug .= "<!-- set_langtrans_UTF8 - converted forwardTrans to 'UTF-8' for ".count($forwardTrans). " langtrans entries -->\n";
  }
    
  $SITE['origCharset'] = $sceCharset; // remember the original character set
  $SITE['charset'] = 'UTF-8'; // change our default character set
  if (isset($_REQUEST['debug']) ) { echo $Debug; }
    
}  // end set_langtrans_UTF8 function
#####################################################################

function print_language_selects() {
    global $SITE;
    if(isset($SITE['languageSelectDropdown']) and $SITE['languageSelectDropdown'] ) {
        $stuff = print_language_selects_dropdown();
    } else {
        $stuff = print_language_selects_linear();
    }
    return $stuff;
}

#####################################################################

# this function by mchallis prints (language selection flags or language selection text links)
# based on the setting $SITE['useLanguageFlags'] true or false
function print_language_selects_linear() {
 global $SITE;

 $string1 = '';
 $arr = $SITE['installedLanguages'];
 if (is_array($arr)){
    foreach ($arr as $k => $v) {

      if($SITE['useLanguageFlags'] == true) {
           $string .= '<a href="'. $_SERVER['PHP_SELF'] .'?lang='.$k.'" title="'. $v .'">
<img src="'. $SITE['imagesDir'] . 'flag-'. $k .'.gif" alt="'. $v .'" title="'. $v .'" style="border: none;" /></a>
';
      }else{
           $k_print = $k;
           if ($SITE['lang'] == $k) {
              $k_print = "[$k]";
            }
            $string .= '<a href="'. $_SERVER['PHP_SELF'] .'?lang='.$k.'" title="'. $v .'">
<span style="font-size: 10px">'. $k_print .'</span></a>
';
     }
    } // end foreach

    # text links use bracket for indicator, image links print lang code
    if($SITE['useLanguageFlags'] == true) {
          $string1 = '<span style="font-size: 10px">' . langtransstr('Language') .': ' . $_REQUEST['lang'] . '</span> ' . $string;
    }else{
          $string1 = '<span style="font-size: 10px">' . langtransstr('Language') .': </span>' . $string;

    }
 } // end is_array
 return $string1;

}// end print_language_selects_linear function
#####################################################################
# this function by mchallis prints (language selection flags or language selection text links)
# based on the setting $SITE['useLanguageFlags'] true or false
# Revised by K. True for option box display instead.
function print_language_selects_dropdown() {
 global $SITE;
 $use_onchange_submit = true;
 if(isset($SITE['languageSelectButton']) ) {
    $use_onchange_submit = ! $SITE['languageSelectButton'];
 }
 $string1 = '';
 $arr = $SITE['installedLanguages'];
 if (is_array($arr)){
    $string = '
<form method="get" name="lang_select" action="#" style="padding: 0px; margin: 0px">
';
    # text links use bracket for indicator, image links print lang code
    if($SITE['useLanguageFlags'] == true) {
          $string .= '<span style="font-size: 10px">' . langtransstr('Language') .':&nbsp; </span>';
    }else{
          $string .= '<span style="font-size: 10px">' . langtransstr('Language') .':&nbsp; </span>';

    }

if($use_onchange_submit == false) {
$string .= '<select id="lang" name="lang" style="font-size: 9px; padding: 0px; margin: 0px;">
';
}
else {
$string .= '<select id="lang" name="lang"  style="font-size: 9px" onchange="this.form.submit();">';
}
$flag = '';
    foreach ($arr as $k => $v) {

      if($SITE['lang'] == $k) {
        $selected = ' selected="selected"';
        $flag = '<img src="'. $SITE['imagesDir'] . 'flag-'. $k .'.gif" alt="'. $v .'" title="'. $v .'" style="border: none" />';
      } else {
        $selected = '';
      }
      $string .= '<option value="'.$k.'"'.$selected.'>'.$v.'</option>'."\n";
    } // end foreach
    $string .= '</select>
';
if($use_onchange_submit == false) {
  $string .= '<input type="submit" name="' . langtransstr('Set') .'" value="' . langtransstr('Set') .'" style="font-size: 9px" />';
} else {
  $string .= '<noscript><input type="submit" name="' . langtransstr('Set') .'" value="' . langtransstr('Set') .'" style="font-size: 9px" /></noscript>';
    
}
    # text links use bracket for indicator, image links print lang code
    if($SITE['useLanguageFlags'] == true) {
          $string .= '  ' . $flag;
    }else{
          $string .= ' ';

    }

$string .= '
</form>';


 } // end is_array
 return $string;

}// end print_language_selects_dropdown function

# load the language translation file and set up $LANGLOOKUP array
load_langtrans();

// -----------------------------------------------------------------------------
// MOON FUNTIONS  Courtesy of Bashewa Weather, PHP conversion by WebsterWeather from ajaxWDwx.js V9.13 (WD)                                                             .
// -----------------------------------------------------------------------------
function cGetMoonInfo ($hh=0,$mm=0,$ss=0,$MM=0,$DD=0,$YY=0) { // very crude way of determining moon phase (but very accurate)
// ------------- start of USNO moon data -----------------------------
// PHP tables generated from USNO moon ephemeris data https://api.usno.navy.mil/moon/phase?date=1/1/yyyy&nump=60
// for years 2009 to 2030 
// Ken True - Saratoga-weather.org generated by get-USNO-moonphases.php - Version 2.01 - 19-Apr-2019 on 19 April 2019 09:31 PDT

$newMoons = array( // unixtime values in UTC/GMT
/* 2009 */ /* 26-Jan-2009 07:55 */ 1232956500, 1235525700, 1238083560, 1240629780, 1243167060, 1245699300, 1248230100, 1250762520, 1253299440, 1255843980, 1258398840, 1260964920, 
/* 2010 */ /* 15-Jan-2010 07:11 */ 1263539460, 1266115860, 1268686860, 1271248140, 1273799040, 1276341300, 1278877200, 1281409680, 1283941800, 1286477040, 1289019120, 1291570560, 
/* 2011 */ /* 04-Jan-2011 09:03 */ 1294131780, 1296700260, 1299271560, 1301841120, 1304405460, 1306962180, 1309510440, 1312051200, 1314587040, 1317121740, 1319658960, 1322201400, 1324749960, 
/* 2012 */ /* 23-Jan-2012 07:39 */ 1327304340, 1329863700, 1332427020, 1334992680, 1337557620, 1340118120, 1342671840, 1345218840, 1347761460, 1350302520, 1352844480, 1355388120, 
/* 2013 */ /* 11-Jan-2013 19:44 */ 1357933440, 1360480800, 1363031460, 1365586500, 1368145680, 1370706960, 1373267640, 1375825860, 1378380960, 1380933240, 1383483000, 1386030120, 
/* 2014 */ /* 01-Jan-2014 11:14 */ 1388574840, 1391117880, 1393660800, 1396205100, 1398752040, 1401302400, 1403856480, 1406414520, 1408975980, 1411539240, 1414101420, 1416659520, 1419212160, 
/* 2015 */ /* 20-Jan-2015 13:14 */ 1421759640, 1424303220, 1426844160, 1429383420, 1431922380, 1434463500, 1437009840, 1439563980, 1442126460, 1444694760, 1447264020, 1449829740, 
/* 2016 */ /* 10-Jan-2016 01:30 */ 1452389400, 1454942340, 1457488440, 1460028240, 1462562940, 1465095600, 1467630060, 1470170640, 1472720580, 1475280660, 1477849080, 1480421880, 1482994380, 
/* 2017 */ /* 28-Jan-2017 00:07 */ 1485562020, 1488121080, 1490669820, 1493208960, 1495741440, 1498271460, 1500803160, 1503340200, 1505885400, 1508440320, 1511005320, 1513578600, 
/* 2018 */ /* 17-Jan-2018 02:17 */ 1516155420, 1518728700, 1521292320, 1523843820, 1526384880, 1528918980, 1531450080, 1533981480, 1536516060, 1539056820, 1541606520, 1544167200, 
/* 2019 */ /* 06-Jan-2019 01:28 */ 1546738080, 1549314240, 1551888240, 1554454200, 1557009900, 1559556120, 1562094960, 1564629120, 1567161420, 1569695160, 1572233880, 1574780760, 1577337180, 
/* 2020 */ /* 24-Jan-2020 21:42 */ 1579902120, 1582471920, 1585042080, 1587608760, 1590169140, 1592721660, 1595266380, 1597804920, 1600340400, 1602876660, 1605416820, 1607962560, 
/* 2021 */ /* 13-Jan-2021 05:00 */ 1610514000, 1613070360, 1615630860, 1618194660, 1620759600, 1623322380, 1625879820, 1628430600, 1630975920, 1633518300, 1636060440, 1638603780, 
/* 2022 */ /* 02-Jan-2022 18:33 */ 1641148380, 1643694360, 1646242500, 1648794240, 1651350480, 1653910200, 1656471120, 1659030900, 1661588220, 1664142840, 1666694940, 1669244220, 1671790620, 
/* 2023 */ /* 21-Jan-2023 20:53 */ 1674334380, 1676876760, 1679419380, 1681963920, 1684511580, 1687063020, 1689618720, 1692178680, 1694742000, 1697306100, 1699867620, 1702423920, 
/* 2024 */ /* 11-Jan-2024 11:57 */ 1704974220, 1707519540, 1710061200, 1712600460, 1715138520, 1717677480, 1720220220, 1722769980, 1725328500, 1727894940, 1730465220, 1733034060, 1735597620, 
/* 2025 */ /* 29-Jan-2025 12:36 */ 1738154160, 1740703500, 1743245880, 1745782260, 1748314920, 1750847460, 1753384260, 1755929160, 1758484440, 1761049500, 1763621220, 1766194980, 
/* 2026 */ /* 18-Jan-2026 19:52 */ 1768765920, 1771329660, 1773883380, 1776426720, 1778961660, 1781492040, 1784022180, 1786556220, 1789097220, 1791647400, 1794207720, 1796777520, 
/* 2027 */ /* 07-Jan-2027 20:24 */ 1799353440, 1801929360, 1804498140, 1807055460, 1809601080, 1812138000, 1814670120, 1817201100, 1819734060, 1822271760, 1824816960, 1827372240, 1829938320, 
/* 2028 */ /* 26-Jan-2028 15:12 */ 1832512320, 1835087820, 1837657860, 1840218420, 1842768960, 1845311220, 1847847720, 1850381040, 1852914240, 1855450620, 1857993480, 1860545160, 
/* 2029 */ /* 14-Jan-2029 17:24 */ 1863105840, 1865673060, 1868242740, 1870810800, 1873374120, 1875930600, 1878479460, 1881021360, 1883558640, 1886094840, 1888633440, 1891176720, 
/* 2030 */ /* 04-Jan-2030 02:49 */ 1893725340, 1896278820, 1898836440, 1901397720, 1903961520, 1906525260, 1909085640, 1911640260, 1914188820, 1916733240, 1919276220, 1921819560, 1924363920
 ); /* end of newMoons array */

$Q1Moons = array( // unixtime values in UTC/GMT
/* 2009 */ /* 02-Feb-2009 23:13 */ 1233616380, 1236152760, 1238682840, 1241210640, 1243740120, 1246274880, 1248818400, 1251373320, 1253940600, 1256517720, 1259098740, 1261676160, 
/* 2010 */ /* 23-Jan-2010 10:53 */ 1264243980, 1266799320, 1269342000, 1271874000, 1274398980, 1276921740, 1279447800, 1281982440, 1284529800, 1287091620, 1289666340, 1292248740, 
/* 2011 */ /* 12-Jan-2011 11:31 */ 1294831860, 1297408680, 1299973500, 1302523500, 1305059580, 1307585460, 1310106540, 1312628880, 1315157940, 1317698100, 1320251880, 1322819520, 
/* 2012 */ /* 01-Jan-2012 06:15 */ 1325398500, 1327983000, 1330564860, 1333136460, 1335693420, 1338236160, 1340767800, 1343292960, 1345816440, 1348342860, 1350876720, 1353421860, 1355980740, 
/* 2013 */ /* 18-Jan-2013 23:45 */ 1358552700, 1361133060, 1363714020, 1366288260, 1368851640, 1371403440, 1373944680, 1376477760, 1379005680, 1381532520, 1384063020, 1386601920, 
/* 2014 */ /* 08-Jan-2014 03:39 */ 1389152340, 1391714520, 1394285220, 1396859460, 1399432500, 1402000740, 1404561540, 1407113400, 1409656260, 1412191980, 1414723680, 1417255560, 1419791460, 
/* 2015 */ /* 27-Jan-2015 04:48 */ 1422334080, 1424884440, 1427442180, 1430006100, 1432574340, 1435143720, 1437710640, 1440271860, 1442825940, 1445373060, 1447914420, 1450451640, 
/* 2016 */ /* 16-Jan-2016 23:26 */ 1452986760, 1455522360, 1458061380, 1460606340, 1463158920, 1465719000, 1468284720, 1470853260, 1473421740, 1475987580, 1478548260, 1481101380, 
/* 2017 */ /* 05-Jan-2017 19:47 */ 1483645620, 1486181940, 1488713520, 1491244740, 1493779620, 1496320920, 1498870260, 1501428180, 1503994380, 1506567180, 1509142920, 1511715780, 1514280000, 
/* 2018 */ /* 24-Jan-2018 22:20 */ 1516832400, 1519373340, 1521905700, 1524433560, 1526960940, 1529491860, 1532029920, 1534578480, 1537139700, 1539712920, 1542293640, 1544874540, 
/* 2019 */ /* 14-Jan-2019 06:45 */ 1547448300, 1550010360, 1552559220, 1555095960, 1557623520, 1560146340, 1562669700, 1565199060, 1567739400, 1570294020, 1572862980, 1575442680, 
/* 2020 */ /* 03-Jan-2020 04:45 */ 1578026700, 1580607720, 1583179020, 1585736460, 1588279080, 1590809400, 1593332160, 1595853120, 1598378280, 1600912500, 1603459380, 1606020300, 1608594060, 
/* 2021 */ /* 20-Jan-2021 21:01 */ 1611176460, 1613760420, 1616337600, 1618901940, 1621451580, 1623988440, 1626516660, 1629040740, 1631565540, 1634095500, 1636634760, 1639186500, 
/* 2022 */ /* 09-Jan-2022 18:11 */ 1641751860, 1644328200, 1646909100, 1649486880, 1652055660, 1654613280, 1657160040, 1659697560, 1662228480, 1664756040, 1667284620, 1669818960, 1672363200, 
/* 2023 */ /* 28-Jan-2023 15:19 */ 1674919140, 1677485160, 1680057120, 1682630400, 1685200920, 1687765800, 1690322820, 1692871020, 1695411120, 1697945340, 1700477400, 1703011140, 
/* 2024 */ /* 18-Jan-2024 03:52 */ 1705549920, 1708095660, 1710648660, 1713208380, 1715773680, 1718342280, 1720910940, 1723475940, 1726034700, 1728586500, 1731131700, 1733671560, 
/* 2025 */ /* 06-Jan-2025 23:56 */ 1736207760, 1738742520, 1741278660, 1743819300, 1746366720, 1748922060, 1751484600, 1754052060, 1756621500, 1759190040, 1761754860, 1764313140, 1766862600, 
/* 2026 */ /* 26-Jan-2026 04:47 */ 1769402820, 1771936020, 1774466280, 1776997920, 1779534660, 1782078900, 1784631900, 1787193960, 1789764240, 1792339920, 1794916080, 1797486120, 
/* 2027 */ /* 15-Jan-2027 20:34 */ 1800045240, 1802591880, 1805127900, 1807656960, 1810183440, 1812711360, 1815244740, 1817787240, 1820341860, 1822909620, 1825488000, 1828070520, 
/* 2028 */ /* 05-Jan-2028 01:40 */ 1830649200, 1833217800, 1835773320, 1838315700, 1840847160, 1843371360, 1845893400, 1848418800, 1850952960, 1853500200, 1856062380, 1858637640, 1861220700, 
/* 2029 */ /* 22-Jan-2029 19:23 */ 1863804180, 1866381000, 1868945580, 1871495400, 1874031360, 1876557240, 1879078440, 1881600900, 1884130140, 1886670540, 1889224500, 1891792140, 
/* 2030 */ /* 11-Jan-2030 14:06 */ 1894370760, 1896954540, 1899535620, 1902106620, 1904663460, 1907206560, 1909738920, 1912264980, 1914789300, 1917316560, 1919850960, 1922396220, 1924954560
 ); /* end of Q1Moons array */

$fullMoons = array( // unixtime values in UTC/GMT
/* 2009 */ /* 09-Feb-2009 14:49 */ 1234190940, 1236739080, 1239288960, 1241841660, 1244398320, 1246958460, 1249520100, 1252080180, 1254636600, 1257189240, 1259739000, 1262286780, 
/* 2010 */ /* 30-Jan-2010 06:18 */ 1264832280, 1267375080, 1269915900, 1272457080, 1275001620, 1277551800, 1280108220, 1282669500, 1285233420, 1287797760, 1290360420, 1292919180, 
/* 2011 */ /* 19-Jan-2011 21:21 */ 1295472060, 1298018160, 1300558200, 1303094640, 1305630540, 1308168840, 1310712000, 1313261820, 1315819620, 1318385160, 1320956160, 1323527760, 
/* 2012 */ /* 09-Jan-2012 07:30 */ 1326094200, 1328651640, 1331199540, 1333739940, 1336275300, 1338808320, 1341341520, 1343878020, 1346421480, 1348975140, 1351540140, 1354113960, 1356690060, 
/* 2013 */ /* 27-Jan-2013 04:38 */ 1359261480, 1361823960, 1364376420, 1366919820, 1369455900, 1371987120, 1374516900, 1377049500, 1379589180, 1382139480, 1384701360, 1387272480, 
/* 2014 */ /* 16-Jan-2014 04:52 */ 1389847920, 1392421980, 1394989680, 1397547720, 1400094960, 1402632660, 1405164300, 1407694140, 1410226680, 1412765460, 1415312580, 1417868820, 
/* 2015 */ /* 05-Jan-2015 04:53 */ 1420433580, 1423004940, 1425578700, 1428149100, 1430710920, 1433261940, 1435803600, 1438339380, 1440873300, 1443408600, 1445947500, 1448491440, 1451041860, 
/* 2016 */ /* 24-Jan-2016 01:46 */ 1453599960, 1456165200, 1458734460, 1461302640, 1463865240, 1466420520, 1468968960, 1471512360, 1474052700, 1476591780, 1479131520, 1481673900, 
/* 2017 */ /* 12-Jan-2017 11:34 */ 1484220840, 1486773180, 1489330440, 1491890880, 1494452520, 1497013800, 1499573220, 1502129460, 1504681380, 1507228800, 1509772980, 1512316020, 
/* 2018 */ /* 02-Jan-2018 02:24 */ 1514859840, 1517405220, 1519951860, 1522499820, 1525049880, 1527603540, 1530161580, 1532722800, 1535284560, 1537843920, 1540399500, 1542951540, 1545500940, 
/* 2019 */ /* 21-Jan-2019 05:16 */ 1548047760, 1550591580, 1553132580, 1555672320, 1558213860, 1560760260, 1563313080, 1565872140, 1568435580, 1571000880, 1573565640, 1576127520, 
/* 2020 */ /* 10-Jan-2020 19:21 */ 1578684060, 1581233580, 1583776080, 1586313300, 1588848300, 1591384320, 1593924240, 1596470340, 1599024120, 1601586300, 1604155740, 1606728600, 1609298880, 
/* 2021 */ /* 28-Jan-2021 19:16 */ 1611861360, 1614413820, 1616957280, 1619494260, 1622027640, 1624560000, 1627094220, 1629633720, 1632182100, 1634741820, 1637312220, 1639888500, 
/* 2022 */ /* 17-Jan-2022 23:48 */ 1642463280, 1645030560, 1647587820, 1650135300, 1652674440, 1655207520, 1657737480, 1660268160, 1662803940, 1665348900, 1667905320, 1670472480, 
/* 2023 */ /* 06-Jan-2023 23:08 */ 1673046480, 1675621680, 1678192800, 1680755640, 1683308040, 1685850120, 1688384340, 1690914720, 1693445700, 1695981420, 1698524640, 1701076560, 1703637180, 
/* 2024 */ /* 25-Jan-2024 17:54 */ 1706205240, 1708777800, 1711350000, 1713916140, 1716472380, 1719018480, 1721557020, 1724091960, 1726626840, 1729164360, 1731706080, 1734253320, 
/* 2025 */ /* 13-Jan-2025 22:27 */ 1736807220, 1739368380, 1741935300, 1744503720, 1747068960, 1749627840, 1752179820, 1754726100, 1757268540, 1759808820, 1762348740, 1764890040, 
/* 2026 */ /* 03-Jan-2026 10:03 */ 1767434580, 1769983740, 1772537880, 1775095920, 1777656180, 1780217100, 1782777360, 1785335760, 1787890680, 1790441340, 1792987920, 1795531980, 1798075680, 
/* 2027 */ /* 22-Jan-2027 12:17 */ 1800620220, 1803165780, 1805712240, 1808260020, 1810810740, 1813365840, 1815925500, 1818487740, 1821049380, 1823608020, 1826162760, 1828714140, 
/* 2028 */ /* 12-Jan-2028 04:03 */ 1831262580, 1833807840, 1836349560, 1838888760, 1841428140, 1843970940, 1846519860, 1849075800, 1851637620, 1854203100, 1856769420, 1859334000, 1861894080, 
/* 2029 */ /* 30-Jan-2029 06:03 */ 1864447380, 1866993000, 1869531960, 1872067020, 1874601420, 1877138520, 1879680960, 1882230660, 1884788940, 1887355620, 1889928180, 1892501160, 
/* 2030 */ /* 19-Jan-2030 15:54 */ 1895068440, 1897626000, 1900173360, 1902712800, 1905247140, 1907779260, 1910311920, 1912848240, 1915391880, 1917946020, 1920511800, 1923086400
 ); /* end of fullMoons array */

$Q3Moons = array( // unixtime values in UTC/GMT
/* 2009 */ /* 16-Feb-2009 21:37 */ 1234820220, 1237398420, 1239975360, 1242545160, 1245104100, 1247651580, 1250189700, 1252721760, 1255251360, 1257782160, 1260317580, 
/* 2010 */ /* 07-Jan-2010 10:39 */ 1262860740, 1265413680, 1267976520, 1270546620, 1273119300, 1275689580, 1278254100, 1280811540, 1283361720, 1285905120, 1288442760, 1290976560, 1293509880, 
/* 2011 */ /* 26-Jan-2011 12:57 */ 1296046620, 1298589960, 1301141220, 1303699620, 1306263120, 1308829680, 1311397320, 1313963640, 1316525940, 1319081400, 1321628940, 1324169280, 
/* 2012 */ /* 16-Jan-2012 09:08 */ 1326704880, 1329239040, 1331774700, 1334314200, 1336859220, 1339411260, 1341971280, 1344538500, 1347110100, 1349681580, 1352248560, 1354807860, 
/* 2013 */ /* 05-Jan-2013 03:58 */ 1357358280, 1359899760, 1362433980, 1364963820, 1367493240, 1370026680, 1372567980, 1375119780, 1377682500, 1380254100, 1382830800, 1385407680, 1387979280, 
/* 2014 */ /* 24-Jan-2014 05:19 */ 1390540740, 1393089300, 1395625560, 1398153120, 1400677140, 1403203140, 1405735680, 1408278360, 1410833100, 1413400320, 1415978100, 1418561460, 
/* 2015 */ /* 13-Jan-2015 09:46 */ 1421142360, 1423713000, 1426268880, 1428810240, 1431340560, 1433864520, 1436387040, 1438912980, 1441446840, 1443992760, 1446553440, 1449128400, 
/* 2016 */ /* 02-Jan-2016 05:30 */ 1451712600, 1454297280, 1456873860, 1459437420, 1461986940, 1464523920, 1467051540, 1469574000, 1472096460, 1474624560, 1477163640, 1479717180, 1482285360, 
/* 2017 */ /* 19-Jan-2017 22:13 */ 1484863980, 1487446380, 1490025480, 1492595820, 1495153980, 1497699180, 1500233160, 1502759700, 1505283900, 1507811100, 1510346160, 1512892260, 
/* 2018 */ /* 08-Jan-2018 22:25 */ 1515450300, 1518018840, 1520594400, 1523171820, 1525745340, 1528309920, 1530863460, 1533406680, 1535942220, 1538473500, 1541004000, 1543537140, 1546076040, 
/* 2019 */ /* 27-Jan-2019 21:10 */ 1548623400, 1551180480, 1553746200, 1556317080, 1558888440, 1561455960, 1564017480, 1566572160, 1569120060, 1571661540, 1574197860, 1576731420, 
/* 2020 */ /* 17-Jan-2020 12:58 */ 1579265880, 1581805020, 1584351240, 1586904960, 1589464980, 1592029440, 1594596540, 1597164300, 1599729960, 1602290340, 1604843160, 1607387760, 
/* 2021 */ /* 06-Jan-2021 09:37 */ 1609925820, 1612460220, 1614994200, 1617530520, 1620071400, 1622618640, 1625173860, 1627737360, 1630307580, 1632880620, 1635451500, 1638016080, 1640571840, 
/* 2022 */ /* 25-Jan-2022 13:41 */ 1643118060, 1645655520, 1648186620, 1650714960, 1653244980, 1655781060, 1658326740, 1660883760, 1663451520, 1666026900, 1668605220, 1671180960, 
/* 2023 */ /* 15-Jan-2023 02:10 */ 1673748600, 1676304060, 1678846080, 1681377060, 1683901680, 1686425460, 1688953680, 1691490480, 1694038860, 1696600080, 1699173420, 1701755340, 
/* 2024 */ /* 04-Jan-2024 03:30 */ 1704339000, 1706915880, 1709479380, 1712027700, 1714562820, 1717089180, 1719611580, 1722135060, 1724664360, 1727203800, 1729756980, 1732325280, 1734905880, 
/* 2025 */ /* 21-Jan-2025 20:31 */ 1737491460, 1740072720, 1742642940, 1745199300, 1747742340, 1750274340, 1752799080, 1755321120, 1757845980, 1760379180, 1762925280, 1765486320, 
/* 2026 */ /* 10-Jan-2026 15:48 */ 1768060080, 1770640980, 1773221880, 1775796660, 1778361000, 1780912800, 1783452540, 1785982860, 1788508260, 1791033900, 1793564880, 1796105280, 1798657140, 
/* 2027 */ /* 29-Jan-2027 10:55 */ 1801220100, 1803791760, 1806368040, 1808943480, 1811512680, 1814072040, 1816620900, 1819160820, 1821694800, 1824226140, 1826758080, 1829293860, 
/* 2028 */ /* 18-Jan-2028 19:26 */ 1831836360, 1834387680, 1836948180, 1839515820, 1842086580, 1844656020, 1847220960, 1849779900, 1852332360, 1854878220, 1857417960, 1859953140, 
/* 2029 */ /* 07-Jan-2029 13:26 */ 1862486760, 1865022720, 1867564260, 1870113060, 1872668880, 1875230340, 1877795820, 1880363700, 1882931580, 1885496220, 1888054320, 1890604080, 1893145740, 
/* 2030 */ /* 26-Jan-2030 18:14 */ 1895681640, 1898215080, 1900749060, 1903286340, 1905829020, 1908379140, 1910938020, 1913505300, 1916078160, 1918651800, 1921221120, 1923782460
 ); /* end of Q3Moons array */

// ------------- end of USNO moon data -----------------------------

   if ($hh==0) $hh=idate("H");
   if ($mm==0) $mm=idate("i");
   if ($ss==0) $ss=idate("s");
   if ($MM==0) $MM=idate("m");
   if ($DD==0) $DD=idate("d");
   if ($YY==0) $YY=idate("Y");

   $date = mktime($hh,$mm,$ss,$MM,$DD,$YY);  // Unix date from local time
     $info = new STDclass;
   @$info->date = $date;
   $info->datetxt = gmdate('D, d-M-Y H:i T',$date);
   
   if ($date < $newMoons[1]) {
       $info->error = "Date must be after " .date("r",$newMoons[1]);
       return $info;
   }
   if ($date > $newMoons[count($newMoons)-1]) {
       $info->error = "Date must be before ".date("r",$newMoons[count($newMoons)-1]);
       return $info;
   }

   foreach ($newMoons as $mi=>$newMoon) { // find next New Moon from given date
      if ($newMoon>$date) {break;}
   }
   // Get Moon dates
   $NM = $newMoons [$mi-1]; // previous new moon
   $Q1 = $Q1Moons  [$mi-1]; // 1st Q end
   $Q2 = $fullMoons[$mi-1]; // 2nd Q end - Full moon
   $Q3 = $Q3Moons  [$mi-1]; // 3rd Q end
   $Q4 = $newMoons [$mi  ]; // 4th Q end - next new moon

   // Divide each phase into 7 periods (4 phases x 7 = 28 periods)
   $Q1p = round(($Q1-$NM)/7);
   $Q2p = round(($Q2-$Q1)/7);
   $Q3p = round(($Q3-$Q2)/7);
   $Q4p = round(($Q4-$Q3)/7);

   // Determine start and end times for major phases (lasting 1 period of 28)
   $NMe = $NM+($Q1p/2);                         //  0% .... - New moon
   $Q1s = $Q1-($Q1p/2);  $Q1e = $Q1+($Q2p/2);   // 50% 1stQ - First Quarter
   $Q2s = $Q2-($Q2p/2);  $Q2e = $Q2+($Q3p/2);   //100% 2ndQ - Full moon
   $Q3s = $Q3-($Q3p/2);  $Q3e = $Q3+($Q4p/2);   // 50% 3rdQ - Last Quarter
   $NMs = $Q4-($Q4p/2);                         //  0% 4thQ - New Moon

// Determine age of moon in days since last new moon
   $age = ($date - $newMoons[$mi-1])/86400; // age in days since last new moon
   $dd  = intval($age);
   $hh  = intval(($age-$dd)*24);
   $mm  = intval(((($age-$dd)*24)-$hh)*60);
   $info->age = $dd.' days, '.$hh.' hours, '.$mm.' minutes';

// Illumination
   switch (true) { // Determine moon age in degrees (0 to 360)
   case ($date<=$Q1): $ma = ($date - $NM) * (90 / ($Q1 - $NM))+  0; break; // NM to Q1
   case ($date<=$Q2): $ma = ($date - $Q1) * (90 / ($Q2 - $Q1))+ 90; break; // Q1 to FM
   case ($date<=$Q3): $ma = ($date - $Q2) * (90 / ($Q3 - $Q2))+180; break; // FM to Q3
   case ($date<=$Q4): $ma = ($date - $Q3) * (90 / ($Q4 - $Q3))+270; break; // Q3 to NM
   }
   $info->ill = abs(round(100*(1+cos($ma*(M_PI/180)))/2)-100);

// Deterime picture number (0-27) and moon phase
   switch (true) {
   case ($date<=$NMe): $pic =  0;                        $ph = 'New Moon';          break;
   case ($date< $Q1s): $pic =  1  +(($date-$NMe)/$Q1p);  $ph = 'Waxing Crescent';   break; // Waxing Crescent
   case ($date<=$Q1e): $pic =  7;                        $ph = 'First Quarter';     break;
   case ($date< $Q2s): $pic =  7.5+(($date-$Q1e)/$Q2p);  $ph = 'Waxing Gibbous';    break;
   case ($date<=$Q2e): $pic = 14;                        $ph = 'Full Moon';         break;
   case ($date< $Q3s): $pic = 14.5+(($date-$Q2e)/$Q3p);  $ph = 'Waning Gibbous';    break;
   case ($date<=$Q3e): $pic = 21;                        $ph = 'Last Quarter';      break;
   case ($date< $NMs): $pic = 21.5+(($date-$Q3e)/$Q4p);  $ph = 'Waning Crescent';   break; // Waning Crecent
   default           : $pic =  0;                        $ph = 'New Moon';
   }
   $info->pic   = round($pic);
   $info->phase = $ph;
   $info->NM    = $NM;
   $info->NMGMT    = gmdate('D, d-M-Y H:i T',$NM);
   $info->NMWD    = gmdate('H:i T d F Y',$NM);
   $info->Q1    = $Q1;
   $info->Q1GMT    = gmdate('D, d-M-Y H:i T',$Q1);
   $info->Q1WD    = gmdate('H:i T d F Y',$Q1);
   $info->FM    = $Q2;
   $info->FMGMT    = gmdate('D, d-M-Y H:i T',$Q2);
   $info->FMWD    = gmdate('H:i T d F Y',$Q2);
   $info->Q3    = $Q3;
   $info->Q3GMT    = gmdate('D, d-M-Y H:i T',$Q3);
   $info->Q3WD    = gmdate('H:i T d F Y',$Q3);
   $info->Q4    = $Q4;
   $info->Q4GMT    = gmdate('D, d-M-Y H:i T',$Q4);
   $info->Q4WD    = gmdate('H:i T d F Y',$Q4);
   $info->FM2   = $fullMoons[$mi];
   $info->FM2GMT   = gmdate('D, d-M-Y H:i T',$fullMoons[$mi]);
   $info->FM2WD   = gmdate('H:i T d F Y',$fullMoons[$mi]);

#  tman1991 mods for cell.php add-on 
   $moonD = array($NM       , $Q1            , $Q2        , $Q3           , $Q4       , $Q1Moons[$mi]  , $fullMoons[$mi], $Q3Moons[$mi] );
   $moonP = array("New Moon", "First Quarter", "Full Moon", "Last Quarter", "New Moon", "First Quarter", "Full Moon"    , "Last Quarter");
   $moonI = array("NM"      , "Q1"           , "FM"       , "Q3"          , "NM"      , "Q1"           , "FM"           , "Q3"          );
   foreach($moonD as $key=>$mdate) {
      if ($mdate>$date) {
         $info->moons[] = array ($moonP[$key], $mdate, $moonI[$key], date("r",$mdate));
      }
   }
#  end tman1991 mods for cell.php add-on 

return $info;
}
// -----------------------------------------------------------------------------
// SEASON FUNCTIONS  return season dates based on USNO dates for Spring, Summer, Fall, Winter                                                             .
// -----------------------------------------------------------------------------
function cGetSeasonInfo ($YY=0) { // feed it the year

  $seasonList = array( // seasons from USNO in WD date format
// generated from https://api.usno.navy.mil/seasons?year=YYYY&tz=0&dst=false JSON
// year => 'Spring|Summer|Autumn|Winter' (Northern Hemisphere)
   '2018' => '16:15 GMT 20 March 2018|10:07 GMT 21 June 2018|01:54 GMT 23 September 2018|22:23 GMT 21 December 2018|',
   '2019' => '21:58 GMT 20 March 2019|15:54 GMT 21 June 2019|07:50 GMT 23 September 2019|04:19 GMT 22 December 2019|',
   '2020' => '03:50 GMT 20 March 2020|21:44 GMT 20 June 2020|13:31 GMT 22 September 2020|10:02 GMT 21 December 2020|',
 '2021' => '09:37 GMT 20 March 2021|03:32 GMT 21 June 2021|19:21 GMT 22 September 2021|15:59 GMT 21 December 2021|',
 '2022' => '15:33 GMT 20 March 2022|09:14 GMT 21 June 2022|01:04 GMT 23 September 2022|21:48 GMT 21 December 2022|',
 '2023' => '21:24 GMT 20 March 2023|14:58 GMT 21 June 2023|06:50 GMT 23 September 2023|03:27 GMT 22 December 2023|',
 '2024' => '03:06 GMT 20 March 2024|20:51 GMT 20 June 2024|12:44 GMT 22 September 2024|09:20 GMT 21 December 2024|',
 '2025' => '09:01 GMT 20 March 2025|02:42 GMT 21 June 2025|18:19 GMT 22 September 2025|15:03 GMT 21 December 2025|',
 '2026' => '14:46 GMT 20 March 2026|08:24 GMT 21 June 2026|00:05 GMT 23 September 2026|20:50 GMT 21 December 2026|',
 '2027' => '20:25 GMT 20 March 2027|14:11 GMT 21 June 2027|06:02 GMT 23 September 2027|02:42 GMT 22 December 2027|',
 '2028' => '02:17 GMT 20 March 2028|20:02 GMT 20 June 2028|11:45 GMT 22 September 2028|08:19 GMT 21 December 2028|',
 '2029' => '08:02 GMT 20 March 2029|01:48 GMT 21 June 2029|17:38 GMT 22 September 2029|14:14 GMT 21 December 2029|',
 '2030' => '13:52 GMT 20 March 2030|07:31 GMT 21 June 2030|23:27 GMT 22 September 2030|20:09 GMT 21 December 2030|',
  ); // end of seasonList
  if($YY<2009) {$YY = idate('Y');} // use current year 
  $info = new stdClass();
  if(!isset($seasonList[$YY])) {
       $info->error = "Year $YY not in list";
       return $info;
   }
   list($spring,$summer,$fall,$winter) = explode('|',$seasonList[$YY]);
   $info->spring = $spring;
   $info->summer = $summer;
   $info->fall   = $fall;
   $info->winter = $winter;
   
   return $info;

}

// The following functions were added by SE Lincoln Weather as part of ajax-dashboard69x
//
// -----------------------------------------------------------------------------
// CHANGE IN DAYLENGTH FUNCTION:  computes length of yesterday, today,  & tomorrow
//   and then the change in day length from yesterday to today
// Written by SE Lincoln Weather                                                           .
// -----------------------------------------------------------------------------
// Alternate $changeinday routine that finds $changeinday2
if (!function_exists('get_changeinday')) { // Avoid fatally re-declaring this!!!
    function get_changeinday() {
        $hrsOfSunLight = array();
        global $SITE;
        global $displayTomorrow;
    
        $t = time()-86400; // Yesterday
    
        for ($i=0; $i<(2+($displayTomorrow?1:0)); $i++) { // Only loop twice if no $displayTomorrow
            $sun = date_sun_info($t, $SITE['latitude' ], $SITE["longitude"]);
            $srise  = $sun["sunrise"];
            $sset  = $sun["sunset"];
            $sunhrs[$i] = $sset - $srise;   // $sunhrs is time between sunrise and sunset
            $sh[$i] = floor($sunhrs[$i]/3600); // Sun Hours
            $sm[$i] = floor((($sunhrs[$i]/3600)-$sh[$i])*60); // Sun Minutes
            $ss[$i] = round(((((($sunhrs[$i]/3600)-$sh[$i])*60)-$sm[$i])*60),0); // Sun Seconds
            $hrsOfSunLight[$i] = $sh[$i].':'.$sm[$i].':'.$ss[$i]; // Assemble strings in array
            $t+=86400; // Next Day
        }
    
        $cindsign = (($sunhrs[1]-$sunhrs[0])>0)?'+':'-'; // Change IN Day sign
    
        $shdiff = ($cindsign=='-'?($sh[0] - $sh[1]):($sh[1] - $sh[0])); // Difference in hours
        $smdiff = ($cindsign=='-'?($sm[0] - $sm[1]):($sm[1] - $sm[0])); // Difference in minutes
        $ssdiff = ($cindsign=='-'?($ss[0] - $ss[1]):($ss[1] - $ss[0])); // Difference in seconds
        if ($ssdiff<0) { // negative number of seconds?
            $smdiff -= 1; // borrow
            $ssdiff += 60; // and carry
        }
        if ($smdiff<0) { // negative number of minutes?
            $shdiff -=1; // borrow
            $smdiff += 60; // and carry
        }
        $changeinday2 = $cindsign.$shdiff.':'.$smdiff.':'.$ssdiff; // Assemble cind string
        $result = array($changeinday2,$hrsOfSunLight);
        return $result;
    }
}
// end of changeinday()

// -----------------------------------------------------------------------------
// Fixes WD seasons for comparison to $now
// Code by Cienega32 - LasCruces-Weather.com
// -----------------------------------------------------------------------------
function season_check ($seasn) {
  $seconds = date_offset_get(new DateTime);  // TZ offset
  $s = explode(' UTC ',$seasn);
  $ss= $s[0] . ' ' . $s[1];
  $s = strtotime($ss)+$seconds;
 return $s;
}
// end of season_check

// Detect Internet Explorer earlier than v11 which spoofs as Firefox
function ae_detect_ie() {
    if (isset($_SERVER['HTTP_USER_AGENT']) &&
            (strpos($_SERVER['HTTP_USER_AGENT'], 'MSIE') || strpos($_SERVER['HTTP_USER_AGENT'], 'Trident/7.0; rv:11.0')))
        return true;
    else
        return false;
}
// end of ae_detect_ie

// Assign unique image id to reliably clear browser cache
if (!function_exists('getUniqueImageURL')) {
    function getUniqueImageURL($image_url){
        $timestamp = time();
        if(strpos($image_url, '?')){
            $image_url = str_replace('?', "?$timestamp&", $image_url);
        }
        else{
            $image_url .= "?$timestamp";
        }
        return $image_url;
    }
}
// end of getUniqueImageURL

?>

include-style-switcher.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366 		<?php
/*
PHP script by Mike Challis, www.642weather.com/weather/
Carterlake/AJAX/PHP Template - Color Theme Switcher Plugin PHP Script

Version: 1.17 - 19-Dec-2008 - tweaks to initial release
- adjustment to cookie path setting
Version 1.18 - 10-Feb-2011 - fix duplicate id= in wide/narrow selection HTML
Version 1.19 - 05-Feb-2013 - fix HTML5 validation issues
Version 1.20 - 27-Apr-2020 - fix warnings if headers were already sent
Version 1.21 - 29-Nov-2021 - add SameSite=Lax to all cookies

see changelog.txt for all change history

Support comes from saratogaWX in this topic at the Weather-Watch.com forum:
http://www.weather-watch.com/smf/index.php/topic,30183.0.html

You are free to use and modify the code

This php code provided "as is", and Long Beach Weather (Michael Challis)
disclaims any and all warranties, whether express or implied, including
(without limitation) any implied warranties of merchantability or
fitness for a particular purpose.
*/

# session_start() must be processed before any other output
# or you might get a warning "headers already sent".
if (!isset($_SESSION)) {
    session_start();
}

#################
# begin settings
# ##############

# note the style names in this array are intentionally missing
# the '-wide' and '-narrow' part of the file name, because it is automatically
# replaced by the program based on the user's setting for wide or narrow
# ie: a css file on the server has weather-screen-blue-wide.css
# but the name of it in this array is weather-screen-blue.css

# You can make new styles and add them, just add a new file to the server
# and add a new entry in the array below using the file name conventions noted above

# you can add or remove styles from this array
$CSSstyles = array(
'weather-screen-black.css'   => 'Black',
'weather-screen-blue.css'    => 'Blue',
'weather-screen-dark.css'    => 'Dark',
'weather-screen-fall.css'    => 'Fall',
'weather-screen-green.css'   => 'Green',
'weather-screen-icetea.css'  => 'Ice Tea',
'weather-screen-mocha.css'   => 'Mocha',
'weather-screen-orange.css'  => 'Orange',
'weather-screen-pastel.css'  => 'Pastel',
'weather-screen-purple.css'  => 'Purple',
'weather-screen-red.css'     => 'Red',
'weather-screen-salmon.css'  => 'Salmon',
'weather-screen-silver.css'  => 'Silver',
'weather-screen-spring.css'  => 'Spring',
'weather-screen-taupe.css'   => 'Taupe',
'weather-screen-teal.css'    => 'Teal',
);

############
# Use javascript 'OnChange' to post form
############
# if set to true, the style select will not need a "set" button
# if set to false, the style select show a "set" button
# There is a known issue with IE6 and the onchange feature,
# the ajax updates sometimes interfere causing the onchange not to change when changing a selection

# recommended setting: false
$use_onchange_submit = false; # set to true or false

############
# Use cookies to remember settings between site visits
############
# cookies are used to remember the users style settings on each visit to the web site
# you can disable use of cookies, but then the settings would have to be set by
# the user each visit to the web site

# recommended setting: true
$use_cookies = true; # set to true or false

# sets allowable user style select options: (can be overriden with $SITE['CSSsettings_mode'])
$settings_mode = 1; # user can select style and widescreen (show style select and screen width select)
//$settings_mode = 2; # user can select styles only (hide screen width select)
//$settings_mode = 3; # user can select screen width only (hide style select)
#################
# end settings
# ##############

  include_once("Settings.php");
  include_once("common.php");
  global $SITE, $LANGLOOKUP;

if (isset($SITE['CSSsettings_mode']) && $SITE['CSSsettings_mode'] > 0 && $SITE['CSSsettings_mode'] < 4) {
  $settings_mode = $SITE['CSSsettings_mode'];
}
function print_css_style_menu ($menubar = 0, $output = 'echo') {

  global $SITE, $LANGLOOKUP;

$string = '';

/* ###

  # this function makes the form input html so a user can select a style
  # it can be called in menubar.php or on index.php

  # when using on on menubar.php, you can have it print narrow on a few lines this:
  #<div style="margin-left: 5px">
  #<?php print_css_style_menu(1); ?>
  #</div>

  # when using on on index.php, you can have it print horizontal on one line like this:
  #<?php print_css_style_menu(0); ?>

*/ ###

  global $CSSstyles, $use_onchange_submit, $settings_mode;

$CSSstyle = '';
# was there a style selected from the form input
if (isset($_POST['CSSstyle']) && preg_match("/^[a-z0-9-]{1,50}.css$/i", $_POST['CSSstyle'])) {
     $CSSstyle = $_POST['CSSstyle'];
} else if (isset($_SESSION['CSSstyle'])) {
     $CSSstyle = $_SESSION['CSSstyle'];
}

# was use widescreen template selected from the form input?
$CSSwscreenOnChecked = '';
$CSSwscreenOffChecked = '';
if (isset($_SESSION['CSSwidescreen']) && $_SESSION['CSSwidescreen'] == 1) {
    $CSSwscreenOnChecked = ' checked="checked"';
} else if (isset($_SESSION['CSSwidescreen']) && $_SESSION['CSSwidescreen'] == 0) {
    $CSSwscreenOffChecked = ' checked="checked"';
} else {
    $CSSwscreenOffChecked = ' checked="checked"';
}
$string .= '<p class="sideBarTitle" style="margin-left: -5px;">'. langtransstr('Style Options') .'</p>';
$string .= '
<form method="post" name="style_select" action="#">
<p>';

if ($settings_mode != 3) {  // style settings allowed

    $string .= '<label for="CSSstyle">'.langtransstr('Style').':</label>';
    if ($menubar) $string .= '<br />';
    
    if($use_onchange_submit == false) {
    $string .= '
     <select id="CSSstyle" name="CSSstyle">';
    }
    else {
    $string .= '
    <select id="CSSstyle" name="CSSstyle" onchange="this.form.submit();">';
    }
    
    $CSSstyleSelected = '';
    foreach ($CSSstyles as $k => $v) {
     if ($CSSstyle == "$k") $CSSstyleSelected = ' selected="selected"';
    $string .= '<option value="'.$k.'"'.$CSSstyleSelected.'>'.langtransstr($v).'</option>'."\n";
     $CSSstyleSelected = '';
    }
    $string .= '</select>';
    
    if ($menubar) {
           $string .= '<br />';
    }else{
           $string .= ' &nbsp;&nbsp; ';
           if($use_onchange_submit == false) {
              $string .= '<input type="submit" name="' . langtransstr('Set') .'" value="' . langtransstr('Set') .'" />';
           }
    }
    
    if (!$menubar) {
           $string .= ' &nbsp;&nbsp; ';
    }
}
if ($settings_mode != 2) {  // screen width settings allowed

    $string .= langtransstr('Widescreen') . ':';
    if ($menubar) {
           $string .= '<br />';
    }else{
           $string .= ' ';
    }
    
    if($use_onchange_submit == true) {
    $string .= '<label for="CSSwidescreenOn">'.langtransstr('On').'</label> <input type="radio" id="CSSwidescreenOn" name="CSSwidescreen" value="1" '.$CSSwscreenOnChecked.' onchange="this.form.submit();" />
    | <label for="CSSwidescreenOff">'.langtransstr('Off').'</label> <input type="radio" id="CSSwidescreenOff" name="CSSwidescreen" value="0" '.$CSSwscreenOffChecked.' onchange="this.form.submit();" />';
    }
    else {
    $string .= '<label for="CSSwidescreenOn">'.langtransstr('On').'</label> <input type="radio" id="CSSwidescreenOn" name="CSSwidescreen" value="1" '.$CSSwscreenOnChecked.' />
    | <label for="CSSwidescreenOff">'.langtransstr('Off').'</label> <input type="radio" id="CSSwidescreenOff" name="CSSwidescreen" value="0" '.$CSSwscreenOffChecked.' />';
    }
}
if ($menubar) {
       $string .= '<br />';
}else{
       $string .= ' &nbsp;&nbsp; ';
}

if($use_onchange_submit == false) {
  $string .= '<input type="submit" name="' . langtransstr('Set') .'" value="' . langtransstr('Set') .'" />';
}

$string .= '</p>
</form>';

# can be printed right where you call it or loaded into a string for later print
# $menubottom .= print_css_style_menu(1,'string');
# print_css_style_menu(1);

if ($output == 'echo') {
         echo $string;
} else {
         return $string;
}

 # uncomment only for debugging
// echo '<p><b>COOKIE INFO:</b><br>';
// print_r($_COOKIE).'</p>';
// echo '<hr>';
// echo '<p><b>SESSION INFO:</b><br>';
// print_r($_SESSION).'</p>';
// echo '<p>Style choice ' .$SITE['CSSscreen'] .'</p>';

}


function validate_style_choice() {

   # this function sets the working style based on user's input or not
   # input can come from post, cookie, or session

   global $CSSstyles, $SITE, $use_cookies, $settings_mode;

  $wide_style = 0;
  $narrow_style = 0;
  $CSSstyle = '';

  // incase site admin sets up $SITE['CSSscreenDefault'] wrong
  $SITE['CSSscreenDefault'] = str_replace ('-narrow','',$SITE['CSSscreenDefault']);
  $SITE['CSSscreenDefault'] = str_replace ('-wide','',$SITE['CSSscreenDefault']);

  if ($settings_mode == 2) { // user can select styles only (screen width will be $SITE['CSSscreenDefault'])
    if ($SITE['CSSwideOrNarrowDefault'] == 'wide') {
            $_SESSION['CSSwidescreen'] = 1;
            $wide_style = 1;
    }else {
            $_SESSION['CSSwidescreen'] = 0;
            $narrow_style = 1;
    }
  }
  # is there a CSSstyle selection from the post, cookie, or session?
  if (isset($_POST['CSSstyle']) && preg_match("/^[a-z0-9-]{1,50}.css$/i", $_POST['CSSstyle'])) {
       $CSSstyle = $_POST['CSSstyle'];
  }
  else if ($use_cookies == true && isset($_COOKIE['CSSstyle'])) {
       $_SESSION['CSSstyle'] = $_COOKIE['CSSstyle'];
       $CSSstyle = $_COOKIE['CSSstyle'];
  }
  else if (isset($_SESSION['CSSstyle'])) {
       $CSSstyle = $_SESSION['CSSstyle'];
  }

  if ($settings_mode == 3) { // widescreen on off only (user cannot select styles)
       $_SESSION['CSSstyle'] = $SITE['CSSscreenDefault'];
       $CSSstyle = $SITE['CSSscreenDefault'];
  }
  # was use CSSwidescreen template selected from the form post?
  if (isset($_POST['CSSwidescreen']) && $_POST['CSSwidescreen'] == 1) {
       if ($use_cookies == true) set_style_cookie ('CSSwidescreen', '1');
       $_SESSION['CSSwidescreen'] = 1;
       $wide_style = 1;
  }
  # was use CSSwidescreen template unselected from the form post?
  else if (isset($_POST['CSSwidescreen']) && $_POST['CSSwidescreen'] == 0) {
       if ($use_cookies == true) set_style_cookie ('CSSwidescreen', '0');
       $_SESSION['CSSwidescreen'] = 0;
       $narrow_style = 1;
  }

  //  fixed bug (default widescreen not being set)
  if (isset($_SESSION['CSSwidescreen']) && $_SESSION['CSSwidescreen'] == 1) {
       $wide_style = 1;
  }

  # was use CSSwidescreen template selected from a stored cookie?
  if ($wide_style == 0 && $narrow_style == 0 && $use_cookies == true && isset($_COOKIE['CSSwidescreen']) && $_COOKIE['CSSwidescreen'] == 1) {
       if ($use_cookies == true) set_style_cookie ('CSSwidescreen', '1');
       $_SESSION['CSSwidescreen'] = 1;
       $wide_style = 1;
  }
  # was use CSSwidescreen template unselected from a stored cookie?
  if ($wide_style == 0 && $narrow_style == 0 && $use_cookies == true && isset($_COOKIE['CSSwidescreen']) && $_COOKIE['CSSwidescreen'] == 0) {
       if ($use_cookies == true) set_style_cookie ('CSSwidescreen', '0');
       $_SESSION['CSSwidescreen'] = 0;
  }

  # is the seletcted template or one in session one we really have?
  if ($CSSstyle != '') {
       foreach ($CSSstyles as $k => $v) {
          if ($CSSstyle == "$k")  {
              $_SESSION['CSSstyle'] = $k;
              if ($use_cookies == true) {
                  set_style_cookie ('CSSstyle', $k);
                  set_style_cookie ('CSSwidescreen' , $wide_style);
              }
              if (isset($_SESSION['CSSwidescreen']) && $_SESSION['CSSwidescreen'] == 1) {
                      $CSSstyle = str_replace ('.css','-wide.css',$k);
              } else {
                      $CSSstyle = str_replace ('.css','-narrow.css',$k);
              }
              return $CSSstyle;
          }
       }
  }else{
       # nothing was matched, show default, no set cookie
       $_SESSION['CSSstyle'] = $SITE['CSSscreenDefault'];
       if ($SITE['CSSwideOrNarrowDefault'] == 'wide') {
               $_SESSION['CSSwidescreen'] = 1;
               $CSSstyle = str_replace ('.css','-wide.css',$SITE['CSSscreenDefault']);
       } else {
               $_SESSION['CSSwidescreen'] = 0;
               $CSSstyle = str_replace ('.css','-narrow.css',$SITE['CSSscreenDefault']);
       }
       return $CSSstyle;
  }
}

function set_style_cookie ($name, $val) {
   global $SITE;
   # this function sets a cookie
   # set expiration date 6 months ahead
   $expire = strtotime("+6 month");
   if ( isset($SITE['cookie_path']) ) {
     $path = $SITE['cookie_path']; // this can be set in Settings.php
   } else {
     $scripturlparts = explode('/', $_SERVER['PHP_SELF']);
     $scriptfilename = $scripturlparts[count($scripturlparts)-1];
     $scripturl = preg_replace("/$scriptfilename$/i", '', $_SERVER['PHP_SELF']);
     $path = $scripturl;
   }
     
   if(!headers_sent()) {
             if(PHP_VERSION_ID < 70300) {
                 $didit = setcookie("$name",$val,$expire,$path.'; SameSite=Lax');
             } else {
                 $arr_cookie_options = array (
                        'expires' => $expire,
                        'path' => $path,
                    #    'domain' => $_SERVER['SERVER_NAME'], // leading dot for compatibility or use subdomain
                        'secure' => false,     // or true
                        'httponly' => false,    // or true
                        'samesite' => 'Lax' // None || Lax  || Strict
                 );
                 $didit = setcookie("$name",$val,$arr_cookie_options);
             }
     }
}

?>

flyout-menu.php permissions=-rwxrwxrwx [0777]

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541 		<?php
// flyout menu generator using http://www.cssplay.co.uk/menus/flyout_4level.html
// menu stylesheet adapted by Ken True - http://saratoga-weather.org/
//                         and Mike Challis - http://www.642weather.com/weather/
//
// this release is specifically for the Weather-Display/AJAX/PHP template set
//
// Version 1.00 - 18-Mar-2008 - Initial release
// Version 1.01 - 23-Apr-2008 - added support for WD-World-ML (multilingual)
// Version 1.02 - 18-Aug-2008 - fix for 'unknown' css processing by Mike Challis
// Version 1.03 - 20-Jan-2009 - added translation for <item title="..." /> in menu set
// Version 1.04 - 23-Jul-2010 - added tags target=,img=,align= to parsing, use menu=<name> for flyout-menu-<name>.xml
// Version 1.05 - 19-Jan-2011 - added wx="..." conditionals for universal templates
// Version 1.06 - 05-Feb-2011 - fixed IE8+ display of $FlyoutMenuText
// Version 1.07 - 04-Mar-2011 - fixed errata casting Strict: messages
// Version 1.08 - 05-Feb-2013 - fixed HTML5 validation with literal quote in translation
// Version 1.09 - 07-Dec-2020 - minor fix for PHP8.0.0
// Version 1.10 - 27-Dec-2022 - fixes for PHP 8.2
//
$Version = 'flyout-menu.php (ML) Version 1.10 - 27-Dec-2022';
//
// ---------- settings ------------------------------
$MENUdef = './flyout-menu.xml'; // (relative) file location of XML menu definition file
$MENUdefTest = './flyout-menu-%s.xml'; // (relative) file location of test XML menu definition file
$imagesDir = './ajax-images/';  // (relative) URL location of images dir (with trailing '/')
//
$lang = 'en';  // default language
$WXsoftware = 'WD'; // default weather software
//
// ---------- end settings --------------------------
//  error_reporting(E_ALL); // for testing
//------------------------------------------------
// overrides from Settings.php if available
global $SITE;
if (isset($SITE['imagesDir']))     {$imagesDir = $SITE['imagesDir'];}
if (isset($SITE['menudef']))     {$MENUdef = $SITE['menudef'];}
if (isset($SITE['menudeftest']))     {$MENUdefTest = $SITE['menudeftest'];}
if (isset($SITE['lang']))    {$lang = $SITE['lang'];}
if (isset($SITE['WXsoftware']))    {$WXsoftware = $SITE['WXsoftware'];}
// end of overrides from Settings.php if available
if (isset($_REQUEST['sce']) && ( strtolower($_REQUEST['sce']) == 'view' or
    strtolower($_REQUEST['sce']) == 'show') ) {
   //--self downloader --
   $filenameReal = __FILE__;
   $download_size = filesize($filenameReal);
   header('Pragma: public');
   header('Cache-Control: private');
   header('Cache-Control: no-cache, must-revalidate');
   header("Content-type: text/plain");
   header("Accept-Ranges: bytes");
   header("Content-Length: $download_size");
   header('Connection: close');
   
   readfile($filenameReal);
   exit;
}

$Debug = false;
if (isset($_REQUEST['debug']) && strtolower($_REQUEST['debug']) == 'y') {
  $Debug = true;
}
$doDiv = false;
if (isset($_REQUEST['gendiv']) && strtolower($_REQUEST['gendiv']) == 'y') {
  $doDiv = true;
}
if (isset($genDiv)) {
  $doDiv = $genDiv;
}

$doCSS = false;
if (isset($_REQUEST['css']) && strtolower($_REQUEST['css']) == 'y') {
  $doCSS = true;
}
if (isset($genCSS)) {
  $doCSS = $genCSS;
}
  $CSS = '';
  $FlyoutMenuColors = loadStyleSettings(); // Get the colors to use
  genCSSFlyout($FlyoutMenuColors);

$doPrintMenu = true;
if (isset($PrintFlyoutMenu)) {
  $doPrintMenu = $PrintFlyoutMenu;
}
if ($doCSS) { // only return the necessary CSS for direct include
  print $FlyoutCSS;
  return;

}
$usingAltXML = false;
if(isset($_REQUEST['menu']) and  preg_match('|%s|',$MENUdefTest)) {
   $tMenu = sprintf($MENUdefTest,strtolower($_REQUEST['menu']));
   // print "<!-- checking '$tMenu' -->\n";
   if(file_exists($tMenu)) {                                                            
     $MENUdef = $tMenu;
     $usingAltXML = true;
     print "<!-- using '$tMenu' -->\n";
   }
 }

$depth = array();
$MENU = array();
$MENUcnt = 0;
$lastDepth = 0;
$Status = "<!-- $Version -->\n";

// ------------- main routine --------------------
$xml_parser = xml_parser_create();
xml_set_element_handler($xml_parser, "startElementFlyout", "endElementFlyout");
$doTrans = true;
if ($lang <> 'en') { // special handling for non-english menu constructions
  $tfile = preg_replace('|\.xml|',"-$lang.xml",$MENUdef);
  if (file_exists($tfile)) {
     $MENUdef = $tfile; // use the XML and no other translation.
     $doTrans = false;
   }
}

if (!($fp = fopen($MENUdef, "r"))) {
    die("could not open XML input from $MENUdef ");
}

while ($data = fread($fp, 8192)) {
    if (!xml_parse($xml_parser, $data, feof($fp))) {
        die(sprintf("XML error: %s at line %d",
                    xml_error_string(xml_get_error_code($xml_parser)),
                    xml_get_current_line_number($xml_parser)));
    }
}
xml_parser_free($xml_parser);

// ----------- generate the menu XHTML ---------------
$FlyoutMenuText = "<!-- begin generated flyout menu -->\n";

if ($doDiv) {
  $FlyoutMenuText .= "<div class=\"flyoutmenu\">\n";
}
$FlyoutMenuText .= "<!-- $Version -->\n";
$FlyoutMenuText .= "<!-- by Ken True - webmaster[at]saratoga-weather.org and -->\n";
$FlyoutMenuText .= "<!-- by Mike Challis - webmaster[at]642weather.com  -->\n";
$FlyoutMenuText .= "<!-- Adapted from Stu Nicholl's CSS/XHTML at http://www.cssplay.co.uk/menus/flyout_4level.html -->\n";
$FlyoutMenuText .= "<!-- script available at http://saratoga-weather.org/scripts-CSSmenu.php#flyout -->\n";


$FlyoutMenuText .= "<!-- using \n" . print_r($FlyoutMenuColors,true) . " -->\n";
$FlyoutMenuText .= "<!-- using $MENUdef for XML, doTrans=$doTrans -->\n";

for ($i=1;$i<count($MENU);$i++) { // loop over all menu items -1
  $depth = $MENU[$i]['depth'];
  $nextdepth = $MENU[$i+1]['depth'];
  $indent = str_repeat("  ",$depth);
  $link = $MENU[$i]['link'];
  $title = $MENU[$i]['title'];
  $target = $MENU[$i]['target'];
  $img = $MENU[$i]['img'];
  $align = $MENU[$i]['align'];
  $wxonly = $MENU[$i]['wxonly'];
  $wxonlydisplay = '';
  $wxonlyPrefix = '';
  $wxonlySuffix = '';
  if($wxonly <> '' and ! preg_match("|$WXsoftware|i",$wxonly) ) { // see if this menu is allowed
      $wxonlydisplay = 'wxonly=\''.$wxonly.'\' ';
      $wxonlyPrefix = "<!-- not used with $WXsoftware ";
      $wxonlySuffix = " -->";
  }
  if ($doTrans and $title <> '') { $title = preg_replace('|"|','&quot;',langtransstr($title)); }
  $caption = $doTrans?preg_replace('|"|','&quot;',langtransstr($MENU[$i]['caption'])):$MENU[$i]['caption'];
//  $caption = htmlspecialchars($caption);

  if ($target <> '') {
    $target = ' target="' . $target . '"';
  } else {
    $target = '';
  }
  
  if ($link <> '') {
    $link = 'href="' . $link . '"';
  } else {
    $link = 'href="' . "#" . '"';
  }
  
  if ($title <> '') {
    $title = ' title="' . $title . '"';
  } else {
    $title = '';
  }
  
  $leftimg = '';
  $rightimg = '';
  
  if ($img <> '') {
    $img = '<img src="' . $img . '" style="border:none" alt=" "/>';
    if (preg_match('|left|i',$align)) {
       $leftimg = $img;
    } else {
        $rightimg = $img;
    }
  }

  if ($i==1) { // start of entire image
    $FlyoutMenuText .= "<ul>\n";
  }
  if ($Debug) {
    $FlyoutMenuText .= "$indent<!-- $i: depth=$depth next=$nextdepth $wxonlydisplay caption='" . $MENU[$i]['caption'] . "' link='" . $MENU[$i]['link'] ."' title='" . $MENU[$i]['title'] . "' -  ";
  }
  if ($depth < $nextdepth) { // -------------------  start of new submenu 
    if ($Debug) {
      $FlyoutMenuText .= "Start new submenu -->\n";
    }
    $FlyoutMenuText .= "$indent$wxonlyPrefix<li class=\"sub\"><a $link$title$target>$leftimg" . $caption . "$rightimg<!--[if gte IE 7]><!--></a>$wxonlySuffix<!--<![endif]-->
$indent  <!--[if lte IE 6]><table><tr><td><![endif]-->
$indent  <ul>\n";
    
  }
  
  if ($depth > $nextdepth) { // --------------------  end of new submenu
    if ($Debug) {
      $FlyoutMenuText .= "End new submenu -->\n";
    }
    $FlyoutMenuText .= "$indent$wxonlyPrefix<li><a $link$title$target>$leftimg" . $caption . "$rightimg</a></li>$wxonlySuffix\n";
    
    for ($j=$depth; $j > $nextdepth ;$j--) { // close off intervening submenu(s)
    
      $newindent = str_repeat("  ",$j-1);
    $FlyoutMenuText .= "$newindent  </ul>
$newindent  <!--[if lte IE 6]></td></tr></table></a><![endif]-->
$newindent</li>\n";
    }
   

  }
  
  if ($depth == $nextdepth) { // ---------------------- menu item at current depth
    if ($Debug) {
      $FlyoutMenuText .= "Normal menu item -->\n";
    }
    $FlyoutMenuText .= "$indent$wxonlyPrefix<li><a $link$title$target>$leftimg" . $caption . "$rightimg</a></li>$wxonlySuffix\n";
  
  }
  
  if ($i==count($MENU)-1) {
    $FlyoutMenuText .= "</ul>\n";
  }
} // end of loop over menu items
if ($doDiv) {
  $FlyoutMenuText .= "</div>\n";
}
$FlyoutMenuText .= "<!-- end generated flyout menu -->\n";

if ($doPrintMenu) {
  print $FlyoutMenuText;
}

if ($Debug) {
  print $Status;
}

// functions invoked by XML_parser

function startElementFlyout($parser, $name, $attrs) 
{
    global $depth,$Status,$lastDepth,$MENU,$MENUcnt,$WXsoftware;

    $indent = '';
    if (! @empty($depth[(integer)$parser]) ) {
      $j = @$depth[(integer)$parser];
    } else {
      $j = 0;
    }
    for ($i = 0; $i < $j; $i++) {
        $Status .= "  ";
        $indent .= "  ";
    }
    $Status .= "<!-- Depth: $j - $name " . print_r($attrs,true) . " -->\n";
    // format the CAPTION and LINK entries
    if (! empty($attrs['LINK']) ) {
      $link = $attrs['LINK'];
     } else {
      $link = '';
     }
    if (! empty($attrs['CAPTION']) ) {
      $caption = $attrs['CAPTION'];
    } else {
      $caption = '';
    }

    if (! empty($attrs['TITLE']) ) {
      $title = $attrs['TITLE'];
    } else {
      $title = '';
    }
    if (! empty($attrs['TARGET']) ) {
      $target = $attrs['TARGET'];
    } else {
      $target = '';
    }
    if (! empty($attrs['IMG']) ) {
      $img = $attrs['IMG'];
    } else {
      $img = '';
    }
    if (! empty($attrs['ALIGN']) ) {
      $align = preg_match('|left|i',$attrs['ALIGN'])?'left':'right';
    } else {
      $align = '';
    }
    if (! empty($attrs['WXONLY']) ) {
        $wxonly = $attrs['WXONLY'];
    } else {
      $wxonly = '';
    }

    if ($caption <> '' or $link <> '') { // ignore entries that are wholly blank
      $MENUcnt++;
      $MENU[$MENUcnt]['depth'] = $j;
      $MENU[$MENUcnt]['caption'] = $caption;
      $MENU[$MENUcnt]['title'] = $title;
      $MENU[$MENUcnt]['link'] = $link;
      $MENU[$MENUcnt]['target'] = $target;
      $MENU[$MENUcnt]['img'] = $img;
      $MENU[$MENUcnt]['align'] = $align;
      $MENU[$MENUcnt]['wxonly'] = $wxonly;
      // store dummy next entry at highest level for final run-through to generate
      // the XHTML.  This will be overwritten by a 'real' entry if any
      $MENU[$MENUcnt+1]['depth'] = 1; 
      $MENU[$MENUcnt+1]['caption'] = '';
      $MENU[$MENUcnt+1]['title'] = '';
      $MENU[$MENUcnt+1]['link'] = '';
      $MENU[$MENUcnt+1]['target'] = '';
      $MENU[$MENUcnt+1]['img'] = '';
      $MENU[$MENUcnt+1]['align'] = '';
      $MENU[$MENUcnt+1]['wxonly'] = '';
    
    }
    
    $lastDepth = $j; // remember for next time
    $j++;
    @$depth[(integer)$parser] = $j;
}

// called at end of particular element
function endElementFlyout($parser, $name) 
{
    global $depth,$Status;
    @$depth[(integer)$parser]--;
}
// end of XML_parser functions

// return the CSS
function genCSSFlyout ($color)
{
global  $FlyoutCSS,$imagesDir, $SITE;
global  $TopMenuWidth,$SubMenuWidth;
global  $TopMenuBkgnd,$TopMenuTextColor,$TopMenuTextHover,$TopMenuTextBkgnd;
global  $TopMenuBkgrndHover,$TopMenuBorder;
global  $SubMenuPresent,$SubMenuTextColor,$SubMenuTextHover,$SubMenuBkgrnd,$SubMenuBkgrndHover;

$SNAME = $color['NAME'];
$LC = $color['LINK_COLOR'];
$LBG = $color['LINK_BACKGROUND'];
$HC = $color['HOVER_COLOR'];
$HBG = $color['HOVER_BACKGROUND'];
$BC = $color['BORDER_COLOR'];
$SC = $color['SHADE_IMAGE']; 

$FlyoutCSS = <<<END_OF_CSS
<!-- begin flyout-menu.php CSS definition style='{$SNAME}' -->
<style type="text/css">
/* ================================================================
This copyright notice must be untouched at all times.

The original version of this stylesheet and the associated (x)html
is available at http://www.cssplay.co.uk/menus/flyout_4level.html
Copyright (c) 2005-2007 Stu Nicholls. All rights reserved.
This stylesheet and the associated (x)html may be modified in any
way to fit your requirements.
Modified by Ken True and Mike Challis for Weather-Display/AJAX/PHP
template set.
=================================================================== */
.flyoutmenu {
font-size:90%;
}

/* remove all the bullets, borders and padding from the default list styling */
.flyoutmenu ul {
position:relative;
z-index:500;
padding:0;
margin:0;
padding-left: 4px; /* mchallis added to center links in firefox */
list-style-type:none;
width: 110px;
}

/* style the list items */
.flyoutmenu li {
color: {$LC};
background:{$LBG} url({$imagesDir}{$SC});
/* for IE7 */
float:left;
margin:0; /* mchallis added to tighten gaps between links */
}
.flyoutmenu li.sub {background:{$LBG} url({$imagesDir}flyout-sub.gif) no-repeat right center;}

/* get rid of the table */
.flyoutmenu table {position:absolute; border-collapse:collapse; top:0; left:0; z-index:100; font-size:1em;}

/* style the links */
.flyoutmenu a, .flyoutmenu a:visited {
display:block;
text-decoration:none;
line-height: 1.8em; 
width:95px; /* mchallis changed for adjusting firefox link width */
color:{$LC};
padding: 0 2px 0 5px; 
border:1px solid {$BC};
border-width:0 1px 1px 1px;
}
/* hack for IE5.5 */
         /* mchallis lowered the two width values to (101, 100)to fix IE6 links wider than menu width */
* html .flyoutmenu a, * html .flyoutmenu a:visited {width:95px; w\idth:94px;}
/* style the link hover */
* html .flyoutmenu a:hover {color:{$HC}; background:{$HBG}; position:relative;}

.flyoutmenu li:hover {position:relative;}

/* For accessibility of the top level menu when tabbing */
.flyoutmenu a:active, .flyoutmenu a:focus {color:{$HC}; background:{$HBG};}

/* retain the hover colors for each sublevel IE7 and Firefox etc */
.flyoutmenu li:hover > a {color:{$HC}; background:{$HBG};}

/* hide the sub levels and give them a positon absolute so that they take up no room */
.flyoutmenu li ul {
visibility:hidden;
position:absolute;
top:-10px;
/* set up the overlap (minus the overrun) */
left:90px;
/* set up the overrun area */
padding:10px;
/* this is for IE to make it interpret the overrrun padding */
background:transparent url({$imagesDir}flyout-transparent.gif);
}

/* for browsers that understand this is all you need for the flyouts */
.flyoutmenu li:hover > ul {visibility:visible;}


/* for IE5.5 and IE6 you need to style each level hover */

/* keep the third level+ hidden when you hover on first level link */
.flyoutmenu ul a:hover ul ul{
visibility:hidden;
}
/* keep the fourth level+ hidden when you hover on second level link */
.flyoutmenu ul a:hover ul a:hover ul ul{
visibility:hidden;
}
/* keep the fifth level hidden when you hover on third level link */
.flyoutmenu ul a:hover ul a:hover ul a:hover ul ul{
visibility:hidden;
}

/* make the second level visible when hover on first level link */
.flyoutmenu ul a:hover ul {
visibility:visible;
}
/* make the third level visible when you hover over second level link */
.flyoutmenu ul a:hover ul a:hover ul{
visibility:visible;
}
/* make the fourth level visible when you hover over third level link */
.flyoutmenu ul a:hover ul a:hover ul a:hover ul {
visibility:visible;
}
/* make the fifth level visible when you hover over fourth level link */
.flyoutmenu ul a:hover ul a:hover ul a:hover ul a:hover ul {
visibility:visible;
}

</style>
<!-- end of flyout-menu.php CSS definition -->

END_OF_CSS;

} // end of genCSS function

function loadStyleSettings ( ) {

global $SITE;

# array of css style names, when adding a new style ...
# edit this to add a new name, also add a new link color array below,
# weather-screen-[NAME]-[narrow or wide].css

$styles_array_all = array(
array('NAME' => 'black',  'SHADE_IMAGE'=> 'flyout-shade-4A4A4A.gif', 'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#CC9933', 'LINK_BACKGROUND'=> '#4A4A4A', 'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => 'black',),   # black
array('NAME' => 'blue',   'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#336699', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#3173B1',), # blue
array('NAME' => 'dark',   'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#58B6C7',), # dark
array('NAME' => 'fall',   'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#E87510',), # fall
array('NAME' => 'green',  'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#00745B',), # green
array('NAME' => 'icetea', 'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#786032',), # icetea
array('NAME' => 'mocha',  'SHADE_IMAGE'=> 'flyout-shade-CCBFAD.gif', 'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> '#CCBFAD', 'HOVER_COLOR' => 'black', 'HOVER_BACKGROUND' => '#D7E2E8',), # mocha
array('NAME' => 'orange', 'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#CC6600', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#CC6600',), # orange
array('NAME' => 'pastel', 'SHADE_IMAGE'=> 'flyout-shade-E1EBF2.gif', 'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#03447D', 'LINK_BACKGROUND'=> '#E1EBF2', 'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#7190BF',), # pastel
array('NAME' => 'purple', 'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#993333', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#993333',), # purple
array('NAME' => 'red',    'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#993333', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#993333',), # red
array('NAME' => 'salmon', 'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#46222E', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#A4CB32',), # salmon
array('NAME' => 'silver', 'SHADE_IMAGE'=> 'flyout-shade-9A9A9A.gif', 'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#EDDD2F', 'LINK_BACKGROUND'=> '#9A9A9A', 'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#666666',), # silver
array('NAME' => 'spring', 'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#A9D26A',), # spring
array('NAME' => 'taupe',  'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> 'black',   'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#75B7BF',), # taupe
array('NAME' => 'teal',   'SHADE_IMAGE'=> 'flyout-shade-white.gif',  'BORDER_COLOR'=> 'black', 'LINK_COLOR'=> '#006666', 'LINK_BACKGROUND'=> 'white',   'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#006666',), # teal
);

# default
$menu_colors = array('NAME' => 'unknown', 'SHADE_IMAGE'=> 'flyout-shade.gif',  'BORDER_COLOR'=> 'white', 'LINK_COLOR'=> 'black', 'LINK_BACKGROUND'=> '#D4D8BD', 'HOVER_COLOR' => 'white', 'HOVER_BACKGROUND' => '#AA7');

if (isset($SITE['CSSscreen']) && preg_match("/^[a-z0-9-]{1,50}.css$/i", $SITE['CSSscreen'])) {
  preg_match("/^weather-screen-([a-z0-9]+)-(wide|narrow).css$/i", $SITE['CSSscreen'], $matches);

  # this can be used for any conditionals requiring color style name
  $style_color = trim($matches[1]);

  # this can be used for any conditionals requiring wide or narrow
  $style_wide_or_narrow = trim($matches[2]);
}

foreach ($styles_array_all as $v) {
     if($style_color == $v['NAME']) {
       $menu_colors = $v;
       break;
     }
}

return ($menu_colors); // return the color choice associative array

} // end loadStyleSettings

// end of flyout-menu.php
?>