9212 IF KF(5)=1 THEN P(5)=R