do i=2 to 30 do j=2 to 50 call charout,substr('a'x'"''{[:\$%`#.@?*-',min(min(i,32-i),min(j,51-j)),1) end end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page