do?chr$(or(peek(0),4)-4);loop