2965 IF NVKNV THEN KE=2: GOSUB 900: GOTO 2957