这是我根据之前别人发的宏拿来修改的其中一段 #<Lv&-U<KT
FOR i,1,n_field,1 H5V>d
hy=FLDY(i)/maxfield o8|qT)O@U
ifu!6_b.
RAYTRACE 0,hy,0,1,PWAV() dfKGO$}V
FORMAT 2.0 #上光线 ;8dffsyq
PRINT "field number",i, /|<SD.:
FOR j,1,n,1 U| VL+9#hd
u(i,j)=-1*ASIN(RAYM(j-1)) *HUXvX|-%
um(i,j)=-1*ASIN(RAYM(j)) a(=lQ(v/?
r(i,j)=RADI(j) Ie|5,qw
E
h(i,j)=RAYY(j) GC' e
tmp(i,j)=0 w52py7
IF r(i,j)!=0 THEN tmp(i,j)=ASIN(h(i,j)/r(i,j)) '&dT
ain(i,j)=tmp(i,j)-u(i,j) &0tW{-Hv"
W`NF4 0)
AFU(i,j)=pi*ain(i,j) @d^Z^H*Yv
FORMAT 10.4 8A.7q
PRINT AFU(i,j), ^m&I^ \
wDGb h=
运行后出现错误提示 >TY;l3ew
Syntax error: Variable must be followed by = sign. MIn_?r
U(I , J) = - 1 * ASIN ( RAYM ( J - 1 ) ) MfHOn YV
可是程序中是=号,怎么还会提示变量后必须跟=号 GqR|hg
求大神指点下谢谢 @c'iT20