do?chr$(and(peek(0)*7,255)+7);loop