(do'(n 0(case(read)(d(max(1- n)0))(i(1+ n))(s(*(if(= n 16)0 n)n))(o(format t"~D "n)n)))'1)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page