[求助]关于zemax宏程序，语法错误：函数后面必须跟左括号：apxd [复制链接]

想请教各位大神我应该怎么修改我的zpl宏程序啊： qR,.W/eS8  
错误截图： >7-y#SkXdo  
Executing D:\Backup\我的文档\Zemax\MACROS\自由曲面 - 副本.ZPL. m^$5K's&  
Syntax error: Function must be followed by left parentheses: APXD 
I{n;4?  
宏程序： cIw eBDl  
#MTj)P,  
d=APMN(3) *8!w&ME+.  
dmax=d/2 GEE ]Kr  
Tmax=3 vnsSy
33K  
ATYP=0 OAok  
D1=AVAL() 4:
 sl(r  
D2=D1/2 eOrYa3hQ  
tx=APXD {;RF  
ty=APYD D3?N
<9g  
dot=30 )*[ ""&  
qx1=(tx-dmax)/D2 _'JRo%{xGX  
qx2=(tx+dmax)/D2 J/S{FxNe]  
qy1=ty/D2 qc0 B<,x7  
qy2=(ty+2*dmax)/D2 )1_(>|@oi  
DECLARE px, DOUBLE, 1 , dot k/#M<z  
DECLARE py, DOUBLE, 1 , dot XV2=8#R  
DECLARE ax, DOUBLE, 1 , dot :HZ;Po   
DECLARE ay, DOUBLE, 1 , dot +Jw{qQR/*  
DECLARE bx, DOUBLE, 1 , dot 8IWwjyRr  
DECLARE by, DOUBLE, 1 , dot PRpE$`WK  
FOR i,1,dot,1 ;:_(7|  
px(i)=qx1+i/dot*(qx2-qx1) 9--dRTG  
py(i)=qy1+i/dot*(qy2-qy1) <|JU(B  
ax(i)=(2*i/dot-1)*Tmax vXubY@k2  
ay(i)=(2*i/dot-1)*Tmax I<`V_
 
NEXT i STlPT5e.}  
n = NSUR() X8b#[40:  
DECLARE X, DOUBLE, 1 , dot 6F ;Or  
DECLARE Y, DOUBLE, 1 , dot WD;)VsP  
FOR k,1,dot,1 1 ;Ju
]  
FOR i,1,dot,1 0#=W#Jl>  
RAYTRACE 0,0,px(i),py(k),PWAV() R9=K(pOT  
ray=RAYE() !w=,p.?V=  
bx(i)=RAYX(n) ]^!}*  
by(i)=RAYY(n) hNVMz`r  
PRINT "trace rays signal:", ray k#jm7 +  
PRINT "The least squares theory" )d_U)b7i  
sum=0 E!dp~RwZu  
X(i)=ax(i)-bx(i) `$Kes;[X  
Y(i)=ay(k)-by(i) \P@S"QO  
cha=Y(i)*Y(i)+X(i)*X(i) =AzOnXW:S  
sum=sum+cha r]-+bR
  
NEXT i 'RQiLUF  
NEXT k OequU'j  
PRINT "The finally result is " KT=a(QL  
PRINT sum u7u~  
OPTRETURN 0, sum ~,G]glu8  

函数不需要参数不代表括号都可以不打了。。 ZZwBOGVU  

谢谢楼主无私的分享~！

你这个宏太长了。。。我猜是tx=apxd()

谢谢楼主分享，感谢