{for($(FS=n=_)=$0RS;$++n;)printf(i=index(toupper(m="nopqrstuvwxyzabcdefghijklm@@@@@@")m,$n))?"%c":$n,i+64}