8338 IF FP<0 THEN FP=0