\n";
echo " \n";
echo "
\n";
echo "" . "\n";
echo " " . $GETtitle . " Sankey Diagram
\n";
echo '' . " \n";
echo '
Another Sankey Diagram?' . " \n";
if (!isset($_GET['value'])) {
echo '<' . 'script' . '>' . "\n " . " function later() { \n" . ' var datalineprefix = " "; ' . "\n";
echo ' var datalinesuffix = ""; ' . "\n";
echo ' var extra = ""; ' . "\n";
echo ' var comma=""; ' . "\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 Sankey Diagram Title", "' . $GETtitle . '"); ' . "\n";
echo ' if (title != null) { ' . "\n";
echo ' var label = prompt("Enter Sankey Diagram From,To Concepts (separated by ,)", "' . $GETlabel . '"); ' . "\n";
echo ' var value = prompt("Enter Sankey Diagram " + label + " Value Concept", "' . $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 " + datalineprefix + " " + value.replace(" ercent ", "") + " " + thisline + extra, thisdef); ' . "\n";
echo ' datalineprefix = datalineprefix.replace(\'"\',"\'"); ' . "\n";
echo ' if (datalineprefix.indexOf(",") != -1 && datalineprefix.indexOf("\'") == -1) datalineprefix = datalineprefix.replace(",","\',\'"); ' . "\n";
//echo ' datalineprefix = datalineprefix.replace(String.fromCharCode(92),""); ' . "\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 + comma + " [~" + datalineprefix + "~," + datalinesuffix + "] "; ' . "\n";
echo ' comma=","; ' . "\n";
echo ' thisline++; ' . "\n";
echo ' } ' . "\n";
echo ' } ' . "\n";
echo ' window.location = "./sankey_diagram.php?title=" + title + "&label=" + label + "&value=" + value.replace(" ercent ", "") + "&data=" + datac; ' . "\n";
echo "} \n" . "} \n" . '' . 'script' . '>' . "\n";
}
?>