ascending chars by clock

putc$.=C if$.<C||C<11while C=getc

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

download

return top