"; $datavalis=explode("=", ('' . $_SERVER['QUERY_STRING']))[1]; $bitsbetween=["?title=", "&onclick=y&label=", "&value=", "&data="]; $bitsap=explode("__", explode("=", explode("?", ('?' . $_SERVER['QUERY_STRING']))[1])[0]); for ($iuy=0; $iuy", " method=POST>", $proposedform); $urlbase.=$bitsbetween[$iuy] . '' . str_replace(" ", "%20", str_replace("+"," ",urldecode($datavalis))); } else { $proposedform=str_replace(" method=POST>", " method=POST>", $proposedform); $urlbase.=$bitsbetween[$iuy] . '' . str_replace("%2C", ",", str_replace("_", "%20", urlencode($bitsap[$iuy]))); } } if (strlen($urlbase) > 800) { echo $proposedform; } else { header('Location: ' . $urlbase); } exit; } } $GETextraopts = ""; if (isset($_GET['extraopts'])) { $GETextraopts = str_replace("+"," ",urldecode($_GET['extraopts'])); } if (isset($_POST['extraopts'])) { $GETextraopts = str_replace("+"," ",urldecode($_POST['extraopts'])); } $https = "http://"; $portbit = ":" . $_SERVER['SERVER_PORT']; if(isset($_SERVER['HTTPS'])) { if ($_SERVER['HTTPS'] == "on") { $https = "https://"; $portbit = ""; } } else if ($portbit == ":80") { $portbit = ""; } $superimposition=""; $overlay=""; $bdivstart=""; $bdivend=""; $cdivc="background-color: yellow;"; $nondefs=""; $op="0.5"; $tpy="0"; $lfx="0"; $amwv=false; if ((strpos($_SERVER['HTTP_USER_AGENT'], 'Mobile/') !== false) && (strpos($_SERVER['HTTP_USER_AGENT'], 'Safari/') == false)) { $amwv=true; } function retval($inv) { if (strpos($inv, "E-") !== false) return "0"; return $inv; } ?> Area Chart - RJM Programming - http://www.rjmprogramming.com.au (Copyright © 2013 rjmprogramming.com.au all rights reserved.) \n"; echo " \n"; echo " \n"; echo "

" . $GETtitle . " Area Chart

\n"; echo $bdivstart; echo '
' . $bdivend . '
' . " \n"; echo 'Another bar/column/line/area chart?' . " \n"; echo '
'; echo '<' . 'script' . '>' . "\n " . " function later() { \n"; if (!isset($_GET['value']) && !isset($_POST['value'])) { echo " if (document.getElementById('safariform')) { document.getElementById('safariform').style.top='70px'; } " . "\n"; echo ' var datalineprefix = " "; ' . "\n"; echo ' var datalinesuffix = ""; ' . "\n"; echo ' var 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 Area Chart Title (background image URL or background image data URI ; separated (followed by ;) before title are available options, and suffix by &onclick=y for added onclick functionality, Email Attachment Title suffixes are &emailto=[emailTo] &emailsubject=[EmailSubject] and &top=[0], &left=[0], &opacity=[0.5], &overlay=[A] or B or C or L (and appended ,[~2010~,45,67] type data sets of overlay data, can be different to entries later) for superimposition purposes available)", "' . $GETtitle . '"); ' . "\n"; echo ' if (title != null) { ' . "\n"; echo ' var label = prompt("Enter Area Concept", "' . $GETlabel . '"); ' . "\n"; echo ' var value = prompt("Enter Area " + label + " Measure(s) (separated by ,)", "' . $GETvalue . '"); ' . "\n"; echo ' if (value.indexOf(",") != (0 - 1)) { ' . "\n"; echo ' for (ii=0; ii 0))) { ' . "\n"; echo ' if (datalinesuffix.length != 0) datalineprefix = prompt("Enter " + label + " " + thisline + " (for no more hit Cancel button)", ""); ' . "\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 ' datalinesuffix = prompt("Enter " + value.replace(" ercent ", "") + " " + thisline + extra, thisdef); ' . "\n"; echo ' if (datalinesuffix == null && value.indexOf("ercent") != (0 - 1) && value.indexOf(" ercent ") == (0 - 1)) datalinesuffix = totalleft; ' . "\n"; echo ' if (datalinesuffix == null) datalinesuffix = "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 ' datac = datac + ", [~" + datalineprefix + "~," + datalinesuffix + "] "; ' . "\n"; echo ' thisline++; ' . "\n"; echo ' } ' . "\n"; echo ' } ' . "\n"; echo ' if (allowed) { var wl = toolong("./area_chart.php?title=" + title + "&label=" + label + "&value=" + value.replace(" ercent ", "") + nojwinextra + "&data=" + datac); if (wl != "#") { window.location=wl; } } ' . "\n"; echo "} \n" . "} \n"; } else { echo " } \n"; } echo '' . "\n"; ?>