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

各位高手，请教一下，新手学zemax编程，照着敲了一段程序，在zemax中ZPL程序为什么运行不了，还请各位高手指点指点，谢谢！ U+wfq%Fz  
S<bsrS*$  

%RX}sS  
1NQstmd{  
~|5B   
@_4E^KgF  
i]M:ntB"  
L>.*^]  
C])b 3tM,7  
i_M0P12  
%6eQ;Rp*  
_m2p>(N|  
QdtGFY4f,  
dAkJ5\=*  
ZPL程序代码如下： 1}Mdo&:t  
" }oH3L  
! ex30401 eB,eu4+-  
! This program shows how to create a doublet from scratch E\lel4ai  
?|,-Bft3  
! set system parameters I' TprT  
SYSP 30, 0     # set lens unit as mm ;N;['xcx;  
LOX}  
SYSP 10, 0     # set system aperture as Entrance Pupil Diameter 3yp?|>e  
SYSP 11, 50     # set system aperture value as 50mm ,ctm;T1H+  
t`oH7)nut  
SYSP 201, 3     # set total wavelength number as 3 *j"u~ NF  
SYSP 202, 1, 0.48613270     # set the 1st wavelength as 0.48613270 micron t+<?$I[  
SYSP 202, 2, 0.58756180     # set the 2nd wavelength as 0.58756180 micron .&2Nm&y$K  
SYSP 202, 3, 0.65627250     # set the 3rd wavelength as 0.65627250 micron ;r.0=Uo9]  
SYSP 203, 1, 1     # set the 1st wavelength weight as 1 ll8Zo+-[  
SYSP 203, 2, 1     # set the 2nd wavelength weight as 1 CS|al(?~  
SYSP 203, 3, 1     # set the 3rd wavelength weight as 1 `<x((@#  
Tw0GG8(c  
SYSP 200, 2     # set the 2nd wavelength as the primary wavelength %Z]c[V.  
|O4LR,{G.w  
SYSP 100, 0     # set the field type as angle 3]cW08"c  
SYSP 101, 3     # set the total field number as 3 P
'Diie  
SYSP 102, 1, 0     # set  field 1 as x=0 degree ILyI%DA&  
SYSP 103, 1, 0     # set  field 1 as y=0 degree {Ne5*HFV  
SYSP 104, 1, 1     # set  field 1 as weight=1 i4s_:
%+  
SYSP 102, 2, 0     # set  field 2 as x=0 degree nC2e^=^  
SYSP 103, 2, 3.5     # set  field 2 as y=3.5 degree zPn2  
SYSP 104, 2, 1     # set  field 2 as weight=1 )Lb?ZXT3  
SYSP 102, 3, 0     # set  field 3 as x=0 degree fv+t%,++:  
SYSP 103, 3, 5     # set  field 3 as y=5 degree 7+;$_,Xo<  
SYSP 104, 3, 1     # set  field 3 as weight=1 jhF&   
K2 b\9}  
! set surface 1 as stop R+b~m!58  
STOPSURF 1 x?rn<=  
.mwB'Ll  
! insert 3 surfcaces after stop 8K@>BFk1.  
INSERT 2 4Mck/i2  
INSERT 2 Zc|V7+Yx  
INSERT 2 B+r$_L&I  
lV M)'m  
! set surface parameters Yx3ivjX.>  
SURP 1, THIC, 275  # set surface 1 thickness as 275 f@7HVv&  
o>i@2_r\&H  
SURP 2, TYPE, "STANDARD"  # set surface 2 type as "STANDARD",can be omitted XT`
2Z=  
SURP 2, COMM, "front f1"  # set surface 2 comment -Wm'@4bH  
SURP 2, CURV, 1/600  # set surface 2 curvature as 1/600 &@[pJ2  
SURP 2, THIC, 18  # set surface 2 thickness as 18 /C\tJ
s  
SURP 2, GLAS, "BK7"  # set surface 2 glass type as BK7 E -+t[W  
-|g9__|@  
SURP 3, COMM, "back f1/front f2"  # set surface 3 comment k;V (rf`  
SURP 3, CURV, -1/115  # set surface 3 curvature as -1/115 KJP}0|[  
SURP 3, THIC, 18  # set surface 3 thickness as 18 {v>8Kp7_R  
SURP 3, GLAS, "F2"  # set surface 3 glass type as F2 *F;W 1TF  
R>T9 H0  
SURP 4, COMM, "back f2"  # set surface 4 comment J|=0 :G  
SURP 4, CURV, -1/243  # set surface 4 curvature as -1/243 57(5+Zme  
SURP 4, THIC, 395  # set surface 4 thickness as 395 1G<S'd+N  
U~I y),5  
UPDATE

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

跑了一遍，代码运行正常。 .2V?G]u  

多试几次应该可以

Thanks