input""b$ for i=1to len(b$)?chr$(mod((asc(mid$(b$,i))-36)*7+3,128));next