* BRC      MAKPO - ðEPEXOä ðO KOäõ BOúBPATA                             BRC 0001
* * * ðOCìEäHññ KOPPEKTéPOBKA:  äATA 25.08.88   BPEMñ 20.24   *  æOKõC  BRC 0002
*   BRC  <AäPEC äìñ RC=0>,<A.äìñ RC=4>[,<A.äìñ RC=8>...][,RC=<PEçéCTP>] BRC 0003
*  ìEHéHçPAä éBã çõT  OTä. 07 ìATùûKO                   T: 310-98-12    BRC 0004
         MACRO                                                          BRC 0005
&L       BRC   &RC=15                                                   BRC 0006
         LCLA  &I                                                       BRC 0007
&I       SETA  1                                                        BRC 0008
&L       B     *+4(&RC)                                                 BRC 0009
.B       B     &SYSLIST(&I)                                             BRC 0010
&I       SETA  &I+1                                                     BRC 0011
         AIF   (&I LE N'&SYSLIST).B                                     BRC 0012
         MEND                                                           BRC 0013