coded = "G1O< nRO7 qWRO73VVJ.R7pK"
key = "DxS2lhqs8QuvAjoUbwPRtW7nTri@1kHfaCp>GYZ4z6NgJFX<ycV30EIBO5LKe9mdM"
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+"'>Alan D. Mead, Ph.D.</a>")