coded = "<HJ@i c. p>Hxx jA>>ERIodd.>otY"
key = "CrsBA<cXF9uID5hUy7pgkRJle@Y024nox8SjOw3fKMTVQNazPtW6LGHEbvdZi>mq1"
shift=coded.length
plain=""
for (i=0; i<coded.length; i++){
    if (key.indexOf(coded.charAt(i))==-1){
        ltr=coded.charAt(i)
        plain+=(ltr)
    } else {
        ltr = (key.indexOf(coded.charAt(i))-shift+key.length) % key.length
        plain+=(key.charAt(ltr))
    }
}
document.write("<a href='mailto:"+plain+"'>Kevin M. Goess <foo@bar22.org></a>")