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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ mGss9eZa  
criQa<N"  
SYSTEM NEW iLQFce7d|&  
RESET :%_*C09  
#b u]@/  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE v[k;R  
$<;!F=%8  
ARROWS OFF x;Qs_"t];3  
UNITS MM pD^7ZE6  
BHmmvbM#Qm  
WAVELENGTHS 450 550 633 NM .b.pyVk  
 fP+RuZ  
MEDIA bl8zcpdL  
1.5 1.5 1.5 'GLASS' 29a~B<e7s  
UweXz.x7  
COATING PROPERTIES ^("23mhfJ  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' ua!i3]18  
1 0  1 0  1 0  'REFLECT' f*Z8C9)  
0 1  0 1  0 1  'TRANSMIT'
v'0WE  
0 1  1 0  1 0  'SPLITTER1' $N !l-lu=  
0 0  1 0  0 1  'SPLITTER2' *Sd}cDCO%  
1 0  0 1  0 1  'SPLITTER3' LS"_-4I}  
0 1  0 1  1 0  'SPLITTER4' y\a@'LFL  
BM~>=emc  
!! GEOMETRY CONSTRUCTION a ~  
P\jnht  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES [h5~1N
 
n(}cK@  
!!___________________________________________________ yj:<3_-C*  
!! PARABOLIC REFLECTOR ^bD)Tg5K  
e
8Ul^]  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR cDkq@H:  
XAPE=60   !! FULL APERTURE IN X-DIRECTION  $,b1`*  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION 'P AIh*qA  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR M%yeI{m  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR wBuos}/  
"YC5viX  
SURFACE G+_Q7-o&d6  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) V4["+Y  
OBJECT 'LAMP_REFLECTOR' [:hTwBRF  
  INTERFACE COAT REFLECT AIR AIR Oax6_kmOj  
  SHIFT 0 (YPOS) (ZPOS) buj*L&  
/8cfdP Ba  
!!___________________________________________________ eNHSfq  
!! LENS ARRAY S17iYjy#8T  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES Th'B5:`  
$D][_I  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE q PveG1+25  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE KbXENz&C  
FLA1=50   !! LENSLET FOCAL LENGTH *GZ7S m  
ZPOS=0 bMA\_?  
YPOS=0 d`w3I`P1  
,J@A5/B,AA  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. JEL.*[/  
!! CREATE the lenses as individual objects within a mX
Ss:FqE!  
!! nested $DO loop.  The only way to nest $DO loops in RJ+["[k  
!! ASAP is to place the inner loop in a macro, and call -$2B!#]3
 
!! that macro from the outer loop. j}`XF?2D  
iBXS   
LENSROW { 4[XiD* *  
$DO 1 5 &6@#W]_  
   { LENSES ^~7/hm:  
       IDEAL Z 0 (LXAPE/2) w/oXFs&FK  
         1 0 -1/(FLA1) 1 lZ*V.-D^
]  
     OBJECT 'LENSLET.?.#1' sZDxTP+  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 P\rA>ZY  
     RETURN } :Z R5<Y>  
} (teK0s;t5k  
NMvNw?]
 
$DO 1 5 /5wIbmz@I
 
  $LENSROW ? #xoFcjRE  
%wQE lkB  
GROUP -25 F*4zC@;  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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