REBOL[]r: do input repeat x r[repeat y max x r - x + 1[prin either x = y or(r - x + 1 = y)["X"][" "]]print""]

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

download

return to the top page