7690 IF INSTR("ABCabc",A$)=0 THEN GOSUB 900 : RETURN