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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ s;!TB6b@  
K q;X(&Z  
SYSTEM NEW m2wGg/F5  
RESET A")F7F31c  
W"j&':xD  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE 5>z`==N)  
xUT]6T0dB  
ARROWS OFF bCWSh~  
UNITS MM -/ 5" Py  
`[) awP  
WAVELENGTHS 450 550 633 NM X>}-UHKV+  
CK4C:`YG  
MEDIA f(}?Sp_  
1.5 1.5 1.5 'GLASS' 9!C
D25u  
\NE~k)`4j%  
COATING PROPERTIES H@
ab]
&  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' PVfky@wl"  
1 0  1 0  1 0  'REFLECT' 7p"4rL  
0 1  0 1  0 1  'TRANSMIT' y5>X0tT  
0 1  1 0  1 0  'SPLITTER1' %UGXgYDz  
0 0  1 0  0 1  'SPLITTER2' ?
K5S{qG'O  
1 0  0 1  0 1  'SPLITTER3' ^FO&GM2a  
0 1  0 1  1 0  'SPLITTER4' jVA|Vi_2  
< cNJrer  
!! GEOMETRY CONSTRUCTION +5AWX,9,-  
;UU`kk  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES ,x(?7ZW>  
"d1~(0=6<m  
!!___________________________________________________ ngmHiI W  
!! PARABOLIC REFLECTOR Z=c&</9e  
K
K-}&N8  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR 2c)Ez?  
XAPE=60   !! FULL APERTURE IN X-DIRECTION 10?+6*d  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION 2%!yV~Z  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR Mk-zeq<2z  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR mbSG  
iX]tL:,~i  
SURFACE $,I%g<  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) x-E@[=  
OBJECT 'LAMP_REFLECTOR' SM?r
ss.=  
  INTERFACE COAT REFLECT AIR AIR mz-sazgV  
  SHIFT 0 (YPOS) (ZPOS) l~mC$>f  
9E`Laf  
!!___________________________________________________ 5t
=7-  
!! LENS ARRAY KE$I!$zO  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES zE,1zBS<  
TzSEQS{  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE &9j*Y  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE TUy 25E  
FLA1=50   !! LENSLET FOCAL LENGTH W!Qaa(o?  
ZPOS=0 pB(|Y]3A  
YPOS=0 J 2H$ALl  
8'<RPU}M  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. 7)-uYi] dA  
!! CREATE the lenses as individual objects within a y=HM]EH>  
!! nested $DO loop.  The only way to nest $DO loops in ]a=n(`l?  
!! ASAP is to place the inner loop in a macro, and call x->H~/  
!! that macro from the outer loop. T<ka4  
_&SST)Y|  
LENSROW { jNbU{Z%r  
$DO 1 5 [8 I*lsS  
   { LENSES L9Z\|L5  
       IDEAL Z 0 (LXAPE/2) xI>HY9i)  
         1 0 -1/(FLA1) 1 eeVzOq(  
     OBJECT 'LENSLET.?.#1' i;l0)q  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 %(}%#-X  
     RETURN } O\X=vh/D  
} F2)\%HR  
)x&4 Q=  
$DO 1 5 (F+]h]KSi  
  $LENSROW ? yd=NafPM  
,DIr&5>p2  
GROUP -25 Z,_EhEm  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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