想要写个宏，关于间隔公差对焦距的影响，想最终输出的效果是每个间隔的公差对应的系统焦距变化，然后输出总的焦距变化，且输出的面的间隔大小有三种，原值，加上正公差后的值以及负公差后的值。下面的程序得不到我想要的结果，请教下大神咋修改，谢谢 FWp ?l
n=NSUR() DTsD<o
INPUT"请输入变化的公差(单位:mm,正值):",t ru/{s3
IF t<=0 M @G\b^ "
LABEL 1 z[vu- f9
INPUT"公差必须为正值，请重新输入:",t '
Qlj"U
IF t<=0 THEN GOTO 1 Kv:.bHN}
ENDIF Ps (oxj7
X,lhVT
|
PRINT "surface number ", a*&&6Fo
FOR i,1,n,1 *aFh*-Sj2I
FORMAT 20.0 "E4CQL'U
PRINT i, Q t>|TGz
NEXT q-@&n6PEOZ
PRINT B7Zi|-F
PRINT"surface tthi effl", 4$mtc*tzT
FORMAT 10.4 !?J- Y
FOR i,1,n-1,1 -2u )orWP
THIC(i)=THIC(i)+t A@Zqh<,Ud
8df| 9E$
PRINT THIC(i), b?!S$S xz
GETSYSTEMDATA 1 xh#pw2v7V
PRINT VEC1(7), 1A *
"v
NEXT L&=r-\.ev
PRINT g-ZXj4Ph!
GETSYSTEMDATA 1 {,(iL8,^
PRINT"公差后的系统焦距",VEC1(7)
