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