Turing Machine by youz

(= p(cdr:drain:readline)m(n-of 330())a[int:r:+ s _]s 4 c 120)(while:>(= r(p:or m.c 0)m.c(-(a 0)48)c(+(a 1)c -61)s(*(-(a 2)64)4))0)(pr:+""m)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page