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

哪位朋友可以帮忙指点一下：ASAP宏语言中，#后面加数字（比如#0）是什么意思？如下面程序中黄色背景部分语言。谢谢~ 1$S`>M%a  
PKg>|]Rf.  
SYSTEM NEW VprrklZ  
RESET khb/"VYd  
=K;M\_k%y  
$IO LIBRARY LCD !! ASSIGNS LCD.LIB AS THE LIBRARY FILE th^&wp  
]Vm:iF#5P  
ARROWS OFF DX(!G a  
UNITS MM 3+WmM4|  
<-(n48  
WAVELENGTHS 450 550 633 NM CQns:.`$`  
ukDaX  
MEDIA CeINODcT  
1.5 1.5 1.5 'GLASS' laQ{nSVBm  
?'^dYQ4  
COATING PROPERTIES l Zz%W8"  
!! wavelength1 R T wavelength2 R T wavelength3 R T 'name' M\D25=(  
1 0  1 0  1 0  'REFLECT' o^3X5})sv  
0 1  0 1  0 1  'TRANSMIT' w{"ro~9o  
0 1  1 0  1 0  'SPLITTER1' d",VOhW7)S  
0 0  1 0  0 1  'SPLITTER2' Vv_lBYV  
1 0  0 1  0 1  'SPLITTER3' {'UK>S  
0 1  0 1  1 0  'SPLITTER4' 8zrLl:{  
J,D^fVIw  
!! GEOMETRY CONSTRUCTION 1a tQ9  
r:U/a=V  
DEL=10  !! DISTANCE BETWEEN THE LCD AND LENSES $)Ty@@7C  
'pHxO,vo  
!!___________________________________________________ *[+{KJ  
!! PARABOLIC REFLECTOR o#QS: '|  
0]Qk*u<  
RAD=12.5  !! RADIUS OF CURVATURE OF PARABOLIC REFLECTOR nC5]IYL|  
XAPE=60   !! FULL APERTURE IN X-DIRECTION NRMEZ\*L  
YAPE=60   !! FULL APERTURE IN Y-DIRECTION R*l3 zn>  
ZPOS=-12.5/2-50  !! Z-AXIS POSITION OF THE REFLECTOR )W^$7Em  
YPOS=0           !! Y-AXIS POSITION OF THE REFLECTOR YZZog6%  
$6~t|[7:%Y  
SURFACE B&"c:)1 C2  
  OPTICAL Z 0 (RAD) -1 ELLIPSE (XAPE/2) (YAPE/2) 5I&Dk4v  
OBJECT 'LAMP_REFLECTOR' 7qLB9r  
  INTERFACE COAT REFLECT AIR AIR )ml#2XP!f  
  SHIFT 0 (YPOS) (ZPOS) j_0xE;g"]  
XaH;  
!!___________________________________________________ oIG
F=x,e8  
!! LENS ARRAY u+m9DNPF  
!! ASSUME FIVE BY FIVE ARRAY OF IDEAL LENSES jk{m8YP)E  

9R99,um$  
LXAPE=10  !! LENSLET X-DIRECTION FULL APERTURE }=fls=c/0  
LYAPE=10  !! LENSLET X-DIRECTION FULL APERTURE 2. f8uq  
FLA1=50   !! LENSLET FOCAL LENGTH w,-4A o2x  
ZPOS=0 jE2EoQi,  
YPOS=0 'kHa_
  
>rY^Un{Z  
!! USE THE MACRO LANGUAGE TO CREATE 25 IDEAL LENSLETS. 3|(3jIa  
!! CREATE the lenses as individual objects within a `B/74Wa3q  
!! nested $DO loop.  The only way to nest $DO loops in 42=
/$V  
!! ASAP is to place the inner loop in a macro, and call /Q2HN(Y  
!! that macro from the outer loop. )W>9{*4m  
B=HEi\55K  
LENSROW { """pe+Y  
$DO 1 5 g(l:>=g]?  
   { LENSES kC iOcl*$  
       IDEAL Z 0 (LXAPE/2) H`nd |  
         1 0 -1/(FLA1) 1 vT#m 8Kg  
     OBJECT 'LENSLET.?.#1' ?nwg.
&P  
       SHIFT (LXAPE*(?-1)) (LYAPE*(#1-1)) 0 N
>IkK*v  
     RETURN } J@qwz[d i  
} wPvYnhr|G-  
+@dgHDJ  
$DO 1 5 $pajE^d4V  
  $LENSROW ? p7Z/%~0v:  
CcZM0  
GROUP -25 XnB-1{a1  
  SHIFT (-2*LXAPE) (-2*LYAPE+YPOS) (ZPOS)

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