// ############################## START FUNC ############################################
// The procedure if(texx) converts the output to a table in a TeX-document.
// This is analogous to the procedure in mega2, but with different input-output formats,
// else, the input is just returned.

function mega3tex(saved)
{

  var texx=document.form1.tex.checked;
  var convert=document.form1.cb.checked;

  if(texx){
var temp="";
var au = new Array(0);
var tupp = new Array(0);
var smallparts = new Array(0);
name1="";
name2="";
hits="";
var rows = new Array(0);
var bit = "";
var mol1 = "";
var mol2 = "";
var singletable = "";
var tableline= "";
var sp="";
var startkompl="";
var n=0;
var m=0;
var q=0;


var end="&&&&&&\\\cr\\noalign\{\\\hrule\}\}\}\}";
end=end+"\n"+"\\\vfill\\\eject";
end=end+"\n"+"\\bigskip";
end=end+"\n"+"\\bigskip\n\n\n\n";

var start="\\\leavevmode";
start=start+"\n"+"\\\vbox{\\\hsize=0.75\\\hsize";
start=start+"\n"+"\\bigskip";
start=start+"\n"+"\{\\\offinterlineskip \\tabskip=0pt";
start=start+"\n"+"\\\halign \{ \\\strut";
start=start+"\n"+"\\\vrule\\\quad\\\hfil#\\\hfil\\\quad\\\vrule&&";
start=start+"\n"+"\\\quad\\\hfil #\\\hfil\\\quad\\\vrule \\\cr";
start=start+"\n"+"\\noalign\{\\\hrule}\n&&&&&& \\\cr \n";

au=saved.split("  \n\n\n\n ");
saved="";

for(n=0;n<au.length;n++){
addd=""+au[n];
if(!addd || addd=="undefined" || addd=="") continue;
singletable="";
tupp=au[n].split("/\n");
smallparts=tupp[0].split(/[%#%]|[ \/]/);

name1=smallparts[0];
name2=smallparts[1];
hits=smallparts[2];

tableline="bit" +" & " + "mol" + " & " + "angle" + " & " + "dist1" + " & " + "dist2" + " & " + "feature1" + " & " + "feature2" + " \\\cr ";
singletable=singletable+tableline+"\n";

startkompl="Molecule 1 = "+name1+"\n\\\smallskip\nMolecule 2 = "+name2+"\n\\\smallskip\n"+hits+"\n\\\smallskip\n"+start;

tableline="&&&&&& \\\cr\n\\noalign\{\\\hrule}\n&&&&&& \\\cr ";
singletable=singletable+tableline+"\n";

rows=tupp[1].split("  \n");

  for(m=0;m<rows.length;m++){
  smallparts=rows[m].split(/ +__\*/);
  bit=smallparts[0];
  mol1=smallparts[1];
  mol2=smallparts[2];
  mol1=mol1.split("_/_*");
  mol2=mol2.split("_/_*");

    for(q=0;q<mol1.length;q++){
  tableline="";
    sp=mol1[q].split("_*");
    tableline=tableline+ bit + " & " + "1" + " & " + sp[0] + " & " + sp[1] + " & " + sp[2] + " & " + sp[3] + " & " +sp[4] + " \\\cr ";
    singletable=singletable+tableline+"\n";
    }

    for(q=0;q<mol2.length;q++){
  tableline="";
    sp=mol2[q].split("_*");
    tableline=tableline + bit + " & " + "2" + " & " + sp[0] + " & " + sp[1] + " & " + sp[2] + " & " + sp[3] + " & " +sp[4] + " \\\cr ";
    singletable=singletable+tableline+"\n";
    }

  }

if(!convert){
smallparts=singletable.split("%");
singletable=smallparts.join("");
}

singletable=startkompl+singletable+end;
saved=saved+singletable;
}
}

document.form1.text1.value=saved;

}

// ############################### end func ############################################