// middle_interest.js // External Javascript for middle_interest.html // RJM Programming // February, 2016 var total=1; var delay=1000; var errcnt=0; var ourl=''; var origih=''; var url=''; var ihtheme=""; var lookee=new Array("document.head.innerHTML"); // "document.URL", "document.head.innerHTML"); function docgetclass(inc, intag) { if (document.getElementsByClassName) { return document.getElementsByClassName(inc); } else { var ijl; var anarris=[]; var huhs=document.getElementsByTagName(intag); for (ijl=0; ijl 1) { //alert(86); for (ij=1; ij<=retval.length; ij++) { delim='
'; if (ij == 2 || ij == 5 || ij == 8) delim=' '; thisih=''; //alert(ocs[ij]); if (ocs.length > eval(ij)) { postocs=ocs[ij].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); for (kj=0; kj eval(1 + kj)) { if (postocs[eval(1 + kj)] != '') { if (postocs[eval(1 + kj)].indexOf('=') != -1) { //alert(postocs[eval(1 + kj)]); eqpostocs=postocs[eval(1 + kj)].split('='); turlis=decodeURIComponent(eqpostocs[1]); if (turlis.toLowerCase().indexOf("http") != 0 && turlis != '') turlis="http://www.rjmprogramming.com.au/" + turlis; if (postocs.length > eval(2 + kj)) { eqpostocs=postocs[eval(2 + kj)].split('='); bwis=decodeURIComponent(eqpostocs[1]); thisih+='' + delim; } } } } } } } //alert(thisih); if (thisih != '') retval[curb].innerHTML=thisih; curb++; } } //alert('so_url=' + sourl); if (sourl != '') { ourl=''; var asourl=document.URL.split('?'); sourl=unmap(asourl[1]); //alert(98); twoon(sourl, evia); } } function unmap(sou) { var outsou=sou; for (var i=0; i<10; i++) { outsou=outsou.replace(/0_=/g, '_=').replace(/1_=/g, '_=').replace(/2_=/g, '_=').replace(/3_=/g, '_=').replace(/4_=/g, '_=').replace(/5_=/g, '_=').replace(/6_=/g, '_=').replace(/7_=/g, '_=').replace(/8_=/g, '_=').replace(/9_=/g, '_='); } for (var ii=0; ii<10; ii++) { outsou=outsou.replace(/_0=/g, '=').replace(/_1=/g, '=').replace(/_2=/g, '=').replace(/_3=/g, '=').replace(/_4=/g, '=').replace(/_5=/g, '=').replace(/_6=/g, '=').replace(/_7=/g, '=').replace(/_8=/g, '=').replace(/_9=/g, '=').replace(/_=/g, '='); } return outsou; } function twoandon(inurl, cvia) { var outurl=inurl, one=1, preone='te', odelim='', suffix=''; var urlmore = cvia.split(preone + one + '=')[1] ? decodeURIComponent(cvia).split(preone + one + '=')[1].split('&')[0] : ''; if (urlmore == '') { urlmore = cvia.split(preone + one + '_' + one + '_' + '=')[1] ? decodeURIComponent(cvia).split(preone + one + '_' + one + '_' + '=')[1].split('&')[0] : ''; if (urlmore != '') suffix='_1_'; } var tpostocs, omyh1, tomyh1; ourl=' oc1='; ourl+=(location.search.split('oc1' + suffix + '=')[1] ? location.search.split('oc1' + suffix + '=')[1].split('&')[0] : ''); // + odelim + urlmore; odelim='&='; preone = 'oc'; while (urlmore != '') { if (one == 1) { outurl+=',' + urlmore; ourl+=odelim + urlmore; odelim='&='; urlmore = cvia.split("bw" + one + suffix + '=')[1] ? decodeURIComponent(cvia).split("bw" + one + suffix + '=')[1].split('&')[0] : ''; outurl+=',' + urlmore; ourl+=odelim + urlmore; } else { outurl+=',' + urlmore; ourl+=odelim + urlmore; odelim='&='; urlmore = cvia.split("te" + one + suffix + '=')[1] ? decodeURIComponent(cvia).split("te" + one + suffix + '=')[1].split('&')[0] : ''; outurl+=',' + urlmore; ourl+=odelim + urlmore; urlmore = cvia.split("bw" + one + suffix + '=')[1] ? decodeURIComponent(cvia).split("bw" + one + suffix + '=')[1].split('&')[0] : ''; outurl+=',' + urlmore; ourl+=odelim + urlmore; } one=eval(1 + one); if (suffix != '') suffix='_' + one + '_'; odelim='&oc1='; urlmore = cvia.split(preone + one + suffix + '=')[1] ? decodeURIComponent(cvia).split(preone + one + suffix + '=')[1].split('&')[0] : ''; } //alert(ourl); var tis=document.head.innerHTML.split("the" + "me="); if (tis.length > 1) { tpostocs=tis[1].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); omyh1=document.getElementById('myh1'); tomyh1=omyh1.innerHTML.split('<'); //alert(tpostocs[0].replace(/%20/g, ' ')); //alert(omyh1.innerHTML + ' .... ' + tpostocs[0].replace(/%20/g, ' ') + ' '); omyh1.innerHTML=omyh1.innerHTML.replace(tomyh1[0], tpostocs[0].replace(/%20/g, ' ') + ' '); tis=document.URL.split("the" + "me="); if (tis.length > 1) { tpostocs=tis[1].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); omyh1=document.getElementById('myh1'); tomyh1=omyh1.innerHTML.split('<'); //alert(omyh1.innerHTML + ' ... ' + tpostocs[0].replace(/%20/g, ' ') + ' '); omyh1.innerHTML=omyh1.innerHTML.replace(tomyh1[0], tpostocs[0].replace(/%20/g, ' ') + ' '); } twoon(document.head.innerHTML, 'td'); } else { tis=document.URL.split("the" + "me="); if (tis.length > 1) { tpostocs=tis[1].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); omyh1=document.getElementById('myh1'); tomyh1=omyh1.innerHTML.split('<'); //alert(omyh1.innerHTML + ' ... ' + tpostocs[0].replace(/%20/g, ' ') + ' '); omyh1.innerHTML=omyh1.innerHTML.replace(tomyh1[0], tpostocs[0].replace(/%20/g, ' ') + ' '); } } //twoon(ourl, 'td'); if (ourl != '') setTimeout(athen, 2000); return outurl; } function athen() { twoon(ourl, 'td'); } function bthen() { var xtis=document.URL.split("the" + "me="); var xtpostocs=xtis[1].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); var xomyh1=document.getElementById('myh1'); var xtomyh1=xomyh1.innerHTML.split('<'); xomyh1.innerHTML=xomyh1.innerHTML.replace(xtomyh1[0], xtpostocs[0].replace(/%20/g, ' ') + ' '); } function ouronload() { //alert(198); if (origih == "") origih=document.body.innerHTML; //alert(298); //var retval=document.getElementsByTagName(gettagtodo("")); //alert(398); ihtheme = location.search.split('theme=')[1] ? location.search.split('theme=')[1].split('&')[0] : ihtheme; //alert(498); delay = location.search.split('delay=')[1] ? location.search.split('delay=')[1].split('&')[0] : delay; //alert(598); url = location.search.split('oc1=')[1] ? location.search.split('oc1=')[1].split('&')[0] : url; //alert(698); if (url == '') url = location.search.split('oc1_1_=')[1] ? location.search.split('oc1_1_=')[1].split('&')[0] : url; //if (ihtheme != "") { // document.body.innerHTML+=decodeURIComponent(ihtheme); // ihtheme=""; //} //alert(98); if (url != '') { //alert('ul=' + url); if (url.toLowerCase().indexOf("http") != 0) url="http://www.rjmprogramming.com.au/" + url; //alert('url=' + url); url=twoandon(url,location.search); // location.search if (url.indexOf("/") != -1) url=encodeURIComponent(url); //changedhtml(url); } else { //alert(document.head.innerHTML); dsplit=document.title.split(" ... 0"); var xxsplit=eval(dsplit[1]); if (eval(0 + xxsplit) == eval(total) && document.head.innerHTML.indexOf("the" + "me=") != -1 && (document.head.innerHTML.indexOf("oc" + "1=") != -1 || document.head.innerHTML.indexOf("oc" + "1_1_=") != -1)) { var tis=document.head.innerHTML.split("the" + "me="); var tpostocs=tis[1].replace(/&/g,'&').replace("'","&&").replace('"','&&').split('&'); var omyh1=document.getElementById('myh1'); var tomyh1=omyh1.innerHTML.split('<'); //alert(omyh1.innerHTML); omyh1.innerHTML=omyh1.innerHTML.replace(tomyh1[0], tpostocs[0].replace(/%20/g, ' ')); twoon(document.head.innerHTML, 'td'); } } //fillarrays(''); } //alert(document.URL); if (document.URL.indexOf('ask=') == -1) { dsplit=document.title.split(" ... 0"); total = location.search.split('total=')[1] ? location.search.split('total=')[1].split('&')[0] : total; dddsplit=document.head.innerHTML.split("total="); if (dddsplit.length > 1) { //alert(4799); ddsplit=dddsplit[1].split("&"); //if (document.title.indexOf(" ... 0") == -1) { // document.title += " ... 01"; // dsplit=document.title.split(" ... 0"); //} //alert('cv=' + dsplit[1]); total=eval(ddsplit[0]); if (dsplit.length != 1) { if (document.title.indexOf(" ... 0") == -1) document.title += " ... 01"; if (eval(dsplit[1]) == eval(total)) { //alert(98); setTimeout(ouronload, delay); // only last call will get to here if total= used } //else { //alert(dsplit[1]); //} } } ddsplit=document.head.innerHTML.split("middl" + "e_interest"); //alert(799); delay = location.search.split('delay=')[1] ? location.search.split('delay=')[1].split('&')[0] : delay; if (document.title.indexOf(" ... 0") == -1) { document.title += " ... 01"; ddsplit=document.head.innerHTML.split("middl" + "e_interest"); if (total == 1) { dsplit=document.head.innerHTML.split("delay="); if (dsplit.length > 1) { ddsplit=dsplit[1].split("&"); delay=eval(ddsplit[0]); } setTimeout(ouronload, delay); //alert(0); } } else if (dsplit.length > 1) { //alert(document.head.innerHTML); xsplit=eval(dsplit[1]); document.title = document.title.replace(" ... 0" + eval(xsplit), " ... 0" + eval(1 + xsplit)); //alert('dt=' + document.title); if (eval(1 + xsplit) == eval(total)) { //alert(ddsplit.length + " ... " + eval(1 + xsplit)); dsplit=document.head.innerHTML.split("delay="); if (dsplit.length > 1) { ddsplit=dsplit[1].split("&"); delay=eval(ddsplit[0]); } setTimeout(ouronload, delay); // only last call will get to here if total= used //alert(eval(1 + xsplit)); } } if (document.URL.indexOf("the" + "me=") != -1) { setTimeout(bthen, 2100); } }