"; $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; } } $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"; $types = ["audio/wav","audio/x-wav","audio/x-pn-realaudio","audio/x-mpegurl","audio/x-aiff","audio/x-aifc","audio/mpeg","audio/mid", "audio/basic","audio/ogg","video/x-sgi-movie","video/x-msvideo","video/quicktime","audio/mp3","video/mp4","video/mpeg", "video/x-la-asf","video/ogg","video/webm","audio/mp4", "image/jpeg", "image/jpeg", "image/png", "image/gif", "image/bmp", "image/tif", "text/html", "text/html", "text/html", "text/javascript", "text/css", "text/plain", "text/xml", "text/csv", "application/vnd.ms-word", "application/vnd.openxmlformats-officedocument.wordprocessingml.document", "application/x-php", "application/pdf", "application/vnd.openxmlformats-officedocument.presentationml.presentation", "application/vnd.ms-powerpoint", "application/vnd.ms-excel", "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"]; $exts = [".wav",".wav",".ram",".m3u",".aiff",".aifc",".mp3",".rmi", ".snd",".ogg",".movie",".avi",".mov",".mp3",".m4v",".mpeg", ".lsx",".ogv",".webm",".m4a", ".jpg", ".jpeg", ".png", ".gif", ".bmp", ".tif", ".htm", ".html", ".htmls", ".js", ".css", ".txt", ".xml", ".csv", ".doc", ".docx", ".php", ".pdf", ".pptx", ".ppt", ".xls", ".xlsx"]; $GETextraopts = ""; if (isset($_GET['extraopts'])) { $GETextraopts = str_replace("+"," ",urldecode($_GET['extraopts'])); } if (isset($_POST['extraopts'])) { $GETextraopts = str_replace("+"," ",urldecode($_POST['extraopts'])); } $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; } ?> Bar Chart - RJM Programming - //www.rjmprogramming.com.au (Copyright © 2013 rjmprogramming.com.au all rights reserved.) \n"; echo " \n"; if ($GETonclick != "") { if ($superimposition == "") { echo " \n"; } else { echo " \n"; } } else { echo " \n"; } echo "

" . $GETtitle . " Bar Chart

\n"; echo $bdivstart; echo '

' . $bdivend . '

' . " \n"; echo 'Another area/column/line/bar 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 Bar 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=[B] or A 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 Bar Concept", "' . $GETlabel . '"); ' . "\n"; echo ' var value = prompt("Enter Bar " + 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("./bar_chart.php?title=" + title + yonclick + "&label=" + label + "&value=" + value.replace(" ercent ", "") + nojwinextra + "&data=" + datac); if (wl != "#") { window.location=wl; } } ' . "\n"; echo "} \n" . "} \n"; } else { echo " } \n"; } echo '' . "\n"; ?>