do x=peek(0):if(x-10)?chr$(x);
loop