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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ )gUR@V>e2  
KhR81\  
SYSTEM NEW Zd%k*BC  
RESET epe)a  
9wUkh}s  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE 1~_{$5[X?  
X=&ET)8-Y  
ARROWS OFF x.6:<y  
UNITS MM 13=AW  
ORw,)l  
WAVELENGTHS 450 550 633 NM zrgk]n;Pq  
;7V%#-  
MEDIA prF%.(G2)  
1.5 1.5 1.5 'GLASS' n0 {i&[I~+  
B
%b4v  
COATING PROPERTIES &%DY\*  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' 7(8;to6(  
1 0  1 0  1 0  'REFLECT' \V8PhO;j  
0 1  0 1  0 1  'TRANSMIT' "?xHlYj@+  
0 1  1 0  1 0  'SPLITTER1' osAd1<EI
C  
0 0  1 0  0 1  'SPLITTER2' b=NxUd O  
1 0  0 1  0 1  'SPLITTER3' a~}OZ&PG  
0 1  0 1  1 0  'SPLITTER4' kJsN|
=  
'Aq{UGN  
!! GEOMETRY CONSTRUCTION M`!H"R7  
IY\5@PVZ  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES %_W)~Pv{+  
>uhaW@d  
!!___________________________________________________ 9IfmW^0  
!! PARABOLIC REFLECTOR 7*A],:-q  
c9 _rmz8  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR 7WS p($  
XAPE=60   !! FULL APERTURE IN X-DIRECTION 37.S\gO]  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION +.FEq*V  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR xr Jg\to{i  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR u^I|T.w<r6  

mL{6L?  
SURFACE )'cMYC  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) `kXs;T6&  
OBJECT 'LAMP_REFLECTOR' 4p;`C  
  INTERFACE COAT REFLECT AIR AIR 'S&zCTX7j  
  SHIFT 0 (YPOS) (ZPOS) p]+Pkxz]'  
2-EIE4
ds  
!!___________________________________________________ 2eY_%Y0  
!! LENS ARRAY .[OUI  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES ^k">A:E2  
SO'vp
z{  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE ?NsW|w_  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE xY(*.T9K  
FLA1=50   !! LENSLET FOCAL LENGTH PKiy5D*8p  
ZPOS=0 `1fY)d^ZS  
YPOS=0 fr6fj  
BW*rIn<?G  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. 7;wd(8  
!! CREATE the lenses as individual objects within a 4>e&f&y~  
!! nested $DO loop.  The only way to nest $DO loops in ;85>xHK
 
!! ASAP is to place the inner loop in a macro, and call K1yzD6[eW  
!! that macro from the outer loop. BUXpCxQ  
/t$d\b17pX  
LENSROW { S3Xl  
$DO 1 5 Cjlk  
   { LENSES z5*'{t)  
       IDEAL Z 0 (LXAPE/2) /!XVHkX[  
         1 0 -1/(FLA1) 1 N2<!}Eyu  
     OBJECT 'LENSLET.?.#1' F0Yd@Lk$_  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 7Kxp=-k  
     RETURN } $suzW;{#  
} ]2qo+yB  
w@w(-F!%l  
$DO 1 5 }a(dyr`S  
  $LENSROW ? ^v7gIC  
8$Y9ORs4  
GROUP -25 88wa7i*  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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