REBOL[]for i 0 255 1[a: 0 prin for j 0 7 1[a: a + to-integer i /(2 ** j)// 2]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page