do n=!n:?chr$(peek(0)*n);loop