do c=peek(0):if!c/16-5c=c+32:?" ";
?chr$(c);loop