";
if (1 == 1) {
for ($ik=0; $ik<((sizeof($nearname) * 1) / 1 - 2); $ik++) {
if (substr($nearlatitude[$ik],0,1) != " ") {
$origin_dtz = new DateTimeZone("Europe/London"); // Thanks to http://php.net/manual/en/function.timezone-offset-get.php
$remote_dtz = new DateTimeZone($nearname[$ik]);
$origin_dt = new DateTime("now", $origin_dtz);
$remote_dt = new DateTime("now", $remote_dtz);
$offset = ($remote_dtz->getOffset($remote_dt) - $origin_dtz->getOffset($origin_dt)) / 3600.0;
array_push($nearoffset, $offset);
array_push($neartnow, $remote_dt->format('Y/m/d/H:i'));
$aseltz=explode("/",$nearname[$ik]);
//array_push($neartnow, $remote_dt->format('H:i'));
//$aseltz=explode("/",$nearname[$ik]);
$seltz=str_replace("", "" . "",$seltz);
}
}
}
if (file_exists("csv.php")) {
include "csv.php";
} else if (file_exists("../csv.php")) {
include "../csv.php";
}
function retval($inv) {
if (strpos($inv, "E-") !== false) return "0";
return $inv;
}
function dlltf($gettzname, $getgmtoff, $getrightnow, $dllmode, $dllbitsmode, $tzais) {
global $dllt, $dlltbits, $nearname, $nearoffset, $neartnow, $dllw, $dllwbits;
$getweather="";
if ($dllmode >= 0 && $dllbitsmode >= 0) {
$dllarr=explode("|", $dllt);
$dllbitsarr=explode("|", $dlltbits);
if (sizeof($dllarr) > $dllmode && sizeof($dllbitsarr) > $dllbitsmode) {
return $dllarr[$dllmode] . "|" . $dllbitsarr[$dllbitsmode];
} else if (sizeof($dllarr) > $dllmode) {
return $dllarr[$dllarr] . "|";
} else if (sizeof($dllbitsarr) > $dllbitsmode) {
return "|" . $dllbitsarr[$dllbitsarr];
} else {
return "|";
}
} else if ($dllmode >= 0) {
$dllarr=explode("|", $dllt);
if (sizeof($dllarr) > $dllmode) {
return $dllarr[$dllmode];
} else {
return "";
}
} else if ($dllbitsmode >= 0) {
$dllbitsarr=explode("|", $dlltbits);
if (sizeof($dllbitsarr) > $dllbitsmode) {
return $dllbitsarr[$dllbitsmode];
} else {
return "";
}
} else {
if (str_replace("?","",$getgmtoff) == "") {
if (array_search($gettzname, $nearname) !== false) {
$getgmtoff=$nearoffset[array_search($gettzname, $nearname)];
if (str_replace("?","",$getrightnow) == "") {
$getrightnow=$neartnow[array_search($gettzname, $nearname)];
}
}
}
if (str_replace("?","",$getrightnow) == "") {
if (array_search($gettzname, $nearname) !== false) {
$getrightnow=$neartnow[array_search($gettzname, $nearname)];
}
}
if ($getgmtoff != "" && $gettzname != "") {
$arrdll=explode("|", $dllt);
if ($dllt != "") $dllt.="|";
if ($dlltbits != "") {
$dlltbits.=" else if (ir == " . $tzais . ") { ";
} else {
$dlltbits=" if (ir == " . $tzais . ") { ";
}
if ($getrightnow != "") {
$huhw=explode("http", $getrightnow);
if (sizeof($huhw) > 1) {
$getnonw=$huhw[0];
$getweather=str_replace($getnonw . "http", "http", $getrightnow);
$getrightnow=$getnonw;
}
$dlltm="TimeZone " . $gettzname . " (GMT " . str_replace("+-","-",("+" . $getgmtoff)) . ") (where it is " . $getrightnow . ") Information=T";
$dllt.=$dlltm; //"TimeZone " . $gettzname . " (GMT " . str_replace("+-","-",("+" . $getgmtoff)) . ") (where it is " . $getrightnow . ") Information=T";
} else {
$dlltm="TimeZone " . $gettzname . " (GMT " . str_replace("+-","-",("+" . $getgmtoff)) . ") Information=T";
$dllt.=$dlltm; //"TimeZone " . $gettzname . " (GMT " . str_replace("+-","-",("+" . $getgmtoff)) . ") Information=T";
}
$dlltbitsm="window.open('http://timezoneconverter.com/cgi-bin/zoneinfo?tz=" . urldecode($gettzname) . "','_blank');";
$dlltbits.=$dlltbitsm; //"window.open('http://timezoneconverter.com/cgi-bin/zoneinfo?tz=" . urldecode($gettzname) . "','_blank');";
echo "\n" . ' if (' . $tzais . ' >= 0) { while (tzarr.length < ' . $tzais . ') { tzbrr.push(""); tzbrrbits.push(""); tzarr.push(""); tzarrbits.push(""); } } ' . "\n" . ' tzarr.push("' . $dlltm . '"); ' . "\n";
echo "\n" . ' tzarrbits.push("' . $dlltbitsm . '"); ' . "\n";
if (strpos($dllwbits, "'',") !== false) $dllwbits="";
if ($dllw != "") {
$dllw.="|";
}
if ($getweather != "") {
$dllw.="Weather=W";
$zdlltbitsm="window.open('" . $getweather . "','_blank');";
if ($dllwbits != "") {
$dllwbits.=" else if (ir == " . $tzais . ") { ";
} else {
$dllwbits=" if (ir == " . $tzais . ") { ";
}
$dllwbits.=$zdlltbitsm;
echo "\n" . ' tzbrrbits.push("' . $zdlltbitsm . '"); tzbrr.push("Weather=W"); ' . "\n";
} else {
echo "\n" . ' tzbrrbits.push(""); tzbrr.push(""); ' . "\n";
}
$dlltbits.=" } ";
if (strpos($dllwbits, "if (ir") !== false) $dllwbits.=" } ";
// }
} else {
$arrdll=explode("|", $dllt);
$dllt.="|";
if ($dlltbits != "") {
$dlltbits.=" else if (ir == " . $tzais . ") { ir=ir; } ";
} else {
$dlltbits=" if (ir == " . $tzais . ") { ir=ir } ";
}
}
}
return "";
}
function whereinwparts($wpa, $sf) {
global $wparts;
$rq=-1;
for ($irq=0; $irq
Map - RJM Programming - http://www.rjmprogramming.com.au (Copyright © 2013 rjmprogramming.com.au all rights reserved.)
\n";
echo " \n";
if (!isset($_GET['value']) && !isset($_POST['value'])) {
echo " \n";
} else {
echo " \n";
}
echo " " . $GETtitle . " Map
\n";
echo '' . " \n";
echo 'Another Map?' . ' Email snapshot of Google Chart ...' . " \n";
echo '<' . 'script' . ' type="text/javascript">' . "\n " . " function later() { \n";
if (!isset($_GET['value']) && !isset($_POST['value'])) {
echo ' datalineprefix = " "; ' . "\n";
echo ' datalinesuffix = ""; ' . "\n";
echo ' var prethisline = "", extra = ""; ' . "\n";
echo ' var thisline = 1; ' . "\n";
echo ' var ii = 0; ' . "\n";
echo ' var thisdef = "0"; ' . "\n";
echo ' var totalleft = 100.0; ' . "\n";
echo ' var title = prompt("Enter Map Title (suffix by &lines=y for overlay clickable link lines and/or suffix by &onclick=y for all types of onclick functionality)", "' . $GETtitle . '"); ' . "\n";
echo ' if (title != null) { ' . "\n";
echo ' if (title.indexOf("&onclick=") != -1) { prethisline=" (note, here, suffix of |TimeZoneName|GMTOffset|TimeNow is recognized in the onclick select event prompt window later ... for example Sydney|Australia/Sydney|+11|12:32 uses this functionality) "; } ' . "\n";
echo ' var label = "' . $GETlabel . '"; ' . "\n";
echo ' if (label == null) label = ""; ' . "\n";
echo ' var xlabel = "' . "'" . '" + label.replace("' . "'" . '","") + "' . "'" . '"; ' . "\n";
//echo ' var value = prompt("Enter Map " + xlabel + " Criteria (separated by ,) ... decimal latitude and longitude ", "' . $GETvalue . '"); ' . "\n";
echo ' var value = "' . $GETvalue . '"; ' . "\n";
echo ' if (value.indexOf(",") != (0 - 1)) { ' . "\n";
echo ' for (ii=0; ii < value.length; ii++) { if (value.substring(ii,(ii+1)) == ",") { if (value.substring((ii+1),(ii+2)) == "' . "'" . '") { thisdef = thisdef + ",' . "'0'" . '"; } else { thisdef = thisdef + ",0"; } } } ' . "\n";
echo ' } ' . "\n";
echo ' var dlsa, dlp2="", datac = ""; ' . "\n";
echo ' dataprefix2 = ""; ' . "\n";
echo ' var sq = "' . "'" . '"; ' . "\n";
echo ' datalineprefix = "' . "''" . '";' . "\n";
echo ' if (label.length != 0) { datalineprefix2 = prompt("Enter ' . " " . $GETtitle . ' Name' . " " . ' " + prethisline + thisline, ""); if (datalineprefix2 != null) { calcofftimenow(document.getElementById("seltz"),datalineprefix2); dlp2=datalineprefix2; } } ' . "\n";
echo ' while (datalineprefix.length != 0 && (value.indexOf("ercent") == (0 - 1) || value.indexOf(" ercent ") != (0 - 1) || (value.indexOf("ercent") != (0 - 1) && totalleft > 0))) { ' . "\n";
echo ' datalineprefix = "' . "''" . '";' . "\n";
echo ' if (datalinesuffix.length != 0 && label.length != 0) { datalineprefix = prompt("Enter ' . " " . $GETtitle . ' Name' . " " . ' " + prethisline + thisline + " (for no more hit Cancel button)", ""); if (datalineprefix != null) { calcofftimenow(document.getElementById("seltz"),datalineprefix); datalineprefix2=""; dlp2=datalineprefix; } } ' . "\n";
echo ' if (datalineprefix == null) { ' . "\n";
echo ' datalineprefix = ""; ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (datalineprefix.length != 0) { ' . "\n";
echo ' extra = ""; ' . "\n";
echo ' if (value.indexOf("ercent") != (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) extra = " (for " + totalleft + " enter nothing or hit Cancel button)"; ' . "\n";
echo " if (tzsuffix == '') { datalinesuffix = prompt('Enter decimal Latitude,Longitude ' + thisline + extra + ' (for no more hit Cancel button and append with ' + '\\n\\n' + ',\"A tooltip and clicking link for Google Map of ' + dlp2 + '\" ' + '\\n\\n' + ' or maybe perhaps ' + '\\n\\n' + ',\"A tooltip and clicking link for Google Map based on latitude and longitude of ' + dlp2 + '\"' + '\\n\\n' + ' optionally (as (just) two examples of what is possible with HTML included (activates with onclick bit not onmouseover))', thisdef); " . "\n";
echo " } else if (tzsuffix != '') { datalinesuffix = prompt('Just click OK to accept the ' + tzsuffix.split('|')[1] + ' Time Zone place geographicals we found, else enter decimal Latitude,Longitude ' + thisline + extra + ' (for no more hit Cancel button and append with ' + '\\n\\n' + ',\"A tooltip and clicking link for Google Map of ' + dlp2 + '\" ' + '\\n\\n' + ' or maybe perhaps ' + '\\n\\n' + ',\"A tooltip and clicking link for Google Map based on latitude and longitude of ' + dlp2 + '\"' + '\\n\\n' + ' optionally (as (just) two examples of what is possible with HTML included (activates with onclick bit not onmouseover))', tzsuffix); tzsuffix=''; } " . "\n";
echo ' if (datalinesuffix != null) { datalinesuffix=giveandtake(datalinesuffix).replace(/#/g, "%23"); if (datalinesuffix.indexOf("{latitude}") != -1) { dlsa=datalinesuffix.split(","); if (dlsa[0].indexOf(".") == -1) { dlsa[0]=dlsa[0]+".0"; } if (dlsa[0].indexOf("-") == -1) { datalinesuffix=datalinesuffix.replace("{latitude}",encodeURIComponent("" + dlsa[0])); } else { datalinesuffix=datalinesuffix.replace("{latitude}",encodeURIComponent(dlsa[0])); } } if (datalinesuffix.indexOf("{longitude}") != -1) { dlsa=datalinesuffix.split(","); if (dlsa.length > 1) { if (dlsa[0].indexOf(".") == -1) { dlsa[0]=dlsa[0]+".0"; } if (dlsa[1].indexOf(".") == -1) { dlsa[1]=dlsa[1]+".0"; } if (dlsa[1].indexOf("-") == -1) { datalinesuffix=datalinesuffix.replace("{longitude}",encodeURIComponent("+" + dlsa[1])); } else { datalinesuffix=datalinesuffix.replace("{longitude}","+" + encodeURIComponent(dlsa[1])); } } } datalinesuffix=("@!@" + datalinesuffix).replace(/loc:+/g, "loc:").replace(/,0,/g, ",0.00000001,").replace(/@!@0,/g, "0.00000001,").replace(/@!@/g, ""); } ' . "\n";
echo ' if (datalinesuffix == null && value.indexOf("ercent") != (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) datalinesuffix = totalleft; ' . "\n";
echo ' if (datalinesuffix == null) break; ' . "\n";
echo ' if (datalinesuffix == null) datalinesuffix = "0,0"; ' . "\n";
echo ' if (datalinesuffix.length == 0) { ' . "\n";
echo ' datalinesuffix = eval(totalleft); ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (eval(totalleft) == eval(datalinesuffix) && value.indexOf("ercent") != (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (eval(datalinesuffix) > eval(totalleft) && value.indexOf("ercent") != (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' datalinesuffix = eval(totalleft); ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (eval(datalinesuffix) > eval(totalleft) && value.indexOf("ercent") == (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' value = value + " ercent "; ' . "\n";
echo ' } else { ' . "\n";
echo ' totalleft = eval(totalleft) - eval(datalinesuffix); ' . "\n";
echo ' } ' . "\n";
echo ' if (datalineprefix2 != "") datalineprefix = datalineprefix2; ' . "\n";
echo ' if (datalinesuffix.indexOf("' . "'" . '") == -1) datac = datac + ", [" + datalinesuffix + ",~" + datalineprefix + "~] "; ' . "\n";
echo ' if (datalinesuffix.indexOf("' . "'" . '") != -1) datac = datac + ", [" + datalinesuffix + ",' . "'" . '" + datalineprefix + "~] "; ' . "\n";
echo ' dataprefix2 = ""; ' . "\n";
echo ' thisline++; ' . "\n";
echo ' } ' . "\n";
echo ' } ' . "\n";
echo ' window.location = "./map.php?title=" + title + "&label=" + label + "&value=" + value.replace(" ercent ", "") + "&data=" + datac; ' . "\n";
echo "} \n";
}
echo "} \n" . '' . 'script' . '>' . "\n";
?>
Menu