Europe/Amsterdam";
$ucc='';
if (isset($_GET['ccode'])) {
$ucc=trim(str_replace('+',' ',urldecode($_GET['ccode'])));
} else if (isset($_POST['ccode'])) {
$ucc=trim(str_replace('+',' ',urldecode($_POST['ccode'])));
}
$succ='';
if (isset($_GET['clang']) || isset($_POST['clang'])) {
if (isset($_GET['clang'])) {
$succ=strtolower(trim(str_replace('+',' ',urldecode($_GET['clang'])))) . '.';
} else if (isset($_POST['ccode'])) {
$succ=strtolower(trim(str_replace('+',' ',urldecode($_POST['clang'])))) . '.';
}
if (strlen($succ) != 3) {
$succ='';
}
}
if (strlen($ucc) == 2) {
if (strtoupper($ucc) == 'RU' || strtoupper($ucc) == 'SI') { $b='r'; }
$beworried=true;
$nine=9;
$seven=7;
$isbig=1;
for ($jk=0; $jk 1) {
$kkk=0;
for ($kk=0; $kk $maxlong) { $maxlong=min(180.0,($nine + $thislong)); }
if ($thislat < $minlat) { $minlat=max(-90.0,(-$seven + $thislat)); }
if ($thislat > $maxlat) { $maxlat=min(90.0,($seven + $thislat)); }
// echo ' ... ' . $thislong . ' ' . $maxlong;
}
}
}
if ($beworried && $nine == 9 && $seven == 7) {
$minlong=max(-180.0,(-9 + $minlong));
$maxlong=min(180.0,(9 + $maxlong));
$minlat=max(-90.0,(-7 + $minlat));
$maxlat=min(90.0,(7 + $maxlat));
$ptwo=explode(' data-geo="', $ourtzlist);
for ($kkk=1; $kkk $maxlong || $complat < $minlat || $complat > $maxlat) {
//if (abs($complong - $minlong) < 7 || abs($complong - $maxlong) < 7 || abs($complat - $minlat) < 7 || abs($complat - $maxlat) < 7) {
if (abs($complat - $minlat) < 7 || abs($complat - $maxlat) < 7) {
if ($complong < $minlong) { $mlls[0]=true; }
if ($complong > $maxlong) { $mlls[1]=true; }
if ($complat < $minlat) { $mlls[2]=true; }
if ($complat > $maxlat) { $mlls[3]=true; }
if (!$nextdone) {
if ($complong < $minlong) { $minlong=max(-180.0,(-1 + $complong)); }
if ($complong > $maxlong) { $maxlong=min(180.0,(1 + $complong)); }
if ($complat < $minlat) { $minlat=max(-90.0,(-1 + $complat)); }
if ($complat > $maxlat) { $maxlat=min(90.0,(1 + $complat)); }
$nextdone=true;
} else if (!$nexttwodone) {
if ($complong < $minlong) { $minlong=max(-180.0,(-1 + $complong)); }
if ($complong > $maxlong) { $maxlong=min(180.0,(1 + $complong)); }
if ($complat < $minlat) { $minlat=max(-90.0,(-1 + $complat)); }
if ($complat > $maxlat) { $maxlat=min(90.0,(1 + $complat)); }
$nexttwodone=true;
} else if (!$nextthreedone) {
if ($complong < $minlong) { $minlong=max(-180.0,(-1 + $complong)); }
if ($complong > $maxlong) { $maxlong=min(180.0,(1 + $complong)); }
if ($complat < $minlat) { $minlat=max(-90.0,(-1 + $complat)); }
if ($complat > $maxlat) { $maxlat=min(90.0,(1 + $complat)); }
$nextthreedone=true;
} else if (!$nextfourdone) {
if ($complong < $minlong) { $minlong=max(-180.0,(-1 + $complong)); }
if ($complong > $maxlong) { $maxlong=min(180.0,(1 + $complong)); }
if ($complat < $minlat) { $minlat=max(-90.0,(-1 + $complat)); }
if ($complat > $maxlat) { $maxlat=min(90.0,(1 + $complat)); }
if ($mlls[0] && $mlls[1] && $mlls[2] && $mlls[3]) {
$nextfourdone=true;
}
}
}
}
}
}
}
}
}
$url='http://chart.googleapis.com/chart?cht=map:fixed=' . $minlat . ',' . $minlong . ',' . $maxlat . ',' . $maxlong . '&chs=600x350&chld=&chco=&chdl=';
$zero=explode(strtoupper($ucc) . '-', $iccs)[0];
$subi=explode('', substr($iccs, (-3 + strlen($zero))))[0]; //$subi=explode('', explode('', $subi);
for ($ir=0; $ir', $therest);
$thisstate='';
//echo $therest;
//exit;
for ($jr=0; $jr', $therestbits[$jr])[(-1 + sizeof(explode('>', $therestbits[$jr])))]));
//if ($thistext != '') {
//echo $thiscode . $therest . ' ThistexT=' . $thistext;
//exit;
//}
if ($thisstate == '' && $thistext != $thiscode && trim(str_replace(' ','',$thistext)) != '' && substr(substr(($thistext . ' '),2),0,1) != '-') {
//if ($thistext != '') {
//echo 'Thistext=' . $thistext;
//exit;
//}
$thisstate=str_replace(' ','',$thistext);
}
}
if ($thisstate != '') {
//echo $thisstate;
//exit;
if (1 == 4 && sizeof($rowsd) < 20 && $beworried) {
$relurl=explode('"', explode(' href="', explode($thisstate . '', $iccs)[0])[-1 + sizeof(explode(' href="', explode($thisstate . '', $iccs)[0]))])[0];
$interimurl='http://' . $succ . 'wikipedia.org' . $relurl;
$geostuff=file_get_contents($interimurl);
if (strpos($geostuff, ' class="latitude">') !== false) {
$xxlat=explode('<', explode(' class="latitude">', $geostuff)[1])[0];
if (strpos($xxlat, 'S') !== false) {
$thislat=(-1.0 * explode("°", $xxlat)[0]);
} else {
$thislat=(1.0 * explode("°", $xxlat)[0]);
}
$xxlat=explode('<', explode(' class="longitude">', $geostuff)[1])[0];
if (strpos($xxlat, 'E') !== false) {
$thislong=(-1.0 * explode("°", $xxlong)[0]);
} else {
$thislong=(1.0 * explode("°", $xxlong)[0]);
}
if ($thislong < $minlong) { $minlong=max(-180.0,(-1 + $thislong)); }
if ($thislong > $maxlong) { $maxlong=min(180.0,(1 + $thislong)); }
if ($thislat < $minlat) { $minlat=max(-90.0,(-1 + $thislat)); }
if ($thislat > $maxlat) { $maxlat=min(90.0,(1 + $thislat)); }
//echo substr(explode(' class="latitude">', $geostuff)[1],0,40);
//exit;
}
}
$sixrand=$sixrs[rand(0, (-1 + sizeof($sixrs)))];
for ($kr=1; $kr<6; $kr++) {
$sixrand.=$sixrs[rand(0, (-1 + sizeof($sixrs)))];
}
//echo $sixrand;
//exit;
if ($statecount == 0) {
if ($maxlat > 70.0) { $maxlat=80.0; }
$url='http://chart.googleapis.com/chart?' . $tbit . 'cht=map:fixed=' . $minlat . ',' . $minlong . ',' . $maxlat . ',' . $maxlong . '&chdlp=' . $b . '&chs=600x450&chld=' . $thiscode . '&chco=' . $sixrand . '&chdls=' . $sixrand . ',6&chdl=' . urlencode($thisstate);
//echo $url;
//exit;
} else {
$url.='|' . urlencode($thisstate);
$url=str_replace('&chco=', '|' . $thiscode . '&chco=', $url);
$url=str_replace('&chdls=', '|' . $sixrand . '&chdls=', $url);
$url=str_replace('&chdl=', '|' . $sixrand . ',6&chdl=', $url);
//echo $url;
//exit;
}
$statecount++;
} //else {
//echo "oops";
//exit;
//}
}
}
//$url=str_replace('http://chart.googleapis.com/chart', 'http://www.rjmprogramming.com.au/ITblog/600/350/', $url);
//echo $url;
//exit;
}
}
}
if ($url != '') {
header('Content-Type: image/png');
echo file_get_contents($url);
exit;
} else if (1 == 1) {
echo "
Google Charts Image Chart Map Chart Interfacer
RJM Programming - November, 2023
";
} else {
header('Content-Type: image/png');
echo file_get_contents('http://chart.googleapis.com/chart?cht=map:fixed=-60,0,80,-35&chs=600x350&chld=CA-BC|CN|IT|GR|US-UT&chdl=Vancouver|Beijing|Torino|Athens|Salt+Lake+City&chco=B3BCC0|5781AE|FF0000|FFC726|885E80|518274&chtt=Last+Five+Olympic+Hosts&chm=f2010+Winter,000000,0,0,10f2008+Summer,000000,0,1,10f2008+Winter,000000,0,2,10,1,:-5:10f2004+Summer,000000,0,3,10f2004+Summer,000000,0,4,10&chma=0,110,0,0');
}
exit;
?>