Europe/Amsterdam"; $setrange=''; if (isset($_GET['ccode']) || isset($_POST['ccode'])) { $mlls=[false,false,false,false]; $nextdone=false; $nexttwodone=false; $nextthreedone=false; $nextfourdone=false; $minlat=-90.0; $minlong=-180.0; $maxlat=90.0; $maxlong=180.0; $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 (strpos($ourtzlist, ',' . $ucc . ',') !== false) { $preohbit=explode(',' . $ucc . ',', $ourtzlist)[0]; $ohbit=explode('<', $preohbit)[-1 + sizeof(explode('<', $preohbit))]; if (strpos($ohbit, ' title="') !== false) { $tbitis=explode('"', explode(' title="', $ohbit)[1])[0]; if (sizeof(explode(',', $tbitis)) == 4) { $setrange=$tbitis; } } } 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; } } } } } } } } } if ($setrange != '' && !isset($_GET['world']) && !isset($_POST['world'])) { $url='http://chart.googleapis.com/chart?cht=map:fixed=' . $setrange . '&chs=600x350&chld=&chco=&chdl='; } else { $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 (strtolower($ucc) == 'pJUNKl' && 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); //file_put_contents('x.x', $interimurl . "\n" . $geostuff); if (strpos($geostuff, ' class="latitude">') !== false) { $xxlat=explode('<', explode(' class="latitude">', $geostuff)[1])[0]; //echo " lat is " . $xxlat; if (strpos($xxlat, 'S') !== false) { $thislat=(-1.0 * explode("°", $xxlat)[0]); } else { $thislat=(1.0 * explode("°", $xxlat)[0]); } //echo " Lat is " . $thislat; $xxlong=explode('<', explode(' class="longitude">', $geostuff)[1])[0]; //echo " long is " . $xxlong; if (strpos($xxlong, 'E') !== false) { $thislong=(-1.0 * explode("°", $xxlong)[0]); } else { $thislong=(1.0 * explode("°", $xxlong)[0]); } //echo " Long is " . $thislong; //exit; 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 " minLong is " . $minlong; //echo " minLat is " . $minlat; //echo " maxLong is " . $maxlong; //echo " maxLat is " . $maxlat; //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; } if ($setrange != '' && !isset($_GET['world']) && !isset($_POST['world'])) { $url='http://chart.googleapis.com/chart?' . $tbit . 'cht=map:fixed=' . $setrange . '&chdlp=' . $b . '&chs=600x450&chld=' . $thiscode . '&chco=' . $sixrand . '&chdls=' . $sixrand . ',6&chdl=' . urlencode($thisstate); } else { $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; //} } } file_put_contents('lasturlis.txt', $url); if (strpos($_SERVER['SERVER_NAME'], 'rjmprogramming-com-au') !== false || isset($_GET['gtover']) || isset($_POST['gtover'])) { echo ""; 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

or  

 




" . ' '; } 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; ?>