9740 IF X-XX>0 THEN FD=0