\n";
echo " \n";
//echo " \n";
if ($dbval != '' && isset($_GET['tally'])) {
echo " \n";
} else if ((!isset($_GET['desc']) && !isset($_POST['desc']))) {
echo " \n";
} else {
echo " \n";
}
echo " " . $GETtitle . " Histogram
\n";
?>
Another histogram?
' . "\n";
echo " function later() { \n" . ' var datalineprefix = " "; ' . "\n";
echo ' var datalinesuffix = ""; ' . "\n";
echo ' var extra = ""; ' . "\n";
echo ' var thisline = 1; ' . "\n";
echo ' var totalleft = 100.0; ' . "\n";
echo ' if (("" + document.referrer).indexOf("/PieChart") == -1 && (documentURL + "&").toLowerCase().indexOf("&val1=p&") != -1) { selectevent("p"); } ' . "\n";
echo ' var sfbits=[], nfgval=0, fgval="", datalinesuffix = ""; ' . "\n";
if ($tally_poll_template != "") {
echo ' tally_poll_template="' . $tally_poll_template . '"; ' . "\n";
echo ' sfbits=tally_poll_template.split("&data=");' . "\n";
echo ' if (fgval.length <= 0) { while (fgval.length <= 0) { fgval = prompt("Enter Tally Polling numbers either comma separated or we see it as a one character representation (where space separated prefixing [character]=Label list will be honoured). A plus + at end of list means you want to add more.", ""); if (fgval == null) { fgval=" "; tally_poll_template=sfbits[0].split("?")[0]; } nfgval=fgval.length; if (nfgval <= 0) { fgval=""; } } } else { fgval=analyze_return(fgval, sfbits[0]); } ' . "\n";
echo ' window.location = tally_poll_template; ' . "\n";
} else {
if ($dbval != "") {
echo ' if (documentURL.indexOf("tally=") != -1) { ' . "\n";
echo ' tally_poll_template="https://www.rjmprogramming.com.au/PHP/HistogramChart/histogram_chart.php?title=Tally&task=Tally&desc=Count&data=,%20[~a~,7]%20,%20[~b~,8]%20,%20[~m~,3]"; ' . "\n";
echo ' sfbits=tally_poll_template.split("&data=");' . "\n";
echo ' if (fgval.length <= 0) { while (fgval.length <= 0) { fgval = prompt("Enter Tally Polling numbers either comma separated or we see it as a one character representation (where space separated prefixing [character]=Label list will be honoured). A plus + at end of list means you want to add more.", ""); if (fgval == null) { fgval=" "; tally_poll_template=sfbits[0].split("?")[0]; } nfgval=fgval.length; if (nfgval <= 0) { fgval=""; } } } else { fgval=analyze_return(fgval, sfbits[0]); } ' . "\n";
echo ' window.location = tally_poll_template; ' . "\n";
echo ' } else { ' . "\n";
echo ' var title = prompt("Enter Histogram Title (suffix by &onclick=y for added onclick functionality)", "' . $GETtitle . '"); ' . "\n";
echo ' } ' . "\n";
} else {
echo ' var title = prompt("Enter Histogram Title (suffix by &onclick=y for added onclick functionality)", "' . $GETtitle . '"); ' . "\n";
}
echo ' if (title != null) { ' . "\n";
echo ' var task = prompt("Enter Subject of Study", "' . $GETtask . '"); ' . "\n";
echo ' var desc = prompt("Enter " + task + " Measure", "' . $GETdesc . '"); ' . "\n";
echo ' var datac = ""; ' . "\n";
echo ' var sq = "' . "'" . '"; ' . "\n";
echo ' datalineprefix = prompt("Enter " + task + " Name " + thisline, ""); ' . "\n";
echo ' while (datalineprefix.length != 0 && (desc.indexOf("ercent") == (0 - 1) || desc.indexOf(" ercent ") != (0 - 1) || (desc.indexOf("ercent") != (0 - 1) && totalleft > 0))) { ' . "\n";
echo ' if (datalinesuffix.length != 0) datalineprefix = prompt("Enter " + task + " Name " + thisline + lastbit, ""); ' . "\n";
echo ' if (datalineprefix == null) { ' . "\n";
echo ' datalineprefix = ""; ' . "\n";
echo ' if (nojwinextra != "") allowed=false; ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (datalineprefix.length != 0) { ' . "\n";
echo ' extra = ""; ' . "\n";
echo ' if (desc.indexOf("ercent") != (0 - 1) && desc.indexOf(" ercent ") == (0 - 1)) extra = " (for " + totalleft + " enter nothing or hit Cancel button)"; ' . "\n";
echo ' datalinesuffix = prompt("Enter " + datalineprefix + " " + desc.replace(" ercent ", "") + " " + thisline + extra, "0"); ' . "\n";
echo ' if (datalinesuffix == null && desc.indexOf("ercent") != (0 - 1) && desc.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) && desc.indexOf("ercent") != (0 - 1) && desc.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (eval(datalinesuffix) > eval(totalleft) && desc.indexOf("ercent") != (0 - 1) && desc.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' datalinesuffix = eval(totalleft); ' . "\n";
echo ' totalleft = 0; ' . "\n";
echo ' } else if (eval(datalinesuffix) > eval(totalleft) && desc.indexOf("ercent") == (0 - 1) && desc.indexOf(" ercent ") == (0 - 1)) { ' . "\n";
echo ' desc = desc + " ercent "; ' . "\n";
echo ' } else { ' . "\n";
echo ' totalleft = eval(totalleft) - eval(datalinesuffix); ' . "\n";
echo ' } ' . "\n";
echo ' datac = datac + ", [~" + datalineprefix + "~," + datalinesuffix + "] "; ' . "\n";
echo ' thisline++; ' . "\n";
echo ' } else { ' . "\n";
echo ' if (nojwinextra != "") allowed=true; ' . "\n";
echo ' } ' . "\n";
echo ' } ' . "\n";
echo ' if (allowed) window.location = "./histogram_chart.php?title=" + title + "&task=" + task + "&desc=" + desc.replace(" ercent ", "") + nojwinextra + "&data=" + datac; ' . "\n";
echo "} \n";
}
echo "} \n" . '' . "\n";
}
?>