[求助]ASAP宏语言中，#代表什么意思？ [复制链接]

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ Bg{"{poy  
s"s^rC  
SYSTEM NEW XX+%:
,G  
RESET T|[zk.8=E  
zyTeF~_  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE yal
T6  
[BWA$5D)Ny  
ARROWS OFF *>I4X=  
UNITS MM bkTk:-L5:  
Z$"E|nRN  
WAVELENGTHS 450 550 633 NM /SO 4O|b  
Jsde+G,N  
MEDIA _XvSe]`f`  
1.5 1.5 1.5 'GLASS' K 0R<a~  
hX;JMQ915  
COATING PROPERTIES =f4>vo}@k  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' Fu].%`*xJ  
1 0  1 0  1 0  'REFLECT' >|IUjv2L  
0 1  0 1  0 1  'TRANSMIT' Pv@Lx+k  
0 1  1 0  1 0  'SPLITTER1' j#6@cO'`  
0 0  1 0  0 1  'SPLITTER2' &?59{B.mD  
1 0  0 1  0 1  'SPLITTER3' j\@Ht~G  
0 1  0 1  1 0  'SPLITTER4'
xY v@  
cgY+xd@  
!! GEOMETRY CONSTRUCTION EbXWCD  
H}vq2|MN  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES GI']&{  
f-$%Ck$%,  
!!___________________________________________________ ufq9+}  
!! PARABOLIC REFLECTOR Vh=10Et  
2z#gn9Wb  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR re[v}cB  
XAPE=60   !! FULL APERTURE IN X-DIRECTION FK ?g  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION II;   
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR Ts)ox}rYVm  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR DNwqi"  
O7,)#{  
SURFACE lfTDpKz3D  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) fRlO.!0(  
OBJECT 'LAMP_REFLECTOR' S3fyt]pp  
  INTERFACE COAT REFLECT AIR AIR cug=k  
  SHIFT 0 (YPOS) (ZPOS) f~a]og5|G  
tg5G`P5PJ  
!!___________________________________________________ 3Q;XvrGA  
!! LENS ARRAY xWR<>Og.  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES 9IfeaoZZ4q  
E)ne z  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE r" 4u)H>  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE T'8d|$X  
FLA1=50   !! LENSLET FOCAL LENGTH ZF@T,i9  
ZPOS=0 i?^lEqy[  
YPOS=0 m6wrG`-di  
jc0Trs{Jf  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. ku*H*o~  
!! CREATE the lenses as individual objects within a )+L.$h  
!! nested $DO loop.  The only way to nest $DO loops in MVDEVq0  
!! ASAP is to place the inner loop in a macro, and call 5-[bdI  
!! that macro from the outer loop. .0=VQU  
^t0Yh%V7  
LENSROW { ~3'}^V\  
$DO 1 5 'jnR<>N  
   { LENSES n.L/Xp@gc  
       IDEAL Z 0 (LXAPE/2) ]'q"Kw/10  
         1 0 -1/(FLA1) 1 n=_jmR1  
     OBJECT 'LENSLET.?.#1' yUY* l@v]  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 b_v{QE<  
     RETURN } x b6X8:  
} 6v
1F.u  
@a~GHG[x  
$DO 1 5 P[q 'Y^\  
  $LENSROW ? ))9w)A@  
_-6IB>  
GROUP -25 r P1FM1"M  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

这里好像是命名吧，０就是０号物体，可能也许大概吧．．．．．．．．．．