do
1a=peek(0)
?chr$(a);
if a>32s$=s$+" ":goto 1
?
2a=peek(0)
?s$,chr$(a);
if a>32?:goto 2
s$=s$+" "loop