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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ }+J@;:  

~] 2R+  
SYSTEM NEW 0}V'\=F454  
RESET B$Z!E%a;  
y|se^dn  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE J
;`~ !g  
(I.`bR  
ARROWS OFF xW4+)F5P(  
UNITS MM e8 aV qq[  
"tARJW  
WAVELENGTHS 450 550 633 NM cFvx*n  
W
U\bJ}  
MEDIA z;
fSd  
1.5 1.5 1.5 'GLASS' qI^jwl|k  
Sq,ty{j2%  
COATING PROPERTIES gi>_>zStv  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' B vc=gW  
1 0  1 0  1 0  'REFLECT' bn35f<+  
0 1  0 1  0 1  'TRANSMIT' du,-]fF  
0 1  1 0  1 0  'SPLITTER1' }0RFo96)v  
0 0  1 0  0 1  'SPLITTER2' &:*+p-!2<  
1 0  0 1  0 1  'SPLITTER3' f4_G[?9,  
0 1  0 1  1 0  'SPLITTER4' gj^]}6-P  
E;H(jVZ  
!! GEOMETRY CONSTRUCTION |lwN!KVQ,  
>}*jsqaVU  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES OvG0UXRU  
 F`.7_D  
!!___________________________________________________ Wp3l>:  
!! PARABOLIC REFLECTOR @\8gzvkt  
8-ssiiJ}gh  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR jt--w"|-r  
XAPE=60   !! FULL APERTURE IN X-DIRECTION o7XRa]O  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION yZ$;O0f&&  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR sLp LY1X  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR YO0x68  
|l(lrJ{  
SURFACE h_yR$H&tX  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) {fv8S;|u  
OBJECT 'LAMP_REFLECTOR' reJ?38(  
  INTERFACE COAT REFLECT AIR AIR H>iZVE  
  SHIFT 0 (YPOS) (ZPOS) D.R  
j]O[I^5  
!!___________________________________________________ L0  2~FT  
!! LENS ARRAY 12xP)*:$  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES ]?$y}  
-yGm^EwP  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE {WOfT6y+  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE  89=JC[c  
FLA1=50   !! LENSLET FOCAL LENGTH gGml c:/J%  
ZPOS=0 5)NBM7h  
YPOS=0 WC*:\:mh  
1/+r?F3  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. f+Li'?  
!! CREATE the lenses as individual objects within a , %O3^7i  
!! nested $DO loop.  The only way to nest $DO loops in !DL53DQ#  
!! ASAP is to place the inner loop in a macro, and call `1<3Hu_  
!! that macro from the outer loop. %E7.$Gj%  
]u ~Fn2  
LENSROW { aB6LAb2z;T  
$DO 1 5 [<a%\:c m4  
   { LENSES 0a6z"K}  
       IDEAL Z 0 (LXAPE/2) C,vc aC?  
         1 0 -1/(FLA1) 1 
Rha3  
     OBJECT 'LENSLET.?.#1' .r%|RWs6W  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 >1pH 91c'  
     RETURN } oe|<xWu  
} g4SYG)'R+  
Y6?mY!  
$DO 1 5 A""*vqA  
  $LENSROW ? ixHZX<6zYT  
vP)~j1  
GROUP -25 *Q120R  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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