Rule 30 by ksk

let rec(^)x?(c=34/input_byte stdin*4+x/2)p=c>7&p '#'=p '#';p" # # ## ".[c];c^p;;6^print_char

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

download

return to the top page