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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ *qG$19b  
OTE<x"=h  
SYSTEM NEW iD<6t_8),  
RESET jXWNHIl)@  
HVGr-/  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE 3%2jwR  
g?V&mu  
ARROWS OFF #X5hSw;  
UNITS MM H*rx{F?  
lBmm(<~Z  
WAVELENGTHS 450 550 633 NM ;R!*I%  
xg} ug[  
MEDIA Px#$uU  
1.5 1.5 1.5 'GLASS' qOi5WX6F/  
U*qNix  
COATING PROPERTIES -;>#3O-  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' ib]vX-  
1 0  1 0  1 0  'REFLECT' s^cc@C  
0 1  0 1  0 1  'TRANSMIT' Yx),6C3  
0 1  1 0  1 0  'SPLITTER1' 87<9V.s2  
0 0  1 0  0 1  'SPLITTER2' Gqt-_gga  
1 0  0 1  0 1  'SPLITTER3' FsY(02  
0 1  0 1  1 0  'SPLITTER4' xr.XU'  
_f3 WRyN0  
!! GEOMETRY CONSTRUCTION 4V$fGjJ3  
"yW&<7u1  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES (a }J$:
 
|1l&@#j!2  
!!___________________________________________________ k" YHsn  
!! PARABOLIC REFLECTOR jo_ sAb  
)* TF"  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR Sl>>SP  
XAPE=60   !! FULL APERTURE IN X-DIRECTION jV^C19  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION Hbk&6kS  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR ?'sXgo.}  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR  rN"Xz  
2x
n<E>]  
SURFACE JUQg 'D  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) ZPyM>XK$4  
OBJECT 'LAMP_REFLECTOR' s4$X  
  INTERFACE COAT REFLECT AIR AIR etyCrQ ?U  
  SHIFT 0 (YPOS) (ZPOS) >zmz
K{A=  
#*2Rp8n  
!!___________________________________________________ kXwi{P3D$  
!! LENS ARRAY :<GfETIs  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES L2fVLKH  
JMlV@t7y<  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE *vnXlV4L  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE hS:jBp,  
FLA1=50   !! LENSLET FOCAL LENGTH U-EhPAB@  
ZPOS=0 ?2ItB`<(  
YPOS=0 9&K/GaG  
[AR>?6G-  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS.  AmcC:5  
!! CREATE the lenses as individual objects within a p<5!02yQ\  
!! nested $DO loop.  The only way to nest $DO loops in B1$ikY  
!! ASAP is to place the inner loop in a macro, and call >SDpuG&>  
!! that macro from the outer loop. 0E6lmz`O  
jPk c3dG +  
LENSROW { .Xd0 Q=1h  
$DO 1 5 MEq"}zrh  
   { LENSES hNbIpi=  
       IDEAL Z 0 (LXAPE/2) %idk@~HCg  
         1 0 -1/(FLA1) 1 ll<mE,  
     OBJECT 'LENSLET.?.#1' </s,pe79B  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 i-lKdpv  
     RETURN } [X/(D9J  
} {QQl$ys/  

5v9Vk`3'  
$DO 1 5 `,Orf ZMb  
  $LENSROW ? .Yx_:h=u  
J%Mnjk^_\S  
GROUP -25 S~3\3qt$  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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