FP(0)=1000STR(FP(100,1)
#a$="Mx+9.7042e+002 My+6.3210e+002"#fp(2)=val(a$) fp(3)=val(0)#pr fp(2) fp(3) 9.704200E+02 6.321000E+02#