Outline by kaki(dico_leque)

((^l #1=(#0=format #t"##~v,,,'#a#
"#2=(~'(49""18 28)(mod(hash l)4))"")(map(^x(#0##t"# ~va#
"#2#x))`("",@l""))#1#)(port-map + read-line))

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

download

return to the top page