= '0' && substr($rs,(-1 + $ir),1) <= '9') $xrs.=" ";
} else if (substr($rs,$ir,1) >= '0' && substr($rs,$ir,1) <= '9') {
if (substr($rs,(-1 + $ir),1) == 'f') $xrs.=" ";
} else if (substr($rs,$ir,1) >= 'A' && substr($rs,$ir,1) <= 'Z') {
if (substr($rs,(-1 + $ir),1) != ' ') $xrs.=" ";
}
$prevlc=$lc;
$lc=substr($rs,$ir,1);
$xrs.=substr($rs,$ir,1);
}
if ($lc == " ") {
if ($prevlc == " ") {
$qqhval=$qqhval; // more to do
}
$qqhval=lookup(str_replace("Translation for English word ","",str_replace("Translation for English words ","",str_replace("Translation for English Word ","",str_replace("Translation for English Words ","",$xrs))))); //substr($xrs,0,(strlen($xrs) - 1));
}
return $xrs;
}
if (!isset($_GET['i0']) && isset($_GET['fconcept'])) { // Form findings
$prompt="\n ans=prompt('What is your Survey and/or Template Form Concept? (optionally suffix by a space then LibreOffice template HTML URL (such as //www.rjmprogramming.com.au/PHP/lo_one_new.html LibreOffice Business Letter template), and/or optionally suffix by a space then email list to have potential for those emailees to redistribute this survey further afield)', 'Survey'); \n";
if (isset($_GET['ask'])) {
$prompt="\n ans='" . urldecode($_GET['ask']) . "'; \n";
if (strpos(strtolower(str_replace('Curriculum Vitae ','',str_replace('Agenda ','',urldecode($_GET['ask'])))), 'http') === false) {
$wsb=explode("",str_replace($origlangchange,$langchange,file_get_contents('http:' . str_replace('Curriculum Vitae ','',str_replace('Agenda ','',urldecode($_GET['ask']))))))[0])[1];
} else {
$wsb=explode("",str_replace($origlangchange,$langchange,file_get_contents(str_replace('https:','http:',str_replace('Curriculum Vitae ','',str_replace('Agenda ','',urldecode($_GET['ask'])))))))[0])[1];
}
$xcvs=explode("", $wsb)[0]));
if (sizeof($xcvs) > 1) {
if (strpos($xcvs[1], "<css>") !== false) {
$huhs=explode("/*", $xcvs[1]);
if (sizeof($huhs) > 1) {
$stylestuff="*/ \n" . substr($xcvs[1], 0, (strlen($xcvs[1]) - (2 + strlen($huhs[-1 + sizeof($huhs)])))) . "\n /* ";
} else {
$stylestuff="*/ \n" . $xcvs[1] . "\n /* ";
}
}
}
}
$htmlis=$htmltop . "
" . str_replace("Survey Survey","Survey",str_replace('+',' ',urldecode($_GET['fconcept'])) . " Survey") . " Form Questions
var athing='" . $athing . "',yourlcclick=0, ilangsuffix=-1,maybesaynext='',langsuffix='" . $langsuffix . "';
var mediao=null, owo=null, say='';
var specselbit=-1;
var tahitilisten=" . $tahitilisten . ";
var iahelp=0, ahelp=[" . listurls() . "];
function askmyf() {
var ansx=prompt('Optionally enter email list to share this Curriculum Vitae or Agenda with. A subject to email other than \"Curriculum Vitae\" or \"Agenda\" can be separated after the email list by a space. Make the email list just uppercase to send email link to form, just lowercase to send a Curriculum Vitae or Agenda report only, and a mix, both of these.', '');
if (ansx != null) {
if (ansx.indexOf('@') != -1) {
var xansx=ansx.split(' ');
if (ansx[0] == ansx[0].toUpperCase() || ansx[0] != ansx[0].toLowerCase()) {
if (xansx.length > 1) {
document.getElementById('acvemail').href=document.getElementById('acvemail').href.replace('mailto:?subject=Curriculum%20Vitae','mailto:' + xansx[0].toLowerCase() + '?subject=' + encodeURIComponent(ansx.replace(xansx[0] + ' ','')));
} else {
document.getElementById('acvemail').href=document.getElementById('acvemail').href.replace('mailto:?','mailto:' + xansx[0].toLowerCase() + '?');
}
document.getElementById('acvemail').click();
}
if (ansx[0] == ansx[0].toLowerCase() || ansx[0] != ansx[0].toUpperCase()) {
document.getElementById('myf').innerHTML+=' ';
if (xansx.length > 1) {
document.getElementById('myf').innerHTML+=' ';
} else {
document.getElementById('myf').innerHTML+=' ';
}
}
}
}
}
function tcheckit(iois) {
var ians=1, dl='';
if (iois != null) {
var aconto = (iois.contentWindow || iois.contentDocument);
if (aconto != null) {
if (aconto.document) { aconto = aconto.document; }
if (aconto.body != null) {
var bih=aconto.body.innerHTML.replace(/\>\;/g,'<').replace(/\/g,'
');
var abih=bih.split(' src=\"');
for (var ibih=1; ibih 1) {
if (ans.split(' ')[eval(-1 + ans.split(' ').length)].indexOf('@') != -1) {
emaillist=ans.split(' ')[eval(-1 + ans.split(' ').length)];
document.getElementById('theto').value=emaillist;
ans=ans.replace(' ' + emaillist,'');
document.getElementById('thesubject').value=(ans + ' Survey').replace('Survey Survey','Survey') + ' Survey (ideally using Google Chrome web browser for audio input via microphone)';
if (ans.split(' ').length > 2) iioff--;
}
iioff--;
if (ans.split(' ')[eval(-1 + ans.split(' ').length)].toLowerCase().indexOf('http') != -1 || ans.split(' ')[eval(-1 + ans.split(' ').length)].toLowerCase().indexOf('//') != -1) {
templateis=ans.split(' ')[eval(-1 + ans.split(' ').length)];
document.getElementById('thetemplate').value=templateis;
document.getElementById('tiframe').src=templateis + '?goto=yes';
}
}
document.getElementById('myconcept').value=ans;
}
}
if (templateis != '') {
document.getElementById('myconcept').value=ans.replace((' ' + templateis),'');
} else {
while (ans != null) {
ans=prompt('Separate a survey question ' + ians + ' from an optional prompt via ? ... Cancel finishes questions to ask ... eg. What is your favourite colour?Favourite colour', '');
if (ans != null) {
if (ans != '') {
document.getElementById('myquestions').value+=dl + '\"' + ans + '\"';
dl=',';
ians++;
}
}
}
document.getElementById('mysf').click();
}
}
" . str_replace("Survey Survey","Survey",urldecode($_GET['fconcept']) . " Survey") . " " . $lot . "Form Questions ... another?
";
echo $htmlis;
exit;
} else if (isset($_POST['i0']) && isset($_POST['fconcept'])) { // Form findings
$joff=0;
$defbh="" . str_replace("Survey Survey","Survey",str_replace('+',' ',urldecode($_POST['fconcept'])) . " Survey") . " " . $lot . "Report ... another? email? ";
if (isset($_POST['thetemplate'])) {
if ($_POST['thetemplate'] != "") {
if (strpos(strtolower(urldecode($_POST['thetemplate'])), 'http') === false) {
$wsb=explode("",str_replace($origlangchange,$langchange,file_get_contents('http:' . urldecode($_POST['thetemplate']))))[0])[1];
} else {
$wsb=explode("",str_replace($origlangchange,$langchange,file_get_contents(str_replace('https:','http:',urldecode($_POST['thetemplate'])))))[0])[1];
}
$xcvs=explode("", $wsb)[0]));
if (sizeof($xcvs) > 1) {
if (strpos($xcvs[1], "<css>") !== false) {
$huhs=explode("/*", $xcvs[1]);
if (sizeof($huhs) > 1) {
$stylestuff="*/ \n" . substr($xcvs[1], 0, (strlen($xcvs[1]) - (2 + strlen($huhs[-1 + sizeof($huhs)])))) . "\n /* ";
} else {
$stylestuff="*/ \n" . $xcvs[1] . "\n /* ";
}
}
}
while (substr($wsb,$joff,1) != '>') {
$joff++;
}
$joff++;
$defbh=str_replace("","
",substr($wsb,$joff));
if (strpos(urldecode($_POST['thetemplate']), "Curriculum_Vitae_LibreOffice.html") !== false && strpos(urldecode($_POST['thetemplate']), "rjmprogramming.com.au") !== false) {
$defbh=str_replace("
" . str_replace("Survey Survey","Survey",str_replace('+',' ',urldecode($_POST['fconcept'])) . " Survey") . " Report
var athing='" . $athing . "',yourlcclick=0, ilangsuffix=-1,maybesaynext='',langsuffix='" . $langsuffix . "';
var mediao=null, owo=null, say='';
var iahelp=0, ahelp=[" . listurls() . "];
var dul=document.URL.split('#')[0].split('?')[0];
var argis='';
var thisresult='';
var tahitilisten=" . $tahitilisten . ";
var lastresult=' ';
function askmyf() {
var ansx=prompt('Optionally enter email list to share this Curriculum Vitae or Agenda with. A subject to email other than \"Curriculum Vitae\" or \"Agenda\" can be separated after the email list by a space. Make the email list just uppercase to send email link to form, just lowercase to send a Curriculum Vitae or Agenda report only, and a mix, both of these.', '');
if (ansx != null) {
if (ansx.indexOf('@') != -1) {
var xansx=ansx.split(' ');
if (ansx[0] == ansx[0].toUpperCase() || ansx[0] != ansx[0].toLowerCase()) {
if (xansx.length > 1) {
document.getElementById('acvemail').href=document.getElementById('acvemail').href.replace('mailto:?subject=Curriculum%20Vitae','mailto:' + xansx[0].toLowerCase() + '?subject=' + encodeURIComponent(ansx.replace(xansx[0] + ' ','')));
} else {
document.getElementById('acvemail').href=document.getElementById('acvemail').href.replace('mailto:?','mailto:' + xansx[0].toLowerCase() + '?');
}
document.getElementById('acvemail').click();
}
if (ansx[0] == ansx[0].toLowerCase() || ansx[0] != ansx[0].toUpperCase()) {
document.getElementById('myf').innerHTML+=' ';
if (xansx.length > 1) {
document.getElementById('myf').innerHTML+=' ';
} else {
document.getElementById('myf').innerHTML+=' ';
}
}
}
}
}
function initemail() {
document.getElementById('aemail').href=document.getElementById('aemail').href.replace(/\ /g,'%20').replace(/\+/g,'%20') + encodeURIComponent(dul + '?fconcept=') + encodeURIComponent('" . str_replace("'","' + String.fromCharCode(39) + '",str_replace("Survey Survey","Survey",($_POST['fconcept']) . " Survey")) . " Report&" . "').replace(/\%20/g,'+');
fixemail();
}
function fixemail() {
var prerest=document.getElementById('aemail').href.split('?subject=')[1].split('&body=')[0];
var rest=document.getElementById('aemail').href.split('&body=')[1].split('php')[1];
document.getElementById('aemail').href=document.getElementById('aemail').href.split('?subject=')[0] + '?subject=' + (prerest) + '&body=' + encodeURIComponent('https://www.rjmprogramming.com.au/PHP/speech_supervisor.php') + (rest).replace(/\%20/g,'+');
}
" . $defbh . "
";
$ival=0;
if ($joff == 0) {
if (isset($_POST['s' . $ival])) {
$htmlis=str_replace("", "", $htmlis);
} else {
$htmlis=str_replace("", "", $htmlis);
}
}
while (isset($_POST['i' . $ival])) {
if ($joff != 0) {
$farr=explode("<" . str_replace("`","'",str_replace("+"," ",urldecode($_POST['s' . $ival]))) . ">", $htmlis);
if (sizeof($farr) <= 2) {
$htmlis=str_replace("<" . str_replace("`","'",str_replace("+"," ",urldecode($_POST['s' . $ival]))) . ">", str_replace("+"," ",urldecode($_POST['i' . $ival])), $htmlis);
} else {
$prehtml=$farr[0] . "<" . str_replace("`","'",str_replace("+"," ",urldecode($_POST['s' . $ival]))) . ">";
$posthtml=str_replace("<" . str_replace("`","'",str_replace("+"," ",urldecode($_POST['s' . $ival]))) . ">", str_replace("+"," ",urldecode($_POST['i' . $ival])), $prehtml);
$htmlis=str_replace($prehtml, $posthtml, $htmlis);
}
} else {
if (isset($_POST['s' . $ival])) {
$htmlis=str_replace("", " " . urldecode($_POST['s' . $ival]) . " " . urldecode($_POST['i' . $ival]) . " ", $htmlis);
$htmlis=str_replace("function fixemail() {", "function fixemail() { document.getElementById('aemail').href+=encodeURIComponent('s" . $ival . "=" . str_replace("'","' + String.fromCharCode(39) + '",($_POST['s' . $ival])) . "&'); ", $htmlis);
$htmlis=str_replace("function fixemail() {", "function fixemail() { document.getElementById('aemail').href+=encodeURIComponent('i" . $ival . "=" . str_replace("'","' + String.fromCharCode(39) + '",($_POST['i' . $ival])) . "&'); ", $htmlis);
} else {
$htmlis=str_replace("", "" . urldecode($_POST['i' . $ival]) . " ", $htmlis);
$htmlis=str_replace("function fixemail() {", "function fixemail() { document.getElementById('aemail').href+=encodeURIComponent('i" . $ival . "=" . str_replace("'","' + String.fromCharCode(39) + '",($_POST['i' . $ival])) . "&'); ", $htmlis);
}
}
$ival++;
}
if (isset($_POST['theto'])) {
if (strpos(urldecode($_POST['theto']), "@") !== false) { // && strpos($htmlis, "