for j=0to 14for i=1to min(j*7.5-n,95)+5if j=int(i/3)-int(i/5)?i,"";:goto 1 ?mid$(" ",1+!i>9); 1next:n=!n:?next
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page