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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ {Wt=NI?Ow  
[S4<bh!  
SYSTEM NEW 4h-tR  
RESET l2i[wc"9  
Z<`QDBN"4  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE
|Gz(
q4  
,#nyEE  
ARROWS OFF YH@^6Be9  
UNITS MM H
8X{!/,^  
*5u0`k^j  
WAVELENGTHS 450 550 633 NM C1hp2CW$5/  
 Hi#hf"V  
MEDIA dj 4:r!5_  
1.5 1.5 1.5 'GLASS' H>%K}Fh  
NSZ9M%7  
COATING PROPERTIES u{J$]%C   
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' 4PR!OB  
1 0  1 0  1 0  'REFLECT' ^tI ,eZ  
0 1  0 1  0 1  'TRANSMIT'  t
mKHT  
0 1  1 0  1 0  'SPLITTER1' %AaZc=a[c  
0 0  1 0  0 1  'SPLITTER2' 9J*.'Y  
1 0  0 1  0 1  'SPLITTER3' wZ0RI{)s'  
0 1  0 1  1 0  'SPLITTER4' a0~LZQ?  
FG/1!8F  
!! GEOMETRY CONSTRUCTION Kqm2TMO]>V  
<m'W{n%Pp  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES Ejmpg_kux  
/@ m]@  
!!___________________________________________________ PKJw%.-  
!! PARABOLIC REFLECTOR {{qu:(_g  
Z):q1:y  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR 8MU+i%hd  
XAPE=60   !! FULL APERTURE IN X-DIRECTION #ozui-u>  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION vhvFBx0  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR ?L x*MJZ  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR O |!cPB:  
g%TOYZr!X  
SURFACE QWcQtM  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) 3?5JY;}h>"  
OBJECT 'LAMP_REFLECTOR' 4 Fl>XM  
  INTERFACE COAT REFLECT AIR AIR >P@g].Q-  
  SHIFT 0 (YPOS) (ZPOS) lha)4d  
\xG_q>1_  
!!___________________________________________________ TophV}@B`  
!! LENS ARRAY Ym%XCl  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES TXdo,DPv7  
4K5  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE {>g{+Eq  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE rny(8z%Ck-  
FLA1=50   !! LENSLET FOCAL LENGTH 2)hfYLi  
ZPOS=0 =U'!<w<-  
YPOS=0 ~[<C6{  
FRa>cf4  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. 9:R3+,ZN  
!! CREATE the lenses as individual objects within a LY-,cXm&|  
!! nested $DO loop.  The only way to nest $DO loops in "%lIB{  
!! ASAP is to place the inner loop in a macro, and call L+N\B@ 0-  
!! that macro from the outer loop. w p\-LO~  
hi`[  
LENSROW { `J]e.K  
$DO 1 5 \#4mPk_"  
   { LENSES ,BUrZA2\U$  
       IDEAL Z 0 (LXAPE/2) 't6l@_x  
         1 0 -1/(FLA1) 1 z
zK<>@c  
     OBJECT 'LENSLET.?.#1' e>6|# d  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 E5!vw@,  
     RETURN } JkhWLQ>o  
} }{y)a<`  
djH&)&q!  
$DO 1 5 v*[UG^+)  
  $LENSROW ? i\
<S ;  
da<>a  
GROUP -25 `WIZY33V  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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