/* word.js
  Jean-Paul Davalan 2003 <jpdvl@wanadoo.fr>
 */
var models = new Array('A','B','C','D','E','F','G','H','I','J','K',
'L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z');
var chaine;

function effectue() {
 var s1,s, u, ar, n, w = new Array(), t, z, s1, r; 
  u= document.frm.morph.value; 
  ar = u.split(/[ ]*\n[ ]*/); 
  for(n=0;ar[n]!=void(0)&&ar[n]!="";n++); 
  s=document.frm.mot.value;
  
  do {
    s1=s;
    s = s1.replace(/\n/g,"");
    s = s.replace(/\s/g,"");
  } while(s1!=s);
  for(i=0;i<n;i++) {
    w[i] = new Array();
    w[i] = ar[i].split(/\s+/);
    if(w[i].length==1) w[i][1]="";
    t= new RegExp(w[i][0], "g");
    z = models[i];
    s1="";
    while(s1 != s) {
      s1=s;
      s = s1.replace(t, z);
    }
  } 
//  var s2="";
//  while(s2!=s) {
//    s2=s;
  for(i=0;i<n;i++) {
    r = new RegExp(models[i], "g");
    s1="";
    while(s1 != s) {
      s1=s;
      s = s1.replace(r,w[i][1]);
    }
//  }
  }
  l=s.length;
  s = s.replace(/^\s+/g,"");
  s = s.replace(/\s+$/g,"");
  chaine = s;
  affiche();
}

function affiche() {
  var i, s="";
  for(i=0; i<chaine.length; i +=65) {
    s +=chaine.substr(i,65)+"\n";
  }
  document.frm.mot.value=s;

// document.frm.mot.value=chaine;
  document.frm.l.value = chaine.length;
}

/*
function remplace() {
  document.frm.obt.value=chaine;
}
*/
function efface() {
//document.frm.morph.value="";
document.frm.mot.value="";
document.frm.l.value="";
//document.frm.lm.value=""
document.frm.fact.value=""
}

function nof() {
}

function exo(s0, s1, n) {
document.frm.mot.value=s0;

document.frm.morph.value=s1;
//document.frm.obt.value='';
document.frm.l.value=s0.length;
}

function exomorph(s) {
  document.frm.morph.value=s;
  var s0, s1=document.frm.mot.value;
  do {
    s0=s1;
    s1=s0.replace(/[\s\n]+/g,"");
  } while(s0 != s1);
  document.frm.l.value=s1.length;
}