// email obfuscator function adapted by LuckyDuck Web Design from
// Email obfuscator script 2.1 by Tim Williams, University of Arizona

function emlTo( leading,aCls,cddAddr,sbjct,lnkTxt,trailing )
   {

   var cdd_ln;
   var trgt = "";
   var chr = "";
   var tmp_str = "";

   cphr = "aZbYcXdWeVfUgThSiRjQkPlOmNnMoLpKqJrIsHtGuFvEwDxCyBzA1234567890";

   cdd_ln = cddAddr.length;

   trgt="";

   for (i=0; i < cddAddr.length; i++)
      {
      if (cphr.indexOf(cddAddr.charAt(i))==-1)
         {
         chr=cddAddr.charAt(i);
         trgt+=(chr);
         }
      else 
         {     
         chr = ( cphr.indexOf( cddAddr.charAt(i) ) - cdd_ln + cphr.length ) % cphr.length;
         trgt += (cphr.charAt(chr));
         }           
      }
      
   tmp_str += leading;   
   tmp_str += "<a ";
   
   if ( 0 < aCls.length )
      {
      tmp_str += ("class = \""+ aCls +"\"");
      }
      
   tmp_str += ("href='mailto:"+trgt+"?subject="+sbjct+"'\">"+lnkTxt+"</a>");
   tmp_str += trailing;
   document.write(tmp_str);
   
   }
