2910 IF KF(2)>0 THEN TP(2)=DEX