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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ QP+c?ct}hF  
@c0n2 Xcr  
SYSTEM NEW )F
+nSV;  
RESET ^g-Fg>&M  
j=FMYd8$y  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE b#Jo Xa9  
(eki X*y  
ARROWS OFF ~c!Rx'  
UNITS MM <8g=BWA  
sE-x"c  
WAVELENGTHS 450 550 633 NM 32s5-.{c/f  
<s
O?ev[  
MEDIA //~POm
  
1.5 1.5 1.5 'GLASS' " \`BPN  
y-%nJD$  
COATING PROPERTIES ]c5DOv&  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' (rAiDRQ[  
1 0  1 0  1 0  'REFLECT' ^@M[t<  
0 1  0 1  0 1  'TRANSMIT' `}[VwQ  
0 1  1 0  1 0  'SPLITTER1' p}96uaC1  
0 0  1 0  0 1  'SPLITTER2' tF<^9stM  
1 0  0 1  0 1  'SPLITTER3' #NWZk.S  
0 1  0 1  1 0  'SPLITTER4' *Ao2j;  
=d}gv6v2S  
!! GEOMETRY CONSTRUCTION _yiRh:  
ht2 f-EKf{  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES z~BD(FDI  

| A3U@>6  
!!___________________________________________________ $Z,i|K;  
!! PARABOLIC REFLECTOR t8t}7XD   
A<mj8qz  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR txj wZ_p  
XAPE=60   !! FULL APERTURE IN X-DIRECTION 6#-6Bh)>4  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION O~${&(  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR lr-12-D%-  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR UaH26fWs  
di"C]" ;  
SURFACE v&p,Clt-2  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) P#w}3^  
OBJECT 'LAMP_REFLECTOR' (m<R0  
  INTERFACE COAT REFLECT AIR AIR XyvZ&d6(d  
  SHIFT 0 (YPOS) (ZPOS) /_$~rW  
6e-#XCR{  
!!___________________________________________________ <sgZ3*,A  
!! LENS ARRAY 9BqQ^`bu  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES I/^q+l.=`{  
,DexJ1  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE A Z4|&iT  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE u(8_[/_B  
FLA1=50   !! LENSLET FOCAL LENGTH 1y},9ym  
ZPOS=0 nw~/~eM5=  
YPOS=0  QpdujtH`  
t)\D  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. b^uP^](J  
!! CREATE the lenses as individual objects within a =@Q#dDnFu%  
!! nested $DO loop.  The only way to nest $DO loops in }V\P,ck  
!! ASAP is to place the inner loop in a macro, and call gV<0Hj  
!! that macro from the outer loop. X*TuQ\T  
QN)/,=#  
LENSROW { wrz+2EP`  
$DO 1 5 Bv2z4D4f+  
   { LENSES kb/|;!  
       IDEAL Z 0 (LXAPE/2) [54@irH  
         1 0 -1/(FLA1) 1 v(qV\:s}m  
     OBJECT 'LENSLET.?.#1' aEcktg6h  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 +CsI,Uf4*  
     RETURN } g2+l@$W  
} RY\{=f  
ExNj|*  
$DO 1 5 l84h%,  
  $LENSROW ? "WF( 6z#  
E9yFREvQc  
GROUP -25 EO4"Z@ji  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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