character c;1 n=k>64.and.k<91;m=fget(c);k=c>"";k=xor(ichar(c),k*n*32);goto(1)fput(char(k))**m;end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page