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

各位高手，请教一下，新手学zemax编程，照着敲了一段程序，在zemax中ZPL程序为什么运行不了，还请各位高手指点指点，谢谢！ ]["%e9#aX  
X*MK(aV3  
J0vQqTaT  
P0; y  
>VZxDJ$R  
Ge({sy>X  
iz;5:  
4pMp@b  
vCej( ))  
J|hVD  
x0)=jp '  
_QHk&-Lp  
w:nH_x#C4  
*.eeiSi{  
ZPL程序代码如下： @C^x&Sjm  
PSv 5tQhm  
! ex30401 $,O8SW.O$  
! This program shows how to create a doublet from scratch I@z@s}x>  
{/)i}V#RE  
! set system parameters @f"[*7Q`/  
SYSP 30, 0     # set lens unit as mm )2wf D  
CB-;Jqb  
SYSP 10, 0     # set system aperture as Entrance Pupil Diameter %}H 2  
SYSP 11, 50     # set system aperture value as 50mm c
2Z!Vtd  
Z3MhHvvgp{  
SYSP 201, 3     # set total wavelength number as 3 QKEtV  
SYSP 202, 1, 0.48613270     # set the 1st wavelength as 0.48613270 micron x>mI$K(6M  
SYSP 202, 2, 0.58756180     # set the 2nd wavelength as 0.58756180 micron F0&ubspt\  
SYSP 202, 3, 0.65627250     # set the 3rd wavelength as 0.65627250 micron oCE'@}s.i  
SYSP 203, 1, 1     # set the 1st wavelength weight as 1 Z" H;t\P  
SYSP 203, 2, 1     # set the 2nd wavelength weight as 1 &?Erkc~
#  
SYSP 203, 3, 1     # set the 3rd wavelength weight as 1 i,"Xw[H*s  
|AE{rvP{@  
SYSP 200, 2     # set the 2nd wavelength as the primary wavelength x6JV@wA&  
F (kq  
SYSP 100, 0     # set the field type as angle .3UJ*^(?  
SYSP 101, 3     # set the total field number as 3 z &P1C,n)  
SYSP 102, 1, 0     # set  field 1 as x=0 degree bBc<p{
  
SYSP 103, 1, 0     # set  field 1 as y=0 degree CG@Fn\J  
SYSP 104, 1, 1     # set  field 1 as weight=1 t zd#9 #  
SYSP 102, 2, 0     # set  field 2 as x=0 degree R+ \%  
SYSP 103, 2, 3.5     # set  field 2 as y=3.5 degree ^HR8.9^[1u  
SYSP 104, 2, 1     # set  field 2 as weight=1 b{-"GqMO  
SYSP 102, 3, 0     # set  field 3 as x=0 degree ( ./MFf

 
SYSP 103, 3, 5     # set  field 3 as y=5 degree -1B.A  
SYSP 104, 3, 1     # set  field 3 as weight=1 AfhJ6cSIE  
8pA<1H%  
! set surface 1 as stop I+twI&GS  
STOPSURF 1 2<OU)rVE4  
fsK=]~<g  
! insert 3 surfcaces after stop Hmm0H6&u  
INSERT 2 4x-,l1NMR  
INSERT 2 Oq% TW|a#  
INSERT 2 ^/}4M'[w  
V,VL?J\  
! set surface parameters "8uNa  
SURP 1, THIC, 275  # set surface 1 thickness as 275 zd8A8]&-  
N2 3:+u<)E  
SURP 2, TYPE, "STANDARD"  # set surface 2 type as "STANDARD",can be omitted Kv!:2br  
SURP 2, COMM, "front f1"  # set surface 2 comment 2G-"HOG  
SURP 2, CURV, 1/600  # set surface 2 curvature as 1/600 c\>I0HH;!  
SURP 2, THIC, 18  # set surface 2 thickness as 18 "|J6*s   
SURP 2, GLAS, "BK7"  # set surface 2 glass type as BK7 aY,Bt
 
|uz<)  
SURP 3, COMM, "back f1/front f2"  # set surface 3 comment e(^I.`9z  
SURP 3, CURV, -1/115  # set surface 3 curvature as -1/115 i)(G0/:  
SURP 3, THIC, 18  # set surface 3 thickness as 18 Y)lr+~84f  
SURP 3, GLAS, "F2"  # set surface 3 glass type as F2 EUI*:JU-  
aB (pdW4  
SURP 4, COMM, "back f2"  # set surface 4 comment SXl~lYUL  
SURP 4, CURV, -1/243  # set surface 4 curvature as -1/243 Q3=5q w^  
SURP 4, THIC, 395  # set surface 4 thickness as 395 S-\wX.`R1  
;u(*&vRqr^  
UPDATE

Thanks

多试几次应该可以

跑了一遍，代码运行正常。 FdnLxw  

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