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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ h/_z QR-  
z
cZr )Oh  
SYSTEM NEW d1E~H]X4  
RESET 9Hc#[Ml  
_t;w n7p  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE m CdkYN#  
}%XNB1/`  
ARROWS OFF +[F9Q,bH@b  
UNITS MM =lDmP|^  
?_tOqh@in  
WAVELENGTHS 450 550 633 NM jg
Gn"}  
CyXcA;H,.  
MEDIA ;G\rhk  
1.5 1.5 1.5 'GLASS' qmL!"ZRLF  
uP*>-s'm  
COATING PROPERTIES v
F([mOZ  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' KY"~Ta`  
1 0  1 0  1 0  'REFLECT' ~O^_J)  
0 1  0 1  0 1  'TRANSMIT' 9X*q^u  
0 1  1 0  1 0  'SPLITTER1' 75v*&-  
0 0  1 0  0 1  'SPLITTER2' [R Ch7FE23  
1 0  0 1  0 1  'SPLITTER3' 0`qq"j[6a  
0 1  0 1  1 0  'SPLITTER4' ]mqB&{g  
U9k}y  
!! GEOMETRY CONSTRUCTION qBwqxxTc  
0 /H1INve  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES /aPq9B@  
j`tUx# h  
!!___________________________________________________ Fvv6<
E  
!! PARABOLIC REFLECTOR m3|,c[M1  
rB7(&(n>^  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR W&yw5rt**  
XAPE=60   !! FULL APERTURE IN X-DIRECTION @?%"nK  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION RI%l& Hm  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR ?=T&|pp  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR hZJ Nh,,w  
v~xG*e  
SURFACE iFDQnt [t  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) (>Yii_Cd  
OBJECT 'LAMP_REFLECTOR' k1cBMDSokO  
  INTERFACE COAT REFLECT AIR AIR X F40;urm  
  SHIFT 0 (YPOS) (ZPOS) +2
2[ h@  
'"KK|]vJ  
!!___________________________________________________ AV&ege  
!! LENS ARRAY nv8,O=#s  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES +X- k)9  
1ii.nt1u  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE Ri3m438  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE oJR!0nQ  
FLA1=50   !! LENSLET FOCAL LENGTH zzx4;C",u  
ZPOS=0 ~/.&Z`ls  
YPOS=0 +HcH]D;  
Fb}9cpz{  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. fklMYu4:n  
!! CREATE the lenses as individual objects within a  C[Fh^  
!! nested $DO loop.  The only way to nest $DO loops in t+#
Ss v8  
!! ASAP is to place the inner loop in a macro, and call 3 (<!pA  
!! that macro from the outer loop. 8~I>t9Q+  
A} "*`y  
LENSROW {  KA<  
$DO 1 5 Ay_<?F+&  
   { LENSES +u
Lu.-N  
       IDEAL Z 0 (LXAPE/2) +GGj*sD  
         1 0 -1/(FLA1) 1 kOjq LA  
     OBJECT 'LENSLET.?.#1' C8jZcs#4  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 - Z|1@s&  
     RETURN } t3WlVUtq3  
} ruW6cvsvet  
:G`_IB\  
$DO 1 5 0O:TKgb&C.  
  $LENSROW ? R5FjJ>JE  
C6Mb(
&  
GROUP -25 i a|F
  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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