1660 IF FPX>=.5 THEN XS=XX : XT=X