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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ U{"f.Z:Ydo  
Vz'HM$  
SYSTEM NEW :VJV5f{  
RESET QGXQ{  
R0vww_fz  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE B=r0?%DX"1  
cI3
y  
ARROWS OFF W,DZ ;).%  
UNITS MM sllzno2bU  
h20Hg|   
WAVELENGTHS 450 550 633 NM IJ0#iA. T  
`YU=~xQ  
MEDIA wrabyRjK  
1.5 1.5 1.5 'GLASS' fSjs?zd`  
{8 N=WZ  
COATING PROPERTIES <FQFv IKg  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' +ZclGchw  
1 0  1 0  1 0  'REFLECT' 7u::5W-q  
0 1  0 1  0 1  'TRANSMIT' vnTq6:f#M  
0 1  1 0  1 0  'SPLITTER1' zFywC-my@  
0 0  1 0  0 1  'SPLITTER2' 7D   
1 0  0 1  0 1  'SPLITTER3' 0Qp[\ia  
0 1  0 1  1 0  'SPLITTER4' JD
]OIh  
2 Kla8  
!! GEOMETRY CONSTRUCTION \"'
\MA  
+RS$5NLH  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES 9KyZEH;pY  
(8G$(MK  
!!___________________________________________________ L%XXf3;c  
!! PARABOLIC REFLECTOR -6`;},Yr  
W^k,Pmopy  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR qU-!7=}7  
XAPE=60   !! FULL APERTURE IN X-DIRECTION L<=)@7  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION .TJ
">?  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR (N0sE"_~I5  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR f TO+ZTRqf  
DT\ym9  
SURFACE LWD#a~  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) #9\THfb  
OBJECT 'LAMP_REFLECTOR' Oc~aW3*A(  
  INTERFACE COAT REFLECT AIR AIR _f|/*. @Q  
  SHIFT 0 (YPOS) (ZPOS) U-g9C.  
m2O&2[g  
!!___________________________________________________ P6YQK+  
!! LENS ARRAY (sCAR=5v\  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES @1g&Z}L o  
Xpl?g=B&u  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE ,Kw5Ro`I:  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE CW-Ae  
FLA1=50   !! LENSLET FOCAL LENGTH `%=<R-/#7S  
ZPOS=0 Y\(;!o0a  
YPOS=0 \ha-"Aqze3  
Rh<N);Sl7  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. }Eh*xOta  
!! CREATE the lenses as individual objects within a
-zKxf@"  
!! nested $DO loop.  The only way to nest $DO loops in =EpJZt  
!! ASAP is to place the inner loop in a macro, and call 1TZPef^y  
!! that macro from the outer loop. ")%r}:0  
7@l<? (  
LENSROW { pj; I)-d/  
$DO 1 5 NXI[q'y  
   { LENSES !Lkm? (_  
       IDEAL Z 0 (LXAPE/2) ;LQ9#M?  
         1 0 -1/(FLA1) 1 m$:&P|!'p  
     OBJECT 'LENSLET.?.#1' >DP:GcTG  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 74f9|~%  
     RETURN } ~5 >[`)  
} [/$N!2'5  
,{KCY[}|  
$DO 1 5 !ni>\lZ  
  $LENSROW ? ?WHy0x20  
FN?3XNp.  
GROUP -25 10O$'`  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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