7905 IF FPD>=0 THEN M=XE