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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ fh_:ung  
S.iUiS"  
SYSTEM NEW %#4;'\'5  
RESET PDc4ok`)  
X`v6gv5qj  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE &q4~WRnzJk  
f]2gjQHM  
ARROWS OFF |9 *$6Y  
UNITS MM dUn]aS  
7 v3%dCvf  
WAVELENGTHS 450 550 633 NM ML$#&Z@ *7  
SmyJ@.L"  
MEDIA  `m_fi  
1.5 1.5 1.5 'GLASS' N{RHbSa(  
v{lDEF@2^N  
COATING PROPERTIES *2pE39  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' JKp@fQT *  
1 0  1 0  1 0  'REFLECT' y&4im;X0  
0 1  0 1  0 1  'TRANSMIT' 26_PFHQu4  
0 1  1 0  1 0  'SPLITTER1' 26zif
  
0 0  1 0  0 1  'SPLITTER2' YP"%z6N@v  
1 0  0 1  0 1  'SPLITTER3' &,XPMT  
0 1  0 1  1 0  'SPLITTER4' uY3$nlhP6  
 wN0?~  
!! GEOMETRY CONSTRUCTION WV|9d}5  
;F,6]LH!  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES $1Z3yb^  
)086u8w )y  
!!___________________________________________________ bDw\;bnG  
!! PARABOLIC REFLECTOR [sPLu)q2  
\q-["W34  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR +C`vO5\0  
XAPE=60   !! FULL APERTURE IN X-DIRECTION Y'6P ~C;v  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION ONcS
,oHW  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR ]%Whtj.,x7  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR xr)m8H  
eBECY(QMQ  
SURFACE K}S=f\Q]  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) TSL/zTLDJ  
OBJECT 'LAMP_REFLECTOR' \=W t{  
  INTERFACE COAT REFLECT AIR AIR 5oD%~Fk l  
  SHIFT 0 (YPOS) (ZPOS) -Xgup,}?  
kP~ ;dJD  
!!___________________________________________________ #zd}xla0]  
!! LENS ARRAY E&W4`{6K4  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES %%O_:@9x,  
Mr K?,7*Xi  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE +w3k_^X9c  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE #0qMYe>Y  
FLA1=50   !! LENSLET FOCAL LENGTH oB}rd9  
ZPOS=0 v}z{OB  
YPOS=0 qp1rP#  
s.}:!fBk  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. ?v@q&  
!! CREATE the lenses as individual objects within a '&xRb*  
!! nested $DO loop.  The only way to nest $DO loops in f7]C1!]  
!! ASAP is to place the inner loop in a macro, and call ;}4e+`fF|  
!! that macro from the outer loop. $J:~jY/J  
l>>,~  
LENSROW { '-X913eG!  
$DO 1 5 dNs<`2
m  
   { LENSES q/tC/V%@(  
       IDEAL Z 0 (LXAPE/2) V:
4($  
         1 0 -1/(FLA1) 1 ~hA;ji|I  
     OBJECT 'LENSLET.?.#1' 5adB5)`  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 A832z`  
     RETURN } 7\;gd4Ua1  
} [Hp"a^~r|  
] yXrD`J!  
$DO 1 5 [@t 6,g  
  $LENSROW ? /`VtW$9-  
(V~
PYf%  
GROUP -25 .We"j_ }  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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