想請教各位大神我應(yīng)該怎么修改我的zpl宏程序�。� M0w Uis:`
 
錯誤截圖： AioW*`[WjA  
Executing D:\Backup\我的文檔\Zemax\MACROS\自由曲面 - 副本.ZPL. SZF 8InyF  
Syntax error: Function must be followed by left parentheses: APXD :1A:g^n  
宏程序： 1 pVw,}  
c["1t1G  
d=APMN(3) !|Q&4NS  
dmax=d/2 tnJ7m8JmC  
Tmax=3 98Vv K?  
ATYP=0 kG/1  
D1=AVAL() Pvc)-A  
D2=D1/2 dPEDsG0$a  
tx=APXD FBXktSg  
ty=APYD 0`x>p6.)G  
dot=30 K,g
6y#1"  
qx1=(tx-dmax)/D2 }_nBegv  
qx2=(tx+dmax)/D2 "du(BZw  
qy1=ty/D2 z\m$>C|  
qy2=(ty+2*dmax)/D2 cb^IJA9}  
DECLARE px, DOUBLE, 1 , dot kH eD(Ea  
DECLARE py, DOUBLE, 1 , dot Qn$'bK2V  
DECLARE ax, DOUBLE, 1 , dot oJTEN}fL  
DECLARE ay, DOUBLE, 1 , dot |HycBTN#E  
DECLARE bx, DOUBLE, 1 , dot 5nx*D"  
DECLARE by, DOUBLE, 1 , dot a fa\6]m  
FOR i,1,dot,1 nX (bVT4i  
px(i)=qx1+i/dot*(qx2-qx1) )Z:-qH  
py(i)=qy1+i/dot*(qy2-qy1) D,cD]tB2  
ax(i)=(2*i/dot-1)*Tmax ".>#Qp%  
ay(i)=(2*i/dot-1)*Tmax mW"e  
NEXT i dHY@V>D'-  
n = NSUR() 6>WkisxG  
DECLARE X, DOUBLE, 1 , dot SSI> +A  
DECLARE Y, DOUBLE, 1 , dot PB^rniYh  
FOR k,1,dot,1 zeMV_rW~  
FOR i,1,dot,1 !f/K:CK|  
RAYTRACE 0,0,px(i),py(k),PWAV() jwk+&S  
ray=RAYE() .4a|^ vT  
bx(i)=RAYX(n) Yb5U^OjyJ  
by(i)=RAYY(n) 0kUhz\"R:q  
PRINT "trace rays signal:", ray -U2Su|:\N8  
PRINT "The least squares theory" spA|[\Nl  
sum=0 /R