for i=1to 3line input""b$ a$=a$+b$+b$+b$+b$next for i=2to 49for j=-1to 1?mid$(a$,64*mod(i+j,3)+i,16)next ?next
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page