             1.     

       ()      -
   "-06"    .  
    ,    -
  ,    ,   
..,            
    "-06".    -
        .    
   "-06"    -
:
         -  7-      (-7);
        D -               ,  
             ;
         -      ;
         -  8-      (-8);
         -       ;
        S -    ;
        U -    ;
        0 -   /;
        1 -        ;
        2 -       ;
        3 -       ;
        5 -  ;
        8 -    .
           "-06"   -
 :
        FORMAT -    ;
        SYSGEN -           
                  .
       "-06"     
:
        -            
                       : .  
                            
           .
        -            
              :   :  ,   
      : .   -
            ,    
     :       "-
-06"      (LOADOS).

                  2.     

        2.1.     .
                  
/.        -
     .      -
       -
         ,   .

             .

                                  - 2 -

        2.2.      .
              -
     .        
      :  .    -
    /.   -
           
        ,      
   .

                  3.     .

        3.1.    .
             ,  
    .      
   .      -
       .      
 -      , 
      .
              
       .
           
:
         -  -      ;
         -  -       ;
             -       ;
        <-     -       ;
         - I -   ;
         - R -    ;
         -  -     ;
         - ^ -       .
              -
       ,    -
          -
.
                
,       -W.      
     ,     -
  .
           ,  
     .     
     :
        -   ()  ;
        -                 .        .SPR,
             ,          
           ().
                
  .       
    ,   ,    -
 .          
     (,   ,   
..).
     ,      .,    

                                  - 3 -
          
       .    
       .
          ";" (  ),   
         -
.
              ":"  (-
),     ,       
         
( ).
           -
      ,      
     ,      -
.

        3.2.  

            
 0  15,    ,  ,     
         
  ,     (    -
 ).   ,      
  -           
    .      0  -
 ,  -       
.           
    (        
  )   ,      
  .      -
 ,     0   -
    ,     
   .
              U,
  ()     .

        3.3.  
           .     
   :
          V:.,
         V:  -   ,       ;
             -  ,    8 ;
             -    (    ),    
                       .
              .   
   ,        
      .
           ,  
       .     
     .       
   :  ">",  "<",  ".",  ",", ";",
":", "=", "?", "*", "[", "]".
            .      
.

                                  - 4 -
       ,  ,  ,     
    ,         -
    ,       
.         ?  *.
            ,   
   .       
      ,      
/     *    ?.       
         ,     - 
     .
                -
     ,       -
 .
        :
        >D *.                ,  
                        .
        >D BAS.*                    
                        c  BAS
        >D *.*              ,   
                           .
        >D ?.                            
                              ,               
                         .
        >D ??.*                
                                ,  
                        .

        3.4.  

             , -
  .      ,
    .       
(D, R, S  W):
        D -        ,        
                           .  
                ,      
             ;
        R -                 ;
        S -        ,     
            ,                  
             ;
        W -     ,      .

                         4.     F

        4.1.    

         -             -  "   "  .   
                                     -
                          ,          ,
                                "  "  
                                 /   ().   
                              ,    

                                  - 5 -
                            :          
                            .
        D [V:][]       -                                       
                             (    )  
                              .    
                              .
         [V:].     -      (  ) 
                                   .  
                                .
         [V:][<>] -    (  )   -
                             .
                          <> -         
                                           V:,      
                                     .
                                     <>    ,   -
                                               
                                               
                                    .
                                       <>  ,     -
                                          
                                     ,     
                                    <>.
        SV:                -         
                           .
        U [<>]        -              
                            .
                          <> -        1 
                                    15.      <>   ,  
                                                 
                                    .

        4.2.   /  

         - F            -  ,  . 
                          -F       
                          .
         - Q            -     .
                              -Q  
                              ,        
                           -S.
         - S            -    .
         - W            -         .
        <[V:] .     -       
                          ..  V:       
                          ,      .,
                                .      
                                    
                                  
                          V:..
                          ,
                          <SAVE.CMD
                                   
                          ,          SAVE.CMD  

                                  - 6 -
                            .          
                                
                                                
                          ,  ,      
                           (          
                           )          
                                   - 
                                  
                              -F,
                               .
        >[V:].      -      
                          .. V: -      -
                                ..  -
                                
                            .    ,    
                              .        
                               -  
                                   ,  
                                      
                                -S      -
                                 
                          -F,         .
                         -             
                          -7.
                         -             
                          -8.

        4.3.     .

        -              - (..   ) 
                                 
                          .          -
                                
                             .   -
                           -       -
                               .  -
                                -    
                                  
                                           
                            ,     
                          .

        4.4.     

         -D     -        -
                   ,    -D.   -D  
                      ,       
                          ,
                           
                   ()    1  10.

        4.5.  
        <><> -              /.

                                  - 7 -
                            R  -         
                                  .   <>   -
                                 .
                             - 4,   
                          - 24.
                           W -         -
                                 . <> - 
                                      .
                                -     32,    
                           - 18.
                            -                 
                                . <>  -  
                          ,             
                             ,        -      -
                          .
                             L  -        -
                           :
                          0 -     ROBOTRON,                
                               -7;
                          1 -    EPSON  FX-85,     
                                        -7   (          
                              );
                          2 -      EPSON   FX-85,    -
                                        -
                                           
                              (1, 52, 1)      (1, 52, 0);
                          3 -     ROBOTRON,                
                               -8.        
                                     -
                                      ;
                          4 -     EPSON  FX-85,    
                                -8;
                          9 -       EPSON FX-800,    -
                                    -7  (            
                              );
                           -     EPSON    FX-800,   -
                                     
                                 .
                           -    EPSON   FX-800,   
                                -8.
                                   2.
                               -           .
                                   <>  
                                   ,      
                                   1/216
                          .
                          ,
                          0 612 
                              6  .     
                           1/12  (18/216=1/12).
        0               -      -
                           1,.      - 1          -
                            .

                                  - 8 -
                                 -
                              , 
                               .
                          :
                          0 62 
                                 .

        1 [V:].     -     
                             V:      ,    V:  
                          .            
                          ..
        2 N [V:]. -   N    .   
                               .                
                           .
                          ,
                          2 3 *.*
                           3      .
        3 [V:].     -     .   
                            .
        5 [V:]1.1 2.2 -      1.1   V:
                             ,   V:  .  
                             2.2.
        8                -                     
                                          
                          .               
                                   ,           
                            .    2      ,   
                                 .               3
                                  .

                             5.     

        5.1.   .

      FORMAT.COM      
.
              
    (   - 1024,  512   256  ),
       40 
80    .

            :
        FORMAT.COM [V:]
        V: -      ,      
               .  V:   ,     
                          
             FORMAT.COM   .
             -
  :

              -

                  

                                  - 9 -
      :

                -

              .  
             
    1 (800 )      
  2  3.
      ,      V:,  FORMAT.COM -
  ,     :

            (,) -

         .    -
:

        !     <V:>   !!!
               <V:> (Y/X) ?

      FORMAT.COM     (Y)  
.
               
  :

          ( //) - //

             :

            - < >
            - <  >
             (Y/X) ?

       ,    FORMAT.COM  .  
 Y,      :

            (Y/N) ?

      N         -
 .
      Y          
  ,     .
      ,    FORMAT    -
 ,    .

        5.2.  .

      SYSGEN.COM       -
  .
            :

        SYSGEN [V:] . V1:<>

    ,

                                  - 10 -
        . -      ;
        V:        -    ,        
                  .;
        V1:       -                   (  ),          
                                 ;
        <> -  ,      
                           ( 
                  <>  100).
         V:,        .
   SYSGEN.COM     :

                <V1:> (Y/N) ?

             Y.

             80 (Y/N) ?

       Y,     80  N,   -
 40.   N   :
        , 40 - 
           -  (Y/N) ?

        Y,        
  N,        -
.   N   :

        ,  

              -
       .  , -
  "+"      ,    "-" - 
.


        5.3.       - TYPE

              
,    ,     TYPE. 
            
   ASCII.
               :
                   TYPE B:<.>.

        5.4.   ""- - RUN

              -
        (   -
 ).  ""     -
   .        -
  RUN.       -
      BAS:

                   RUN C:FILE.BAS

                                  - 11 -

        5.5.        
                    (ROM),  (MON),  (BAS)

            "-06" -
  ,      -
      .
           :
     SAVEROM -              
"-06".       :

                   SAVEROM FILE XXYY

      XX  -      (1-256 ),   YY -
 .      ,   -
  .    - .  
         -
  .          
 (   ).

     LOADROM -           
"-06".  :

                   LOADROM FILE

        FILE -    .

     SAVEBAS -        .
      :
                   SAVEBAS FILE "   "

     LOADBAS -   ,        
.    :

                   LOADBAS FILE "   "

          LOADROM, FILE -    . 
    ,      -
 .

     SAVEMON -        -. -
 :
                   SAVEMON FIE ADR "MON"

      MON -     ,  ADR -    -
,  -       
.
     LOADMON -     -     
 .  :

                   LOADMON FILE "MON"

        FILE -    .  "MON"  ,

                                  - 12 -
    .
               
 :     (  ),  
,   .          
    .     - 
 ,      ,      
 -    .

        5.6.    - POWER

            CP/M -
.       POWER:
     1.      ''.
     2.     POWER (A0=)   
         2.
     3.       .
     4.    :
                  -  ''     -  ;
                  -  ''          -  ;
                  -    -  
                                           (   '' );
                  -    0...9 -   .

        ?        -   

        CHECK        -         
                      

        CM               -    
                         A0=CM 5500 6000 7200

        COPY [KEY]     -  
                         : R "  ? (Y/N)"
                                     (  ).
                                V - .
                                T -          ,  
                                    COPY .
                                M -      
                                    (<)   (>) 
                                    (.. / ).
                                Q -        
                                      (  
                                     ).

                           ,  :
                         FILE EXISTS,<B>ACUP, <O>VERVRITE, <S>KIP:
                         B -    .BAK;
                         O - ;
                         S -   ().

        DIR [KEY]      -   
                            :
                         U-    ;

                                  - 13 -
                         X-   ;
                         N-     .

        DISK                 -    .

        DS                 -    
                         A0=DS ADR
                            :
                         .A -   ASCII, .H - HEX,
                         .D - , .B - .
                             ASCII  -  C ,   
                         =1,  ^ ,    .

        DUMP ADR1 ADR2
                         DUMP -   ( );
                         DUMPX -  ASCII+HEX;
                         DUMPH -  HEX;
                         DUMPA -  ASCII.
                         DUMP  DUMPA            ,  
                          ^Z (EOF).
                                 DUMP  
                            :
                            DUMP ADR,N -  N   ADR
                            (  N=128, ADR - )
                            DUMP,,   -   .

        ERA               -  () 
                         ERA [R]  -" ?(Y/N)" -   .

        EXIT               -    .

        FILL ADR1 ADR2 BYTE         -      BYTE

        GO               -  
                         A0=GO FILE.TYP ADR PARAM
                         ADR   -  
                         PARAM - ,       
                                     HL.

        GROUP               -   ()  .

        JP/EX               -    
                         A0=JP ADR PARAM -    .
                         A0=EX ADR PARAM -    POWER.

        LOAD/SAVE      - A0=LOAD TEST.COM ADR
                            SAVE TEST.COM ADR -   TEST.COM     -
                             LOAD;
                            SAVE TEST.COM   ADR NSEC /. /.
                             LOAD  SAVE   ,
                              .

        LOG               -     POWER

                                  - 14 -
                                  
                          A0=  ,    .
                         A0=[RV2]
                         A0=DIR [RV2]

        MOVE 100 3FFF 4100  -   .

        READ/WRITE     -    
                            <->  
                         A0=READ 2 10 5000 14
                         / -  -  -  /
                         (   80h,   -1)
                         A0=WRITE A:2 18 4000
                             <-> 
                         A0=READ 2 10 < > N
                                       :  X  - HEX+ASCII
                                                    XH - HEX
                                                    XA - ASCII

        READGR/WRITEGR   -        (     
                          )
                         A0=READGR 5 4000 8
                         /5 -   HEX, 8 -   (.)/
                              (. READ).

        RECLAIM        -   
                         A0=RECAIM   /   /
                         A0=RECAIM  FILE.TYP  / /

        REN               - 
                         MOVE.COM=NEW NAME: *.BAK   / /
                         MOVE.COM=MOVE.BAK
                          
                         NEW NAME:*.BAK  /    ./

        RESET            -  ( ^C,    )
                         A0=RESET D ,  D = A,B,C...P

        RUN              -      
                         A0=RUN B:WM B:TEKST
                            - A0=[$]

        SEARCH           -    ,     . 
                         A0=SEARCH 4000 6000 "???TEST" C3 ? ?
                         ( ? -   ).

        SET              -       
                          
                         A0=SET [-NUMBER.CHAR]   (NUMBER=1-8, CHAR=R...R/O
                         S...SYS, X...EXTRA)
                         A0=SET  /  /
                         A0=SET [+NUMBER]  -   SET'A
                         : A0=COPY [-3]

                                  - 15 -
                         /   3- =1/

        SETDIR/SETSYS/SETRO/SETWR     -   

        SIZE             -     (  )

        SORT             -  
                         SORT 0 -  
                         SORT 1 -  
                         SORT 2 -      
                         SORT 3 -  
                         SORT 4 -      

        SPEED               -     
                         A0=SPEED N   /N=0...9/

        STAT               -    

        TEST               -  
                         A0=TEST    / 0  1 /
                         A0=TEST S  /  0  1 /

        TYPE/TYPEX/TYPEH/TYPEA
                       -      (. DUMP)
                         ^K -   .  (  )

        USER/XUSER     -   
                         XUZER       - ,   
                         A0-2=       -      0 .  2-
                         <C>OPY - 
                         <M>OVE -   (  . )

                 P O W E R

         :           100 - 2FF   /4 /
          :            118h - 01 - 40 
                                         FF - 64        "
                                         00 - 80        "
         :                   105h - 00 -   
         ( )                     24 -  2000-30 (.)
          :                112h - 00 - 
                                         FF - 
         DIR                       10Eh - 00 -  CP/M
                                         01 -  PW  
                                         02 -    - " -    
         +                        116h - 00 - 
                                         01 -  ^C  
        DIR [X]                          160h - 00 - . .
                                         01 - DIR A
                                         02 - DIR A  B
        -BACKUP                      16Eh - 00 - . .BAK
                                         FF - 
          PW                  2F0h - FF - 

                                  - 16 -
                                         00 -   . 
                                         01 -   A:
                                         02 -   B:
                                                   . .
            PW:    02F1h - 02EFh.

             2.2.   - MAC

         MAC -   -
    ,      -
    .        ( -
    )          
     .
          - MAC.        
,       :
                   MAC FILE [ $ [PY] [HY] [SY] ],
           "$"    
   .      
:
        FILE.PRN -   ;
        FILE.HEX - HEX- (   
                    INTEL.        
                      ;
        FILE.SYM  -    ;
      Y      :
     X, P,  A, B, C, Z.      ,   -
 "$" Y    .      
  (P-PRN,  H-HEX,  S-SYM).      , 
   .
        :
        X    -        ;
        P    -         ;
        A-C  -          (A:, B:, C:);
        Z    -         ;
        ,       
 .
        "$"  
        AX   -          ,    
   (         "ASM").   "X"   
 (  );
       +-LX, -          
,            .
  "X"        .  
"+L"   ,    ,     
,      .   "-L"  
       ;
       +-M   -           ;
(          ".PRN").     "+M",    
        .    -
 "-M",       ;
       +-Q   -           LOCAL    
(        ".SYM").     +Q,     
  LOCAL      .   "-Q" 

                                  - 17 -
      ;
       +-S   -         ,     
         (    ".SYM").
   "+S",        .
   "-S",       ;
       +-1 -         
     .   -
 "+1",          -
,            -
.  "-1"       
       .
              -
  ,  .    -
   .    :
        -    -          (  );
        +    -        ;
        -    -            ;
        *    -        ;
        /    -            ;
        MOD  -            ();
        LOW  -          8-  16- ;
        HIGH -          8-  16- ;
        SHR  -              ,
                        ;
        SHL  -          (. SHL);
        EQ   -        . ,     ;
        NE   -        . ,     ;
        LT   -        ,     ;
        LE   -        ,       ;
        GT   -        ,     ;
        GE   -        ,       ;
               :
        NOT  -          ;
        AND  -          ""     ;
        OR   -         ""    ;
        XOR  -        ""    ;
                  
        :
             LOW, HIGH
             *, /, MOD, SHR, SHL
              
             +, -
             EQ, NE, LT, LE, GT, GE
             NOT
             AND
             OR,XOR
         ,    ,  
       .     
          -
   .
       ,   +,  -, *  /,     -
     .
       MAC     -

                                  - 18 -
  :
        ORG  -              ;
        DB   -             ;
        DW   -             ;
        DS   -           ;
        EQU  -            ;
        SET  -             EQU,  
                             ;
            -
,        
    .    -
  :
             IF   <>
             ...
             ELSE
             ...
             ENDIF
                   
        MAC    - REPT. ,  
         256      1  ,
          :
             X        SET        0
                REPT        256
                DB        X
             X        SET        X+1
                ENDM
              -
  .   -
     .     -
   .    ENDM:
                MACRO [1][,2][,...]
             < >
             ENDM
         ,    -
         -
  .        
  .       -
 ,   ,   -
   .
            -
,    MACLIB.   -
         "LIB".
    ,       ,  -
  :
             MACLIB < >
             
  ,    ,     
.


            .

      -       --

                                  - 19 -
   (  ).      
,     ,    . 
    L80      (
   )  ,   .
           -
     .
            -
        .

        .

              CP/M-80    
 M80.OM.   M80.OM    18 ,    -
  M80    ,   
 CP/M-80.
        ,    .

       M80         -
  .      M80,
         6.1 - 6.4.

            .

        .

         M80    .    
  :
     -     A  Z;
     -   0  9;
     -   + - , : ; ( ) '  $ #  ;
     -       
        ,   CP/M-80.

        ,   .

      -   16- .    
    ,       :
      ""[""...]B     - ;
      ""[""...]      - ;
      ""[""...]O     - ;
      ""[""...]Q     - ;
      ""[""...]H     - ;
      X' ""[""...] ' - .
             . 
    .     .RADIX (.  4.4.19) 
        2    16.  E  
   10,      0  9    A
 F. E     ,      0. -
         
16 .
        -   ,      
,   CP/M-80,  .
       ,    ,  -

                                  - 20 -
     ,      CP/M-80.
,   'A'  41h.
       ,    ,   -
 ,        ,  
  -   .  ,    
"AB"   41h*256+42h.
      -   ,         .
K      ,       -
. , 
     DB """"""
 
     ""
     E    0 ,       
.

         .

              ,  
   6 .      -
:
       A  Z ,    0  9,  $,  ., ?, @   
   .
                 
.  E    ##,    
  (.4.4.9  EXT/EXTRN).

        .

        A   .

         ,    -
   .
     NUL
     LOW,HIGH
     *,/,MOD,SHR,SHL
      
     +,-
     EQ,NE,LT,LE,GT,GE
     NOT
     AND
     OR,XOR
              .
     ,   -
 .  ,      -
,    .
      ,    +,-,*,/,        
   .  O   (HIGH,LOW) 
   8    16- . E  -
    ,   HIGH  LOW -
  ,    .

           .


                                  - 21 -
       ,       -
,     ,    .  
     ,  
  COMMON .
       , A   ASEG, CSEG
( )  DSEG,    ,  
   . K  COMMON  
    COMMON,       -
 COMMON.     COMMON  ,  
     COMMON.
       ,     ,    
 A.
         :
     1)         ;
     2) "A."  + "." = "."    -
:
     1) "." - A. = ".";
     2) "." - "." ="A.".
       2)        .
               -
   ,       .
,   FOO,  BAZ  ZAZ -    , 
:
     FOO + BAZ - ZAZ
          ,  ..      -
   .   ,  :
     FOO + (BAZ - ZAZ)

         .

      ,       (EXTRN)     .
    2 .      -
    :
     1) EXTRN      ;
     2)       EXTRN,    
 EXTRN;
     3)         (   )  
EXTRN;
     4)        EXTRN.

          .

              .
    :
     [""[:]] [""] [""] [;""]
      ,       1.

        METKA.

      -   ,    . 
 ,        . -
      .     
 ,      (PUBLIC)    -

                                  - 22 -
    .

        .

          ,   ,  -
.     :
     1)  Intel-8080;
     2) ;
     3) ;
     4) .
          ,    
  DB.

          .

          .    
      ,    .
                
Intel-8080.     ,       
   .
     .
     MVI A,JMP
     ADI CPI
     MVI B,RNZ
     CPI INX H
     ACI LXI B
     MVI C,MOV A,B
             (CPI 5,  LXI  B,LAM,
JMP A5),      .
     ,   ,    -
.      ;   
CR.           
CP/M-80 .

        .

         .

          M80   
 .       -
,      , 
  .   ,        -
,         ( ), 
      (,  ).  -
        DSEG  CSEG.   ASEG
    () . 
COMMON         
 COMMON.
            ASEG,  CSEG  DSEG  
 ,         
 ,     . -
           -
 ORG .

                                  - 23 -
          CSEG.

        ASEG.

      :
     ASEG
     ASEG          
.       ASEG ( -
 0),    ASEG   ORG.  ASEG  
CSEG   /P   L80 [3].

        COMMON.

      :
     COMMON /" "/
     COMMON         
.     COMMON     
   .   " "     -
,   COMMON  .

        CSEG.

      :
     CSEG
     CSEG        
    ,    .    
   CSEG (   0),    
 CSEG    ORG.    CSEG  -
  .

        DSEG.

      :
     DSEG
     DSEG          
 ,  .    
  DSEG (  0),     ORG.

        DB -  .

      :
     DB "" [,""...] 
     DB "" [""...]
        DB       .  DB 
         -
,     ,     .   
    .      0   255,
     .      A.
           ,      2-
.     ,    -
,  .
     :
     0000' 41 42 DB 'AB'

                                  - 24 -
     0002' 42 DB 'AB' AND 0FFH
     0003' 41 42 43 DB 'ABC'

        DC -  .

      :
     DC ""
     DC  ,    "", , 
 ,     .    DB  , -
   ,          1.    
,     .

        DS -  .

      :
     DS ""
     DS   .   , 
   .  ,   ,
           
.          V, 
    -  U.       U  ,
       , .. DS   
.

     DW -  .

      :
     DW ""[,""...]
     DW       , -
  ,     .    
 .

        END.

      :
     END [""]
      END    .   "-
",          .    ""
,   L80     .
     .
              -
,         .      
  L80     "  ".  
        ,
,  ,   ,      ,
..      .

        ENTRY/PUBLIC.

      :
     ENTRY ""[,""...] 
     PUBLIC ""[,""...]
     ENTRY   PUBLIC   ,    ,  

                                  - 25 -
,   .        
  .      ENTRY/PUBLIC   -
,         U.  ,    ENTRY  
PUBLIC,           
L80     [3].

        EQU.

      :
     "" EQU ""
       EQU     .
 ""   EXTRN,     .

        EXT/EXTRN.

      :
     EXT ""[,"",...] 
     EXTRN ""[,"",...]
     EXT  EXTRN     (EXTRN),  .. -
   .   ,    ,  
 ,       M.   -
    (##),      .

        INCLUDE.

      :
     INCLUDE " "
       INCLUDE,  $INCLUDE  MACLIB . -
 INCLUDE       , -
   . " " -   ,  -
 .     MAC.
     ,    INCLUDE,    -
        INCLUDE.
           ,    
,        "+".
       INCLUDE  .   ,  
INCLUDE,   ,        'V'  
 .

        NAME.

      :
     NAME (' ')
     NAME   .   ""   
 .          TITLE.
    NAME  TITLE,      
 .

        ORG -   .

      :
     ORG ""
         .    -

                                  - 26 -
      .

        PAGE.

      :
     PAGE [""]
      PAGE       -
 .     "",   -
       .         10 
255.      50.

        SET.

      :
     "" SET ""
     SET    ,    EQU,      
SET    .     SET   -
.

        SUBTTL.

      :
     SUBTTL ""
           ,  
  TITLE.    ""     60 .  
     SUBTTL.

        TITLE.

      :
     TITLE ""
     TITLE   ,       
  .         -
 TITLE      Q.     -
 NAME,         .  
   NAME,   TITLE,           
 .

        .COMMENT.

      :
     .COMMENT """"""
      ,   .COMMENT    , 
.     A   -
   .  ,  -
   -    ,    
  .

        .PRINTX.

      :
     .PRINTX """"""
        .PRINTX,    ,  -

                                  - 27 -
.  ,    ,     
   ,       -   
.
     .
     .PRINTX        -
, ,        -
- ,     
IF1  IF2.

        .RADIX.

      :
     .RADIX ""
            - .  -
 .RADIX       -
.          2  16. "-
"  .RADIX            
  ,    .

        .REQUEST.

      :
     .REQUEST " "[," "...]
            L80   -
    ,     .      
         .  L80  
       - REL     .

         .

       

  IF/IFT ""    ,  ""  0
  IFE/IFF ""   ,  ""  0
  IF1                      
  IF2                      
  IFDEP ""        ,  ""  
                          EXTERNAL
  IFDEF ""        ,  ""  -
                            EXTERNAL
  IFB ""        ,    ""   
                               
                         
  IFNB ""       ,  ""   -
                        .     
                          .
                              
                        
  IFIDN "1",    ,    "1"
        "2"          "2".
                             
                        
  IFDIF "1",    ,    "1"

                                  - 28 -
        "2"        "2"

       :

     IF XXX []
     .
     .
     [ELSE
     .
     .
     ]
     ENDIF
        , ..  
.           
     .   IF, IFT, IFF  IFE 
           
.

        ELSE.

             -
 ELSE,      ,  -
   .   IF    ELSE,  -
 ELSE    IF.

        ENDIF.

       IF     
ENDIF,  .

        ,   

               :
.LIST  .XLIST.   ,     -
.
            .LIST,      
.    .XLIST,    -
,     .LIST.
       ,   ,   -
: .SFCOND, .LFCOND  .TFCOND.
     .SFCOND         , -
                            
                  "";
     .LFCOND            ,
                    "";
     .TFCOND             ,
                    "",  
                    /X ( 5.3).

           .CREF 
.XCREF.  -   (. 5.3   4),
   .       -  .CREF.  
   .XCREF,      -

                                  - 29 -
   ,      .CREF.
       MACRO/REPT/IRP/IRPC   -
:
     .LALL, .SALL, .XALL
     .LALL        -
             ;
     .SALL         
             ;
     .XALL          
                (   -
             ).

          .

        :  .PHASE    .DEPHASE    
       ,      ,
, .
      .PHASE    ,  -
 .DEPHASE -  .

     .
     0000'                 .PHASE
     0100  CD 0106   F00:  CALL BAZ
     0103  C3 0007         JMP Z00
     0106  C9        BAZ:  RET
     0007' C3 0005   Z00:  JMP 5
         .PHASE      -
     .PHA- SE.  ,  ,   
   (T..   0000'   ).     -
   100H  .

          .

        MACRO      -
 (REPT, IRP, IRPC)    (MACRO).  -
    ENDM.

        .

          :
     1) ".." -     
              
        ,     -
        ;
     2) " .." -    -
        ,  ;
     3) " ." -   ,  
        .        
         .       -
                ,  
            .    -
          (  )   -
               

                                  - 30 -
         .      
          ;
     4) " ." -   ,  
        .

         REPT-ENDM.

      :
     REPT ""
     .
     .
     ENDM
        ""    ,  
 REPT  ENDM,     . ""  
    .
     .
     X   SET   0
         REPT  10   ;  DB 1 - DB 10
     X   SET   X+1
         DB    X
         ENDM
     4.5.3.  IRP - ENDM
      :
     IRP "..",< .>
     .
     .
     .
     ENDM
            ,     
 ,    IRP  ENDM.     
       -
   .        (<>),    
    1       
.
     .
     IRP  X, <1,2,3,4,5,6,7,8,9,10>
     DB   X
     ENDM
    .

         IRPC - ENDM.

      :
     IRPC "..", ( "")
     .
     .
     .
     ENDM
            ,     
   IRPC  ENDM.       -
.             
    .
     .

                                  - 31 -
     IRPC  X, 0123456789
     DB    X+1
     ENDM
    .

        MACRO.

      :
     "" MACRO " .."
     .
     .
     .
     ENDM
        MACRO       -
     .
     "" -    ,      -
  .
     "C .." -   ,    
(   )        .
  MACRO  ENDM   .
         :
     "" " ."

     "" -    MACRO   -
             ;
     " ." -     ,
                         -
                          
                     .
            -
,     .    -
        ,    
     .
     .
     F00  MACRO  X
     Y    SET    0
          REPT   X
     Y    SET    Y+1
          DB     Y
          ENDM
          ENDM
       F00 10     
  ,     .

        EXITM.

      EXITM    REPT/IRP/IRPC  -
 MACRO.    EXITM   ,  
      .   ,  -
 EXITM,    ,     -
.

        LOCAL.

                                  - 32 -

      :
     LOCAL " .."
           MACRO. 
 LOCAL       -
           
         .
,         
 MACRO.      
     .   ,
    LOCAL,      ..0001  ..FFFF.
         ..NNNN.
    LOCAL,   LOCAL     
.

           .

     &          -
              .   -
           ,      -
           ,     ,   -
                .   -
                 -
                 
           &;
     .
     ERG   MACRO   X
     ERROR&X: PUSH  BX
              MVI   BX,'&X'
              JMP   ERROR
              ENDM
         ERG A   -
 :
     ERROR&A: PUSH B
              MVI  B,'A'
              JMP  ERROR
     .
         ,     -
      .     ERRORA
  ER- ROR&A.
     ;;         
              ,       
              ,  
            .LALL;
     $          ;
     !     ,     
            ;
     NUL    ,   "",
               .    
            NUL       
           NUL.  IF NUL    "",
                  
                     "CR".

                                  - 33 -
                
                 -
             IFB  IFNB;
     %            
            . %   -
                (  
           )      .  
                 -
              . -
            %      -
            (  -     
            ).  ,      %
               ,  
              DS.
     .
      LB,     MACLAB,   -
  Y,    MACRO.  %  LB   
 Y   .   %      'ER-
ROR LB'.
     MACLAB MACRO Y
     ERR&Y: DB 'ERROR &Y',0
            ENDM
     MACERR MACRO X
     LB     SET 0
            REPT X
     LB     SET LB+1
            MACLAB %LB
            ENDM
            ENDM
       MACERR  3 :
     ERR1: DB 'ERROR 1',0
     ERR2: DB 'ERROR 2',0
     ERR3: DB 'ERROR 3',0
     TYPE   TYPE  ,  -
              :  -
                 (EXTRN)
            .   TYPE   
            (, ,  ).
             ,  TYPE   .
                   :
                  
             :
           0  ;
           1   ;
           2   ;
           3  COMMON .
             (80H) -  EXTRN.   -
              ,     1.
             - (20H).    
           ,     1.    -
                EXTRN,  
                0.  TYPE    
            ,     -

                                  - 34 -
             .


          .       .

          ,   -
,    ,    MAC.   
    REL,      .
  ,           
  .
              
  :
     M80                                                               (1)
     M80 " "                                            (2)
       (1) 80    *     .
  (2)       80.
       :
     [" 1"][," 2"]=" 3"
     
     " 1" -  ,      ;
     " 2" - ,     . 
         (TTY:),   LST: 
       .      " 2"  
       ;
     " 3" -  ,    .
      " 1"  " 2" ,         
 .     " 1"  REL,   " 2",   
,   PRN,  A  " 3"  MAC.        
  ,        .
:
     *=SOURCE.MAC          T  SOURCE.MAC  -
                            '    SOURCE.REL;
     *,LST:=TEST           T  TEST.MAC  
                              LST;
     *SMALL,TTY:=TEST        TEST.MAC, '
                              SMALL.REL,   -
                             .
        K 
            ,   
    .
                       
     ----                  --------
      /                         .. 
                             
      /                         .. 
                             
                           (  )
      /X                      ,  -
                             ""
      /                    ' 
      /L                      
      /                      
       .

                                  - 35 -
       *=TEST/L/P            TEST.MAC. ' 
                              TEST.REL,   -  
                           TEST.LST.
         
            :
     [TITLE ]    MACRO    PAGE X [-Y]
     [SUBTITLE ]
     
     TITLE  - ,   TITLE;
     X -   .      
       .    
 X=S;
     Y -   .      -
 PAGE     ;
     SUBTITLE  - ,   SUBTITLE.
              ,    
  .    :
     [CRF#]  [ERROR]  LOC#M  !XX!XXXX! ......      
         ,     -
 -   ,     .
     ERROR -   ,     .    
,    ERROR  .     
,       .
     LOC#M -   ,       /
 /0    ,   4 ,
 ,   6 .    -  
:
     '   ;
     "   ;
     !  COMMON ;
  ;
     *  .
         ,      -  -
 (     ).     
,     INCLUDE,      C.
    (MACRO,  REPT,  IRP,  IRPT),  
   "+".     .
           .    -
     ,    
   .      -
  ,       .
   PUBLIC,        I.  -
    :
     U        ;
     C         COMMON;
     *        ;
  ""    ;
     '        ;
     "        ;
     !       COMMON .
          
           ()    -
 .         ,  -

                                  - 36 -
    .
         
     ----    ---------
              .
                  
               
      C        .
             ELSE  IF; ENDIF  IF;  ELSE   IF
      D         
      E         EXTRN
                , '
             EXTRN
      M         .
      N        .
                ( 8Q).
      O            ENDM, LOCAL 
             ; SET, EQU  MACRO  ;    -
              ;    .
      P       .
                   EQU    
      Q      .
               ,    .  -
                .
      R      .
                 .
      U        .
      V       .
                    -
                  .  ,  
             ,  ,      
               .
            :
     'NO END STATEMENT ENCOUNTED ON INPUT FILE'
          END;
     'UNTERMINATED CONDITIONAL'
                  ;
     'UNTERMINATED REPT/IRP/IRPC/MACRO'
              ;
     [XX] [NO] FATAL ERROR(S) [,XX WARNINGS]
            .
                  .

           .
             80
   .  MACRO   ,   
/C.       /C    .LST   
 .CRF.   ,   M80  ,   -
 CREF.
       CREF     *     
.     CREF:
     * . = .
     - .CRF
    CREF    .PRN,   

                                  - 37 -
.
           :
     -     ;
     -         
           ,   .  , 
           ,   #.


   ENDM
    .

         IRPC - ENDM.

      