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

各位高手，请教一下，新手学zemax编程，照着敲了一段程序，在zemax中ZPL程序为什么运行不了，还请各位高手指点指点，谢谢！ AO UL^$&  
M,5"b+mX[~  
!u]1dxa  
RV&^g*;E  
VS&TA>  
KeNL0_Pw  
o:6@Kw^  
eu|j=mB  
v<fnB  
07Edfe  
a[2vjFf#C  
W14Vm(`N  
#Eb5:;  
&x >B  
ZPL程序代码如下： hkOsm6  
smm
]6  
! ex30401 "YB**Y  
! This program shows how to create a doublet from scratch Pm$q]A~  
G7=pBf  
! set system parameters (|d34DOJ  
SYSP 30, 0     # set lens unit as mm ai*f F  
M4WiT<|]R  
SYSP 10, 0     # set system aperture as Entrance Pupil Diameter B(F,h+ajy  
SYSP 11, 50     # set system aperture value as 50mm dik9 >*"|o  
VACiVKk  
SYSP 201, 3     # set total wavelength number as 3 2!Bd2  
SYSP 202, 1, 0.48613270     # set the 1st wavelength as 0.48613270 micron /\)a  
SYSP 202, 2, 0.58756180     # set the 2nd wavelength as 0.58756180 micron 6; Y0a4Ax  
SYSP 202, 3, 0.65627250     # set the 3rd wavelength as 0.65627250 micron Pf F=m'  
SYSP 203, 1, 1     # set the 1st wavelength weight as 1 pMs AyCAk  
SYSP 203, 2, 1     # set the 2nd wavelength weight as 1 ~8m=1)A{(  
SYSP 203, 3, 1     # set the 3rd wavelength weight as 1 Cg616hyut  
r",]Voibd  
SYSP 200, 2     # set the 2nd wavelength as the primary wavelength 6DZ),F,M  
;}z\i  
SYSP 100, 0     # set the field type as angle -LM
;
}<  
SYSP 101, 3     # set the total field number as 3 r_YIpnJ  
SYSP 102, 1, 0     # set  field 1 as x=0 degree Yhp]x
  
SYSP 103, 1, 0     # set  field 1 as y=0 degree vzn{h)D  
SYSP 104, 1, 1     # set  field 1 as weight=1 y ?G_y  
SYSP 102, 2, 0     # set  field 2 as x=0 degree >q7BVF6V|  
SYSP 103, 2, 3.5     # set  field 2 as y=3.5 degree :pRpvhm  
SYSP 104, 2, 1     # set  field 2 as weight=1 Y4IGDY*  
SYSP 102, 3, 0     # set  field 3 as x=0 degree A6oq.I0  
SYSP 103, 3, 5     # set  field 3 as y=5 degree }KD;
0t4  
SYSP 104, 3, 1     # set  field 3 as weight=1 L>Mpi$L  
pN\Vr8tJ  
! set surface 1 as stop qOaQxRYm%Y  
STOPSURF 1 $F.kK%-*  
{_U Kttp  
! insert 3 surfcaces after stop {iG@U=>  
INSERT 2 gKg-O  
INSERT 2 tb?YLxMV  
INSERT 2 <ER'Ed  
H[b}k
ZW:a  
! set surface parameters U}$DhA"r"  
SURP 1, THIC, 275  # set surface 1 thickness as 275 r ]>\~&?^F  
1oKfy>ie  
SURP 2, TYPE, "STANDARD"  # set surface 2 type as "STANDARD",can be omitted 0hZ1rqq8C  
SURP 2, COMM, "front f1"  # set surface 2 comment IcIOC8WC  
SURP 2, CURV, 1/600  # set surface 2 curvature as 1/600 !,Zp? g)  
SURP 2, THIC, 18  # set surface 2 thickness as 18 { BEo &  
SURP 2, GLAS, "BK7"  # set surface 2 glass type as BK7 u>
pBB@  
B cj/y4"  
SURP 3, COMM, "back f1/front f2"  # set surface 3 comment dO7;}>F$n  
SURP 3, CURV, -1/115  # set surface 3 curvature as -1/115 #Dfo#
]k(  
SURP 3, THIC, 18  # set surface 3 thickness as 18 -A-tuyIsh"  
SURP 3, GLAS, "F2"  # set surface 3 glass type as F2 =:+0)t=ao  
 _ q(Q  
SURP 4, COMM, "back f2"  # set surface 4 comment US{3pkr;I]  
SURP 4, CURV, -1/243  # set surface 4 curvature as -1/243 iqW1#)3'R  
SURP 4, THIC, 395  # set surface 4 thickness as 395 ,%YBG1E[y  
vVT
?h  
UPDATE

Thanks

多试几次应该可以

跑了一遍，代码运行正常。 UEzi*"-v2  

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