8356 IF KF(1)=1 AND P(3)=1 THEN P(1)=INT(P(1)+.5)