9170 'IF X=0 THEN FP=.5 : FD=FDZ : RETURN