main=putStr$[-256..256]>>=f f x|n<-mod x 2=" #"!!n:take 63(f$div x 2+n*x)++"|\n"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page