
for (var n=0; n<document.links.length; ++n) {
  if (document.links[n].href.indexOf("/cgi-bin/hmailer.cgi") > 0) {
    UnScramble(document.links[n]);
  }
}

function UnScramble(obj) {
  var fixed=""
  var tmp=obj.href;
  var ind=tmp.indexOf("+");
  while(ind >= 0) {
    tmp=tmp.substr(0,ind) + ' ' + tmp.substr(ind+1);
    ind=tmp.indexOf("+");
  }
  tmp=unescape(tmp);
  var ind=tmp.indexOf("email=") + 6;
  var key=tmp.charCodeAt(ind)-32;
  ind += 2;
  var old=tmp.substr(ind);
  for (var i=0; i<old.length; ++i) {
    var charnum=old.charCodeAt(i);
    if (charnum > 31 && charnum < 127) {
      charnum = (charnum-32)-key;
      if (charnum < 0) { charnum += 95; }
      charnum += 32;
      fixed += unescape("%"+charnum.toString(16));
    } else {
      fixed += old.charAt(i);
    }
  }
  obj.href="mailto:" + fixed;
}
