1990 IF IKP=2 THEN JF=0