Read Diagonally by clock

rebol[]n: 1 while[s: input][if n > length? s[n: 1]prin pick s n n: n + 1]

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

download

return to the top page