0 1 511{dup -9 3 0{bitshift 8 mod =only dup}for( is )-9 1 0{exch print 2 copy bitshift 1 and exch 3 mod 3 add mul(-rwx)exch 1 getinterval}for =}for
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page