$*<<'%b'%[C*getc]while C=getc 14.times{|i|puts ($*.map{|s|'%1s'%s[/.*1/][i,1]}*'').rstrip}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page