Read Diagonally by clock

n=0
do 729
s=linein()
n=n*(n<length(s))+1
_=charout(,substr(s,n,1))
end

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

download

return to the top page