1760 GOSUB 9325 : XNS(K)=100*(1-FP)