       11.  ZIP ("/").

       11.1.  .

         "/"     ""
    23          88
      ,    
      "".

      11.1.1.     "/"

      0.........................79
      .
      .            /
      .
      .            /
      ----------------------------
      !                          !  /
      !                          !
      !                          !
      !                          !
      !                          !
      !                          !
      !                          !
      !                          !  /
      ----------------------------
      .
      .
      .            /N
      .
      < >(23-88)
      .
      .
      .
      88

      11.1.2.   ZIP
              (, )

      / :      //:
      /:          /: 
      /: 
      /:      /D: 
      /:       /:  
      /: ..  /V: . 
      /N:.          /L:. 
      /F:         /S: , 
      /: . 
      /Q:  

       "" :

      @ :SAY-      # :GET-
      []:   ""-

     11.1.3.     ,        
    "/"

      . :<V> .   - :<>  
      5 :<>  (1-9) 88:<>   (23-88)
      40:<>    (0-127)

      11.2.   "/"

                     "/"
  ZIP.
         ,     
 .  ,   ( 
@  #)    (   )  
        .   
   ,     ,  
'/S',  ZIP   .

     ZIP       :

      @ <,> SAY <>

        @  :

      @ <,> SAY <>

         ""          ,
         ,  
      .  FMT- (  )
      . CMD-
( ) -  .


      11.3.  "/"

       :

      ZIP

      ZIP     HELP-    
.        .      
, :

      //
         ,   .  -
,  ZIP (   ) :

     <NEW> OR <OLD> FILE (Q TO QUIT)?

      ZIP   ,      - -
      (N)    (), 
    ZIP (Q).    :

      N
      ZIP    :

      FILE NAME (DRIVE ORTIONAL):

         8     :

      -, 0123456789, @#/  :

       ,         -
.  ZIP        <>.ZIP 
     <>.CMD.   -
  <>.       (0,0),   ZIP
    .

          <>  <>. 
 ,         
  ,      .  
ZIP            .  
      :

    / -    ( );
    / -    ( );
    / -    .

      ,  ZIP          
   !      "/",  
,      ,      "/"  
   ,    !

                 ZIP,      
   5,    -  
  (    ZIP   ).

               
     HELP-.         
     ZIP,       
. .

              (<>,/)  
:

   /
   /V
   <TAB >
   /V
   <TAB >
   /V
   /

            ,  
 "+"   .

             
  /, ZIP   .

         "+", ZIP   -.

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

          "+",    , 
     "+" .    
  ZIP          ,        
     "+".

           .

          (/,/    /V,/V)  
     .
       :

   //
   
   40
   . (   )
   *

            40 ,  
    -   '*'.        
    ZIP.

        <>         .
  /,       /V.       
,         .
   ,                
 .

       :

   /N
   /

          ,  ZIP :

    ROW 39,COL 0
   ( 39,  0)

                   0    39.
,        
 ,      .

   /F -   ;
   /L  -     (      
  ).

        ,   :

   /S
     ZIP   :

      <>  CMD   FMT- (, F  STOP)?

         ""  "F",  ZIP     
    .    "",  ZIP :

          (Y    N)?

        "Y"  "N".

        ZIP          (
FMT  CMD-):

       <>:   (Y  N)?

       "Y", ZIP   .    
        .      
 "N".
      ZIP             ,
  .  :

         <>.ZIP

        :

         <>.ZPR

              ""  ZIP    
     :

   *<>.CMD

     :

   *<>.FMT

         CMD,      :

   ERASE (  )

      :

   SET FORMAT TO PRINT
   SET MARGIN TO XX (  )

          (CMD  FMT) ZIP    
  '@..SAY'    GET   READ      
  64  GET'.  ZIP   ,    
  .

      ZIP      READ      
      SET FORMAT TO  SCREEN    
      RETURN    
.

          ZIP       ,  
     .       
      .

       ZIP  GET   ,  :

   "GET"   :  (Y  N)?

          GET -    "Y".  ZIP
   <>.CMD.

         GET    -      .   ZIP
 CMD-,   "    ",
     GET,     
  .

      , ,        (/S),  
 , ,     .

      ZIP   .     
 "",  :

    :  (Y  N)?

        "Y"      -
       .  ZIP 
 ,         -
:

    :  (Y  N)?

      ,    "Y" -     
,       .

           ,      
 ,    ZIP.    , 
            ...

            :

   DO <>

      :

   SET FORMAT TO <>

                  ,
        ZIP,         
   ,   .

            :

   /

       ZIP :

    (Y  N)?

      "Y".  ZIP ,       
:

   <NEW>  <OLD>  (Q - )?

      "Q", ZIP :

      (Y  N)?

       "Y".    SCP.

        ,    , ZIP 
        SCP.


      11.4.    GET  SAY.

        ZIP,      
SAY  GET.   ,   .

      ZIP            
  .        
,  ZIP     ,     
 .

          ,     
  88 .    -
 @ ( SAY-)  # ( GET-)  -
  .        .  
    ,    ZIP  
   "".  ZIP   
,    10  , ,  
    ""    (,
).     , ZIP , 
      .

        HELP-,  //.   
   ZIP.


      11.5.   ""   

        -     ZIP
          "".  
   :

      -  ""     -
;
      -           
   (            
);
      -         
      .

        ,       
            
(@@,  @#    #@).           
    .


      11.6.  ""

      @ -   SAY-;
      # -   GET-.

               ,          ZIP
     ,              
,     ,   "",
      > 10.   "":

      -, 0123456789    .

      ZIP  ,   
  GET'        ,        
     .  ZIP   READ  
 64 GET'  CMD-    .

      ZIP       (<>.CMD    <>.FMT),
            .
      ZIP  ERASE     .  
    ZIP  SET FORMAT TO PRINT  SET  MAGIN
TO  XX          SET  FORMAT  TO  SCREEN    
  RETURN.  ZIP     
 <>.ZIP,     -  <>.ZPR.

                  
  ZIP       
   ""  .


      11.7.  

     .    ,      
  (   ZIP     ZIP ).

     -            
.
          5         
 1-9.
                -
     88 .    
  0-127.


      11.8.   "/"

      /    ,           
,      .
      //       -
  ,   ,  -
,     . ,  -
   47:

      //
      
      47

      /   .
         - ,    -
 ,       
    .      -
   -      -
    .

      /V   .
         ,     -
,          
     .   -
  23,       . 
      ,   
         -
.

       "+"        
 ,        
.

      /   /         -
,     .
      /    .
      /N      .
      /      .
      /F     .
      /L     .
      /I    .

        -     , 
   !
      /D    .
      /     ,    
.      !
      /    ,  .
      /   ,       
 .
      /S          <>.ZIP  
<>.ZPR,           <>.CMD 
<.FMT>      (    
).
      /Q   SCP.



      12.  .

           ""   
DBASE  II  2.4  ASHTON-TATE    REDABAS,  -
  "" ().

                 "/"
  ZIP  3.0.


                                                  1


       ""

      #
      *
      EOF
      !(<>/<>)
      TYPE(<>)
      INT(<>/<>)
      VAL(<>/<>/<>)
      STR(<>/<>/<>, <>, <>, <>)
      LEN(<>/<>)
      $(<>/<>/<>, <>, <>)
      @(<1>/<1>, <2>/<2>)
      CHR(<>)
      &
      FILE(<" ">/<>/<>)
      TRIM





                                                  2


       ""


        :

      <> = 
      <> = 
      <> = 
      <> = 

             <...>     .
   [...] .       
       ( ).


      ? < [,]>
        

     @ <> [SAY <> [USING '']] [GET <> [PICTURE
'']]
                
               

      ACCEPT [''] TO <>
                  ,
               

      APPEND [BLANK]
      APPEND FROM <> [SDF] [FOR  <>]  [DELIMITED [WITH
             <>]]

                 

      CANCEL

                 

      CHANGE [<>] FIELD <spisok> [FOR <>]
                 

      CLEAR
                  
              

      CONTINUE
                LOCATE

     COPY [<>] TO <> [STRUCTURE] [FIELD <>]
          [FOR <>] [DELIMITED [WITH <>]]
                   


     COPY TO <> STRUCTURE EXTENDED
                ,  
                 .
              (  CREATE  <.>
              FROM <.>)

      COUNT [<>] [FOR <>] [TO <>]
               , 
               

      CREATE
                

      CREATE <.> FROM <.>
                  ,
                  
              (.  COPY STRUCTURE EXTENDED)


      DELETE [<>] [FOR <>]
                  

      DELETE FILE <>
                 

      DISPLAY [<>] [FOR <>] [OFF]
                 

      DISPLAY [<>] [<> [,<>]]
                 

      DISPLAY STRUCTURE
                  USE

      DISPLAY MEMORY
                 

      DISPLAY FILES [ON <->]
                

      DO <>
                

      DO WHILE <>
                 

      EDIT
                 

      EDIT [<>]
                  

      EJECT
                 

      ELSE
                   IF

      ENDDO
                DO WHILE

      ENDIF
                IF

      ERASE
               

      FIND <>
                  
                 (  )

      GO  GOTO [RECORD],  [TOP],  [BOTTOM], N
                

      IF <>
                

      INDEX ON <> TO <>
                    USE

      INPUT [''] TO <>
                  
                (  )

      INSERT [BEFORE]
             [BLANK]
                    
               

      JOIN TO <> ON <> [FIELDS <>]
               ,    
                

      LIST
               

      LOCATE [<>] [FOR <>]
               ,  
              

      LOOP
                   

      NOTE  *
                 , 
                  
              

      MODIFY COMMAND <>
                
                  ""

      MODIFY STRUCTURE
                .  
                

      PACK
               ,   

      QUIT [TO   SCP  .COM-]
               ""   .
                 ,   
              

      READ
                
               .  
                GET


      RECALL [<>] [FOR <>]
                   

      RELEASE [<> [,<>]]  [ALL]
                 

      REMARK
                 , -
                  

      RENAME <.> TO <.>
               

      REPLACE [<>] <>  WITH  <>  [,<> WITH
        <> ...]
                 . 
                ,   ""
                  ,   
              ,      
              

      REPORT [<>] [FROM <> [TO PRINT] [FOR <>]
               

      RESET
               SCP,    
              

      RESTORE FROM <>
                 SAVE
                .   -
                

      RETURN
                 
                   

      SAVE TO <>
                    
               

      SELECT [PRIMARY]  [SECONDARY]
                

      SET <> [ON],  [OFF]
                 ""

      SKIP +/-</>
               -  

      SORT ON <> TO <> [ASCENDING]
                    [DESCENDING]
                ,   

      SUM [<>] < [,<>]> [TO <> [,]
        [FOR <>]
                  

      TOTAL TO <> ON <> [FIELDS < [,]>
                    

      UPDATE FROM <> ON <> [ADD < [,]>
                        [REPLACE < [,]>
                    

      USE <> [INDEX <>]
                    

      USE
                 

      WAIT [TO <>]
                   ( )




                                                  3


        ""  

       :
      ----------------

      CREATE
                 

      CREATE <.> FROM <.>
                ,   
                   

      USE <.>
      COPY TO <.> STRUCTURE
                   ,
                 
               

      USE <.>
      COPY TO <.> STRUCTURE EXTENDED
                ,  
                  

      DISPLAY STRUCTURE
      LIST STRUCTURE
                    USE

    MODIFY STRUCTURE
                ,  

          :
      -----------------------------------

      USE <.>
      COPY TO <.>
      USE <.>
      MODIFY STRUCTURE
      APPEND FROM <.>
      COPY TO <.>
      USE <.>
      DELETE FILE <.>


          :
      ---------------------------------

      USE <.>
      COPY TO <.> SDF
      MODIFY STRUCTURE
      APPEND FROM <.>.TXT SDF
      DELETE FILE <.>


        :
      ------------------

      USE < >
                

      USE <.>
                 

      USE
                 

      RENAME <.> TO <.>
                  

      COPY TO <>
                 

      CLEAR
                    
                

      SELECT [PRIMARY][SECONDARY]
                   .
                     .  S.

      DISPLAY FILES [ON <D>]
                    
               .    LIST

      DISPLAY FILES LIKE <WILDCARD> [ON <D>]
                    

      QUIT
                 ,   
                 ""


       :
      ----------------

      SORT ON <> TO <.>

      INDEX ON <> TO <.>
                 
          


       :
      ----------------------

      COPY TO <.>
                   USE

      APPEND FROM <.>
                    USE

      UPDATE FROM <.> ON <>
                   
                 USE.    
                 <>

      JOIN
                    


         :
      ----------------------------------

      DISPLAY, LIST, BROWSE
                

      DELETE
                 ,  
                  

      RECALL
                   

      PACK
                  
               

      EDIT
                  


                                                  4


                

                                  32 
                             1000 
                              65535 
                    254 
                                                   10 
                            1.8*10**63 .
                           1.0*10**-63 .
                              64 
                     254 
          SUM                 5 
          REPORT           254 
                               100 
        GET-                      64 
                    16 


                                                  5

                ""


      1. 0-      .  .
        "@
0,<X>  SAY <>".
      2.  REPORT   24  .
      3.   PACK               ,
 SCP  .   ,
  "COPY  TO  <  >"          
  .   SCP,   "".
      4.    .
      5.     COPY STRUCTURE:
         USE <>
         COPY STRUCTURE TO < >
          "STRUCTURE"   
           "COPY".
      6.   USE     ".DBF",
         ..   .
