IndexStrg='<HR><A HREF="COVER_WARREN_WOLVERINE.HTML">warren_wolverine</A><HR>'
IndexStrg+='<OL>'
IndexStrg+='<LI><A HREF="index.html" onClick="mailthis()" ><small>'
IndexStrg+='INDEX.</small></A>'
IndexStrg+='<LI><A HREF="warren_wolverine.html" onClick="mailthis()" ><small>'
IndexStrg+='WARREN_WOLVERINE.</small></A>'
IndexStrg+='<LI><A HREF="warren_wolverine_2.html" onClick="mailthis()" ><small>'
IndexStrg+='WARREN_WOLVERINE_2.</small></A>'
IndexStrg+='<LI><A HREF="warren_wolverine_3.html" onClick="mailthis()" ><small>'
IndexStrg+='WARREN_WOLVERINE_3.</small></A>'
IndexStrg+='<LI><A HREF="warren_wolverine_4.html" onClick="mailthis()" ><small>'
IndexStrg+='WARREN_WOLVERINE_4.</small></A>'
IndexStrg+='</OL>'
//--------------------end of main Index-------ILUSTRA-- Global vars-------------------------------
//--------------------------- Copyright Charles Fisk Ilustra all rights reserved 1999-2003------------------------------------"
About = "warren_wolverine"
scrW=screen.width;
scrH=screen.height;  //alert('W:'+scrW +' H:'+ scrH);
OPTw=Math.floor(scrW/1.3);
OPTh=Math.floor(scrH/1.3);scrHR=Math.floor(OPTw*.95);
xx=50  //picture position
yy=54
elemCollection=""
notebook=''
notectr=0
newdata=1
 eStamp='<button id="Oemail" style="position: absolute; top: 15px; font-size: 10pt;'
 eStamp+='visibility: hidden; background-color: white;width:50" '
 eStamp+='onClick="CollectData()" Title="Collect notes in Notebook">Write</button>'
//---------------------------------help--------------------------------------------------
help='<H4>To Search Over The Document</H4>'
help+='<UL><font color="green"><B>Move the Mouse over the document;<BR>'
help+='<i>Subjects</i> will be framed in a yellow box;<BR>'
help+='move the mouse out of the box and the frame disappears. '
help+='</B></font></UL>'
help+='<BR><H4>To Identify A <i>Subject</i> (like the face of a person), Within The Document</H4>'
help+='<OL><LI>Place the mouse over the <i>Subject</i> and Click </LI>'
help+='<LI>A "Red Box" will appear over or close to the <i>Subject</i></LI>'
help+='<LI><Button><small>Write</small></button>will appear beside the "Red Box"</LI>'
help+='<UL><LI>You can move and resize the "Red Box"</LI>'
help+='<LI>To move the "Red Box", click on any border, a "Cross Arrow" symbol will appear.</LI>'
help+='<LI>Hold the mouse down, drag the box and place it over the <i>Subject</i>.</LI>'
help+='<LI>To re-size the "Red Box", notice the small white squares on the edges of the "RED BOX"</LI>'
help+='<LI>Place the mouse over the small white squares, hold the left mouse button down and stretch the "Red Box"</LI>'
help+='</UL>'
help+='<LI>Once the "Red Box" correctly surrounds the <i>Subject</i>:</LI>'
help+='<UL><LI>Click on <button><small>Write</small></button> and use the <FONT COLOR="RED"> "Ilustra Pad"</FONT></LI>'
help+='<LI> in the <FONT COLOR="RED">Name</FONT> area provide an identifier for the <i>Subject</i>.</LI>'
help+='<LI> in the <FONT COLOR="RED">Data</FONT> area provide additional information about the <i>Subject</i>.</LI>'
help+='<LI> Click on <BUTTON><small>Write</small></BUTTON>to collect the information about the selected <i>Subject</i>.</LI>'
help+='<LI> The collected information can be viewed in the <FONT COLOR="RED">Notebook</FONT>.</LI>'
help+='</UL></OL>'
help+='<H4>To Add Information To A Previously Identified <i>Subject</i></H4>'
help+='<OL><LI>Double click inside the "Yellow Box" that identifies the <i>Subject</i>.</LI>'
help+='<LI>"In the <FONT COLOR="RED"> "Ilustra Pad"</FONT>, write additional information about the <i>Subject</i>.</LI>'
help+='<LI> Click <BUTTON><small>Write</small></BUTTON> to collect the information about the selected <i>Subject</i>.</LI>'
help+='<LI> The collected information can be viewed in the<FONT COLOR="RED"> Notebook</FONT></LI>'
help+='</OL>'
help+='<H4>To See The Notebook And Send An E-Mail With The Collected Information</H4>'
help+='<OL><LI>Click on Help/Send Mail </LI>'
help+='<LI>Click on Notebook</LI>'
//help+='<LI>See the Notes</LI><LI>Click on<button><small>Copy</small></button>Copy Notebook contents to the clipboard</LI>'
help+='<LI>Click on<button><small>Close</small></button>To Close the Notebook</LI>'
help+='<LI><font color="red">If the album is e-mail enabled:</font><BR> Click on<button><small>e-mail</small></button>To Send the Collected Notes</LI>'
help+='</OL>'
help+='<H4>To Send An E-Mail With The Collected Information</H4>'
help+='<OL><LI>Click on Help/Send Mail </LI>'
help+='<LI><font color="red">If the album is e-mail enabled:</font><BR>Click on e-mail</LI>'
//help+='<UL><LI ><font color="red">Note:Sending the e-mail clears Notebook</font></LI></UL>'
help+='</OL>'
help+='<H4>Using the Index</H4><OL>'
help+='<LI>Click on Index</LI><LI>Click on the page you want to see</LI><LI><FONT COLOR="RED"><B>Choose "Read About" to see a detailed article about the current document.</FONT></B></LI>'
help+='<UL>Changing indexes causes automatic e-mail of the current document; if e-mail is enabled.</UL></OL>'
help+='<H4>To Fit Image On The Monitor</H4>'
help+='<OL><LI>Click on Size</LI>'
help+='<LI>Click on Best Fit</LI></OL>'
help+='<H4>To Change To Original Image Size</H4>'
help+='<OL><LI>Click on Size</LI>'
help+='<LI>Click On Original View</LI></OL>'
help+='<H4>To Find a <i>Subject</i></H4>'
help+='</B></font>'
help+='<LI>Click on<font color="red"> Find</font></LI>'
help+='<LI>Click On The <i>Subject</i></LI>'
help+='<UL><LI>The element will be surrounded by a yellow box</LI></UL><BR><P><HR> '
//---------------------copythis() to the clipboard-----------------------------
function copythis()
{
  clpbrd= document.all["InnerMail"].innerText;
  toclipboard.innerText=clpbrd;
  Copied = toclipboard.createTextRange();
  Copied.execCommand("RemoveFormat")
  Copied.execCommand("Copy");
 // document.all["InnerMail"].style.color="red"
 }
//---------------------pastethis()-from the clipboard----------------------------
function pastethis()
{
  Copied =document.all["clipBOARD"].createTextRange();
  Copied.execCommand("Paste");
  clpbrd= document.all["clipBOARD"].innerText;
 //alert("Read from clipboard using pastethis: " + clpbrd);
  document.all["InnerMail"].innerText=clpbrd;
  //document.all["InnerMail"].style.visibility="visible";
  return clpbrd;
}
//------------------------------------- function InitializeCP()
function InitializeCP()
{
  clip=pastethis()
  expected= '/*['+ About + '] [' + titl + ']*/'
  keyIlustra= clip.indexOf(expected,0);//alert("InitializeCP KEY= " + keyIlustra);
  if (keyIlustra == -1)
        {
           clip=expected
        }
  notebook = clip
  document.all["InnerMail"].innerText=notebook
  copythis();
  //CollectTEXT;
 }
//-----------------function CollectTEXT()--------------------------------
function CollectTEXT()
{ response = escape(document.all["notes"].value);titl =document.all["TTL"].innerHTML
 rsplit = response.split("%0D%0A");response = rsplit.join(' '); response = unescape(response);
  responseID=document.all["identity"].value
  addThis = "'" + mapCoord + '= "' + '{' + responseID + '} '   + response +'"' +  "',"
  clip=pastethis()
   expected= '/*['+ About + '] [' + titl + ']*/'
    keyIlustra= clip.indexOf(expected);//alert("InitializeCP KEY= " + keyIlustra);
      if (keyIlustra == -1)
        {
            clip=expected
        }
    headCP=clip.split("*/")[0]+"*/"
    bodyCP=clip.split("*/")[1]
    notebook = headCP + ' ' + addThis + bodyCP
    document.all["InnerMail"].innerText=notebook
    elemCollection = notebook ;
    //alert("CollectTEXT " + elemCollection);
    toclipboard.innerText=elemCollection;
    Copied = toclipboard.createTextRange();
    Copied.execCommand("RemoveFormat")
    Copied.execCommand("Copy");
   CloseTEXT();
   return elemCollection;
}
//----------------------------------------
function CloseTEXT()
{ document.all["InnerMail"].style.color="green"
  document.all["writeIT"].style.visibility="hidden"
  document.all["InnerMail"].innerHTML = notebook
  document.all["notes"].value =""
}
//-----------------------------------------
function EraseTEXT()
{
 document.all["writeIT"].style.visibility="hidden"
 document.all["notes"].value=""
}
//----------------------------function buildCollection()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function buildCollection(response)
{ alert("buildCollection is deprecated");
}
//----------------function CollectData()---Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function CollectData()
 { newdata=1
  document.all["identity"].value=""
  document.all["notes"].value=""
  nameID=""
  varQuery='Enter new information'
  R1=document.all["grid"].style.left; //event.clientX or  event.x or document.all["grid"].style.left;
  R1=splitNUM(R1);
  R2=document.all["grid"].style.top; // event.clientY or  event.y or document.all["grid"].style.top ;
  R2=splitNUM(R2);
  WI=splitNUM(document.all["grid"].style.width);
  HI=splitNUM(document.all["grid"].style.height);
  mapCoord='X'+ R1 + 'X' + R2 + 'X' + WI+ 'X' + HI ;
  window.status=mapCoord;
document.all["writeIT"].style.left=eval(R1);document.all["writeIT"].style.top=eval(R2)+eval(HI); document.all["writeIT"].style.visibility="visible"
 }
//---------------function CollectReverse()---Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function CollectReverse(NimgH,NimgW,OimgH,OimgW)
{ newdata=1
  document.all["identity"].value=""
  document.all["notes"].value=""
  nameID=""
  varQuery='Enter new information'
  R1=document.all["grid"].style.left; //event.clientX or  event.x or document.all["grid"].style.left;
  x=eval(splitNUM(R1));
  R2=document.all["grid"].style.top; // event.clientY or  event.y or document.all["grid"].style.top ;
  y=eval(splitNUM(R2));
  WI=splitNUM(document.all["grid"].style.width);
  HI=splitNUM(document.all["grid"].style.height);
  k=yy;m=xx;  //55 and 50
  b=WI;       //alert(b);
  c=HI;      // alert(c);
  h=NimgH;   // alert(h);
  w=NimgW;    //alert(w);
  L=OimgW ;   //alert(L);
  A=OimgH ;   //alert(A);
        pY = Math.ceil(55+ ( (y-55) * A/h ) );//alert(pY)
        pX = Math.ceil(50+ ( (x-50) *L/w )  );//alert(pX)
         wp=Math.floor(b*L/w)
         hp=Math.floor(c*A/h)
  mapCoord = "X" + pX + "X" + pY + "X" + wp + "X" + hp;
  window.status=mapCoord;
document.all["writeIT"].style.left=posX;document.all["writeIT"].style.top=posY;  document.all["writeIT"].style.visibility="visible";
  document.all["Semail"].style.visibility="hidden" ;
}
//-------------------function AddMoreData(id)---Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function AddMoreData(id)
 {newdata=0
  mapCoord=id
  varQuery='Enter additional information '
  R1=eval('document.all["'+id+'"].style.left');
  R2=eval('document.all["'+id+'"].style.top');
  WI=eval('document.all["'+id+'"].style.width');
  HI=eval('document.all["'+id+'"].style.height');
  whoISIT=eval('document.all["'+id+'"].innerHTML');
  window.status=eval(id);
  priorinfo=whoISIT.split('"')[1]
  nameID=priorinfo.split('}')[0]
  nameID=nameID.split('{')[1]
  nameINFO=priorinfo.split('}')[1];//alert(whoISIT);
   document.all["notes"].value  =(whoISIT.split('}')[1]).split('"')[0]
   document.all["identity"].value=nameID
document.all["writeIT"].style.left=R1;document.all["writeIT"].style.top=R2+HI;  document.all["writeIT"].style.visibility="visible";
 }
//----------------------------function showNotes()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function showNotes()
{ //closeTEXT()
  document.all["xmail"].style.visibility="visible"
 }
//----------------------------function hideNotes()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function hideNotes()
{
  document.all["xmail"].style.visibility="hidden"
 }
//----------------------------function mailthis()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function mailthis()
{mailx='mailto:findings@chuquicamata.net?subject= ' + About;
 sendthis=pastethis();disabled='e-mail has not been enabled for this album';mustHave="*/ 'X";
 if(sendthis.indexOf(mustHave,0)>0){
 mailx=mailx+'&body= ' + escape(sendthis);
 if(mailx.indexOf('noemail@ignore.no',0)==-1){window.location=mailx;}
 if(mailx.indexOf('noemail@ignore.no',0)>0){window.status=disabled;}}document.all["clipBOARD"].innerText='';}
 //---------------------------function Article()--Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
  function Article()
{
  { InitializeCP()
  scrW=Math.floor(screen.width/2);
  scrH=Math.floor(screen.height/2);
  if(OimgW > OimgH)
    {
     NimgW=scrW;   //new image width set to screen width
     NimgH=Math.floor((NimgW*OimgH)/OimgW);
    }
  if(OimgH> OimgW)
    {
     NimgH=scrH;   //new image width set to screen width
     NimgW=Math.floor((NimgH*OimgW)/OimgH);
    }
 window.status="Orig Wdth:" + OimgW +" Orig Hgt:" + OimgH + "New Wdth: " + NimgW + " New Hgt:" + NimgH
 htm='<HTML><HEAD><TITLE id=TTL>' + titl + '</TITLE> '
 htm+='<SCRIPT SRC="' + xchgblk(titl) + '_iltr.js"></script> '
 htm+='<SCRIPT SRC="'+ xchgblk(ILUILTR) + '"></script> '
 htm+='</head><BODY> '
  xstrgI = htm + '<IMG SRC="'+ ILUIMG + '" ALT="Document best fit to screen" '
  xstrgI += ' style="position:absolute;top:55;left:50;z-index:100" '
  xstrgI += ' width =' + NimgW + ' height= ' + NimgH
  xx=NimgH + ',' + NimgW + ',' + OimgH + ',' + OimgW
  xstrgI += ' onClick="MinimouseXY(' + xx + ')" > '
  xstrgI +='<span id="news" style="position:absolute;top:55;left:' +(55 + NimgW) +'px">'
  xstrgI += tellIT + '</span>'
  h=NimgH
  w=NimgW
  L=OimgW
  A=OimgH
  wpos=Math.ceil(1.3*50*w/L)
  hpos=Math.ceil(1.3*50*h/A)
  if ((L<(screen.width/2)) && (A<(screen.height/2)))
    {
    wpos=50;
    hpos=50;
    w=L;
    h=A;
    }
  xstrgI += '<DIV CONTENTEDITABLE="true" style="visibility:hidden;"> '
  xstrgI += '<DIV ID="grid" style="width:' + wpos +'px;height:' + hpos +'px;border:none; '
  xstrgI += 'position:absolute;left:50px;top:55px;background-color:transparent;z-index:-100;visibility:hidden"  '
  xstrgI += ' Title="Double click when selected area is ready" >&nbsp;</DIV> '
  xstrgI += '</DIV> '
 for (i=0;i<identities.length;i++)
  {
   thisIS=identities[i].split("=");
   whereIS=thisIS[0];
   whereIS=whereIS.split(" ");
   whereIS=whereIS[0];
   whoIS=thisIS[1];
   //alert(identities[i]);
   eval(identities[i]);
   coord=whereIS;
   who=whoIS;
   //alert(coord)
  arrayC=coord.split('X');
  k=yy;m=xx;  //55 and 50
  X=arrayC[1]
  Y=arrayC[2]
  b=arrayC[3]
  c=arrayC[4]
  h=NimgH
  w=NimgW
  L=OimgW
  A=OimgH
  ypos= Math.ceil(55+ (h*(Y-55)/A))
  xpos= Math.ceil(50+ (w*(X-50)/L))
  wpos=Math.floor(b*w/L)
  hpos=Math.floor(c*h/A)
  xstrg ='<DIV id="P'+ coord + '" '
  xstrg+= ' style="position:absolute;left:'+ xpos + ";top:" + ypos + ";width:" + wpos +"px;height:"+ hpos+'px; '
  xstrg+= ' border:none;z-index:200" ';
  xstrg+= ' onmouseover="See('+ "'" + coord + "'"+ ')" ';
  xstrg+= ' onmouseout="NoSee(' + "'" + coord + "'" +')" ';
  xstrg+= ' ondblClick="AddMoreData('+ "'" +  coord + "'" + ')" > ';
  xstrg+= '<TABLE  width=' + wpos + ' height=' + hpos +'><TD>&nbsp;</TD></TABLE></DIV> ';
  xstrg+= '<DIV  id="'+ coord + '" style="z-index:300;position:absolute;font-size=8pt;top:'
  xstrg+=  ypos +';left:' + Math.abs(eval(xpos)+ eval(wpos)) +'; '
  xstrg+= ' background-color:#FFFFC6;padding:2;visibility:hidden">' + who + '</DIV> ';
   xstrgI+=xstrg;
  }
   Menus();
  imgStrg+='<div id="Menu2" '        //ilustraRun('0')
  imgStrg+='TITLE="Fit the entire document on the screen" '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 90px; font-size: 10pt;z-index:600;cursor:hand"n\ '
  imgStrg+='onmouseover="seeMenu('+"'DMenu2'"+')"> '
  imgStrg+='<span id="DMenu2" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:155" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<HR><a href="#" onClick="PageContents()" Title="Back To prior View" >Prior View</a><HR> '
  imgStrg+='</span> '
  imgStrg+='<b>Size</b> '
  imgStrg+='</div> '
  eStrg='<button id="Semail" style="position: absolute;font-size: 10pt;'
  eStrg+='visibility: hidden; background-color: white;width:50"'
  xx=NimgH + ',' + NimgW + ',' + OimgH + ',' + OimgW
  eStrg+='onClick="CollectReverse(' + xx + ')">Write</button></BODY></HTML> '
  document.write(xstrgI+imgStrg+eStrg);
  document.all["artcl"].style.visibility="hidden"
  //pastethis();
}
}
//------------------------ function PageContents() Copyright Charles Fisk Ilustra all rights reserved 1999-2003-------------------------------
function PageContents()
{
history.go(-1)
//pastethis();
}
//------------------------------------function HideEnvelope()--------------------------------------
function HideEnvelope()
{
document.all["envelope"].style.visibility="hidden";
document.all["addNote"].value="";
response="";
}
//--------------------------------------- Menus() --Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
  function Menus()
 {imgStrg='<TEXTAREA ID="clipBOARD" style="visibility:hidden" rows="10" cols="30">&nbsp;</TEXTAREA>'
  imgStrg+='<SPAN ID="writeIT" style="position:absolute;visibility:hidden;z-index:1500;background-color:#FFFFC6;">'
  imgStrg+='<TABLE ><TR><TD COLSPAN=2><TABLE BORDER=0 width=330><TH align="Left">Ilustra Pad</TH>'
  imgStrg+='<TD ALIGN="Right"><BUTTON TITLE="Add this note to the Notebook" onClick="CollectTEXT()">Write</BUTTON></TD>'
  imgStrg+='<TD ALIGN="RIGHT"><BUTTON TITLE="Erase the text,close the notes" onClick="EraseTEXT()">Cancel</BUTTON></TD>'
 // imgStrg+='<TD ALIGN="Right"><BUTTON TITLE="View Notebook and Copy Notes to Clipboard" onClick="CollectTEXT();showNotes()">Notebook</BUTTON></TD></TR></TABLE></TR>'
 // imgStrg+='<TD ALIGN="Right"><BUTTON TITLE="View Notebook and Copy Notes to Clipboard" onClick="showNotes()">Notebook</BUTTON>'
  imgStrg+='</TD></TR></TABLE></TR>'
  imgStrg+='<TR><TH>Name:</TH>'
  imgStrg+='<TD><INPUT TYPE="TEXT" ID="identity"  size="30">'
  imgStrg+='</TD></TR>'
  imgStrg+='<TR><TH>Data:</TH><TD><TEXTAREA ID="notes" rows="10" cols="30">'
  imgStrg+='&nbsp;'
  imgStrg+='</TEXTAREA></TD></TABLE>'
  imgStrg+='</SPAN>'
  imgStrg+='<DIV ID="Help" style="position:absolute;width:'+(screen.width*.35)+'px;height:'+(screen.height*.65)+'px;z-index:1500;overflow:scroll;'
  imgStrg+='visibility:hidden;top:70px;left:'+Math.floor((screen.width*.55))+'px;background-color:white;'
  imgStrg+='font:bold 10pt;border:solid 3px blue;z-index:2000 ">'
  imgStrg+='<TABLE><TR><TH ALIGN="LEFT">H E L P</TH><TH ALIGN="RIGHT"><button  onClick="hideHelp()" TITLE="Click to hide help">'
  imgStrg+='Close</button><button onClick="Print(help)" TITLE="Open in new window and print">Print</BUTTON></TH></TR></TABLE>' + help + '</DIV>'
  imgStrg+='<DIV ID="xmail" style="position:absolute;width:300px;height:300px;z-index:1500;overflow:scroll;'
  imgStrg+='visibility:hidden;top:70px;left:70px;background-color:white;'
  imgStrg+='font:bold 10pt;border:solid 3px gray; ">'
  //imgStrg+='<Button TITLE="copy the notebook to the clipboard"  onClick="copythis()" >Copy</BUTTON>'
  imgStrg+='<Button TITLE="e-mail the notebook now"  onClick="mailthis()" >e-mail</BUTTON>'
  imgStrg+='<Button TITLE="Close the notebbook" onClick="hideNotes()" >Close</BUTTON><BR>'
  //imgStrg+='<Button TITLE="Restore the notebbook contents" onClick="pastethis()" >Restore</BUTTON><BR>'
  imgStrg+='<Span ID="InnerMail" style="color:black">'
  imgStrg+= notebook + '</SPAN></DIV>'
  imgStrg+='<div id="Menu1" '
  imgStrg+='TITLE="Click on a name and find it in the document" '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 55px; font-size: 10pt;z-index:600;cursor:hand"  '
  imgStrg+='onmouseover="seeMenu('+"'DMenu1'"+')"> '
  imgStrg+='<span id="DMenu1" style="position: absolute; top: 15px; font-size: 12pt; '
  imgStrg+='visibility: hidden; background-color: white;width:200;height:200;overflow:scroll" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" + '" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" + '"> '
     for (i=0;i<identities.length-1;i++)
     {
      thisIS=identities[i].split("=");
      whereIS=thisIS[0];
      whereIS=whereIS.split(" ");
     whereIS=whereIS[0];
      whoIS=thisIS[1]; //alert(whereIS + "-" + whoIS);
      whoIS=whoIS.split('}')[0]
      whoIS=whoIS.split('{')[1]
  imgStrg += '<a href="#" onClick="See(' + "'" + whereIS + "'" + ')" TITLE= "Click to find ' + whoIS + '"><small> '
  //imgStrg += i+ '.- '+ eval(identities[i]) + '</small></a><HR> '
  imgStrg += (i+1) + '.- '+ whoIS + '</small></a><HR> '
      }
  imgStrg+='</span> '
  imgStrg+='<b>Find</b> '
  imgStrg+='</div> '
  imgStrg+='<div id="Menu3" '
  imgStrg+='TITLE="Table of contents " '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 130px; font-size: 10pt;z-index:600;cursor:hand"  '
  imgStrg+='onmouseover="seeMenu('+"'DMenu3'"+')"> '
  imgStrg+='<span id="DMenu3" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:200" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<a href="#" onClick="PageContents()" Title="go back to main document" >Back</a><br> '
  // INDEX BEGIN
  imgStrg += IndexStrg;
  // INDEX ENDS
  imgStrg+='<P id="artcl"><a href="#" onClick="Article()" Title="Read about this document" >Read about ' + titl + '</a><HR> '
  imgStrg+='</P></span> '
  imgStrg+='<b>Index</b> '
  imgStrg+='</div> '
  imgStrg+='<div id="Menu5" '
  imgStrg+='TITLE="Help about how to use, also download latest IExplorer " '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 176px; font-size: 10pt;z-index:600;cursor:hand"  '
  imgStrg+='onmouseover="seeMenu('+"'DMenu5'"+')"> '
  imgStrg+='<span id="DMenu5" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:200" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<A href="#" onClick=" mailthis()">e-mail</a><HR> '
  imgStrg+='<A href="#" onClick=" showNotes()">Notebook</a><HR> '
  imgStrg+='<A href="#" onClick="helpIlustra()">Ilustra Help</a><HR> '
  imgStrg+='<A href="#" onClick="aboutIlustra()">About Ilustra</a><HR> '
  imgStrg+='<a href="http://www.microsoft.com/windows/ie/default.htm" target="_blank">Download lastest IE browser</A><HR> '
  imgStrg+='</span> '
  imgStrg+='<b>Help/Send Mail </b></DIV> <span style="position:absolute;top:7px;left:55px">' + capTitle("22px","18px",About)
  imgStrg+='</span> <span style="position:absolute; top:32px;left:320px;">' +  capTitle("22px","18px",titl) + '</span>'
  imgStrg+='<HR style="position:absolute;top:30px;left:55px;height:4px;color:#E0E0E0;width:'+scrHR+'px">'
  imgStrg+='<TEXTAREA ID="toclipboard" STYLE="display:none"></TEXTAREA>'
}
//}
//-------------------------------------------------------------------------------------------------'
// Turn on 2-D positioning
document.execCommand("2D-position",false,true);
document.execCommand("LiveResize",false,true);
// Fires when the onmoveEnd event is fired
//------------------------------function seeMenu()-Copyright Charles Fisk Ilustra all rights reserved 1999-2003---
lastMenu="DMenu1"
function seeMenu(mnu)
{
document.all["xmail"].style.visibility="hidden"
document.all[lastMenu].style.visibility='hidden';
document.all[mnu].style.visibility='visible';
lastMenu=mnu;
}
//--------------------------------function aboutIlustra()--Copyright Charles Fisk Ilustra all rights reserved 1999-2003
function aboutIlustra()
 {
  alert('Ilustra (c) 2000-2003  All rights reserved. ')
 }
//--------------------------------function helpIlustra()--Copyright Charles Fisk Ilustra all rights reserved 1999-2003
function helpIlustra()
 {
  document.all["Help"].style.visibility="visible"
 }
function hideHelp()
  {
  document.all["Help"].style.visibility="hidden"
 }
//-----------------------function ilustraRunMap()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function ilustraRunMap()
{
mapCOORD=""
 for (i=0;i<identities.length;i++)
{
thisIS=identities[i].split("=");
whereIS=thisIS[0];
whereIS=whereIS.split(" ");
whereIS=whereIS[0];
whoIS=thisIS[1];
eval(identities[i]);
mapCOORD += setUpMap(whereIS,whoIS);
}
//alert(mapCOORD);
return mapCOORD;
}
//-----------------------function ilustraRun()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function ilustraRun()
{
{ InitializeCP()
 // OimgW=document.images[0].width;    //original width
 // OimgH=document.images[0].height;    //original height
       }
window.status="Original Size"
//--Copyright Charles Fisk Ilustra all rights reserved 1999-2003--------
 htm='<HTML><HEAD><TITLE id=TTL>' + titl + '</TITLE> '
 htm+='<SCRIPT SRC="' + xchgblk(titl) + '_iltr.js"></script> '
 htm+='<SCRIPT SRC="'+ xchgblk(ILUILTR) + '"></script> '
 htm+='</head><BODY> '
  xstrgI = htm + '<IMG SRC="'+ ILUIMG + '" ALT="Original Document Size" '
  xstrgI += ' style="position:absolute;top:55;left:50;z-index:100" '
  xstrgI += ' onClick="mouseXY()"> '
  xstrgI += eStamp
  xstrgI += '<DIV CONTENTEDITABLE="true" style="visibility:hidden;"> '
  xstrgI += '<DIV ID="grid" style="width:50px;height:50;border:none; '
  xstrgI += 'position:absolute;left:50px;top:55px;background-color:transparent;z-index:-100;visibility:hidden"  '
  xstrgI += ' Title="Double click when selected area is ready" >&nbsp;</DIV> '
  xstrgI += '</DIV> '
  xstrgI += ilustraRunMap()
   Menus();
  imgStrg+='<div id="Menu2" '        //ilustraRun('0')
  imgStrg+='TITLE="Fit the entire document on the screen" '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 90px; font-size: 10pt;z-index:600;cursor:hand"n\ '
  imgStrg+='onmouseover="seeMenu('+"'DMenu2'"+')"> '
  imgStrg+='<span id="DMenu2" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:155" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<HR><a href="#" onClick="PageContents()" Title="Best fit document on screen" >Best Fit</a><HR> '
  imgStrg+='</span> '
  imgStrg+='<b>Size</b> '
  imgStrg+='</div> '
  imgStrg+='</BODY></HTML>'
  document.write( xstrgI+imgStrg);
  document.all["artcl"].style.visibility="hidden"
  //pastethis();
}
//---------------------------function PreLoader()------Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
//preload the image---------------------------------------------------------------------------------
function PreLoader()
 {
 // OimgW=document.images[0].width;    //original width
 // OimgH=document.images[0].height;    //original height
  scrW=Math.floor(screen.width/1.35);
  scrH=Math.floor(screen.height/1.35);
  if(OimgW > OimgH)
    {
     NimgW=scrW;   //new image width set to screen width
     NimgH=Math.floor((NimgW*OimgH)/OimgW);
    }
  if(OimgH> OimgW)
    {
     NimgH=scrH;   //new image width set to screen width
     NimgW=Math.floor((NimgH*OimgW)/OimgH);
       }
window.status="Orig Wdth:" + OimgW +" Orig Hgt:" + OimgH + "New Wdth: " + NimgW + " New Hgt:" + NimgH
//--Copyright Charles Fisk Ilustra all rights reserved 1999-2003--------
 htm='<HTML><HEAD><TITLE id=TTL>' + titl + '</TITLE> '
 htm+='<SCRIPT SRC="' + xchgblk(titl) + '_iltr.js"></script> '
 htm+='<SCRIPT SRC="'+ xchgblk(ILUILTR) + '"></script> '
 htm+='</head><BODY> '
  xstrgI = htm + '<IMG SRC="'+ ILUIMG + '" ALT="Document best fit to screen" '
  xstrgI += ' style="position:absolute;top:55;left:50;z-index:100" '
  xstrgI += ' width =' + NimgW + ' height= ' + NimgH
  xx=NimgH + ',' + NimgW + ',' + OimgH + ',' + OimgW
  xstrgI += ' onClick="MinimouseXY(' + xx + ')"> '
  h=NimgH
  w=NimgW
  L=OimgW
  A=OimgH
  wpos=Math.ceil(1.3*50*w/L)
  hpos=Math.ceil(1.3*50*h/A)
  if ((L<(screen.width/1.35)) && (A<(screen.height/1.35)))
    {
    wpos=50;
    hpos=50;
    w=L;
    h=A;
    }
  xstrgI += '<DIV CONTENTEDITABLE="true" style="visibility:hidden;"> '
  xstrgI += '<DIV ID="grid" style="width:' + wpos +'px;height:' + hpos +'px;border:none; '
  xstrgI += 'position:absolute;left:50px;top:55px;background-color:transparent;z-index:-100;visibility:hidden"  '
  xstrgI += ' Title="Double click when selected area is ready" >&nbsp;</DIV> '
  xstrgI += '</DIV> '
 for (i=0;i<identities.length;i++)
  {
   thisIS=identities[i].split("=");
   whereIS=thisIS[0];
   whereIS=whereIS.split(" ");
   whereIS=whereIS[0];
   whoIS=thisIS[1];
   eval(identities[i]);
   coord=whereIS;
   who=whoIS;
   arrayC=coord.split('X');
  k=yy;m=xx;  //55 and 50
  X=arrayC[1]
  Y=arrayC[2]
  b=arrayC[3]
  c=arrayC[4]
  h=NimgH
  w=NimgW
  L=OimgW
  A=OimgH
  ypos= Math.ceil(55+ (h*(Y-55)/A))
  xpos= Math.ceil(50+ (w*(X-50)/L))
  wpos=Math.floor(b*w/L)
  hpos=Math.floor(c*h/A)
  xstrg ='<DIV id="P'+ coord + '" '
  xstrg+= ' style="position:absolute;left:'+ xpos + ";top:" + ypos + ";width:" + wpos +"px;height:"+ hpos+'px; '
  xstrg+= ' border:none;z-index:200" ';
  xstrg+= ' onmouseover="See('+ "'" + coord + "'"+ ')" ';
  xstrg+= ' onmouseout="NoSee(' + "'" + coord + "'" +')" ';
  xstrg+= ' ondblClick="AddMoreData('+ "'" +  coord + "'" + ')" > ';
  xstrg+= '<TABLE  width=' + wpos + ' height=' + hpos +'><TD>&nbsp;</TD></TABLE></DIV> ';
  xstrg+= '<DIV  id="'+ coord + '" style="z-index:300;position:absolute;font-size=8pt;top: '
  xstrg+=  ypos +';left:' + Math.abs(eval(xpos)+ eval(wpos)) +'; '
  xstrg+= ' background-color:#FFFFC6;padding:2;visibility:hidden">' + who + '</DIV> ';
   xstrgI+=xstrg;
  }
   //xstrgI += '</BODY></HTML> '
   Menus();
  imgStrg+='<div id="Menu2" '        //ilustraRun('0')
  imgStrg+='TITLE="Fit the entire document on the screen" '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 90px; font-size: 10pt;z-index:600;cursor:hand"n\ '
  imgStrg+='onmouseover="seeMenu('+"'DMenu2'"+')"> '
  imgStrg+='<span id="DMenu2" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:155" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<HR><a href="#" onClick="ilustraRun()" Title="Go back to original size document" >Original View</a><HR> '
  imgStrg+='</span> '
  imgStrg+='<b>Size</b> '
  imgStrg+='</div> '
  eStrg='<button TITLE="Collect notes,email later"  id="Semail" style="position: absolute;font-size: 10pt;'
  eStrg+='visibility: hidden; background-color: white;width:50"'
  xx=NimgH + ',' + NimgW + ',' + OimgH + ',' + OimgW
  eStrg+='onClick="CollectReverse(' + xx + ')">Write</button>'
  eStrg+='<Script Language="JavaScript">InitializeCP()</Script>'
  eStrg+='</Body></HTML>'
  document.write(xstrgI+imgStrg+eStrg);
}
//----------------------function ilustraMap()-- Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function ilustraMap()
  {
Menus()
  imgStrg+='<div id="Menu2" '        //ilustraRun('0')
  imgStrg+='TITLE="Fit the entire document on the screen" '
  imgStrg+=' style="position: absolute; '
  imgStrg+='top: 38px; left: 90px; font-size: 10pt;z-index:600;cursor:hand"n\ '
  imgStrg+='onmouseover="seeMenu('+"'DMenu2'"+')"> '
  imgStrg+='<span id="DMenu2" style="position: absolute; top: 15px; font-size: 10pt; '
  imgStrg+='visibility: hidden; background-color: white;width:155" '
  imgStrg+='onmouseOut="this.style.visibility=' + "'hidden'" +'" '
  imgStrg+='onclick="this.style.visibility=' + "'hidden'" +'"> '
  imgStrg+='<HR><a href="#" onClick="PreLoader();" TITLE="Make image fit on the screen">Fit Image On Screen</a><HR> '
  imgStrg+='</span> '
  imgStrg+='<b>Size</b> '
  imgStrg+='</div> '
  strg = '<DIV CONTENTEDITABLE="true" style="visibility:hidden;">'
  strg += '<DIV ID="grid" style="width:50px;height:50px;border:none;visibility:hidden;'
  strg += 'position:absolute;left:50px;top:55px;background-color:transparent;z-index:-100" '
  strg += 'Title="Double click when selected area is ready" >&nbsp;</DIV>'
  strg += '</DIV>'
  //strg += eStamp;
  strg += imgStrg + '</div><script language="javaScript">ilustraRun()</script>'
  document.write(strg);
  OimgW=document.images[0].width;
  OimgH=document.images[0].height;
}
allCaptions=" "
//-------------------function TestIE6()--Copyright Charles Fisk Ilustra all rights reserved 1999-2003-------------------
function TestIE6()
{
 if(!document.all)
   {
    Resp=confirm("you need Internet Explorer 6 Click OK to download it Otherwise click Cancel")
     if (Resp)
      {
       window.location="http://www.microsoft.com/windows/ie/downloads/critical/ie6sp1/default.asp"
      }
      else
       {
      window.location="http://ilustra.tk/"
       }
   }
}
//-------------------function mouseXY() Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function mouseXY()
{
posX=event.clientX + document.body.scrollLeft;
posY=event.clientY + document.body.scrollTop;
window.status=posX+";"+posY;
document.all["grid"].style.left=posX-25;
document.all["grid"].style.top=posY-25;
document.all["grid"].style.visibility="visible" ;
document.all["grid"].style.zIndex="1000";
document.all["grid"].style.border="3px solid red";
document.all["Oemail"].style.visibility="visible" ;
document.all["Oemail"].style.zIndex="900";
document.all["Oemail"].style.left=posX+35 ;
document.all["Oemail"].style.top=posY-25;
document.all["Oemail"].style.visibility="visible" ;
//document.all["Semail"].style.zIndex="900";
//document.all["Semail"].style.left=posX+35 ;
//document.all["Semail"].style.top=posY-25;
//document.all["Semail"].style.visibility="visible" ;
}
//--------------------function MinimouseXY() --Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function MinimouseXY(NimgH,NimgW,OimgH,OimgW)
{
  h=NimgH
  w=NimgW
  L=OimgW
  A=OimgH
if ((L<(screen.width/1.35)) && (A<(screen.height/1.35)))
  {
   w=L;
   h=A;
  }
posX=this.event.clientX;
posY=this.event.clientY;
window.status=posX+";"+posY;
document.all["grid"].style.left=posX-Math.floor(25*w/L);
document.all["grid"].style.top=posY-Math.floor(25*h/A);
document.all["grid"].style.zIndex="1000";
document.all["grid"].style.visibility="visible" ;
document.all["grid"].style.border="3px solid red";
document.all["Semail"].style.visibility="visible" ;
document.all["Semail"].style.position="absolute" ;
document.all["Semail"].style.zIndex="900";
document.all["Semail"].style.left=posX+25;
document.all["Semail"].style.top=posY-15 ;
}
//---------------------------function splitNUM(dataIN)--Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function splitNUM(dataIN)
   {
      dataOUT=(dataIN.split('p'))[0]
      return(dataOUT);
   }
//---------------function setUpMap(coord,who)--Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function setUpMap(coord,who)
{
 arrayC=coord.split('X');
 xpos=arrayC[1];
 ypos=arrayC[2];
 wpos=arrayC[3];
 hpos=arrayC[4];
  xstrg='<DIV id="P'+ coord + '"'
  xstrg+= ' style="position:absolute;left:'+ xpos + ";top:" + ypos + ";width:" + wpos +";height:"+ hpos+';'
  xstrg+= ' border:none;z-index:200" ';
  xstrg+= ' onmouseover="See('+ "'" + coord + "'"+ ')" ';
  xstrg+= ' onmouseout="NoSee(' + "'" + coord + "'" +')" ';
  xstrg+= ' ondblClick="AddMoreData('+ "'" +  coord + "'" + ')">  ';
  xstrg+= '<TABLE  width=' + wpos + ' height=' + hpos +'><TD>&nbsp;</TD></TABLE></DIV> ';
  xstrg+= '<DIV  id="'+ coord + '" style="z-index:300;position:absolute;font-size=8pt;top: '
  xstrg+=  ypos +';left:' + Math.abs(eval(xpos)+ eval(wpos)) +'; '
  xstrg+= ' background-color:#FFFFC6;padding:2;visibility:hidden"'
  xstrg+= ' )">' + who + '</DIV> ';
//document.write(xstrg);
// alert(xstrg);
 return xstrg;
}
//-------------function See(id) --Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function See(id)
 { if (id != 'X0X0X0X0' ){
  eval('document.all["'+id+'"].style.visibility="visible"');
  eval('document.all["P'+id+'"].style.border="2px solid yellow"');
 }}
//--------------function NoSee(id) --Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function NoSee(id)
 {
 eval('document.all["'+id+'"].style.visibility="hidden"');
 eval('document.all["P'+id+'"].style.border="none"');
 }
//---------------function capTitle()--Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
// this function writes sentences in caps beg of each word is capped at a larger font size
//verdana,arial,helvetica,sans-serif
function capTitle(fa,fb,dat)
{
  res=" "
  dat=dat.toUpperCase()
  f7='<span style="font-size:'+ fa + ';color:#000000;font-family:verdana,arial,helvetica,sans-serif;position:relative;left:+3">';
  f3='<span style="font-size:'+ fb + ';color:#000000;font-family:verdana,arial,helvetica,sans-serif;">';
  f0='</span> ';
  wrds = dat.split(" ")
  //alert(wrds.length);
  for (i=0;i<wrds.length;i++)
   {
     oneW=wrds[i]; //alert(oneW);
     xx=parseInt(oneW);//alert(oneW+" "+xx)
     if (xx != oneW)
      { //alert()
        oneW += " ";
        cap  = oneW.substring(0,1);//alert(cap)
        rest = oneW.substring(1,oneW.length);
        res += f7 + cap + f0 + f3 + rest + f0;
      }
     else {   res += f3 + oneW + f0   }
   }
  //alert(dat + "/n" + res)
   return res+'&nbsp;';
 }
function xchgblk(sentence)
{ res=""
  xlenx=sentence.split(" ")
  strlen=xlenx.length
  for (i=0;i<strlen;i++)
  {
     if (i<strlen-1){res += xlenx[i] + "_"}
     if (i==strlen-1){res += xlenx[i]}
  }
return res.toLowerCase()
}
//------- Copyright Charles Fisk Ilustra all rights reserved 1999-2003--------------------------
function Print(information)
{information='Click on File<BR>Print Preview<BR>Print<HR>'+ information
var printWin = window.open("", "printer");
printWin.document.write(information);
}
//------- Copyright Charles Fisk Ilustra all rights reserved 1999-2003--------------------------
//----------------------------function mailAnyBody()----Copyright Charles Fisk Ilustra all rights reserved 1999-2003-
function mailAnybody()
{
 mailx='mailto:?subject= ' + About;
 sendthis=pastethis();
 mailx=mailx+'&body=Write:';
 if(sendthis.indexOf(About,0)>0){
 mailx=mailx+'&body= ' + escape(sendthis);}
 window.location=mailx ;
}
function xchgquotes(sentence)
{ res=""
  xlenx=sentence.split("")
  strlen=xlenx.length
  for (i=0;i<strlen;i++)
  {
     if (i<strlen-1){res += xlenx[i] + "&#34;"}
     if (i==strlen-1){res += xlenx[i]}
  } res1=res;
  xlenx=res1.split("'")
  strlen=xlenx.length
  for (i=0;i<strlen;i++)
  {
     if (i<strlen-1){res += xlenx[i] + "&#146;"}
     if (i==strlen-1){res += xlenx[i]}
  }
return res
}