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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ g`(' k5=  

j9sK P]w  
SYSTEM NEW y]z^e\qc)  
RESET / /ty]j  
Lbo8>L(  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE ]yzqBb
V  
.Fdqn?c|+  
ARROWS OFF z?a<&`W  
UNITS MM
q '6gj  
N;)Y+amg^  
WAVELENGTHS 450 550 633 NM _3G;-iNX;  
( Lp~:p  
MEDIA E="FE.%A  
1.5 1.5 1.5 'GLASS' b7X-mkF  
,}9G|$  
COATING PROPERTIES W>ZL[B
Q  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' IB!^dhD!Q  
1 0  1 0  1 0  'REFLECT' vkQ81PEt  
0 1  0 1  0 1  'TRANSMIT' <ZF,3~v?  
0 1  1 0  1 0  'SPLITTER1' b?h
)~j5  
0 0  1 0  0 1  'SPLITTER2' ?zypF 5a  
1 0  0 1  0 1  'SPLITTER3' NS^(5g  
0 1  0 1  1 0  'SPLITTER4' uydy[n\
  
`vkNp8|  
!! GEOMETRY CONSTRUCTION l?_h(Cq<  
$?38o6  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES }]8n3&*  
pP1|/f5n`  
!!___________________________________________________ 7N@4c   
!! PARABOLIC REFLECTOR dMcCSwYh  
sn|q EH  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR Y Me
s314"  
XAPE=60   !! FULL APERTURE IN X-DIRECTION ]Bpdb'  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION (WW*yv.J  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR [# X:!xcl  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR i\4Qv"%  
&}TfJ=gj  
SURFACE uxbDRlOS  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) 3$]SP1Mc(  
OBJECT 'LAMP_REFLECTOR' Bl)znJ^
 
  INTERFACE COAT REFLECT AIR AIR lnXb]t
m;  
  SHIFT 0 (YPOS) (ZPOS) ul{u^ j  
$
OE~0Z\0  
!!___________________________________________________ @uIY+_E40g  
!! LENS ARRAY mLa0BIP  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES DXbzl +R  
5&
&6e`  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE o6H\JCne  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE bzz{ p1e  
FLA1=50   !! LENSLET FOCAL LENGTH (6jr}kP  
ZPOS=0 UfE41
el:  
YPOS=0 >a5M:s)  
f87>ul!*  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. EYe)d+E*  
!! CREATE the lenses as individual objects within a a@1r3az  
!! nested $DO loop.  The only way to nest $DO loops in Ch`nDIne  
!! ASAP is to place the inner loop in a macro, and call b!>w4MPe  
!! that macro from the outer loop. c0lVt)pr/  
3 cd5g  
LENSROW { R~jV  
$DO 1 5 u )'l|Y  
   { LENSES
 (h"Yw  
       IDEAL Z 0 (LXAPE/2) c
)N&}hFYC  
         1 0 -1/(FLA1) 1 j( *;W}*^  
     OBJECT 'LENSLET.?.#1' 8vN}v3HV&  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 Y0kDHG  
     RETURN } /a
e]v+  
} W]8tp@  
VrV* -J'  
$DO 1 5 QK+s}ny  
  $LENSROW ? <K8$00l
m  
PI"&-lXI-m  
GROUP -25 Z19d Ted33  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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