9624 IF X-XX>0 THEN FD=0