这是我根据之前别人发的宏拿来修改的其中一段 /Xa_Xg7
FOR i,1,n_field,1 e_mUO"
hy=FLDY(i)/maxfield Ucnj7>+"
rw>X JE
RAYTRACE 0,hy,0,1,PWAV() %@JNX}Y'
FORMAT 2.0 #上光线 f`Km ctI
PRINT "field number",i,
i=67
FOR j,1,n,1 my+y<C-o`
u(i,j)=-1*ASIN(RAYM(j-1)) W[B%,Km%]
um(i,j)=-1*ASIN(RAYM(j)) fu3~W
r(i,j)=RADI(j) \GA6;6%Oo
h(i,j)=RAYY(j) `R:p-"'b
tmp(i,j)=0 d#~^)r
IF r(i,j)!=0 THEN tmp(i,j)=ASIN(h(i,j)/r(i,j)) }py6H[
ain(i,j)=tmp(i,j)-u(i,j) MR8\'0]
8z,i/:
AFU(i,j)=pi*ain(i,j) ch2Q k8
FORMAT 10.4 8$Igo$U-
PRINT AFU(i,j), eteq Mg}M
wkSIQL
运行后出现错误提示 zQY|=4NP
Syntax error: Variable must be followed by = sign. Hj&mwn]
U(I , J) = - 1 * ASIN ( RAYM ( J - 1 ) ) Cm)_xnv
可是程序中是=号,怎么还会提示变量后必须跟=号 yL =*yC
求大神指点下谢谢 H"v3?g`S%