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