4762 IF KE=1 OR KMM=1 THEN KE=0 : GOTO 4700