[求助]zemax中zpl程序问题 [复制链接]

各位高手，请教一下，新手学zemax编程，照着敲了一段程序，在zemax中ZPL程序为什么运行不了，还请各位高手指点指点，谢谢！ 61W/BU7O  
Reu{   
\bm6/fhA:  
4;RCPC  
UZP6x2:=  
~9r!m5ws  
cEc,e
q|  
:z.Y$]F@  
_1<'"u#6w  
}b+QYSt  
1Xr"h:U_X  
t*d >eK`:N  
]<T8ZA_Y;  
fu<2t$Cn>  
ZPL程序代码如下： x XM!E 8  
V.ji _vX  
! ex30401 !?o$-+a|  
! This program shows how to create a doublet from scratch ^qO=~U!{  
_/}Hqh  
! set system parameters R pI<]1
  
SYSP 30, 0     # set lens unit as mm 6_<s=nTX  
G4Kmt98I  
SYSP 10, 0     # set system aperture as Entrance Pupil Diameter RO{@RhnV  
SYSP 11, 50     # set system aperture value as 50mm ;,=h59`  
F|l`YtZZd  
SYSP 201, 3     # set total wavelength number as 3 F`0c?)  
SYSP 202, 1, 0.48613270     # set the 1st wavelength as 0.48613270 micron "6N~2q,SW  
SYSP 202, 2, 0.58756180     # set the 2nd wavelength as 0.58756180 micron pzq;vMr  
SYSP 202, 3, 0.65627250     # set the 3rd wavelength as 0.65627250 micron 4r[pMJiq  
SYSP 203, 1, 1     # set the 1st wavelength weight as 1 MJ*]fC3/  
SYSP 203, 2, 1     # set the 2nd wavelength weight as 1 g&+Y{*Gp  
SYSP 203, 3, 1     # set the 3rd wavelength weight as 1 jD/7/G*  
Q"|kW[Sg  
SYSP 200, 2     # set the 2nd wavelength as the primary wavelength Mf:M3H%YV+  
Z-SwJtWk  
SYSP 100, 0     # set the field type as angle P$18Xno{  
SYSP 101, 3     # set the total field number as 3 l]Ui@X  
SYSP 102, 1, 0     # set  field 1 as x=0 degree g TXW2S  
SYSP 103, 1, 0     # set  field 1 as y=0 degree ?orhJS  
SYSP 104, 1, 1     # set  field 1 as weight=1 a,~D+s;^  
SYSP 102, 2, 0     # set  field 2 as x=0 degree }B"|z'u  
SYSP 103, 2, 3.5     # set  field 2 as y=3.5 degree +z|UpI  
SYSP 104, 2, 1     # set  field 2 as weight=1 hA*Z'.[  
SYSP 102, 3, 0     # set  field 3 as x=0 degree z0 2}&^Zzk  
SYSP 103, 3, 5     # set  field 3 as y=5 degree 4e@&QOo`Cu  
SYSP 104, 3, 1     # set  field 3 as weight=1 =0h|yjnL/  
t0e{|du  
! set surface 1 as stop [Iw>|q<e  
STOPSURF 1 @1v3-n=  
x^)g'16`  
! insert 3 surfcaces after stop 0AK?{y U  
INSERT 2 dXiE.Si  
INSERT 2 EK?@Z.q+  
INSERT 2 RQ^m6)BTo  
_k_>aG23  
! set surface parameters 4L=$K2R2r  
SURP 1, THIC, 275  # set surface 1 thickness as 275 >'aG/(  
=Y&9 qt  
SURP 2, TYPE, "STANDARD"  # set surface 2 type as "STANDARD",can be omitted 3cOY0Z#T  
SURP 2, COMM, "front f1"  # set surface 2 comment ;GE26Ymqly  
SURP 2, CURV, 1/600  # set surface 2 curvature as 1/600 C5es2!^-]O  
SURP 2, THIC, 18  # set surface 2 thickness as 18 C}mYt/
  
SURP 2, GLAS, "BK7"  # set surface 2 glass type as BK7 X-kXg)!Bg  
4D^ M<Xn  
SURP 3, COMM, "back f1/front f2"  # set surface 3 comment x0\e<x9s  
SURP 3, CURV, -1/115  # set surface 3 curvature as -1/115 3s`V)aXP  
SURP 3, THIC, 18  # set surface 3 thickness as 18 }+Rgx@XZ\  
SURP 3, GLAS, "F2"  # set surface 3 glass type as F2 =[]x\&@t  
4llD6&%  
SURP 4, COMM, "back f2"  # set surface 4 comment /"""z=q  
SURP 4, CURV, -1/243  # set surface 4 curvature as -1/243 =oE_.ux\  
SURP 4, THIC, 395  # set surface 4 thickness as 395 +`;+RDKY*  
0 kf(g156  
UPDATE

Thanks

多试几次应该可以

跑了一遍，代码运行正常。 >-!r9"8@  

应该是版本的问题，有些宏函数老版本不支持