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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ `[W[H(AjQ  
jV4\A  
SYSTEM NEW BDR.AZ  
RESET 8$0rR55  
Ib+Y~ XYR  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE Bs O+NP  
6f\Lf?vF  
ARROWS OFF wS%Q<uK  
UNITS MM R)mu2^  
=5kY6%E7c  
WAVELENGTHS 450 550 633 NM
A1.7O  
9Hf9VC3  
MEDIA )XYv}U  
1.5 1.5 1.5 'GLASS' pKit~A,Q  
J/[=p<I)  
COATING PROPERTIES 0l-Ef1  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' 4:r!|PJn{G  
1 0  1 0  1 0  'REFLECT' .=X}cJ]`[  
0 1  0 1  0 1  'TRANSMIT' `/EGyN6X  
0 1  1 0  1 0  'SPLITTER1' Tl2C^j  
0 0  1 0  0 1  'SPLITTER2' P] UJ0b  
1 0  0 1  0 1  'SPLITTER3' Mf&{7%  
0 1  0 1  1 0  'SPLITTER4' z7Q?D^miy  
L#+q]j+  
!! GEOMETRY CONSTRUCTION Si6al78  
FW/W%^  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES f;1K5Y  
6~1|qEe6I  
!!___________________________________________________ IE9XU9Kd  
!! PARABOLIC REFLECTOR \E%'Y  
6^%68N1k  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR =jX8.K4]  
XAPE=60   !! FULL APERTURE IN X-DIRECTION "CUty"R8  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION >rJnayLF  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR E#ul IgD  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR lzYnw)Pv  
IHJ=i-
 
SURFACE /+\uqF8F  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) PDrZY.-
 
OBJECT 'LAMP_REFLECTOR' ^OstR`U3  
  INTERFACE COAT REFLECT AIR AIR V-Cv,8  
  SHIFT 0 (YPOS) (ZPOS) ;uwRyd  
%2XHNW  
!!___________________________________________________ ;)!Sp:mHX  
!! LENS ARRAY #ZYVc|sT+  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES G|( ]bvJ?  
\Dd-
Xn_b  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE QrYpZZ;  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE o[cV1G  
FLA1=50   !! LENSLET FOCAL LENGTH N1|$$9G+  
ZPOS=0 X!m9lV<  
YPOS=0 S%yd5<%_  
u"d~!j1  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. ? P( ZA  
!! CREATE the lenses as individual objects within a ,)iKH]lY=  
!! nested $DO loop.  The only way to nest $DO loops in mw='dFt  
!! ASAP is to place the inner loop in a macro, and call :j]vf8ec  
!! that macro from the outer loop. r9 !Tug*>m  
49w=XJ  
LENSROW { >]W)'lnO  
$DO 1 5 +=.W<b
 
   { LENSES q~*t@  
       IDEAL Z 0 (LXAPE/2) <K8\n^i~c  
         1 0 -1/(FLA1) 1 zJ)*Z,7  
     OBJECT 'LENSLET.?.#1' Up,vD)tG  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 %YSu8G_t  
     RETURN } lhw ,J]0*  
} ;~\MZYs3m  
~R&;v3  
$DO 1 5 8`fjF/  
  $LENSROW ? {WPobP"  
RW}"2  
GROUP -25 ~Q>_uw}g#  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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