javascript:(//)
    function(){                                                      
        var g="KLO 0.001",  
       p=0, fixPEG, MMS_URL, lf= eval("'\\"+"n'" ), cr= eval("'\\"+"r'" ),
       mmr =[], useNOGT=true, outwin=null, 
	   testmode = true,    n,
       b=0, bp, gnpc=0, gnperc, newPN, ourTO=null,
   /*    l="",  */
       w=document.getElementsByTagName("body")[0],                           
       o=document.getElementById("mwtools");


       if (false) {
        n = w.childNodes; c="Children:"+w.tagName+"--";
        for (var i=0; i<n.length; i++)
          { if (1==n[i].nodeType) c+= n[i].tagName + "++"
               else if (3==n[i].nodeType) c+= "tx++"
               else c+= n[i].nodeType + "++";}
       	  alert(c);
       	  }
        if(!o){                                                      
            o=document.createElement("div");                         
            o.setAttribute("id","mwtools");                          
            o.innerHTML="";                                          
            w.insertBefore(o,w.firstChild)                           
        };
 	
 	o.innerHTML='<style type="text/css">.messages img{ margin:0 3px; vertical-align:top } .messages iframe{ margin:0 3px; border:0;  } </style><table class="messages"> <tr><td align="center"> <a href="http://rogerdmoore.ca/MW/">Rogers<br>MW Tools</a></td> <td class="title">'+g+'</td><td></td><td style="font-size:0.8em"> <a href="#" id="pa"><img src="http://rogerdmoore.ca/MW/pa.gif" title="Pause" width="14" height="14"></a> <a href="#" id="pl"><img src="http://rogerdmoore.ca/MW/pl.gif" title="Play" width="14" height="14"></a> <a href="#" id="cl"><img src="http://rogerdmoore.ca/MW/cl.gif" title="Close" width="14" height="14"></a> <form name="mwtform"><input type="hidden" name="go" id="go" value="1"></form></td></tr></table><div id=RDMDBG><table><tr><b> <td><a href="#" id="RDMURL">URL </a> <a href="#" id="RDMCLR"> Clear </a> <a href="#" id="RDMRGX"> RegX </a> <a href="#" id="RDMLST"> Mopup </a></td> </b></tr> <tr> <td><a href="#" id="RDMSTA">ReqStatus </a> <a href="#" id="RDMWIN">try1P </a> <a href="#" id="RDMEVL"> Eval </a> </td></tr>  <tr><td colspan="3"><form id="tform"> <input type=text name=inp id="inp1" size=100 maxlength=300> </form></td></tr> <tr><td width="20%">RDMV1:</td> <td id="RDMV1"></td></tr> <tr><td>RDMV2:</td><td id="RDMV2"></td></tr>  </table></div>Status:<span id="status" ></span><br><form name=PEGbut><span style="float: left;">Output format<br><input type=radio name=PEG value="HTML">HTML <input type=radio checked name=PEG   value="text">Text </span><input type=button id=RDMGO style="font-size: x-large;" value="GO"><input type=button id=RDMPAN style="font-size: x-large; color: white; background-color: red; display: none;" value="PANIC" ></form>'; 
	// alert("Klone started");
	
 function $(a) {return document.getElementById(a);}
     if (!$("pl")) {
     	useNOGT = true;
     	doCopy(); return;
     	}

       $("pl").style.display="none";                                
        $("pl").onclick=function(d){                                 
            document.mwtform.go.value=1; 
            ourTO = setTimeout(getNextPage,1000);
            $("pl").style.display="none";                            
            $("pa").style.display="inline";                          
            t("Resuming: ");                                       
            return false                                             
        };                                                           
       
       $("pa").onclick=function(d){                                 
            document.mwtform.go.value=0;                             
            if (ourTO) {clearTimeout(ourTO); ourTO=null;}
            $("pa").style.display="none";                            
            $("pl").style.display="inline";                          
            return false                                             
        };                                                           
        $("cl").onclick=function(d){ 
        	var d = $("mwtools");
 /*           delete j.onreadystatechange; */
 			if (ourTO) clearTimeout(ourTO);
            d.parentNode.removeChild(d);
            return false
        }; 
        
      $("RDMURL").onclick=function(d){
      	b=0;
      	var a= document.getElementById("inp1").value;
      	$("RDMV2").innerHTML="Loading "+a;
      	e(a);
      	return false
      };
      $("RDMCLR").onclick=function(d){$("inp1").value ="" ;$("inp1").focus(); return false};
      
      $("RDMRGX").onclick=function(d){ test(); return false};
      
      $("RDMLST").onclick=function(d){ mopup(); return false};
      
       $("RDMSTA").onclick=function(d){
       t("readyState:"+j.readyState+"  status:"+j.status);
      	return false
      };
      
	 $("RDMWIN").onclick= null; /*temp for PEG testing*/
	 
   	
 

	$("RDMEVL").onclick=function (d) {
		try{
		$("RDMV2").innerHTML=eval(document.getElementById("inp1").value).toString();
		}
		catch(er) {$("RDMV2").innerHTML=er;}
		return false
	};
 	$("RDMGO").onclick=function (d) {
 		 setPEG();
  		 doCopy();     
    }
     	
       function t(d){                                               
            $("status").innerHTML=d                                  
        }                                                            
       function y(d){                                               
            if(b>2){                                                 
                t(d+"; not retrying any more.")                      
            }else{
                setTimeout(function(){b++; t(d+"; retry #"+b+"...");
          e(x)},3000)
            }                                                        
        }                                                            

 function setPEG () {
 	useNOGT = (document.PEGbut.PEG[1].checked) 
 }


 function getOutWin() { /*early open of output tab*/
	outwin = window.open("",self.name+"X");
	/*,"width=undefined,height=undefined,scrollbars=yes"*/
	if (outwin)
		{outwin.document.title = "KLONE work";
		/*setTimeout(function () {outwin.blur()},20);*/ }
}

function doCopy(intW) { 
var a = document.documentElement.innerHTML;
	a = a.replace(/\<title\>/,"<title>KLONE ");
	intW = window.open("",self.name+"X");
if (useNOGT)
	{intW.document.write(nogtr(a));
//	intW.document.write(nogtr(document.innerHTML));
	intW.document.title = "KLONE output"
	}
else
	{intW.document.write(a);
//	intW.document.write(document.innerHTML);
	}

	intW.document.close();
	return;
  };
  
 function nogtr(a)
 	{ /*hide < > /n */
 		 	 /*UNABLE TO Represent LINEFEED*/ 
 		return nogt(a).replace(RegExp(lf,"g"),"<br>");
 	}

 function nogt(a)
	{ /*replace < > with & lt;  & gt; for HTML*/
	a=a.replace(RegExp("<","g"),"&lt;");
	a=a.replace(RegExp(">","g"),"&gt;");
	/*alert("nogt:"+a);*/
	return a
	}
	
function test()  /* search for URL to load next page*/
{ var a= document.getElementById("inp1").value;
	$("RDMV2").innerHTML=nogt(a);
/*		r = RegExp(a,"m").exec($("app10979261223_inner_page").innerHTML); */
	if (r=RegExp(a,"m").exec(l)) { $("RDMV1").innerHTML=nogt(r[1]); }
	else  { $("RDMV1").innerHTML=l.length; };
 return;
}
   
    }() 
    );