do
if c=10?s$;
if c>10s$=s$+" "
c=peek(0)
?chr$(c);loop