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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ oore:`m;  
]D^zTl3=q  
SYSTEM NEW F ~e}=Nb  
RESET ('`mPD,  
H? %I((+  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE W6)XMl}n  
5! ]T%.rM  
ARROWS OFF uG/bCb+V  
UNITS MM DG=_E\"#  
<J]N E|:  
WAVELENGTHS 450 550 633 NM !-7<x"avm  
.B!L+M< [  
MEDIA _$mS=G(  
1.5 1.5 1.5 'GLASS' #%]?e N  
lrgvY>E0  
COATING PROPERTIES t4p-pH'9b  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' BOl*. t  
1 0  1 0  1 0  'REFLECT' AY]rQ:I  
0 1  0 1  0 1  'TRANSMIT' m[w~h\FS  
0 1  1 0  1 0  'SPLITTER1' 'h>l_A
 
0 0  1 0  0 1  'SPLITTER2' [
C3wjYi  
1 0  0 1  0 1  'SPLITTER3' }]pOR&o  
0 1  0 1  1 0  'SPLITTER4' cr!sq.)s  
v){X&HbP  
!! GEOMETRY CONSTRUCTION r3Yf
Y\  
2bf#L?5g/  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES "9RW<+  
V^\b"1X7N  
!!___________________________________________________ |vj!,b88n#  
!! PARABOLIC REFLECTOR R;w1& Z  
Ct0%3]<J  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR ?`B6I!S0[  
XAPE=60   !! FULL APERTURE IN X-DIRECTION WhL"-f  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION 1!R:}r3t  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR =/N0^  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR !)OA7%3m  
F'55BY*!  
SURFACE yiczRex%rq  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) V
jSA&R  
OBJECT 'LAMP_REFLECTOR' s=XqI@  
  INTERFACE COAT REFLECT AIR AIR k")3R}mX  
  SHIFT 0 (YPOS) (ZPOS) HmpV; <t3  
"'c =(P  
!!___________________________________________________ $t>ow~Xi  
!! LENS ARRAY Z?'?+48xv4  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES n{E+r  
e pAC%a  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE +B O
uU#  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE {Y
ti  
FLA1=50   !! LENSLET FOCAL LENGTH j2:A@a6  
ZPOS=0 T)cbpkH4  
YPOS=0 3]/Y=A  
YifTC-Q;  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. m6 a@Y<  
!! CREATE the lenses as individual objects within a -\~x^5K  
!! nested $DO loop.  The only way to nest $DO loops in T(bFn?  
!! ASAP is to place the inner loop in a macro, and call O:X|/g0Y  
!! that macro from the outer loop. Il#9t?/  
r)Iq47Uiw  
LENSROW { 4Bq
4d.0  
$DO 1 5 nIqmora  
   { LENSES :;Wh!8+j  
       IDEAL Z 0 (LXAPE/2) ;gW?Fnry;  
         1 0 -1/(FLA1) 1 Y.8mgy>   
     OBJECT 'LENSLET.?.#1' ^ `Y1  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 (
2%z9W  
     RETURN } xwrleB  
} +tFl  
qgsKbsl  
$DO 1 5
2<+9lk  
  $LENSROW ? 2d-C}&}L\  
T8J[B( )L  
GROUP -25 y:8Oc?  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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