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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ HuRq0/"  
jjTb:Z=.'  
SYSTEM NEW 49Y_ze6L}  
RESET P)k!#*  
w1q`  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE xA7Aw0  
A])+Pe  
ARROWS OFF q2U8]V U)  
UNITS MM =
VFPZ  
,T<q"d7-#  
WAVELENGTHS 450 550 633 NM gOSFvH8FU  
D>>?8a  
MEDIA GyP.;$NHa[  
1.5 1.5 1.5 'GLASS' R4x!b`:i  
XqxmvN  
COATING PROPERTIES tpQ?E<O  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' {OBV+}#  
1 0  1 0  1 0  'REFLECT' wiE'6CM  
0 1  0 1  0 1  'TRANSMIT' +/|;<K5_LI  
0 1  1 0  1 0  'SPLITTER1' )B1gX>J\8  
0 0  1 0  0 1  'SPLITTER2' \(g/::|  
1 0  0 1  0 1  'SPLITTER3' *l9Wj$vja  
0 1  0 1  1 0  'SPLITTER4' M&q3xo"w  
#UYrSM@u  
!! GEOMETRY CONSTRUCTION s ~Xa=_+D  
:@=;WB*0
 
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES k __MYb  
hP$v,"$  
!!___________________________________________________ |9&bkojo  
!! PARABOLIC REFLECTOR $?FA7=_  
AJWV#J%nB  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR "$6 .L^9W  
XAPE=60   !! FULL APERTURE IN X-DIRECTION iI 4XM>`a  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION Kx<T;iJ}  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR )o[Jxu'  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR *ke9/hO1i  
+.Cx.Nf(  
SURFACE K'tck
J#%  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) ^{+,j}V_H  
OBJECT 'LAMP_REFLECTOR' -z6{!  
  INTERFACE COAT REFLECT AIR AIR 873'=m&  
  SHIFT 0 (YPOS) (ZPOS) |vVcO  
R&P}\cf8T  
!!___________________________________________________ x4 .Y&Wq#  
!! LENS ARRAY M"l<::z  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES +@5@`"Jry  
hF4gz*Q  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE ?K9zTas@  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE sQ05
wAv  
FLA1=50   !! LENSLET FOCAL LENGTH %<?U`o@*  
ZPOS=0
{%PgR){qR  
YPOS=0 TLWU7aj&!  
6f^q >YP  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. 23_\UTM}1  
!! CREATE the lenses as individual objects within a fk!P#  
!! nested $DO loop.  The only way to nest $DO loops in o+F]80CH  
!! ASAP is to place the inner loop in a macro, and call r{1xjAT  
!! that macro from the outer loop. ~P@6fK/M  
JA(M'&q4  
LENSROW { jDKL}x  
$DO 1 5 CgxGvM4  
   { LENSES zhW.0:9 CR  
       IDEAL Z 0 (LXAPE/2) (w
/)u  
         1 0 -1/(FLA1) 1 Sn~h[s_(  
     OBJECT 'LENSLET.?.#1' xzrA%1y  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 iF!r}fUU6  
     RETURN } GDBxciv  
} 2,bLEhu  
?VaAVxd29  
$DO 1 5 F?EAIL  
  $LENSROW ? `^#V1kRmH  
Y%"73.x  
GROUP -25 P S [ifC  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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