CH
                  
            
                             - 1 -


      POWER  

        POWER!  !   
             .
       POWER   ,     -
     ;       -
     ,         -
     ;        /, 
               
        . POWER   ,
           , 
         ,  .   
      "  ",     -  
      ,    - 
      .
       POWER    55 ,    
       16 ,    ,-
           - 
        POWER,   
            POWER.
         POWER    /.
        -   -   - 
      .       
        ,      
      .       
             -
     ,   ,   .  
         ,       
            -
       .   - 
          ,  
          .
             ,
         POWER   
         , ,
           POWER       
      , ,  ,POWER -
               -
     ,    ,    -  
      .
           POWER 
      ,     ,  
          ,    -
     -    BDOS   
     ,,     - 
     ,   ,POWER   -
     :"CAN'T LOG ON A"/   :/. 
     ,  .    -
         POWER 0=   
        :,   .
      


     

               
        POWER.   - 
     ,        -
     ,  -    , 
     ,    ,- 
          POWER.   -
        ,   
             -
     ,  .



                         - 2 -


             "  
        ",  "   -
     ",     
           .  -
       POWER      -
       ,     
       , ,    -
      .
       ,    ,  -
       POWER    .



     

           POWER .  -
     ,         
      . ,    -
       ,  ,  ,
          ,  
      .        
     ,   -    ,
          .   -
      .
             POWER  -
      .      POWER,   
        :
        :
       1.       :   
         ,   
          ,  -
       POWER  .
       2.    POWER   B:  
     (CONTROL C),     POWER.
       3.      B:POWER.
       4. POWER      
         0=,   ,   
        :      -
       0.
       5.   0=  COPY B.***.  -
       ,    B: -
       .  ,   COPY
          .
       6. POWER    .  
         , ,   -
     ,  .
       7.  .    ":"  "RETURN".
       8.   POWER    
           :.   ,
     POWER     POWER, -
     ,   , .  
     COPY ,   0=.
       9.    POWER   B:     
         .
      10.     B:    /,  
            
     (CONTROL C).       
      POWER       -
           
     POWER.


 
                           - 3 -


	A0=?            
	DIR	COPY	REN   		    
	ERA	TYPE	TYPEX
	TYPEH	TYPEA	RUN
	EXIT	SIZE	CHECK
	STAT	USER	XUSER
	TEST	SET	SETDIR
	SETSYS	SETRO	SETWR
	DECLAIM	DISK	GROUP
	LOG	RESET	DS
	SPEED	SAVE	LOAD
	READ	WRITE	READGR
	WRITEGR	DUMP	DUMPX
	DUMPH	DUMPA	MOVE
	FILL	CM	SEARCH
	JP	EX	GO
	UR1	UR2	UR3
	UR4	SORT	PASS
	?

       ,    /    POWER
         - , , 
           SYSGEN. 
      (CONTROL C)   , 
       0=.      -
     .  ? ,    
     POWER.     ,
       ,  RUN,     
        .COM ,   
         .



       

             -
      POWER,      .
           POWER : >POWER. 
         ,  
      POWER,   /,  .
       : 0=   ,   
          0. 0- 
           
     ,    .
       ,      -
      ,     -
      ,  ,   ,-
         /  1.4   , 
       .
            
       POWER,,0=COPY,    -
         POWER -  
      ,   .

     0=COPY
     A0:  1= ASM    .COM   2= DBASE   .COM   3= DDT     .COM   
     A0:  4= DOVR   .COM   5= DOVR1   .COM   6= FORMAT  .COM
     A0:  7= FORTH  .COM   8= FORTH   .FRT   9= FORTHAE .COM
     A0: 10= LOAD   .COM  11= PIP     .COM  12= POWER   .COM
     A0: 13= PRINT  .COM  14= PZUV16  .FRT  15= PZUV16N .COM
     A0: 16= RAVI   .COM  17= RESOURSE.COM  18= SIMV    .COM
     A0: 19= WM     .HLP  20= WMR     .COM     
     SELECT? 1
     DESTINATION DRIVE:



                           - 4 -     


            " ":
      ,    .
             -
        POWER 
       1 - ?  2 -  .
         ,   -
        ,     
           .  -
         200:1,  -
        ,  -
         POWER, COPY.
       ,   POWER  
           . 
         , , -
        (8-12).    
            , 
            (8-).  -
     ,       -
         .
          POWER    -
       (DESTINATION DRIVE :).  .
       ...     .



      

        / ,    8080,Z80
      8085; APPLE   Z80    /:
     TRS-80,    /.
          /-86  IBM PC ( /-86). 
        /.
          16.  -
         24.
       .    POWER 
       /,  2.**,  
           .



        /  /-86

            .COM       
     /-86,   /-86  280- . 
           ,
       ,  ,
        100HEX,    CMD -
     .      LOAD 
     .      280 , -
       .



         ()

        LOG, POWER   - 
           ,
         .    
     (    TPA2  ..)   
     ,   (64),   .
       /-86.     , ,-
       ,   ,   
      POWER (EXIT).



                        - 5 -


        /-86     -
      ,    .
          /-86  0  15.



     

           POWER  -
      .    -     -
     ,    POWER  -  
        .    
        ,   -
      ,       
      .



        POWER

       POWER      ,
     POWER      / >. POWER -
          , -
      POWER   .  , POWER -
          ,  
              
     ,,,WORDSTAR  DBASE.  -
       ,   ,
       ,   
         POWER 0=, 
        .
            /  
          POWER,  
      .     >POWER COPY
         ,  .  
        ,POWER    /.
       , ,   POWER -
     ,       
     EXIT.   ,     ,
        POWER  , (POWER)  
       .     /
       "   ".



      

       POWER     -
      /,       ,-
          /,  
      POWER. POWER    /,
        .     
     POWER   ,,
          ,  
        .
          POWER - -
      ,  ,   
       ,  , 
         ,  -
      -   .
        ,   POWER  ,
          ,  -
              .



                          - 6 -


     ,   . ,
      TYPE  ,   
     , ,  .    -
            
       ,    
        DUMP.



       POWER
   
          POWER - 0= -    
     ,   ,   -
           .   -   
      ,      -
             
       .   ,
           -
       /     
          - -
            
     []   POWER.
       .   0   - 
      0:    ,   -
        . ,   -
      -   POWER -
       ,   -
       : ( B:  ..).
           (0). ,  
       POWER,0-15   
         USER  XUSER   -
      .
          ,  0,   
        POWER - 
     ,    "".



        POWER

              POWER;
            . -
            
          
        ,     
           , -
      (  )   .  
       ,   
         .  ,
            
       ;       
      ,   ,  -
       .
       .  ,   
      ,  (RETURN),  
       .
       .       -
          ,  .  
           SELECT?   
           0=.



                         - 7 -


       :
     
     0=
     A0=TYPE
     A0:   1= ASM   .COM   2= DBASE    .COM   3= DDT     .COM
     A0:   4= DOVR  .COM   5= DOVR1    .COM   6= FORMAT  .COM
     A0:   7= FORTH .COM   8= FORTH    .FRT   9= FORTHAE .COM
     A0:  10= LOAD  .COM  11= PIP      .COM  12= POWER   .COM
     A0:  13= PRINT .COM  14= PZUV16   .FRT  15= PZUV16N .FRT
     A0:  16= RAVI  .COM  17= RESOURCE .COM  18= SIMV    .COM
     A0:  19= WM    .HLP  20= WMR      .COM
     SELECT? 19

     A:WM     .HLP
     
                    ,
            7063.02

     1.   ()  

   ------------------------------------------------------------
   ! !            !   !
   !-!---------------------------------!----------------------!
   !1!    !   !
   ------------------------------------------------------------

         :
    
        1:     0=     -
     ,   .   -
       ,  (?).    -
        TYPE.     
      ,   ,   ,
      ,      
      .    ,  ,
       ,   .  ,  
       TYPE, (RETURN).
        2:  POWER    
        (0:).   (SELECT?) -
       ( ),  ,-
        . :  
         . , 
       .  1 3 7,   3 1 7  -
        1,  3,  7,.  (RETURN).
              
      9-11,    9 -(RETURN), 
            9   -
     .



        POWER

        POWER     
       .      -
      /,     , POWER 
            -
      .          
       ,    -
     .          
     ,     , 
        .



                     - 8 -


     0=
     A0=DIR B:
     B0:   1= ASM     .COM   2= BIO    .BAS   3= BIOS .SYS
     B0:   4= DBASE   .COM   5= DDT    .COM   6= DOVR .COM
     B0:   7= DOVR1   .COM   8= FORMAT .COM   9= FORTH.COM
     B0:  10= FORTH   .FRT  11= FORTHAE.COM  12= LOAD .COM
     B0:  13= PIP     .COM  14= POWER  .COM  15= PRINT.COM
     B0:  16= PZUV16  .FRT  17= PZUV16N.FRT  18= RAVI .COM
     B0:  19= RESOURCE.COM  20= WM     .HLP  21= WMR  .COM
     A0=B: DIR
     B0:   1= ASM     .COM   2= BIO    .BAS   3= BIOS .SYS
     B0:   4= DBASE   .COM   5= DDT    .COM   6= DOVR .COM
     B0:   7= DOVR1   .COM   8= FORMAT .COM   9= FORTH.COM
     B0:  10= FORTH   .FRT  11= FORTHAE.COM  12= LOAD .COM
     B0:  13= PIP     .COM  14= POWER  .COM  15= PRINT.COM
     B0:  16= PZUV16  .FRT  17= PZUV16N.FRT  18= RAVI .COM
     B0:  19= RESOURCE.COM  20= WM     .HLP  21= WMR  .COM
     B0=A:                                                 
    
     A0=
     A0=TYPE 2:
     B0:   1= ASM     .COM   2= BIO     .BAS  3= BIOS .SYS 
     B0:   4= DBASE   .COM   5= DDT     .COM  6= DOVR .COM 
     B0:   7= DOVR1   .COM   8= FORMAT  .COM  9= FORTH.COM 
     B0:  10= FORTH   .FRT  11= FORTHAE .COM 12= LOAD .COM 
     B0:  13= PIP     .COM  14= POWER   .COM 15= PRINT.COM 
     B0:  16= PZUV16  .FRT  17= PZUV16N .FRT 18= RAVI .COM 
     B0:  19= RESOURCE.COM  20= WM      .HLP 21= WMR  .COM
     SELECT?
     A0=TYPE [4R]
   A0: 1=ASM     .COM  2=DBASE .COM  3=DDT    .COM  4=DOVR .COM
   A0: 5=DOVR1   .COM  6=FORMAT.COM  7=FORTH  .COM  8=FORTH.FRT
   A0: 9=FORTHAE .COM 10=LOAD  .COM 11=PIP    .COM 12=POWER.COM
   A0:13=PRINT   .COM 14=PZUV16.FRT 15=PZUV16N.FRT 16=RAVI .COM
   A0:17=RESOURCE.COM 18=SIMV  .COM 19=WM     .HLP 20=WMR  .COM
   SELECT?
   A0=TYPE T*.: *

   NO FILES T???????.??? ON A:
   A0=TYPE W W*.*
   A0: 1= WM     .HLP  2=WMR   .COM
   SELECT? 1

   A:WM      .HLP (Y/N) ?NO

   A0=TYPE W**
   A0:   1= WM   .HLP  2=WMR   .COM
   SELECT? 1

   A:WM      .HLP (Y/N) ?NO

   A0=TYPE ***
   A0: 1=ASM     .COM  2=DBASE .COM  3=DDT    .COM  4=DOVR .COM
   A0: 5=DOVR1   .COM  6=FORMAT.COM  7=FORTH  .COM  8=FORTH.FRT
   A0: 9=FORTHAE .COM 10=LOAD  .COM 11=PIP    .COM 12=POWER.COM
   A0:13=PRINT   .COM 14=PZUV16.FRT 15=PZUV16N.FRT 16=RAVI .COM
   A0:17=RESOURCE.COM 18=SIMV  .COM 19=WM     .HLP 20=WMR  .COM



                     - 9 -


   A:ASM      .COM (Y/N) ?NO
   A:DBASE    .COM (Y/N) ?NO
   A:DDT      .COM (Y/N) ?NO
   A:DOVR     .COM (Y/N) ?
   A0=TYPE W?.H?P
   A0: 1=WM       .HLP
   SELECT? 1

   A:WM      .HLP (Y/N) ?NO

       .      POWER
            
       .



       

        !     
     POWER       -
     .      -
       ,   
         POWER:
     ( ) (:) () ( )
     ()
     ( ) (:) ) (  
     ) () (    )
     () [ ,  ]



       

         POWER    :
      ,  ,  -
      .    -
       .        
     .      
      TYPE.

     0=
     0=DIR B:
     B0:   1= ASM     .COM   2= BIO    .BAS   3= BIOS .SYS
     B0:   4= DBASE   .COM   5= DDT    .COM   6= DOVR .COM
     B0:   7= DOVR1   .COM   8= FORMAT .COM   9= FORTH.COM
     B0:  10= FORTH   .FRT  11= FORTHAE.COM  12= LOAD .COM
     B0:  13= PIP     .COM  14= POWER  .COM  15= PRINT.COM
     B0:  16= PZUV16  .FRT  17= PZUV16N.FRT  18= RAVI .COM
     B0:  19= RESOURCE.COM  20= WM     .HLP  21= WMR  .COM
     0=B: DIR
     B0:   1= ASM     .COM   2= BIO    .BAS   3= BIOS .SYS
     B0:   4= DBASE   .COM   5= DDT    .COM   6= DOVR .COM
     B0:   7= DOVR1   .COM   8= FORMAT .COM   9= FORTH.COM
     B0:  10= FORTH   .FRT  11= FORTHAE.COM  12= LOAD .COM
     B0:  13= PIP     .COM  14= POWER  .COM  15= PRINT.COM
     B0:  16= PZUV16  .FRT  17= PZUV16N.FRT  18= RAVI .COM
     B0:  19= RESOURCE.COM  20= WM     .HLP  21= WMR  .COM
     B0=A:



                           - 10 -  


     A0=
     0=TYPE 2:
     B0:   1= ASM     .COM   2= BIO    .BAS   3= BIOS .SYS
     B0:   4= DBASE   .COM   5= DDT    .COM   6= DOVR .COM
     B0:   7= DOVR1   .COM   8= FORMAT .COM   9= FORTH.COM
     B0:  10= FORTH   .FRT  11= FORTHAE.COM  12= LOAD .COM
     B0:  13= PIP     .COM  14= POWER  .COM  15= PRINT.COM
     B0:  16= PZUV16  .FRT  17= PZUV16N.FRT  18= RAVI .COM
     B0:  19= RESOURCE.COM  20= WM     .HLP  21= WMR  .COM
     SELECT?
     A0=TYPE [4R]
   A0: 1=ASM     .COM  2=DBASE .COM  3=DDT    .COM  4=DOVR .COM
   A0: 5=DOVR1   .COM  6=FORMAT.COM  7=FORTH  .COM  8=FORTH.FRT
   A0: 9=FORTHAE .COM 10=LOAD  .COM 11=PIP    .COM 12=POWER.COM
   A0:13=PRINT   .COM 14=PZUV16.FRT 15=PZUV16N.FRT 16=RAVI .COM
   A0:17=RESOURCE.COM 18=SIMV  .COM 19=WM     .COM 20=WMR  .COM
   SELECT?
   A0=TYPE T*.: *

   NO FILES T???????.??? ON A:

   A0=TYPE W W*.*
   A0: 1= WM     .HLP  2=WMR   .COM
   SELECT? 1

   A:WM      .HLP (Y/N) ?NO

   A0=TYPE W**
   A0:   1= WM   .HLP  2=WMR   .COM
   SELECT? 1

   A:WM       .HLP (Y/N) ?NO

   A0=TYPE ***
   A0: 1=ASM     .COM  2=DBASE .COM  3=DDT    .COM  4=DOVR .COM
   A0: 5=DOVR1   .COM  6=FORMAT.COM  7=FORTH  .COM  8=FORTH.FRT
   A0: 9=FORTHAE .COM 10=LOAD  .COM 11=PIP    .COM 12=POWER.COM
   A0:13=PRINT   .COM 14=PZUV16.FRT 15=PZUV16N.FRT 16=RAVI .COM
   A0:17=RESOURCE.COM 18=SIMV  .COM 19=WM     .COM 20=WMR  .COM

   A:ASM      .COM (Y/N) ?NO
   A:DBASE    .COM (Y/N) ?NO
   A:DDT      .COM (Y/N) ?NO
   A:DOVR     .COM (Y/N) ?  
   A0=TYPE W?.H?P
   A0: 1=WM       .HLP
   SELECT? 1

   A:WM           .HLP (Y/N) ?NO



                          - 11 -


       (A) A0=TYPE (RETURN).     -
     .     ,  -
       - ,   ,
     .
        ,     ,
      POWER    -
           -  
       :,  (0).
          ,  ,
            -
           (SELECT?).  
        :.
       (B) 0=TYPE B: (RETURN).     
       :,      -
      B:.    B:  -
      (RETURN).
       (C) 0=TYPE 2: (RETURN).    -
     , ,    2,    B  
       .    
     POWER     ,  
       .
       ,      1  9,
           P.
       (D) 0=B:TYPE (RETURN).     -
        :   B:   
       B:. ,     -
      ,     .  -
       ,   -
      B:.
       () 0=B:TYPE C: (RETURN).    -
        :  B:    - 
        B:.   , POWER -
          .
       (F) A0=TYPE [4R] (RETURN).     -
       [] ,, .  -
       ,  . -
       PELOG,   .
            (RETURN)  POWER 
             -
       R -    , -
      (Y/N)  -   .
       (G) A0=TYPE T*.* (RETURN).    -
               
     /.
     "*.*" -   POWER   
        ,   "T". -
     ,  POWER    -
     ,  .   .
       (H) A0=TYPE T**(RETURN).    -
        POWER - "**".   
     (RETURN),     
      ,     "T", 
      (SELECT?) ,    
     . ,      -
       ,   ,  
         *.*.



                            - 12 -


       (I) A0=TYPE *** (RETURN).    
        POWER - "***".   
     (RETURN),        
       0. , 
          TYPE  ,  -
      ,    ;  (SELECT?) 
     ,     , -
        .  ,   
           ,    ,
         TYPE   ESC.
        !    .COM  -
      TYPE,       ,  
        ,    
       .      -
      ***     TYPE,  
       .COM .
       .  ,   -
       POWER.
       (J) 0=TYPE W?.H?P (RETURN).    
       (? ?)     .
       ,,     "**" 
         -
        .



          
        

        ,   
     ,      -
       .
          ,    -
          .  
            ; 
        ,  .   
       ,   (),-
            .
       (K) 0=TYPE TEST.TXT (RETURN).    
           :,
     TEST.TXT.  POWER     
     (RETURN).
       (L) 0=TYPE B:TEST.TXT (RETURN).    -
         TEST.TXT   B:,
              
      :.
       () 0=TYPE 2:TEST.TXT (RETURN).     
     ,  ,   
      2  POWER    B:.
       (N) A0=B:TYPE TEST.TXT (RETURN).   
         :  B:  
       TEST.TXT.   , 
        B:.
       (O) A0=LOAD TEST.TXT ( ) (RETURN).  -
       , LOAD  GO, 
         , , 
            . -
        ,    .



                          - 13 -


             

           POWER   
      . ,    
          ,
     -   .   -
       :
                       0=TEST (RETURN)
       (P) A0=TEST (RETURN).      
        (RETURN). !    -
              
        :,   -
       ,.. (TEST B: (RETURN)).   -
         ,  
       ,..( TEST (RETURN)).
       ,  ,
       .     
      . ,TEST.READGR.WRITE  .. 
            
      . , MOVE  DUMP. ,, 
     , SORT  XUSER,   POWER
       .



        

         ,  POWER   -
     ,    ,   
     .      
     (CONTROL C),    
          ,   
     .         
        (CONTROL C)  ,
       .
       ,,   , POWER   
        ,     
        BDOS.    POWER
        (CONTROL C)   - 
     .
         , POWER  
       (CONTROL C)-.    
      116NEX ()    01.
          POWER  
     (CONTROL C)   , 
     -    (. "").
       ,   (CONTROL C)
          POWER,
            
       ,   ,  
      .    (CONTROL C) / (CONTROL C) -
      POWER     
      ;   ,  - 
          /.  ,  
         BDOS,    :
       .
       :      
        ,  
     .



                           - 14 -


      

              
      (ESC)  (CONTROL C).     
          ,  ,  
       ,     
          ,-
     ,     .  -
      (ESC),       -
          POWER 0=.  
          (CONTROL C).  
          .



          

        POWER     -
     ,     
          - . -
       *.*,     ?,  -
         POWER.  
        POWER:
       : 0=COPY T** (RETURN),   
                  A0=COPY **TXT (RETURN), 
                  A0=COPY *** (RETURN).
         COPY (      -
     ),  (**),    
      ,       .
        ,    -
            . 
          ,  
        .
         (**)  ( )    -
            
     .       
     ,    -   
          .
       ,,     
     POWER(***)    ,  -
              
      .    
           **BAK. 
         .   -
             
     .



     , 

             ,-
      POWER      -
     , ,  .  
           -
           . -
              -
     ,   ,   -
       .
       .       -
      . (CONTROL S)    POWER,
           (-
     )  POWER.
 


                           - 15 -


              
        ().  (RETURN)  (0)
            . -
      (  )      -
      .
       RETURN. (RETURN)     
         , 
      . (RETURN)   POWER  
        ,   
     (RETURN),     .       
     .       -
       ,   
     .     ,  
       .    
     , (0).
        .  ,  (RETURN).
       CONTROL M       T ,  (RETURN).
       CONTROL J        ,  (RETURN).
       CONTROL P        .    
     ()   ,    
     (CONTROL P),     
          "" . 
            ,
          .
        (CONTROL P)  (), 
           (0 -
      , 9 - ).
        .  ( )  
          .



        

             POWER, -
            .
           ,
            .
     ,   / 
         POWER.
       DEL.      -
       .
       <BACKSPACE>      ,  (DEL).
       CONTROL H        ,  (DEL).
           ,  (DEL).
       RETURN.  (RETURN)    -
      POWER,        -
     .
       .      
     ENTER.
        .  ,  (RETURN).
       CONTROL M        ,  (RETURN).
       CONTROL J        ,  (RETURN).
       CONTROL E.      
       .
       CONTROL P.   -  (CONTROL P) 
         POWER   
     .        -
      POWER     .



                           - 16 -


       CONTROL R.     
     .
       CONTROL U.        
      .
       CONTROL X.       
       .



                                P O W E R !

	0=?
	DIR		COPY		REN
	ERA		TYPE		TYPEX
	TYPEH		TYPEA		RUN
	EXIT		SIZE		CHECK
	STAT		USER		XUSER
	TEST		SET		SETDIR
	SETSYS		SETRO		SETWR
	RECLAIM		DISK		GROUP
	LOG		RESET  		DS
	SPEED		SAVE		LOAD
	READ		WRITE		READGR
	WRITEGR		DUMP		DUMPX
	DUMPH		DUMPA		MOVE
	FILL		CM		SEARCH
	JP		EX		GO
	UR1		UR2		UR3
	UR4		SORT		PASS
	?

                  ?..   POWER

       :     (?) 
         (0=)    -
         POWER.   -
         POWER 
     "INCORRECT,FOR LIST OF COMMANDS ENTER (?)" (,-
      (?)    )  , 
          .
       : 0=?  0=? ?
       .    (?) () (?) -
         POWER,   
          RETOOL.  
     PWRETOOL.



                          - 17 -


     CHECK ..   , 



     0=
     0=CHECK
     A0:   1= ASM     .COM   2= DBASE   .COM   3= DDT    .COM
     A0:   4= DOVR    .COM   5= DOVR1   .COM   6= FORMAT .COM
     A0:   7= FORTH   .COM   8= FORTH   .FRT   9= FORTHAE.COM
     A0:  10= LOAD    .COM  11= PIP     .COM  12= POWER  .COM
     A0:  13= PRINT   .COM  14= PZUV16  .FRT  15= PZUV16N.FRT
     A0:  16= RAVI    .COM  17= RESOURCE.COM  18= SIMV   .COM
     A0:  19= WM      .HLP  20= WMR     .COM                 
     SELECT?
     0=B:CHECK
     B0:   1= ASM     .COM   2= DBASE   .COM   3= DDT    .COM
     B0:   4= DOVR    .COM   5= DOVR1   .COM   6= FORMAT .COM
     B0:   7= FORTH   .COM   8= FORTH   .FRT   9= FORTHAE.COM
     B0:  10= LOAD    .COM  11= PIP     .COM  12= POWER  .COM
     B0:  13= PRINT   .COM  14= PZUV16  .FRT  15= PZUV16N.FRT
     B0:  16= RAVI    .COM  17= RESOURCE.COM  18= SIMV   .COM
     B0:  19= WM      .HLP  20= WMR     .COM                 
     SELECT? 10 7

     B:FORTH   .FRT - CHECKSUM: 570A  TOTAL: 570A DES:22282
     B:DOVR1   .COM - CHECKSUM: 89C9  TOTAL: E0D3 DES:57555

       :     
     ,      -
     .   ,   
     ,   .   
           
        ,    -
       TYPE,     -
          .
       : 0=CHECK
         :
        1:  B:CHECK     (0=),-
              , ,    
               B:      B:.
               (RETURN).
        2:  POWER   
                 B:    
              (SELECT?),  .
        3:  10  7     (SELECT?),
              ,    
                FORTH.FRT  DOVR1.COM. 
              (RETURN).
        4:  POWER    
              .        
                   
              .     , 
                 , , 
               ,    .  
                ,    
               .
                    "-
              ".



                              - 18 -


      ..  
        
	B0=A:
	A0=
	5504: 00   0 00000000  CTRL@ <H>
	A0=CM 5500 5600 7200
	5500: 88 00 :7200
	5501: 66 00 :7201
	5502: 55 00 :7202

       :      
       , , 
      ,     .   -  
                 
     ,,  ,,  -
      .      , 
     CHECK,         
       ,   .    -
         , 
      TYPE,      -
        .
       : 0=CM  ( HEX   )
     (   )(  
     ) 
       .       .
      POWER    
      ,      
         .

         :
        1:     (0=)  CM 5500,
              5601,7200,,    -
                 5500  6000  ,-
                 7200     -
                 .  (RETURN).
        2:  POWER    . -
                  , -
              .   5500  5502    -
                7200  7200,  . -
               5503  5600  ,   -
                 7203  7300.
       :     CM  -
             -
          .  
       LOAD.
             "".


     COPY ..  

     A0=
     A0=COPY
     A0:   1= ASM   .COM    2= DBASE   .COM    3= DDT    .COM
     A0:   4= DOVR  .COM    5= DOVR1   .COM    6= FORMAT .COM
     A0:   7= FORTH .COM    8= FORTH   .FRT    9= FORTHAE.COM
     A0:  10= LOAD  .COM   11= PIP     .COM   12= POWER  .COM
     A0:  13= PRINT .COM   14= PZUV16  .COM   15= PZUV16N.FRT
     A0:  16= RAVI  .COM   17= RESOURCE.COM   18= SIMV   .COM
     A0:  19= WM    .HLP   20= WMR     .COM                  
     SELECT? 20 19

     DESTINATION DRIVE :B

     B:=A:WMR	.COM FILE EXISTS,(B)ACKUP,(O)VERWRITE,(S)KIP:0
     B:=A:WM 	.HLP FILE EXISTS,(B)ACKUP,(O)VERWRITE,(S)KIP:S



                             - 19 -


       :  ,      
        POWER.    COPY    
            -
        ,  .  -
      COPY  POWER     - 
     .       
          POWER   
      .         
          (  
     )   ,   -
     .
              ,
       POWER      -
        ,      
     .       -
     .      ,  
     (ESCAPE),      
     COPY .     
     POWER.
       ,,    SIZE  STAT 
     POWER    ,   
         .   -
          .
       : 0=COPY
         :
        1:  COPY     (A0=),
              , ,   
                  :.  -   
               (RETURN)
        2:  POWER  , 
                (SELECT?), 
               
        3:   20  19,,   -
                WMR.COM  WM.HLP.  (RETURN)
        4:  POWER    
              (DESTINATION DRIVE:).  (B). ,
                    (:), (RETURN) 
        5:      POWER 
              COPY       -
               
        6:   POWER   -  
               WMR.COM,   
                    B:.  POWER
                  , -
               -   .  
                   , : -
                WMR.COM   B: (<0>VERWRITE),
                   B: (<S>KIP). 
                  ,  
               POWER   S. ,
                   , 
                 ,  
                COPY  .
        7:   POWER   
              INQUIRE,     . 
                  POWER  ,
                 : (BAD SECTOR ON READ
              ABORT (Y/N):)    ,- 
               /:.      
              ,  Y.



                                - 20 -


       :     ,  ,
       , POWER   
       (N),    COPY.
     ,  COPY   ,
         TYPE  ,  -
     .     ,  -
         RECLAIME,( 
     ),    .   -
      SETWR (   )  -
      ,     -
      .
       :   / 2.     
       COPY /   (MOVE)
           .
       USER/XUSER.


        COPY

          , -
        COPY.   LOG
         ,  
       [].       
      COPY,        
       SAVE.
        ,   LOG,
     ,   . 
             .
        ,   .
       -  - OVERLAY ( -
         ),B-BACK-UP (-
           ),C-ASK
     (      )  
     D-SKIP (   , - 
        ).
           [R],[V],[T],[M]  [Q].  
      [R] ,   
     /      .
        ,  /  
     .
        [V]     
     , ,      -
       . , , 
         COPY.  
     [T]   COPY, -   
       ,    -
        .      ,
          , -
              -
        .
         [T] , POWER  -
         , 
        ,   
     ,     .  - 
      ,   ,   -
      ,       
      .
       ,  POWER     
      ,    ,  .
        ,  []   
     ,,   , -
       .



                              - 21 -


        [M]      
      (<)     (>). 
     ,   ,    -
     ,  ,    -
        .
        .  ,  [M] ,
     , -     ,
      POWER    , 
     .      COPY     
     ,      [M],
       POWER   "CAN'T LOG ON" ( - 
     ),     .
        [Q]      
     .    ,   
           
        ,    -
     .      [Q] - 
       ,      REN (- 
     ).       -
     ,        , -
       (RETURN)    .
          COPY [Q]     
     (A0=).  ,     
          , 
     POWER      (NEW NAM:). 
     [Q]     ,   -
       ,   .
       ,  , ,
             -
      .
       :  COPY    .
      (CONTROL C)   . , 
        , POWER   -
      .     (CONTROL C)
         .
             .



                           - 22 -


     DIR .. 

     0=DIR 
     A0:   1= ASM     .COM    2= DBASE   .COM    3= DDT    .COM
     A0:   4= DOVR    .COM    5= DOVR1   .COM    6= FORMAT .COM
     A0:   7= FORTH   .COM    8= FORTH   .FRT    9= FORTHAE.COM
     A0:  10= LOAD    .COM   11= PIP     .COM   12= POWER  .COM
     A0:  13= PRINT   .COM   14= PZUV16  .FRT   15= PZUV16N.COM
     A0:  16= RAVI    .COM   17= RESOURCE.COM   18= SIMV   .COM
     A0:  19= WM      .HLP   20= WMR     .COM                  
     0=DIR [U]
     A0:   1= ASM     .COM    2= DBASE   .COM    3= DDT    .COM
     A0:   4= DOVR    .COM    5= DOVR1   .COM    6= FORMAT .COM
     A0:   7= FORTH   .COM    8= FORTH   .FRT    9= FORTHAE.COM
     A0:  10= LOAD    .COM   11= PIP     .COM   12= POWER  .COM
     A0:  13= PRINT   .COM   14= PZUV16  .FRT   15= PZUV16N.COM
     A0:  16= RAVI    .COM   17= RESOURCE.COM   18= SIMV   .COM
     A0:  19= WM      .HLP   20= WMR     .COM                  
     0=DIR [X]

     A0:   1= ASM     .COM    2= DBASE   .COM    3= DDT    .COM
     A0:   4= DOVR    .COM    5= DOVR1   .COM    6= FORMAT .COM
     A0:   7= FORTH   .COM    8= FORTH   .FRT    9= FORTHAE.COM
     A0:  10= LOAD    .COM   11= PIP     .COM   12= POWER  .COM
     A0:  13= PRINT   .COM   14= PZUV16  .FRT   15= PZUV16N.COM
     A0:  16= RAVI    .COM   17= RESOURCE.COM   18= SIMV   .COM
     A0:  19= WM      .HLP   20= WMR     .COM                  
     B0:   1= ASM     .COM    2= BIO     .BAS    3= BIOS   .SYS
     B0:   4= DBASE   .COM    5= DDT     .COM    6= DOVR   .COM
     B0:   7= DOVR1   .COM    8= FORMAT  .COM    9= FORTH  .COM
     B0:  10= FORTH   .FRT   11= FORTHAE .COM   12= LOAD   .COM
     B0:  13= PIP     .COM   14= POWER   .COM   15= PRINT  .COM
     B0:  16= PZUV16  .FRT   17= PZUV16N .FRT   18= RAVI   .COM
     B0:  19= RESOURSE.HLP   20= WM      .HLP   21= WMR    .COM
     A0=DIR [UX4]

A0: 1=ASM   .COM  2=DBASE  .COM  3=DDT     .COM  4=DOVR    .COM
A0: 5=DOVR1 .COM  6=FORMAT .COM  7=FORTH   .COM  8=FORTH   .FRT
A0: 9=FORTHA.COM 10=LOAD   .COM 11=PIP     .COM*12=POWER   .COM
A0:13=PRINT .COM 14=PZUV16 .FRT 15=PZUV16N .FRT 16=RAVI    .COM
A0:17=RESOUR.COM 18=SIMV   .COM 19=WM      .HLP 20=WMR     .COM
B0: 1=ASM   .COM  2=BIO    .BAS  3=BIOS    .SYS  4=DBASE   .COM
B0: 5=DDT   .COM  6=DOVR   .COM  7=DOVR1   .COM  8=FORMAT  .COM
B0: 9=FORTH .COM 10=FORTH  .FRT 11=FORTHAE .COM 12=LOAD    .COM
B0:13=PIP   .COM 14=POWER  .COM 15=PRINT   .COM 16=PZUV16  .FRT
B0:17=PZU16N.FRT 18=RAVI   .COM 19=RESOURCE.COM 20=WM      .HLP
B0:21=WMR   .COM
  A0=DIR [UX4Z]

A0: 1=DBASE .COM  2=DDT    .COM  3=DOVR    .COM  4=DOVR1   .COM
A0: 5=FORMAT.COM  6=FORTH  .COM  7=FORTH   .FRT  8=FORTHAE .COM
A0: 9=LOAD  .COM 10=PIP    .COM*11=POWER   .COM 12=PRINT   .COM
A0:13=PZUV16.FRT 14=PZUV16N.FRT 15=RAVI    .COM 16=RESOURCE.COM
A0:17=SIMV  .COM 18=WM     .HLP 19=WMR     .COM 20=(ASM    .COM
A0: 1=ASM   .COM  2=BIO    .BAS  3=BIOS    .SYS  4=DBASE   .COM
A0: 5=DDT   .COM  6=DOVR   .COM  7=DOVR1   .COM  8=FORMAT  .COM
A0: 9=FORTH .COM 10=FORTH  .FRT 11=FORTHAE .COM 12=LOAD    .COM
A0:13=PIP   .COM 14=POWER  .COM 15=PRINT   .COM 16=PZUV16  .COM
A0:17=PZU16N.FRT 18=RAVI   .COM 19=RESOURCE.COM 20=WM      .COM
A0:21=WMR   .COM



                            - 23 -


       :     ,  -
       .  POWER   -
            .
        [U]  [X],  
         -
        .
       : 0=DIR
                  0=DIR [U]   -    -
                                    .
                  0=DIR [X]   -    
                                    -
                                 
                  0=DIR [XU]  -    -
                                        
                                  ( 
                                 0160    -
                                 )
         :
        1:  DIR [UX4] (RETURN)    
              (0=),, ,   
                 ,-
                 
              .      -
                     -
              .
        2:  POWER    :,-
                (0)  (1)   :,-
                (0).    
              
        ,    (0)    
      :     (.COM ). 
       PIP.  (*),  ,  -
      READ ONLY ( )  SET, ASM.
       ,  ,   , 
     S.   ,  (*),  ,
       ,     READ ONLY
      SET      .  
          SETSYS (-
      )  SETRO ( READ ONLY).
         POWER   
      (I)   :,    (AI:) 
           
       I:.   POWER 
           
      - (B0:).    ,
       ,    
     .
        .  [U]  [X]   
      DIR.       
       POWER        
     .


    
                                - 24 -


     O 

         POWER   
         .  
     -   SORT,     -
       
       ()  
       (B)  ,      
       (C) 
       (D) ,     
          SORT   
       ,        
        ,  
     DIR.


       

               -
       ,    POWER 
         .  POWER
         / (*.*), -
         POWER (**). ,   
              -
       ;    ,  
      . 
          DIR ACTJA **
     ,      
     ,
          DIR **TXT, 
          DIR **.TXT, 
          DIR *.TXT
       O,  .       
        .    -
        DIR,   
     .


          SET

              
        SET,   -
           DIR,  
      POWER     .
       SET ( ).
             .



                           - 25 -


     DISK ..      

         0=
         A0=DISK
         DISK CAPACITY:   504K
         TRACKS:          160    4 SYSTEM
         SECTORS/TRACK:    26    2 LAST
         SECTORS/SYSTEM:  104   16 DIR
         DIR ENTRIES:      64    2K 
         SECTORS/GROUP:    16    2K FBH GROUPS
         KBYTES/EXTENT:    16K   
         A0=

       :     
      ,,  ,,
         .   -
              
             POWER -
     READ/WRITE (/).    -
           READGR/WRITEGR (/
       ).
              -
            S. -
        ,  ,
       SIZE.
       : 0=DISK

         :
        1:       (A0=),-
              , ,    
               ,   .
               (RETURN).
        2:  POWER    
              .      -
                 .
              :
            :.  
       504.   160  ( 0  159);  
          .   
       26 ,     2 .
          104  (4 ),
         16 .   -
        64 ,    - 2.  
         , ,  
       2.    F13H .   
       16.
               . 



                            - 26 -


       DS ..   /

          0=
          0=DS 4000
          ADDR:HEX DEC  BINARY  ASCII  ENTER
          4000: C3 195 11000011  -     C  <D>.H
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5
          4000: C3 195 11000011  -     C  <H>E5 E5

         :   / -  -
        ,  ,-
           .   
         , ASCII,   
             
       .      
          120 .  -
              . 
             ,
        .  POWER   
           ASCII,,
         .
          ,   ,  
       "   ",""  "".
         : 0=DS (   
            ).
          RETURN,     -
           .  (), -
            . 
            .H (
       ), .D (), .B ()   . (
       ASCII).
         .      
       ,   "
        /",   -  -
        .

           :
          1:  DS 4000     (0=),
                , ,    -
                ,     .
                 (RETURN).
          2:  POWER     
                   - HEX,  195,
                 11000011, ASCII - S. <>. 
                      
                   ,  
                    .



                               - 27 -


         .    ASCII  (  
        (-)) ,   , ..
         .  CTRL   -
       .
           5 5,      
        .      
       .  (RETURN).
          3:        ,
                  4000     4001,
                 ,  
                POWER, 4002.     
                     
                (RETURN).
          4:      4003, -
                 <H>   .,  
                POWER,      SCII.
                 (RETURN).
          5:       4003  -
                  >.  POWER  -
                  ASCII.    T E S T  -
                 SCII;   ,  -
                    .  -
                   , ..  .
                 ,   ,   -
                   ,   
                 .  5 5.
                      
                  .B,   -
                 .  (RETURN).
          6:  ,  POWER
                4009.     ,    
                 4003,   ,  -
                     5.  POWER -
                     4008 -
                .   POWER  -
                    4009.
                 (). , , -
                   "  /-
                "  .
          7:      4008. 
                ,      (-)
                 ,    
                .  , -
                    5    -
                ,   6.  ,
                     
                      -
                 POWER.  (RETURN).
          8:      4007. 
                (RETURN).
          9:      4006.  
                  ASCII   -  -
                ,   6.  POWER -
                     ,   
                   5.   01111111, 
                (),   .
         10:      4007.
                   (..) (RETURN)  (ESC),
                      -
                 POWER.



                              - 28 -


        ,
          DS

         . <>.    ,  
          SCII. ,  
       ASCII       (
         4003).  .     
        ASCII.
         .   , 
        -  POWER,   -
          ASCII. ()   -
         ASCII.    . 20  
       .D 32.
         .B <B> ,     
         (  1)   .  .B
           . (   
       4003).
         .      - 
           / .
         . <D> ,    -
        . .D      . 
       (       -
       ).
         .H <H>    ,  -
           ,-
        . (   4000), .H -
           .
         RETURN   ,  -
           (   4002,4008 
       4007  ). (RETURN)    -
          (   4000,4003
          4007  ).  RETURN 
           ,   
       .
       (  4003   ,  
          -   .  -
               
       (RETURN). , ( ),(CONTROL M)  
       (CONTROL J)  , (RETURN),   -
              , -
          .
         () (^)    
         , .  (-)   -
         .     -
             . (-
          4006  4009).
         ( ) (..)    " 
        /",  (RETURN)   
         POWER.
         :  () (  )  ( ) (..)
              -
       . (  "").
          (  )     ASCII. (  ) 
       ( )    
               
       ,      , 
         .     -
        ( )   ( -
       ) .
         .    (  ) 
        ( ).



                             - 29 -


          
         POWER

              ,-
       ,      ASCII, 
        DS    . (,
          80H).   -
             (RETURN).  
       (),   ,    -
        .     
        .

 

       DUMP / DUMPX /DUMPH / DUMPA ..
           

         :     -
         .     ,-
                 -
       ,    LOAD.  -
           ;    
        (CONTROL P),    DUMP,
             .
            ,  -
       ,      -
       .     , 
            "  /" .
           SAVE  POWER   -
          .  
       "   ".
         DUMP     ASCII, (,
       ,  ), -
         .      -
         .., DUMP   .
         DUMPX       
          ASCII .   -
        ,    40,64 
        80   . (  "-
       ").
               
        16       -
          ASCII  ASCII .
         DUMPH       
           .   -
         ,  16 -
        .
         DUMPA  ASCII     ,  
       ,..     ..
           .
         .      
          DUMP.    
              
       POWER, LOAD,READ,REALGR.
          DUMP,  ASCII (DUMP  DUMPA),
        ,     
       / ASCII    - 1 H (CONTROL Z),
               .



                               - 30 -


         :
       0=
       0=DUMP 0200 021F SIZE CHECK STAT USER XUSER TEST
       A0=DUMP , 5
       02A0: 4D4F5645 20 MOVE
       A0=DUMPX , ,
       02A5: 46494C 4C20434  20534541 FILL CM SEA
       02B0: 52434820 4A502045 5820474F 20555231 RCH JP EX GO UR1
       02C0: 20555232 20555233 20555234 20534F52  UR2 UR3 UR4 SOR
       02D0: 54205041 5353203F 20000000 00000000 T PASS ? .......
  
       A0=DUMP 100
       0100: C3 . 
       A0=DUMPX 100,
       0100: C310031A 02100B3D 2E5E3D1B 01FFFF20 .......=.CTRL=..
       0110: A9CB0000 00000000 FF0001E5 FF7F010A ................
       0120: 002A0100 54212E01 467E2F77 BE70C238 .*..T...F./W.P.8
       0130: 01237CBA C22801C9 1E3F0E02 C30500FF .*.......?......
       0140: C9FFFFFF FFFFFFFF C32404FF FFFFFFFF .........$......
       0150: C32904FF FFFFFFFF C3D304FF FFFFFFFF ................
       0160: 000F0200 04FF0000 41000181 00FFFF00.........A.......
A0=DUMPX 100,0F
       0100: C310031A 02100B30 2E5E3D1B 01FFFF .......=.CTRL=....

        1:  DUMP 0200 021F     
              (0=),, ,   
                  . 
              (RETURN).
        2:  POWER   ,-
                 0200    021F.
             32 ;  -
         ,   -
      .     .
      (RETURN)    . (-
     )    .   
     (  ),   .
        ,   0  9 
      ,0    . -
        ,  (
     RETURN 0).   DUMP  , 
     POWER    ,   
              
     ,  (ESCAPE).
           ,   
       (),   
     ,  (RETURN),    
       .
             
         0105.
              
     (CONTROL P).        -
         .



                              - 31 -


        DUMP

        ,    DUMP,
      DUMP      
      ,:
       DUMP (RETURN)     128 
      ,  ,   -
      DUMP.
       DUMPX, 5 (RETURN)      -
     ,    .
       DUMPX .. (RETURN)      -
     ,   .
       DUMPX 100 (RETURN)      
        .
        DUMP , .
       DUMP 100,F (RETURN)     0FH
     (16 ) ,   .
       DUMPX 100, (RETURN)    
     120  ,    ( 
      100).
       DUMPX 100.. (RETURN)    
      ,    (  
     100).



     R ..  

   0=RA  RA
   A0: 1=DBASE .COM  2=DDT   .COM  3=DOVR   .COM  4=DOVR1  .COM
   A0: 5=FORMAT.COM  6=FORTH .COM  7=FORTH  .FRT  8=FORTHAE.COM
   A0: 9=LOAD  .COM 10=PIP   .COM*11=POW    .COM 12=POWER  .COM
   A0:13=PRINT .COM 14=PZUV16.FRT 15=PZUV16N.FRT 16=RAVI   .COM
   A0:17=RESOUR.COM 18=SIMV  .COM 19=WM     .HLP 20=WMR    .COM
   A0:21=WMR   .COM 22=(ASM  .COM)                             
   SELECT? 22 10
   ERASE (Y/N) ?YES
   A:ASM    .COM
   0=RA    
   A0: 1=DBASE .COM  2=DDT   .COM  3=DOVR   .COM  4=DOVR1  .COM
   A0: 5=FORMAT.COM  6=FORTH .COM  7=FORTH  .FRT  8=FORTHA .COM
   A0: 9=LOAD  .COM 10=PIP   .COM*11=POW    .$$$ 12=PRINT  .COM
   A0:13=PZUV16.FRT 14=PZU16N.FRT 15=RAVI   .COM 16=RESOURS.COM
   A0:17=SIMV  .COM 18=WM    .HLP 19=WMR    .COM 20=WMR    .COM
   A0:21=(ASM  .COM)                             
   SELECT? 11 10
   ERASE (Y/N) ?YES

   A:POW    .$$$
   A:PIP    .COM - FILE IS $R/O

   A0=ERA [R]
   A0: 1=DBASE .COM  2=DDT   .COM  3=DOVR   .COM  4=DOVR1  .COM
   A0: 5=FORMAT.COM  6=FORTH .COM  7=FORTH  .FRT  8=FORTHAE.COM
   A0: 9=LOAD  .COM 10=PIP   .COM*11=PRINT  .COM 12=PZUV16 .FRT
   A0:13=PZU16N.FRT 14=RAVI  .COM 15=RESOURC.COM 16=SIMV   .COM
   A0:17=WM    .HLP 18=WMR   .COM 19=WMR    .COM 20=(ASM   .COM
   SELECT? 18   
   ERASE (Y/N) ?YES



                              - 32 -


   A:WMR    .COM (Y/N) ?NO

   0=RA  WMR.COM

   ERASE (Y/N) ?YES

   A:WMR    .COM (Y/N) ?YES

   A0=DIR
   A0: 1=DBASE .COM  2=DDT   .COM  3=DOVR   .COM  4=DOVR1  .COM
   A0: 5=FORMAT.COM  6=FORTH .COM  7=FORTH  .FRT  8=FORTHAE.COM
   A0: 9=LOAD  .COM 10=PIP   .COM*11=PRINT  .COM 12=PZUV16 .FRT
   A0:13=PZU16N.FRT 14=RAVI  .COM 15=RESOURC.COM 16=SIMV   .COM
   A0:17=WM    .HLP 18=WMR   .COM 19=(ASM   .COM)

       :    ,  -
           .
          POWER   -
            
     .   ,    ,
      POWER      , -
       ,   "ERASE Y/N" (
     /),       
     .        
      ,      -
          RECLAI, 
      .  ,   -
      [R]    /   
     .
       : 0=R

       :
      1:   ERA     (0=),-
              POWER,     
             .    ,
              POWER ,   -
               :.
             (RETURN).
      2:  POWER    
              :    
            (SELECT?),  .
      3:  11  10,,    
             .  (RETURN).
      4:  POWER    
                "ERASE Y/N". -
                Y ().   4 -
               POWER  
                    
                .
      5:   POWER    PIP.COM,
                READ ONLY ( 
            ),   .  -
             POWER    "-FILE IS
            $R/O"      (0=).



                              - 33 -


      /   

         POWER   ,
          ,   
     .    , ERA [R]  
       (0=).
         [R]    ,  -
     ,  / ,  
           , 
      .
         LOG.



      

            ,  
       ,     
         RECLAIM.   .
       :    RECLAIM 
        .       
       ERA   ,   
      .
             "".



     EXIT ..    POWER

       :    ,-
        POWER,   
           .
       ,   POWER   -
      ,   , -
       EXIT  (CONTROL C).      
        "?",    
      ,  .
       : (CONTROL C),    -
       /-,     
     POWER,     
     POWER (0=).
       : 0=XIT
       .  EXIT  /   -
           ,   
        POWER,  , /-86
      /-86;     ,    -
        POWER.
          /-86.
       (CONTROL D)   /  ,  DETACH.  
      (CONTROL D)  ,    
     POWER.



                             - 34 -


     FILL ..  

       :      -
           ,  -
        .    -
            -
          .  
         ,  -
       20 (..  ASCII ),
             .  
     DUMP   ,   , ,
           .
        FILL      -
     .      
     5,    READ/WRITE 
     POWER    ,    -
       .
       : FILL () () ( )

       :
      1:     (0=)   FILL 2000
            2500 20.     POWER 
               2000   2500 -
              20.  (RETURN).
            :   ,,  
              ,  
             .
      2:  ROWER     -
             20.



     GO ..  

       :      
     RUN.       -
     ,        
         .   
         ,   -
      ,    ,-
        / 100.   
     JP/X (/).
       : 0=GO ( ) ( )
       
         :
        1:     (0=)  GO DOS.4
              4000,, ,   
               DOS.4     4000  
              .  (RETURN).
        2:  POWER     -
                 .    
                  :,     :.
       :   GO   . 
         (, 
     )   , .
            
     POWER.       HL 
     (   ).



                             - 35 -


        :
     GO ( ) () () ()
     GO DOS.4       4000  B:START.  NEWFILE
              POWER
       RET (FAR RET   . -
          ).
             .



     GROUP ..  

     =GROUP
     A:  1=C       .CCC   2=CATCHUM .COM   3=CATCHUM .DAT
     A:  4=CBIOS   .HEX   5=CC      .COM   6=CC2     .COM
     A:  7=CLIB    .COM   8=COLOR   .COM   9=CPM80X25.SYS
     A: 10=CPMNEWRS.SYS  11=DDT     .COM  12=DEFF    .CRL
     A: 13=DEFF1   .CRL  14=DEFF2   .CRL  15=DEFF3   .CRL
     A: 16=DOM     .C    17=DOM     .COM  18=DOM     .CRL
     A: 19=EH      .C    20=EH      .COM  21=EH      .CRL
     A: 22=ELEK    .SYS  23=F1      .COM  24=F2      .COM
     A: 25=FART    .COM  26=FORMAT  .     27=G       .COM
     A: 28=GAMMA   .BAK  29=GAMMA   .C    30=GAMMA   .COM
     A: 31=GAMMA   .CRL  32=GZ      .SUB  33=GZ1     .SUB
     A: 34=GZG     .SUB  35=GZU     .H    36=GZUGALOP.C
     A: 37=GZUGALOP.COM  38=GZUGALOP.CRL  39=GZUMARSH.BAK
     A: 40=GZUTEST .BAK  41=GZUTEST .C    42=GZUTEST .COM
     A: 43=GZUTEST .CRL  44=GZUTEST1.BAK  45=GZUTEST1.C
     A: 46=GZUTEST1.COM  47=GZUTEST1.CRL  48=KING6   .COM*
     A: 49=KINGRUS .COM  50=L2      .COM  51=LAD1    .COM
     A: 52=DADDER  .COM  53=LADDER  .DAT  54=LINE    .BAK
     A: 55=LINE    .C    56=LINE    .COM  57=LINE    .CRL
     A: 58=LINK    .COM  59=MALINA  .ASM  60=MALINA  .COM
     A: 61=MALINA  .HEX  62=MLOAD   .COM  63=NOT     .C
     A: 64=NOT     .CRL  65=NOTY    .BAK  66=NOTY    .H
     A: 67=OTH1    .COM* 68=OTHRUS  .COM  69=PEREVOD .COM
     A: 70=PIP     .COM  71=POW     .TXT  72=POWBPO  .COM
     A: 73=POWER   .COM  74=PRINTER .COM  75=PRTAB   .COM
     A: 76=PUTBOOT .COM  77=PW      .COM  78=REFERAT .
     A: 79=REFERAT .BAK  80=RIS     .COM  81=SID     .COM
     A: 82=STAT    .COM  83=STDLIB3 .CRL  84=SUBMIT  .COM
     A: 85=TERMINAL.CGF* 86=VIZIT   .C    87=VIZIT   .COM
     A: 88=VIZIT   .CRL  89=WEER    .COM  90=WM      .HLP
     A: 91=WMR     .COM  92=WMR     .INS  93=WMR3    .COM
     
       :     ,-
       .    ,-
           .   ,
        -   ,
       GROUP, ,  
       .      GROUP,
               -
       .
       : 0=GROUP; 0=GROUP  WM,HLP; 0=GROUP B:POW.TEX;
      0=GROUP B:



                             - 36 -


       :
      1:     (0=)  GROUP S.
            ,   ,  -
              POW.TEX.      
             ,  GROUP   -
               POWER   
            (SELECT?).  (RETURN).
      2:  POWER     
            S.
       :      -  
     .  -    /  -
      .   
     READGR,         
     .
             .



     JP X ..   / 

       :     
         ,   
         .
       JP ()     .
       , POWER  
        /   0HEX.
       EX ()     -
     .   ,  -
      POWER.
       : 0=JP () ()
                  0=X () ()
             
     (,  )   ,-
      .      -
        POWER.    
       HL (   ).

         :
        1:     (0=)   JP 
              F000, X F000,, ,  -
                  F000.  (RETURN).  
              .       -
               .
        2:   (JP)  POWER  
                ,   -
              ,     / 
              (  ).
                (EX)     POWER,
                  .
       : ,   ,-
        S9 (RET),   
     POWER   100HEX. ( FAR RET  -
      ).     
     BDOS $0  JMP 0    .



                           - 37 -


     LOAD/SAVE ..    

       :       
              /
      (DS)      
     / ,   . -
             
        ,     .
           ,   
        -     -
     ,    .
       : 0=LOAD (  ) (-
                             ) []
                  0=SAVE (  ) (-
                             ) []
        :    LOAD -
            POWER LOG,
         , 
      ,    
     .        -
      LOG.
          ,  SIZE,
             -
        ,  .    
     ,      -
       .
          ,     
       ,..     -
      LOAD  ,    ,
        /.    
           GROUP 
     READGR.
         ,  
            SAVE.
          ,    
       .    POWER 
       .

         :
     =LOAD WMR.COM 4100 LAST ADDRESS:66FFH   76 SECTORS
     A=DS 7000
     ADDR:HEX DEC  BINARY   ASCII ENTER
     7000: 87 135 10000111 -CTRLG <H>LL
     7001: 41  65 01000001      A <H>
     A=SAVE WMR.COM 80
     A=ER

        1:     (0=)  LOAD WMR.COM
              4100,, ,   
               TEST.COM (   )  ,
                  , :,  -
                 4100.  (RETURN).
       ,   LOAD , 
     POWER       -
      , .     
      ,..    .



                             - 38 -


       .   LOAD  . ,-
           100, 
          +100,   .
             ,
       .
           /-86  /-86 -
      ,       280
     ,     , 
          100.
        SAVE ()    -
      LOAD.

        :
       1:        
             .  SAVE WMR.   
             POWER,      , -
                ,     -
             ,     . -
                   .
              POWER     -
              ,  , -
                   -
                  
               . 
       2: ,     -
             ,    . -
             ,  SAVE WMR. 4100 80,.. 
                    
                40 .   - 
                128-
             .
          ,  -
          .  ,-
          
     ,  POWER    -
      LOAD.
      :   ,    -
     LOAD/SAVE      
       POWER.    -
    ,    POWER  -
        .



    

             LOAD,
         -
      POWER,    ,
             SAVE.
     DUMP    . A -
      /    -
     .  FILL    -
        .  MOVE 
          ,
      SEARCH ()   
       .     
        .



                            - 39 -


    LOG ..    

    =LOG
    C       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
    3       COLUMNS
    P (ON)  PAGING
    R (OFF) REGUEST Y/N ON CURRENT FILE     (Q-REGUEST NEW NAME)
    Y (ON)  READ ATFER WRITE
    S (ON)  SHOW SYSTEM FILES
    T (OFF) STOP IF DISK IS FULL
    M (OFF) MARK COPIED FILES
    X       LIST DRIVES A-P IF ON LINE
    U       LIST USERS 0-15
    $ (OFF) SUBMIT $$$.SUB - A:POWER
    +/-     1-8 OR (R)EAD/WRITE,(S)YSTEM/DIR/E(X)TRA
    POWER   0100H - 3C89H
    TRA     3D00H - C3FFH  270 SECTORS
    A=LOG [D]
    D       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
    3       COLUMNS
    P (ON)  PAGING
    R (OFF) REGUEST Y/N ON CURRENT FILE     (Q-REGUEST NEW NAME)
    Y (ON)  READ ATFER WRITE
    S (ON)  SHOW SYSTEM FILES
    T (OFF) STOP IF DISK IS FULL
    M (OFF) MARK COPIED FILES
    X       LIST DRIVES A-P IF ON LINE
    U       LIST USERS 0-15
    $ (ON)  SUBMIT $$$.SUB - A:POWER
    +/-     1-8 OR (R)EAD/WRITE,(S)YSTEM/DIR/E(X)TRA
    POWER   0100H - 3C89H
    TPA     3D00H - C3FFH  270 SECTORS
    A=LOG [R]
    D       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
    3       COLUMNS
    P (ON)  PAGING
    R (OFF) REGUEST Y/N ON CURRENT FILE     (Q-REGUEST NEW NAME)
    V (ON)  READ ATFER WRITE
    S (ON)  SHOW SYSTEM FILES
    T (OFF) STOP IF DISK IS FULL
    M (OFF) MARK COPIED FILES
    X       LIST DRIVES A-P IF ON LINE
    U       LIST USERS 0-15
    $ (ON)  SUBMIT $$$.SUB - A:POWER
    +/-     1-8 OR (R)EAD/WRITE/(S)YSTEM/DIR/E(X)TRA
    POWER   0100H - 3C89H
    TPA     3D00H - C3FFH  270 SECTORS
    A=LOG [V]
    D       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
    3       COLUMNS
    P (ON)  PAGING
    R (ON)  REGUEST Y/N ON CURRENT FILE     (Q-REGUEST NEW NAME)
    V (OFF) READ ATFER WRITE
    S (ON)  SHOW SYSTEM FILES
    T (OFF) STOP IF DISK IS FULL
    M (OFF) MARK COPIED FILES
    X       LIST DRIVES A-P IF ON LINE
    U       LIST USERS 0-15
    $ (ON)  SUBMIT $$$.SUB - A:POWER
    +/-     1-8 OR (R)EAD/WRITE,(S)YSTEM/DIR,E(X)TRA   
    POWER   0100H - 3C89H
    TPA     3D00H - C3FFH  270 SECTORS



                             - 40 -


      :     -
     POWER,  ,,  
        ..   -
    ,  ,  ..,
          
     ,   100.  -
     "".
      .      -
             ,
         .  -
      ;   , 
        .
      : 0=LOG

            -
     POWER.   ,  
    (0=)    LOG,    ,
      (0=).  .

              :

             COPY  []
             ,
             ,     ,
              .   
                -
              .
              -
          ,        ,
             .   
            .   
            .
             
          "FILE ISTS, (B)U, ()VERWRITE, (S)IP:" (
          ,  ,,-
          ) KO     -
              .
       D       ,
                  
          .     
          .
       F    .   
          (N),     .  -
            (FF)  .
       G     COPY  Q   ,
            POWER     
            .    -
          ,     -
           ,        
           .
           [Q] ,  ,-
               .
       S    ,   -
              , "SYSTEM",
           .
                
              ,  
             .



                               - 41 -


              
                COPY.  
              ,   
           ,  COPY  -
              .  () ,
                 -
          ,  .
               ,
             (<)   , -
            (>). ,    -
              .  
           ,     , 
            ,   ,
              .
              ,
                  
              .
        .    [M]   
         ,   POWER
        ,  .   -
        ,    
       ,  POWER  
     "CAN'T LOG" ( ),    
      .
       X        
          DIR,    (-  1-9),
             .  
          ,    ,  ,-
           .      [U]
                -
              . 
            DIR   "".
       U        
          DIR      -
           ,   .
              [X]   
              -
           .   "".
       @  ,,   -
            POWER.   , 
               POWER
          (0=)     
          RUN,     /. [@]  -
                
          POWER.   "".
     +/-        -
             .   
                
               .   SET
            "".
         R/O,R/W,SYS  DIR    
      (+)  (-),    
     SET.
       POWER 0100 - ()  , -
      POWER  .      -
          POWER.
       TRA () - () () .   
       (TRA),   .  
      ,   ,  -
        .



                               - 42 -


        

               
      0=     LOG    -
         ,  
          []. , -
         (]),   
      .                                      
      .      -
      ,     .
       .    , -
      POWER       -
     .   SAVE.

         :
        1:  D   ,  -
                 . , 
                  COPY   
                    ,   
               ,  , 
                .
                    -
              ,      
                .
        2:  R   ,  -
               R. :  Y/N (/)  -
                . :  -
              .     
              /     . 
              R ,   .  
                  ERASE ()  REN (-
              ).
        3:  2   ,  
                   .
              : 3 . : 2 .
        4:  V   ,  
               V. :    -
                COPY  -
                    
              . :    OFF 
              ()    . 
                .



     V ..  

       :     
          .
       .  MOVE    
      .    -
        .      MOVE
      .
       : 0=V ( ) ( )
                  (  )[  -
                  ]



                               - 43 -


         :
        1:     (0=)  MOVE 100 
              3FFF 4100,, ,   -
                POWER   ,
                , 0  3FFF, ,
                 4100.
       .       -
     ,   POWER   
             
      .     .
       .   POWER    100 
     3FFF  ,  ,    -
       4100  7FFF.

           /-86
 
             
     /,     .
            -
        .
       0=MOVE ( .) ( ) ( 
               ) (  .) ( 
               )

         :
        1:     (0=)  V 700.100
              4000 800.6000,,   -
               ,   
              700   100    800  -
               6000.
              .     -
                (.),   -
                ( ).  (RETURN).
        2:  POWER  .
       :    /
         , DS, DUMP, EX, FILL,
     GO, JP, LOAD, MOVE, READ, READGR, SAVE, SEARCH, WRITE,
     WRITEGR.
        LOG      POWER
      (CONTROL )      .

             SS .. 
         



     READ/WRITE ..      
        

       :      
        POWER  
         / .
         /-   
             RD. 
           
       DS (  /). 
          ,  
           WRITE.  RD 
     WRIT      
      /  .



                             - 44 -


       :  READ/WRI   
      ,     -
     .      -
     ,   ,   
     ,  / ;  ,-
        ,   
       ,,,  ; -
      ,  ,   -
        . ,,    
      - ,  
          READ  WRITE, ,-
             , 
     .    , 
      . 
       :      -
       .  READ ONLY ($R/)  ,
      POWER    .   -
       WRITE     ,
       , (CONTROL ).
       : 0= READ () () 
                  A0= READ () ()[ ] 
                  A0= READ () ()[ ] 
                                     [N ]
        READ/WRITE   
      .      , 
       .

         :
        1:     (0=)   READ 2 18,
                 POWER    -
               2. ()  18 (). 
               (RETURN).
       .     , -
        POWER      
         80HEX.  
       . ,    -
        POWER    , , 
              -
          READ/WRITE,READGR/WRITEGR,
       LOAD,SAVE,GO.
        2:     (0=)  READ 2 18
              4000,  POWER   
               2 ()  18 () 
                 4000.
               (RETURN).
        3:     (0=)  READ 2 10 
              4000 8,  POWER  
                ,   10 (-
              )        4000 
              ().
        


            READ

              
     ,   (PS)     -
     ,  POWER   .



                              - 45 -


        READ/WRITE

             POWER (0=)
          :
       0=WRITE B:2 18 4000      
      4000  18      
     B:,     :.
       0=B: WRITE 2 18 4000 32   
      B:, ,   4000,
       32 128- ,  18   2
     . 
       0=B: WRITE :2 18 4000   
      B:,   18     :
       ,   4000.
       .     , 
         ,  
     /   80HEX.
           , 
           -
      POWER, READ/WRITE,READGR/WRITEGR,   -
      FILL,DUMP,DS (  /)  -
      MOVE. 



     READ ..        

     0=READ 34 1 XX 1
     G=0030:0C T=0034 S=001 PS=001 AT:0080-00FF

     0080: E4202242 223A0000 40000001 00007676  . "B":..@.....VV
     0090: C5CD0503 21F802CD EB023A0B 07C1C9C2  ..........:.....
     00A0: FD05C53A 0907FE00 3A0A07F5 CA3407C6  ...:....:....4..
     00B0: 50320A07 CD050321 F802CDEB 02F1320A  P2............2.
     00C0: 07C13A0B 07C34606 0603C5CD 2ADAC105  ..:...F.....*...
     00D0: C24A07C3 CC0676C5 0E0ACD0C DA3E2A32  .J....V......>*2
     00E0: F8023A09 07FE003A 0A07F5CA 7307C650  ..:....:....S..P
     00F0: 320A07CD 050321F8 02CDEB02 F1320A07  2............2..


     0=READ 34 1 X
     G=0030:0C T=0034 S=001 PS=001 AT:0080-00FF

     0080: E4202242 223A0000 40000001 00007676  . "B":..@.....VV
     0090: C5CD0503 21F802CD EB023A0B 07C1C9C2  ..........:.....
     00A0: FD05C53A 0907FE00 3A0A07F5 CA3407C6  ...:....:....4..
     00B0: 50320A07 CD050321 F802CDEB 02F1320A  P2............2.
     00C0: 07C13A0B 07C34606 0603C5CD 2ADAC105  ..:...F.....*...
     00D0: C24A07C3 CC0676C5 0E0ACD0C DA3E2A32  .J....V......>*2
     00E0: F8023A09 07FE003A 0A07F5CA 7307C650  ..:....:....S..P
     00F0: 320A07CD 050321F8 02CDEB02 F1320A07  2............2..



                            - 46 -


     A0=READ 0 1 XH 2
     G=----:-- T=0000 S=001 PS=001 AT:0080-00FF

     0080: C3 C5 7C C3  58 C7 7F 00  20 20 20 20  20 20 20 20
     0090: 20 20 20 20  20 20 20 20  43 4F 50 59  52 49 47 48
     00A0: 54 20 28 43  29 20 31 39  37 39 2C 20  44 49 47 49
     00B0: 54 41 4C 20  52 45 53 45  41 52 43 48  20 20 00 00
     00C0: 00 00 00 00  00 00 00 00  00 00 00 00  00 00 00 00
     00D0: 00 00 00 00  00 00 00 00  00 00 00 00  00 00 00 00
     00E0: 00 00 00 00  00 00 00 00  00 00 00 00  00 00 00 00
     00F0: 00 00 00 00  00 00 00 00  00 00 00 00  00 00 00 00


     G=----:-- T=0000 S=002 PS=002 AT:0080-00FF

     0080: 00 00 00 00  00 00 00 00  08 C4 00 00  5F 0E 02 C3
     0090: 05 00 C5 CD  8C C4 C1 C9  3E 0D CD 92  C4 3E 0A C3
     00A0: 92 C4 3E 20  C3 92 C4 C5  CD 98 C4 E1  7E B7 C8 23
     00B0: E5 CD 8C C4  E1 C3 AC C4  0E 0D C3 05  00 5F 0E 0E
     00C0: C3 05 00 CD  05 00 32 EE  CB 3C C9 0E  0F C3 C3 C4
     00D0: AF 32 ED CB  11 CD CB C3  CB C4 0E 10  C3 C3 C4 0E
     00E0: 11 C3 C3 C4  0E 12 C3 C3  C4 11 CD CB  C3 DF C4 0E
     00F0: 13 C3 05 00  CD 05 00 B7  C9 0E 14 C3  F4 C4 11 CD


     A=READ 0 1 XA 2 
     G=----:-- T=0000 S=001 PS=001 AT:0080-00FF

     0080: .   . . X . . .
     0090:                 C O P Y R I G H
     00A0: T   ( C )   1 9 7 9 ,   D I G I
     00B0: T A L   R E S E A R C H
     00C0: . . . . . . . . . . . . . . . .
     00D0: . . . . . . . . . . . . . . . .
     00E0: . . . . . . . . . . . . . . . .
     00F0: . . . . . . . . . . . . . . . .


     G=----:-- T=0000 S=002 PS=002 AT:0080-00FF

     0080: . . . . . . . . . . . . . . . .
     0090: . . . . . . . . > . . . . > . .
     00A0: . . > . . . . . . . . . . . . #
     00B0: . . . . . . . . . . . . . . . .
     00C0: . . . . . . 2 . . < . . . . . .
     00D0: . 2 . . . . . . . . . . . . . .
     00E0: . . . . . . . . . . . . . . . .
     00F0: . . . . . . . . . . . . . . . .

       :    READ  
           . 
         .   -
            -
      80HEX. ,     READ 
        .
       : 0=READ (# )()(#)
                  ()( )()(
                  ,  ) 



                               - 47 -


         :
        1:     (0=)  READ 34 1 
              1,    POWER 
                34    -
                  ASCII.  (RETURN).
              .    
              POWER   : -,  
                 ,-,  -
               .
        2:  POWER   ,,
                , -
                 ,  
              .     
              ASCII,   ,
               SCII    0F00. 
   


        

       0=READ 34 1  -  ,   , -
       READ       
     ASCII,,,  ,  -
       (),   ;   
        ,   
       . 
       0=READ 0 1  2 -  ,  ,  -
         .
       0=READ 0 1  2 -  ,  ,  -
         ASCII.



     READGR/WRITEGR ..     
       
 
       :       -
             -
           /. -
        ,   ,
         POWER.
       :  READGR  WRITEGR  -
       ,     -
     .      , 
       ,    ,
       / ;  ,
       ,    
      ,,,  ; -
      ,  ,   
       . ,,  -
      - ,   
          READGR  WRITEGR, ,
             , 
     . 



                            - 48 -


       :      -
       .  POWER    ,
        READ NLY ( )   
        . 
       .    READGR/WRITEGR -
       DISK  POWER, 
             
      / .   , 
          GROUP. 
          READGR  WRITEGR  -
     , ,      
      .
       : 0=READGR ( # )( )
                  ()
                  0=WRITEGR ( # )( )
                  ()
       :        -
      ,    . -
        : ( 
      ),     DISK,-
       (  ),   -
     . 
           ,   -
          /   80.  
          ;   -
            -
      READGR  WRITEGR,   . 


       :

  A0=READGR 1 4000 8
  G=0001:00 T=0004 S=017 PS=020 AT:4000-407F
  G=0001:01 T=0004 S=018 PS=006 AT:4080-40FF
  G=0001:02 T=0004 S=019 PS=012 AT:4100-417F
  G=0001:03 T=0004 S=020 PS=018 AT:4180-41FF
  G=0001:04 T=0004 S=021 PS=024 AT:4200-427F
  G=0001:05 T=0004 S=022 PS=004 AT:4280-42FF
  G=0001:06 T=0004 S=023 PS=010 AT:4300-437F
  G=0001:07 T=0004 S=024 PS=016 AT:4380-43FF
  A0=READGR 7 X
  G=0007:00 T=0008 S=009 PS=023 AT:0080-00FF
 
  0080: C369DAC3 E9DAC357 DCC35BDC C39CDCC3  .......Q.,[,....
  0090: ADDDC3C6 DDC3C7D  C342DCC3 07DCC3FD  .........B......
  00A0: DBC302DC C3CADDC  D0DDC33C DFC3A1DD  ...........<....
  00B0: C347DC62 DA25007  00FC0B75 E353DA14  .G.B.%.V...U.S..
  00C0: E4F5E362 DA00000  00000075 E353DA43  ...B.......U.S.C
  00D0: E424E41A 00040F0  FB003F00 C0001000  .$........?.....
  00E0: 04000107 0D13190  0B111703 090F1502  ................
  00F0: 080E1406 0C121804 0A10161A 0D0A0AE2  ................

  A0=READGR 0 X
  G=0000:00 T=0004 S=001 PS=001 AT:0080-00FF
  0080: 0041534D 20202020 20024F4D 00000044  .ASM.....COM...D
  0090: 02030405 06000000 00000000 00000000  ................
  00A0: 0042494F 53202020 20535953 0000001E  .BIOS....SYS....
  00B0: 07080000 00000000 00000000 00000000  ................
  00C0: 00442020 20202020 2041534D 00000002  .D.......ASM....
  00D0: 09000000 00000000 00000000 00000000  ................
  00E0: 00442020 20202020 2042414B 00000001  .D.......BAK....
  00F0: 0A000000 00000000 00000000 00000000  ................



                              - 49 -


       1 :     (0=)   
              READGR 1 4000 8,,   
                   ,  
                4000HEX.  (RETURN).
       2 :   ,  POWER 
                ,    -
               ,, 
                  ,
                  , 
                .
     .      
  ,    -  .



     WRITEGR .. WRITEGR    
                READGR.

        : 

      1 :     (A0=)  WRITEGR 1
             4000 8,,    
               4000   :,  1: 
              .  (RETURN).
       2:  POWER    .
       :      ,
         -  
  ,     .   
   -     WRITEGR,,-
  ,   (CONTROL C).  0 
   .

      .

    A0=READGR B:2 4000 -     
    B:   4000,   :.
     :    ,  -
      .
    0=B:READGR A0 4000 48 -   -
   B:,       -
  ,   4000.
       READ/WRITE,FILL,DUMP,DS  MOVE.



    READGR ..       

     :    READGR  
      .    
   ,      
       ,   POWER
      128- , 
   .
             80HEX
     LOAD. ,   
       ,    -
         .
     : 0=READGR 0 XX 2



                            - 50 -


       : 

     1 :     (0=)  READGR 7 X,
                POWER  
              7      
            ASCII.  (RETURN).
     2 :  POWER   .
                ,,
            ,    ,
                .    
                , 
              ASCII -    ASCII
               00F0.   -
             ,    
            ASCII.

       

    0=READGR 0 X    -    ,  -
                            .
    0=READGR 0  2 -     -
                        
    0=READGR 0  2 -     ASCII.



    RECLAIM ..   

     :     
   ,    , 
    .    
           
  / -   .   -
  ,        
  ,   .
     : 0=RECLAIM

       : 

     1 :     (0=)   RECLAIM,
            ,    
                 
            (0:).
     2 :        RECLAIM
                 . -
            ,      
             .     
            ,  ,    -
             .
     3 :     ,
            POWER  / , , 
               .    MOVCPM
              .  POWER  ,
              SANDVL     
             .    STAT  -
             .
        RECLAIM,  
        ,  
   ERA.  ,     -
  ,     .    
     ,   "  
  ".



                              - 51 -


    .     ,   -
  ,  0=RECLAIM [ .]. -
   POWER    ,  
        .
    .   RECLAIM   
     ,     
  , (ESCAPE)      
  0=.
    .     POWER
      READ ONLY ( -
  ).   ,  RECLAIM,
          COPY,
      .  , -
  ,       , 
   .     READ ONLY -
    SETRO/SETWR.
    .     @@@.SUB.
          . 
    ,     Y ()  
      ,    
  RECLAIM   ,  @@@.SUB -
   READ/WRITE (  SETRO/SETWR),  -
   .



        

     POWER       
  ,  ,      -
        -
  .       , 
   REN ()    
        REN.  
    RECLAIM,    .
    .    . 
    (ESCAPE)     REN  
   0=,..     - 
  .
     :     . 
  (CONTROL C)    ,   -
    .



    REN ..   

     :     -
   ,      -
  ,    .  ,
       ,  
   .  REN  .   
           -
             
   .



                           - 52 -


     : 0=REN.

    0:   1=DBASE   .COM    2=DDT     .COM    3=D0VR    .COM
    0:   4=DOVR1   .COM    5=FORMAT  .COM    6=FORTH   .COM
    0:   7=FORTH   .FRT    8=FORTHAE .COM    9=LOAD    .COM
    0:  10=PIP     .OM*  11=POWER   .COM   12=PRINT   .COM
    0:  13=PZUV16  .FRT   14=PZUV16N .FRT   15=RAVI    .COM
    0:  16=REDAKT  .COM   17=RESOURCE.COM   18=SIMV    .COM
    0:  19=STAT    .COM   20=WM      .HLP   21=WMR     .COM
    0:  22=(ASM    .COM)
    select? 18
 
    :SIMV    .COM = new name : SIM     .COM
    :SIMV    .COM = SIM     .COM


       : 

     1 :     (0=)   REN,
             ,    
                 (0:).
             (RETURN).
     2 :  POWER   
               (A0:),      
             (select?).
     3 :   18   (RETURN),,
                SIMV.COM.  
               POWER    -
            ,   (new name:) - ( ).
              SIM.COM   (RETURN).
     4 :  POWER    , 
              .  SIMV.COM  
             SIM.COM     -
              .



         

    MOVCPM  .COM = new name : *.BAK
    MOVCPM  .COM = MOVCPM  .BAK

       (*)   (new name :)
  ,   ,  POWER -
    .    *.BAK  
  MOVCPM.COM  MOVCPM.BAK



                            - 53 -


      

    0=REN
    0:   1=ASM     .COM   2=BIOS    .SYS   3=DBASE   .COM
    0:   4=DBASEOVR.COM   5=DDT     .COM   6=DI      .ASM
    0:   7=DI      .BAK   8=DI      .COM   9=DI      .HEX
    0:  10=DI      .PRN  11=DOVR1   .COM  12=FORMAT  .COM
    0:  13=FORTH   .COM  14=FORTH   .FRT  15=FORTHAE .COM
    0:  16=LOAD    .COM  17=PIP     .COM  18=POW0    .TEX
    0:  19=POW1    .TEX  20=POW2    .TEX  21=POW3    .TEX
    0:  22=POW4    .TEX  23=POW5    .TEX  24=POW6    .TEX
    0:  25=POWER   .COM  26=PRINT   .COM  27=PZUV16  .FRT
    0:  28=PZUV16N .FRT  29=RAVI    .COM  30=RESOURCE.COM
    0:  31=SIMV    .COM  32=STAT    .COM  33=WM      .HLP
    0:  34=WMR     .COM
    select? 6-10

    :DI      .ASM = new name ::DIMA.*
    :DI      .ASM = DIMA.ASM
    :DI      .BAK = DIMA.BAK
    :DI      .COM = DIMA.COM
    :DI      .HEX = DIMA.HEX
    :DI      .PRN = DIMA.PRN

         (select?)  
     ,   (:)
   ,    (new name :), -
       .
    - ,    (:)  DIM.* ,
        -
            DIMA.
           ,
     (:)   (new name :), -
   POWER     .  ,
      ,     ,
    (RETURN),     
  .
    .  [Q]   -
       COPY.  [Q]  -
          .
          "".
         !  (CONTROL C) 
   .     , POWER 
    .    -
   (CONTROL C)   .


    RESET ..   

     :       
  ,    (CONTROL C).  
    - ,    
    ,     
   .      -
  ,  RESET  , -
    /     ,  -
   ,  , (CONTROL C)  
  .



                             - 54 -


        , 
       .  -
   "   ".
    .       / 2.2
      .
     : RESET

       : 

     1 :     :    
                  :. ,
                   :   
             ,    
            /   .   RESET B:  -
             (RETURN).
     2 :    POWER, -
            ,    : .
     
          , -
   :.    RESET   -
    (CONTROL C).



     RETOOL ..    

       
     


    RUN ..    

     :     ,..
          .COM ,  ,   -
  .       -
     POWER,   -
       RUN,  
   .      , 
        , -
     .    
      .
      : 0=RUN     
                 0=RUN WS  
                 0=RUN WS LETTER
      :    RUN  , 
  POWER     
    RUN,      ,-
      POWER,  ,-
      RUN.    
  RUN      (        .COM
  ).  POWER    ,   
     (   RUN).
           "".

A0:  7=FORMAT  .COM   8=FORTH  .COM   9=FORTHAE .COM
A0: 10=LOAD    .COM  11=PIP    .COM  12=POWER   .COM
A0: 13=PRINT   .COM  14=RAVI   .COM  15=RESOURCE.COM
A0: 16=SIMV    .COM  17=STAT   .COM  18=WMR     .COM
SELECT? 17

A:STAT   .COM



                            - 55 -


      :

     1:     (0=)   RUN,
            ,    . 
             :    RUN. 
           (RETURN).
     2:  POWER   -
            .     :,
             (0),  
            SELECT?.
     3:   17,,   
            STAT. ,   
           (RETURN), POWER   ST 
              .


           

         RUN   ,
   ,       
   ,      
  .,   0=RUN WS LER,
        WORD STAR, 
  ("LETTER").
        : 0=RUN :WS LETTER
                               0=RUN WS :LETTER
           WORD STAR*,   
  "LETTER"      :.  
    WORD STAR    , :, 
   "LETTER"      :.


            POWER

       POWER   
   (SUBMIT). ,  LOG,
   ,  SUBMIT    -
   [@].    (N),  POWER
         
    /  ,   
  RUN    . POWER -
        SUBMIT  /
    ,     RUN 
   ,    .
     ,  / 
     SUBMIT  POWER  -
   .
         POWER    
  SUMIT  ,   ,   
    ,  ,        
   [@].,  POWER   -
    SUIT,      ""
        :.
      :  ,   ,
       POWER.E  
  ,       SCII,
         ;  -
     "".  -
    LOG   [@](ON),(SUBMIT :@@@.SUB-POWER).
 

   
                           - 56 -


        SEARCH...  

      :      -
   ( ) ASCII   - 
   (  )   . 
       ,    -
  ,  "?".  
     128 .  "" ,
         255
  .
       POWER    ,
   ,  .  , 
     .   , 
  ,    "?",   
  POWER     .  
    ,   
  ,   .   -
       , -
  .
      : 0=SEARCH ( ) ( )
                    () ()
           SEARCH  -
   .   ASCII, 
        .
         
    ASCII.     SCII,
    ,    
  ,  .   
    (??).
           
       :
      1:     (0=)   SEARCH
            4000 6000 "???S" 3? ?. POWER  
                 4000 
            6000    LOAD,   
            ,  . E  
              : ()  S   -
                ( 
            ,  ASCII),   
               ;  () 
            3,     -
             . (RETURN).

      :     SCII,   
       (")  
    (?),   . 
     ,    
  ,    .
       2:  POWER    
                .
      :      - 
   ,  POWER   -
    .
           4434,4568,5000
   6000.  POWER  ,  
    (0=).      ,
      ,   
       (0=).



                           - 57 -


            

          (1) 0=SEARCH 100 4000 3 00 8
        100  4000  
      800,   ; "3 00 8"
      :    
       ,   
  ,.,      ( 
     ).
          (2) 0=SEARCH 100 4000 3 ? 8
        100  4000 
         800.?  
         .
          (3) 0=SEARCH 2000 4000 ? ? ? ? 00 8 ? ? ? 
        2000  4000 
       800 (3,D,NZ,Z  ..).
      800     800,
     ?.
          (4) 0=SEAR 5000 6000 "TEST???"
        5000  6000 
     "TEST"      -
   ,  ASCII.  (") -
        
  SCII.
      : SCII    , -
   ,    . 
  ,  ,     
  .
           (5) 0=SEARCH 5000 6000 "??S" DO F ? ? "NEW"
      SCII   
  . (")   SCII, 
    (??),    (TEST).
       ,..
    DO FO     ( -
  ,    ). -
   (")       SCII 
     "NEW".


   SET...    
   /


=S [-5]
A:  1=CPMDIM  .SYS    2=CPMRDR  .SYS    3=CPMSPEED.SYS  
A:  4=DDT     .COM    5=DOKUMENT.BAK    6=DOKUMENT.COM
A:  7=DOKUMENT.ERL    8=DOKUMENT.P1     9=DOKUMENT.PAS
A: 10=DOKUMENT.PRN   11=FORMPR  .BAK   12=FORMPR  .COM
A: 13=FORMPR  .ERL   14=FORMPR  .PAS   15=KVURE   .BAK 
A: 16=KVURE   .C     17=KVURE   .COM   18=KVURE   .ERL
A: 19=KVURE   .PAS   20=KVURE   .PRN   21=NEW     .BAK
A: 22=NEW     .COM   23=NEW     .ERL   24=NEW     .PAS
A: 25=NEW     .PRN   26=P       .TXT   27=PASLIB  .ERL
A: 28=PIP     .COM   29=POWER   .COM   30=PRINT   .BAK
A: 31=PRINT   .COM   32=PRINT   .ERL   33=PRINT   .PAS
A: 34=PRINTER .COM   35=PUTBOOT .COM   36=RAMKA   .BAK
A: 37=RAMKA   .COM   38=RAMKA   .ERL   39=RAMKA   .PAS
A: 40=WM      .HLP   41=WMR3    .COM
SELECT? 1 36      

A:CPMDIM   .SYS
A:RAMKA    .BAK



                        - 58 -


A:DIR
A:  1=CPMDM  .SYS    2=CPMRDR  .SYS    3=CPMSPEED.SYS  
A:  4=DDT     .COM    5=DOKUMENT.BAK    6=DOKUMENT.COM
A:  7=DOKUMENT.ERL    8=DOKUMENT.P1     9=DOKUMENT.PAS
A: 10=DOKUMENT.PRN   11=FORMPR  .BAK   12=FORMPR  .COM
A: 13=FORMPR  .ERL   14=FORMPR  .PAS   15=KVURE   .BAK 
A: 16=KVURE   .C     17=KVURE   .COM   18=KVURE   .ERL
A: 19=KVURE   .PAS   20=KVURE   .PRN   21=NEW     .BAK
A: 22=NEW     .COM   23=NEW     .ERL   24=NEW     .PAS
A: 25=NEW     .PRN   26=P       .TXT   27=PASLIB  .ERL
A: 28=PIP     .COM   29=POWER   .COM   30=PRINT   .BAK
A: 31=PRINT   .COM   32=PRINT   .ERL   33=PRINT   .PAS
A: 34=PRINTER .COM   35=PUTBOOT .COM   36=RAMKA   .BAK
A: 37=RAMKA   .COM   38=RAMKA   .ERL   39=RAMKA   .PAS
A: 40=WM      .HLP   41=WMR3    .COM
A=DIR [-5]
A:  1=CPMRDR  .SYS    2=CPMSPEED.SYS    3=DDT     .COM
A:  4=DOKUMENT.BAK    5=DOKUMENT.COM    6=DOKUMENT.ERL
A:  7=DOKUMENT.P1     8=DOKUMENT.PAS    9=DOKUMENT.PRN
A: 10=FORMPR  .BAK   11=FORMPR  .COM   12=FORMPR  .ERL
A: 13=FORMPR  .PAS   14=KVURE   .BAK   15=KVURE   .C
A: 16=KVURE   .COM   17=KVURE   .ERL   18=KVURE   .PAS
A: 19=KVURE   .PRN   20=NEW     .BAK   21=NEW     .COM
A: 22=NEW     .ERL   23=NEW     .PAS   24=NEW     .PRN
A: 25=P       .TXT   26=PASLIB  .ERL   27=PIP     .COM
A: 28=POWER   .COM   29=PRINT   .BAK   30=PRINT   .COM
A: 31=PRINT   .ERL   32=PRINT   .PAS   33=PRINTER .COM
A: 34=PUTBOOT .COM   35=RAMKA   .COM   36=RAMKA   .ERL
A: 37=RAMKA   .PAS   38=WM      .HLP   39=WMR3    .COM
A=DIR [+5]
A:  1=CPMDM  .SYS    2=RAMKA   .BAK
A=SET
A:  1=CPMDIM  .SYS    2=CPMRDR  .SYS    3=CPMSPEED.SYS  
A:  4=DDT     .COM    5=DOKUMENT.BAK    6=DOKUMENT.COM
A:  7=DOKUMENT.ERL    8=DOKUMENT.P1     9=DOKUMENT.PAS
A: 10=DOKUMENT.PRN   11=FORMPR  .BAK   12=FORMPR  .COM
A: 13=FORMPR  .ERL   14=FORMPR  .PAS   15=KVURE   .BAK 
A: 16=KVURE   .C     17=KVURE   .COM   18=KVURE   .ERL
A: 19=KVURE   .PAS   20=KVURE   .PRN   21=NEW     .BAK
A: 22=NEW     .COM   23=NEW     .ERL   24=NEW     .PAS
A: 25=NEW     .PRN   26=P       .TXT   27=PASLIB  .ERL
A: 28=PIP     .COM   29=POWER   .COM   30=PRINT   .BAK
A: 31=PRINT   .COM   32=PRINT   .ERL   33=PRINT   .PAS
A: 34=PRINTER .COM   35=PUTBOOT .COM   36=RAMKA   .BAK
A: 37=RAMKA   .COM   38=RAMKA   .ERL   39=RAMKA   .PAS
A: 40=WM      .HLP   41=WMR3    .COM

A:  1=CPMDIM  .SYS    2=CPMRDR  .SYS    3=CPMSPEED.SYS  
A:  4=DDT     .COM    5=DOKUMENT.BAK    6=DOKUMENT.COM
A:  7=DOKUMENT.ERL    8=DOKUMENT.P1     9=DOKUMENT.PAS
A: 10=DOKUMENT.PRN   11=FORMPR  .BAK   12=FORMPR  .COM
A: 13=FORMPR  .ERL   14=FORMPR  .PAS   15=KVURE   .BAK 
A: 16=KVURE   .C     17=KVURE   .COM   18=KVURE   .ERL
A: 19=KVURE   .PAS   20=KVURE   .PRN   21=NEW     .BAK
A: 22=NFW     .COM   23=NEW     .ERL   24=NEW     .PAS
A: 25=NEW     .PRN   26=P       .TXT   27=PASLIB  .ERL
A: 28=PIP     .COM   29=POWER   .COM   30=PRINT   .BAK
A: 31=PRINT   .COM   32=PRINT   .ERL   33=PRINT   .PAS
A: 34=PRINTER .COM   35=PUTBOOT .COM   36=RAMKA   .BAK
A: 37=RAMKA   .COM   38=RAMKA   .ERL   39=RAMKA   .PAS
A: 40=WM      .HLP   41=WMR3    .COM
  


                           - 59 -


A:CPMDM  .SYS ----I---"---
A:CPMRDR  .SYS --------"---
A:CPMSPEED.SYS --------"---
A:DDT     .COM --------"---
A:DOKUMENT.BAK --------"---
A:DOKUMENT.COM --------"---
A:DOKUMENT.ERL --------"---
A:DOKUMENT.P1  --------"---
A:DOKUMENT.PAS --------"---
A:DOKUMENT.PRN --------"---
A:FORMPR  .BAK --------"---
A:FORMPR  .COM --------"---
A:FORMPR  .ERL --------"---
A:FORMPR  .PAS --------"---
A:KVURE   .BAK --------"---
A:KVURE   .C   --------"---
A:KVURE   .COM --------"---
A:KVURE   .ERL --------"---
A:KVURE   .PAS --------"---
A:KVURE   .PRN --------"---
A:NEW     .BAK --------"---
A:NEW     .COM --------"---
A:NEW     .ERL --------"---
A:NEW     .PAS --------"---
A:NEW     .PRN --------"---
A:P       .TXT --------"---
A:PASLIB  .ERL --------"---
A:PIP     .COM --------"---
A:POWER   .COM --------"---
A:PRINT   .BAK --------"---
A:PRINT   .COM --------"---
A:PRINT   .ERL --------"---
A:PRINT   .PAS --------"---
A:PRINTER .COM --------"---
A:PUTBOOT .COM --------"---
A:RAMKA   .BAK --------"---
A:RAMKA   .COM --------"---
A:RAMKA   .ERL --------"---
A:RAMKA   .PAS --------"---
A:WM      .HLP --------"---
A:WMR3    .COM --------"---
  
A=SET [+5]
A: 1=CPMDM  .SYS   2=RAMKA  .BAK
SELECT? 1 2 

A:CPMDM  .SYS
A:RAMKA   .BAK

      :     
          
      .  ,  -
          
    ,      
          -
     POWER.
      : 0=SET [-.]
             -1
   -8  -S,-R,-X    [ ].
        1  8     - 
        .



                         - 60 -


       .   [-S] - 
    ,[-R] - . [-X] -  -
  .
            
   SETDIR/SETSYS  READ/WRITE.
      :      ,
          .

        :
       1:     (0=) SET [-5],
             ,     
                  ,
             (RETURN).
       2:  POWER   ,
               (SELECT?).  1 36,
             ,     
              CPMDIM.SYS  RAMKA.BAK  (RETURN)
       3:  POWER     -
                 ,  -   
                (0=).   
             .

           

        SET    
      POWER  :
      :       
   [-],  POWER    
   ,       
   SET.      
         
   SET    POWER   
   .


         

      E        -
  ,   SET  ,  -
    .
 
        :
       1:     (0=)   SET 
              (RETURN).
       2:  POWER   
                 (SELECT?)   1 36
             (RETURN).
      :     ,
  0=SET***,  1 -   (SELECT?).
       3:  POWER     -
              CPMDIM.SYS  RAMKA.BAK.  
               ,    
             .



                               - 61 -


         

       SET [+5]     0=.-
     POWER    ,
   [-5]  SET,     
   .   ,  -
        ,  POWER
     .
      :  SET     /
  2.    .
            "",
      :       -
     READ/ONTY:.  
  (CONTROL C)    .


               /

       .   5-8  
   SET,      
   /


           SETDIR/SETSYS...  

      :  SETSYS   
  ,      , 
  [S]    FF (),   
     ;     -
      POWER,  /
   -  . SETSYS 
   , SETDIR  .
          ,  
    ,      -
   .     -
   ,   ,    -
           -
  .
      :      , 
     [S].( LOG).  
         , --
    ,  SORT   
       .
      : 0=SETDIR  0=SETSYS



                          - 62 -


A=SETSYS
A:   1=CPMDIM  .SYS    2=CPMRDR  .SYS   3=CPMSPEED.SYS
A:   4=DDT     .COM    5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL    8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN   11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL   14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C     17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS   20=KVURE   .PRN  21=NEW     .BAK
A:  22=NEW     .COM   23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN   26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM   29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM   32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM   35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM   38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP   41=WMR3    .COM
SELECT? 1 2         
  
A:CPMDIM  .SYS
A:CPMRDR  .SYS

A=DIR
A:   1=CPMSPEED.SYS   2=DDT     .COM   3=DOKUMENT.BAK
A:   4=DOKUMENT.COM   5=DOKUMENT.ERL   6=DOKUMENT.P1
A:   7=DOKUMENT.PAS   8=DOKUMENT.PRN   9=FORMPR  .BAK
A:  10=FORMPR  .COM  11=FORMPR  .ERL  12=FORMPR  .PAS
A:  13=KVURE   .BAK  14=KVURE   .C    15=KVURE   .COM
A:  16=KVURE   .ERL  17=KVURE   .PAS  18=KVURE   .PRN
A:  19=NEW     .BAK  20=NEW     .COM  21=NEW     .ERL
A:  22=NEW     .PAS  23=NEW     .PRN  24=P       .TXT
A:  25=PASLIB  .ERL  26=PIP     .COM  27=POWER   .COM
A:  28=PRINT   .BAK  29=PRINT   .COM  30=PRINT   .ERL
A:  31=PRINT   .PAS  32=PRINTER .COM  33=PUTBOOT .COM
A:  34=RAMKA   .BAK  35=RAMKA   .COM  36=RAMKA   .ERL
A:  37=RAMKA   .PAS  38=WM      .HLP  39=WMR3    .COM
A:  40=(CPMDIM .SYS) 41=(CPMRDR .SYS)
A=LOG
C       IF FILE EXIST A_OVERLAY,B-BACK UP,C-ASK,D-SKIP
3       COLUMNS
P (ON)  PAGING
R (OFF) REGUEST Y/N ON CURRENT FILE    (Q-REGUEST NEW NAME)
V (ON)  READ ATFER WRITE
S (ON)  SHOW SYSTEM FILES
T (OFF) STOP IF DISK IS FULL
M (OFF) MARK COPIED FILES
X       LIST DRIVES A-P IF ON LINE
U       LIST USERS 0-15
$ (OFF) SUBMIT $$$.SUB - A:POWER
+/-     1-8 DR (R)EAD/WRITE,(S)YSTEM/DIR,E(X)TRA
POWER   0100H - 3C89H
TPA     3D00H - C3FFH 270 SECTORS



                        - 63 -


A=LOG [S]
C       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
3       COLUMNS
P (ON)  PAGING
R (OFF) REGUEST Y/N ON CURRENT FILE    (Q-REGUEST NEW NAME)
V (ON)  READ ATFER WRITE
S (OFF) SHOW SYSTEM FILES
T (OFF) STOP IF DISK IS FULL
M (OFF) MARK COPIED FILES
X       LIST DRIVES A-P IF ON LINE
U       LIST USERS 0-15
$ (OFF) SUBMIT $$$.SUB - A:POWER
+/-     1-8 OR (R)EAD/WRITE,(S)YSTEM/DIR,E(X)TRA
POWER   0100H - 3C89H
TPA     3D00H - C3FFH 270 SECTORS
A=DIR
    
A:   1=CPMSPEED.SYS   2=DDT     .COM   3=DOKUMENT.BAK
A:   4=DOKUMENT.COM   5=DOKUMENT.ERL   6=DOKUMENT.P1
A:   7=DOKUMENT.PAS   8=DOKUMENT.PRN   9=FORMPR  .BAK
A:  10=FORMPR  .COM  11=FORMPR  .ERL  12=FORMPR  .PAS
A:  13=KVURE   .BAK  14=KVURE   .C    15=KVURE   .COM
A:  16=KVURE   .ERL  17=KVURE   .PAS  18=KVURE   .PRN
A:  19=NEW     .BAK  20=NEW     .COM  21=NEW     .ERL
A:  22=NEW     .PAS  23=NEW     .PRN  24=P       .TXT
A:  25=PASLIB  .ERL  26=PIP     .COM  27=POWER   .COM
A:  28=PRINT   .BAK  29=PRINT   .COM  30=PRINT   .ERL
A:  31=PRINT   .PAS  32=PRINTER .COM  33=PUTBOOT .COM
A:  34=RAMKA   .BAK  35=RAMKA   .COM  36=RAMKA   .ERL
A:  37=RAMKA   .PAS  38=WM      .HLP  39=WMR3    .COM
  

        :
       1:     (0=)  SETSYS,
               ,   
                 : , 
               . (RETURN).
       2:  POWER   
             .,   , -
              [S] ,..   ON,
                  -  
                  , 
                 A  -
              .
       3:     (SELECT?)  1  2.
              (RETURN).
       4:  POWER   
             CPMDIM.SYS  RDR.SYS . -
               DIR,   [S] -
                ON (),  
             CPMDIM  CPMRDR   .E -    
              [S] ,  CPMDIM.SYS 
             CPMRDR.SYS  . 
             SORT, ,   -
              ,     . 



                           - 64 -


      SETSYS
=LOG [S]
C       IF FILE EXIST A-OVERLAY,B-BACK UP,C-ASK,D-SKIP
3       COLUMNS
P (ON)  PAGING
R (OFF) REGUEST Y/N ON CURRENT FILE   (Q-REGUEST NEW NAME)
V (ON)  READ ATFER WRITE
S (ON)  SHOW SYSTEM FILES
T (OFF) STOP IF DISK IS FULL
M (OFF) MARK COPIED FILES
X       LIST DRIVES A-P IF ON LINE
U       LIST USERS 0-15
$ (OFF) SUBMIT $$$.SUB - A:POWER
+/-     1-8 OR (R)EAD/WRITE,(S)YSTEM/DIR,E(X)TRA
POWER   0100H - 3C89H
TPA     3D00H - C3FFH 270 SECTORS
A=SETDIR
A: 1=(CPMDIM  .SYS)    2=(CPMRDR  .SYS)
SELECT? 1-2

A:CPMDIM  .SYS
A:CPMRDR  .SYS


          SETSYS,   -
      SETDIR.
      : SET     
  / 2.    .
            "".
      :        
   READ/NTY :   (CONTROL C) 
    .


       SETRO/SETWR.../  
      
      :  SET READ ONTY (SETRO) 
    ,     , -
   SET WRITE (SETWR)     .
     T   -,-
        .
      : 0=SETRO  0=SETWR


=SETRO
A:   1=CPMDIM  .SYS   2=CPMRDR  .SYS   3=CPMSPEED.SYS
A:   4=DDT     .COM   5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL   8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN  11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL  14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C    17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS  20=KVURE   .PRN  21=NEW     .BAK
A:  22=NEW     .COM  23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN  26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM  29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM  32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM  35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM  38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP  41=WMR3    .COM
SELECT? 1-3
  


                        - 65 -


A:CPMDIM  .SYS
A:CPMRDR  .SYS
A:CPMSPEED.SYS
  
A=DIR
A:   1=CPMDIM  .CYS*  2=CPMRDR  .CYS*  3=CPMSPEED.CYS*
A:   4=DDT     .COM   5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL   8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN  11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL  14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C    17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS  20=KVURE   .PRN  21=NEW     .BAK
A:  22=NEW     .COM  23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN  26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM  29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM  32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM  35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM  38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP  41=WMR3    .COM
A=SETWR
A:   1=CPMRDR  .CYS*  2=CPMRDR  .CYS*  3=CPMSPEED.CYS*
SELECT? 1-3

A:CPMDIM  .CYS
A:CPMRDR  .CYS
A:CPMSPEED.CYS

        :
       1:     (0=)   SETRO,
               ,    
               : READ ONTY.
             (RETURN).
       2:  POWER   
      :        
  ,   .  
  SETWR,    , 
  READ ONTY.
       3:     (SELECT?)   1-3
                (RETURN). POWER - 
               CPMDIM.SYS,CPMRDR.SYS,CPMSPEED.SYS
              READ ONTY.


        SETWR

       SETWR    
  SETRO.      ,
     SETRO,    
     .
       :       
   READ ONTY,  (CONTROL C)  
    .
       :     @@@.SUB READ
  ONTY.       --
   .   ,   
   @@@.SUB    READ ONTY,  -
   0=@@@.SUB,    @@@.SUB.
      :  SET     2.
     .
            "".



                            - 66 -


  SIZE...  

A=SIZE
A:   1=CPMDIM  .SYS   2=CPMRDR  .SYS   3=CPMSPEED.SYS
A:   4=DDT     .COM   5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL   8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN  11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL  14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C    17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS  20=KVURE   .PRN  21=NEW     .BAK
A:  22=NEW     .COM  23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN  26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM  29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM  32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM  35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM  38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP  41=WMR3    .COS
SELECT? 1-3
  
A:CPMDIM  .SYS - 77 SECTORS   3  EMPTY  10K   10K
A:CPMRDR  .SYS - 80 SECTORS   0  EMPTY  10K   20K
A:CPMSPEED.SYS - 79 SECTORS   1  EMPTY  10K   30K
  
      :     
       . 
     ,  / -
    ,  ,   -
   ,   , ,-
       , A -
    .
        SIZE     STAT,
          -
   COPY,    ,  ,
   ,  . SIZ  
   ,   ,  
   ,   ?  SIZE
         
    SAVE.
      
        :
       1:     (0=)  SIZE,
              ,    
             SIZE    :,  
                :, (RETURN).
       2:  POWER    -
                :.   
             (SELECT?)   1-3,,  
              SIZE   PMDIM.SYS
             CPMRDR.SYS,CPMSPEED.SYS. (RETURN).
       3:  POWER   SIZE,
             , ,  CPMDIM.SYS  ,
              77 , 3    - 
             .  10  10 -   -   
               ,  SIZE  
             .
       10    , 
   SIZE.    , ,
        .  
       30
      O      "".



                           - 67 -


      SIZE  STAT 
      OPY

               
     COPY,  , ,
          106 
  ,  STAT    --
  .
      :      , 
      ,   ,
      DISK   , -
  ,      .
        ,   
   ,   , 
   .
      :     , 
      ,   -
  ,      .
      LOG. [T]   (N)
  ()  ,  .
      :   ,   
       ,  [T]
      ON. POWER ,
      ,  .
      ,    -
   ,     ,
    ,    


         SORT... 

A:   1=CPMDIM  .SYS   2=CPMRDR  .SYS   3=CPMMPEED.SYS
A:   4=DDT     .COM   5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL   8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN  11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL  14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C    17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS  20=KVURE   .PRN  21=NEW     .BAK
A: $22=NEW     .COM  23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN  26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM  29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM  32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM  35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM  38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP  41=WMR3    .COM



                          - 68 -


A=SORT 3
A=DIR               
A:   1=DOKUMENT.BAK   2=FORMPR  .BAK   3=KVURE   .BAK
A:   4=NEW     .BAK   5=PRINT   .BAK   6=RAMKA   .BAK
A:   7=KVURE   .C     8=DDT     .COM   9=DOKUMENT.COM
A:  10=FORMPR  .COM  11=KVURE   .COM  12=NEW     .COM
A:  13=PIP     .COM  14=POWER   .COM  15=PRINT   .COM
A:  16=PRINTER .COM  17=PUTBOOT .COM  18=RAMKA   .COM
A:  19=WMR3    .COM  20=DOKUMENT.ERL  21=FORMPR  .ERL
A:  22=KVURE   .ERL  23=NEW     .ERL  24=PASLIB  .ERL
A:  25=PRINT   .ERL  26=RAMKA   .ERL  27=WM      .HLP 
A:  28=DOKUMENT.P1   29=DOKUMENT.PAS  30=FORMPR  .PAS
A:  31=KVURE   .PAS  32=NEW     .PAS  33=PRINT   .PAS
A:  34=RAMKA   .PAS  35=DOKUMENT.PRN  36=KVURE   .PRN
A:  37=NEW     .PRN  38=CPMDIM  .SYS  39=CPMRDR  .SYS
A:  40=CPMSPEED.SYS  41=P       .TXT
A=SORT 0
A=DIR
A:   1=CPMDIM  .SYS   2=CPMRDR  .SYS   3=CPMSPEED.SYS
A:   4=DDT     .COM   5=DOKUMENT.BAK   6=DOKUMENT.COM
A:   7=DOKUMENT.ERL   8=DOKUMENT.P1    9=DOKUMENT.PAS
A:  10=DOKUMENT.PRN  11=FORMPR  .BAK  12=FORMPR  .COM
A:  13=FORMPR  .ERL  14=FORMPR  .PAS  15=KVURE   .BAK
A:  16=KVURE   .C    17=KVURE   .COM  18=KVURE   .ERL
A:  19=KVURE   .PAS  20=KVURE   .PRN  21=NEW     .BAK
A:  22=NEW     .COM  23=NEW     .ERL  24=NEW     .PAS
A:  25=NEW     .PRN  26=P       .TXT  27=PASLIB  .ERL
A:  28=PIP     .COM  29=POWER   .COM  30=PRINT   .BAK
A:  31=PRINT   .COM  32=PRINT   .ERL  33=PRINT   .PAS
A:  34=PRINTER .COM  35=PUTBOOT .COM  36=RAMKA   .BAK
A:  37=RAMKA   .COM  38=RAMKA   .ERL  39=RAMKA   .PAS
A:  40=WM      .HLP  41=WMR3    .COM

      :     - 
        ,
          
   ,     -
  .       
  ,      
  POWER (0=).
      :   ,    - 
   POWER       
   ,     
  POWER      SAVE.
      : 0=SORT 1 -     ; 
                 0=SORT 2 -    ,
                                
                             ;
                 0=SORT 3 -    ; 
                 0=SORT 4 -   ,
                                
                              ; 
                 0=SORT 0 -  
                             .

      :    SETSYS, 
   ,   .
      


                         - 69 -


        :
       1:     (0=)  SORT 1,
             ,     
                 ,
             (RETURN).   0=DIR (RETURN),
              POWER      -
                 , 
             .  POWER, -
               ,   -
               1. SORT  -
                  ,
                   - 
             .
       2:    ,   -
                 ,  
                   -
              .  0=SORT (RETURN), 
             0=COPY. POWER  
             ,     -
             ,     .


        SPEED...  

      :    ,
         ( 
    ).   ,
          
    TYPE  DUMP.    
  ,   0=,  
   .0 -    , 9 -
   .
      : 0=SPEED 5
             
  ()     (CONTROL S),   / 
   .    POWER   
  ()   ,    
  .   (RETURN)  (), -
   POWER      
      . ( 
  ).      
             
       .
      :  SPEED     ,
         .


      STAT... 

      :      
  ,        
     .
      :  STAT  ,  -
    READ ONTY (R/O),    (CONTROL ).
       STAT  ,
     (CONTROL C)    STAT.



                          - 70 -


         ,   
    . ,   
      ,    , 
     ;    ,-
          OPY;  
         .
      :  STAT   -
       ,.. 
  ,       
  .
       E   STAT   COPY,
  DISK,RECLAIM,SAVE  SIZE.  .
      : 0=S

=S
: R/W USED: 268,FREE; 512,ITY; 684

        :
       1:     (0=)  STAT,-
             ,      
              : (  POWER  
             ). (RETURN).
       2:  POWER    
             .  :  R/W ,
                 .  684,268
                  512.
      :     
          
   ,    
       ,  , 
    . , -
    .      .
    DISK.


        S... 

      :     S 
   ,     -
    ,  
      ,    -
  ,  ,     ,
    .
       S    
  -  ;     ,
     .    -
  .    
       .
         / 2.   ,-
   , " ", "-
    ".   , - 
   SETSYS   (N)  [S], 
    LOG.     
       0; (=======.===).
         S   ,
      ;   , -
         
    .



                         - 71 -


       S     
        , -
          ,
      S     
  . ,    
     -     ,
   .
       TO,     S
  "" ,     
   . .     ,
    ,  ,   
    .
       S      -
    .  ,
        , 
        
  ,     READ 
  READGR.     "   -
  ".
      : 0=S
      :  S    
  ,    0=S S.
     
        :
       1:     (0=)  S
             (RETURN),  ,   -
                  :,-
              POWER  ,  
             "DISK CHECKSU &S" (   
             ),   *****  
             .   , 
                 
                  , 
              .   
                 ,  
                 
             ,  *****.
       2:       POWER  
                 ,-
              *****,     
              .   ,
              POWER    :
             G=0003:02 -  ,   
                         /    
                         .
             =003 S=034 -  ,    -
                                -
                            34.
                  S=120 -    
                            .
       3:      , 
              ,      .
                 , 
              POWER      -
                    
             .



                             - 72 -


       4:  ,    -
             ,  ,   -
              ("SAVE"?)     - 
                   ,,
               /,  ,
                 , 
             Y ()   POWER    
                ,  / 
                  -
                .  "-
             "     .
      :    - ,  
    .
       5:    , 
                ,   -  
             ? (SHOW BAD FILES).  Y () 
              POWER    
             .      :
             REPORT2.X  =====.=== ;  - 
              ,   POWER 
                .
       6:   ,    -
               (REPAIR?).  Y (),-
              POWER     -
                  . 
              .    
             POWER    .
                   .
               ,     
               ,   
                .   
             , Y   REPAIR,  
                 128-  
             .   /  
                ,  ,
               POWER   -
                    ,
              ,    .
      :       ,
   ,       
    LOAD/SAVE  READ/WRITE  READGR/WRITEGR.
      :       
    (. ),     
  ,     Y    -
   "SAVE?",     .
      :       ,
   POWER      0= 
  ,    *****  .
       7:  ,  S, - 
                 .
      :     
  ,   S S;   .- 
        , 
        
  ,  S     
     .
      :      
      .   
     100.  "".
        ,
   *****,    ,  -
    S.



                         - 73 -


       TYPE/TYPEX/TYPEH/TYPEA... 
        

      :     -
        .  
   TYPEH      
  (. ).
       POWER     
    ,    Y ;  
        ,
  ,  , POWER   -
  ,      ,
    SPEED,   ,
       , 
        (CONTROL C) 
  (RETURN).
      :     , 
   ,      ( )
       TYPE     ,
   ,  ,   ASII.
         ..,
       .
       TYPE     
  SCII,  ,    -
       16    
      TYPE.
       Y    
  (. ).     
  .  , 16 -
     .
       TYPEX     
  (. ),    ,  
      ASCII,    
  .    40,64  80 
    .     118.
  (  "").  -
   , 16    ,
    ASCII   .
      : 0=TYPE  0=TYPEX  0=TYPE 
                 0=TYPE

0=TYPE
:   1=SM     .COM   2=DBASE   .COM   3=DDT     .COM
A:   4=DOVR    .COM   5=DOVR1   .COM   6=FORMAT  .COM
A:   7=FORTH   .COM   8=FORTH   .FRT   9=FORTHAE .COM
A:  10=LOAD    .COM  11=PIP     .COM  12=POWER   .COM
A:  13=PRINT   .COM  14=PZUV16  .FRT  15=PZUV16N .FRT
A:  16=RAVI    .COM  17=RESOURCE.COM  18=SIMV    .COM  
A:  19=WM      .HLP  20=WMR     .COM
SELECT? 19

A:WM    .HLP



                         - 74 -


                
          7063.02

  1.  ()  

------------------------------------------------------------
:   :       :      :
:---:----------------------------:-------------------------:
: 1 :        :      :
:   :                   :                         :
------------------------------------------------------------

        :
       1:     (0=)  YPE,-
             ,       
                :  .
             (RETURN).
       2:  POWER   
                :,  
              (SELECT?).
       3:    19,,  
                 WM.L  
              Y.  ,   
              ,    (CONTROL ).
              (RETURN).
       4:  POWER   
             WM.HLP   ASCII.
      :     ,  
      ,  .
            "".


   
               
            TYPE

       , TYPE   
  ,  ,   
     .    
     (SCAPE)  (CONTROL C).()
        (RETURN)
      , 
      0  9 (0  
   ). (  )  
       ;   
   . ,   
   (),    
      (CONTROL ),   
  " "   .
         ,  -
      150.  ""


          CONTROL 

        TYPE    ,
         
    .   (CONTROL K) 
    TYPE,    -
         -
     ,   -
  .



                          - 75 -


     USER/XUSER...  
     O /'   

      :  USER    - 
       . XUSER
        
   .      
         COPY -
   . POWER   
        .
      : 0=USER  ( 
                           )  
                 0=XUSER (  -
                            )

        :
       1:     (0=)   USER 1,
             ,      -
              . (RETURN).
       2:  POWER    -
               1,    -
              (1=). XUSER 2,, 
                  
              1    2. 
             (RETURN).
       . XUSER   - 
          -
  ,      .
       3:   POWER 1-2= ,
                   
              1    2, 
              COPY   (RETURN).
       4:  POWER   
                :, -
              1.       -
             ,  POWER   
             "ND,FILES ????????.??? :" ( 
             ???????.???  :).   
               10-,,  
              ,     -
             . (RETURN).
       5:  POWER     -
             . ,    
                 .
       6:   POWER  , 
               (((PY)   
             (()VE)?   ,  
             POWER      -
             ,  .
      :      (()V),
         -
   2       -
   1.      -
      .
      :    COPY   
          , 
         
  ,   (()VE)    
       .



                      - 76 -


        7 :  POWER     -
                 .
           (1-2=),    -
      USER 0  (RETURN),      
       0   (0=).


        

            -
          ,   0=DIR [U]. 
      ,  ,  -
        , .. 1=,2=,3=
      ..    ,  -
     ,   ,     
       0.
        DIR  M  [X],    
       ,  O   
        ,    
     [UX],     
       .   , 
          
     POWER. , (0=DIR**TXT [UX]) ,  -
          (.TXT)   -
          .
        :      
        ,  ,  
     /   (CONTROL C)   -
      .  COPY  MOVE  -
     ,   ,   POWER  -
       .     (CONTROL
     )   ,    .
       .  USER  XUSER    -
       / 2.     .


     UR1/UR2/UR3/UR4...EM 

       :     -
        POWER,    
       -  , -
           
     POWER.  ,    ,
            SAVE -
      POWER.
       :   , -
        POWER    -
          SAVE.  -
       LOAD/SAVE,    "".
        PWRETOOL     
        .
       : 0=UR1  0=UR2  0=UR3  0=UR4
       :  UR1    (RETURN).
         UR      
      ,   POWER  
          / - 100HEX -  ,
       HL     ,  
         
     ,    UR.



                          - 77 -


            
         POWER  40HEX.  -
      UR     .
	 UR1...........0140-0147 .
	 UR2...........0148-014F .
	 UR3...........0150-0157 .
	 UR4...........0148-015F .
       .   POWER   -
      100.


        

           ,  
          
     POWER     
     ,       -
          /.  
          POWER   -
           -  
     -     .


        

           ,  /  
          
        ,       
          .   /
     ,       
      ,      -
       .
              ,
            ,   
        C  . 
     RESET  POWER    , 
         .   
      /   RESET   -
           READ/
     WRITE,      -
     .   RESET     ,
           ,
        .
           POWER.  
          :   
        POWER (CONTROL C).
             
     ,      ,   , 
          , 
          .  -
        DISK,  ,  
          (, 
          128- -
     ).    (READGR 0 XX 32)  
       ,   ,  -
       . (32,   
     ,     , 
       DISK;       
     ).



                             - 78 -


              
       ASCII.   
      ,   /
      . ,  ,  (CONTROL P), 
       " "   
       .    
        .
            :   
         .    -
      (CONTROL C). ,     
     (CONTROL C),        -
       /,   ,   
       ,     :   
      .
        RESET :,   ,  
     .      POWER,
       ,   DIR 
     ,      "" , 
       ,    ,
         ,   
       ,   .
            -
          POWER 
     READ/WRITE.
              
     :,    READGR,(0=READGR :0 4000 32).
       READGR :,   
       :,     :.  -
      0,       
      0  /;4000   
      ,     
     .    POWER   
      ; 32 -   ,   -
        .
            READGR,  POWER
        ,   -
        ( ).
       .  ,    -
     ,      , -
         . 32 -  -
       ,    
      .
        READGR  POWER  
            
       ,      
     .
          ,   
         ,    DUMPX,
     (DUMPX 4000 4FFF),  4000 -   , 
        ,  4FFF -  -
      ,   POWER    
       READGR.
            .  -
        ,    
      ,     ASCII,  -
       ,      -,
         ,  
     ,      .



                            - 79 -


            ,
           READGR, 
       POWER      -
     ,    .  
      ,     
        ,  ,  
            -
     . ,   READGR   
         ,   ,
        : READ: 2 7 5000 32.  
           -
     ,         
     ,        -
     .
             -
           
     POWER DS (  /).   -
       ,    
          5.    
            ,
        . A  -
       READGR,      -
       ,      
            .  -
           
     .
                -
     ,   ,     ,
         READGR XA  READ XA
      POWER,     
     ,       ,  
        ( -   ).
          M,   -
      ,         
     .  READ: 3 XA 500,  "-
     "  .    500 
      .
           ,  
        ,   POWER -
          128- .  
      ,      .
        READ  READGR,  -
        .   ,  
       SAVE,     -
         .    
       ,    .


         

            ,  
             ,
            ,   
       .
        ,  POWER  
       .
         S,  
      .  POWER   ,
      ,    .   -
         ,  
           .



                             - 80 -


          

             -
     ,     POWER  -
      ,      
       ,   . 
     POWER        ,
          
     .
             
     ,        .
            
           WORD
     STAR *.       ,
          BDOS ERROR,  -
     .       
      ,   WORD STAR   
     ,      / >.
         POWER   -
     ,      ,  -
       WORD STAR,      -
         WORD STAR.  -
          POWER  
       SEARCH    
     ASCII,     (  -
        7500).    SAVE -
      , A   7500,  
     .  148 ,   -
      WORD STAR     
      .  ,    
      ""      ,  
             
     .
             -
     ,     ,  ,
        ,    A SAVE -
       ,  ,   
         SEARCH.


         

        -     
        ,     -
      POWER GROUP   ,  
       /     ,   ,
      ,      .  
             
        COPY.      -
      ,   
       ,     
            .



                           - 81 -


       

          , , -
            -
      ,     
     POWER (**),      (***). 
      POWER      
       *.*;    **,  
        , ,DIR P ** 
        ,   
     "".
       **        -
         , , A0=COPY**TXT
         ,   
        .CO      . 
          ***   
           
            
       0  :.  -
          ,  -
      ,    , *** 
             
     SELECT?,        
     .
        ,   ,   
       LOG   , -
       POWER. ,   
       (   ) -
       ,  4000,    
     ,    ,   4100.
         ,   
        /    -
      ,      -
       DS.      -
     ,     
     ,  SAVE      4100.
       :     WORD STAR, 
            . 
        WORD STAR    -
       .      
       .     
      ,      , 
     ,      , 
     248,    249    
     .
          LOAD WS.COM 4100   (RETURN).
        WORD STAR   , -
      POWER      , 
         .     
            -
      LOAD ,       
     .
          "  /" -
     DS 4248 (RETURN).      -
      ,    ,  
          4100    -
        WORD STAR   ,
            4000.



                            - 82 -


        ,   ,  .D, 
       POWER,      -
      .   POWER   -
       ,   ,  
         .  (RETURN). 
            4248    -
            4249. 
       .   , 
             .
      (RETURN).
              
      WORD STAR,     
     ;       
         .  SAVE WS.COM  -
        WORD STAR   -
      .
               
     ,        -
      WORD STAR   ,   
           
     ,     . 
           
           ,
          . 
     ,       ,
           , 
      POWER      .
          ;   , 
        LOAD.


           

         :
            CAN NOT LOG ON B:;
            DISK LOG ERROR ON B:;
            LOGGING TO DRIVE ONLY; T.E.
            O   :,  
               :,    
            .
         :
            1.  : .
            2.  :  .
            3. -        
                  :.
            4.      COPY  
                     
               ,     :   -
               .
            5.       
               ,    (CONTROL C).
            6.       -
                  ,   [M]ARK (><) -
               , (ON),   POWER  
                . (.  LOG).



                          - 83 -


            7.      -
                    RUN  -
                      -
                 ,    [@], 
                  POWER 
                  SUBMIT,  
               SUBMIT     
                    . (.  LOG).
            
         :
            INCORRECT,FOR LIST OF COMMANDS ENTER: ?; ..
            ,  ?    .
         :
            1.      
               POWER     0=.
            2.    RUN   
               .

         :
            INVALID ARGUMENT; ..  
         :
            1.       
                   .
            2.    ,    .
            3.       
                SAVE,     -
               ,     .

         :
            PRESS C,DISK IS R/O ON B: ; T.E.
             (CONTROL C).    : 
             .
         :
            1.       (CONTROL C).
            2.     -  
               ,   .
            3.        -
                ,    (CONTROL
               C).

         :
            DISK FULL ON B: ; ..    : .
         :
            1.       
               COPY     .
               ,    [T]   
               (OFF),   COPY  
                      
                :,   ,  
                     "DISK
               FULL",      
                  .
            2.    RUN   , 
                [@]  (ON); 
               POWER     SUBMIT,
                   . (.  LOG).

         :
            FILE IS R/O; T.E.    .



                            - 84 -


         :
            1.    ,  
                READ ONLY   POWER
               SETRO;      .
               (.  SETWR    
               R/O ( )).
            2.       -
                 RECLAIM,     
                       READ/ONLY
                  SETWR.
            3.       
                ,      .

         :
            BAD SEKTOR ON READ ABORT (Y/N); T.E.
               ,  (/).
         :
            1.     B ,   
               .   ,    -
                  O -
                 /     ,
                    , 
                   
               . (.  "   -
               ").

         :
            NO FILES ????????.??? ON A: ..
              ????????.???  :.
         :
            1.      
                DIR.
            2.     -
                    DIR.

         :
            BAD NAME: ..  .
         :
            1.       
                .
 

     

        POWER  ,    
         / . -
      ""      
       POWER   . 
      ,  ,    .. 
      -.     -
        ,   
      ,      POWER,   
     .



                             - 85 -


       

       (1) ,   ,   -
       SIZE  POWER    -
        POWER.COM,     ,
            -
       SAVE.
       (2)   ,   
      ,   .  -
      :  ,   , 
      ,   POWER  -
       .
       (3)    ,    -
     ,    ,    DS
      POWER,    . ,
       ,     POWER 
      (=)   - ,   DS 107.
          DS     
     0107,  ,     POWER 
     ASCII  - (=),    , -
        .    -
     ,   (.),    ASCII
      ,       POWER ,
          .
           .   -
        T (*).  (RETURN), 
        .
              -
     ,       "". 
         ,   -
       ,  (),  
        ,   . 
      ( )  (ESCAPE),   
      DS    LOG,  , 
          .
                
          SAVE.  ,
            -
      ,  0=SAVE POWER.COM 100 (RETURN). 
     ,        
     ,  0=SAVE POWER.COM 100 ( 
      ) (RETURN).  ,    -
       SAVE   ,   -
     ,  ,      ,   
           
     .       -
      .
              2F1  02FF, -
             -
      [@].



                           - 86 -


        
      /-86  /-86

            /-86  /-86
     (.CMD )  280- ,  -
        .   -
          POWER-86 -
      .      LOAD
       POWER-86   AF80HEX,  
          . 
            LOG  
       POWER-86.    MOVE
        POWER-86   5100,
          . , , 
       SAVE   , 
       4F80,      
       .


     

            
     ,     . 
          SAVE,    
      .  0=SAVE CUSTO2 100 4 (RETURN).
            
     POWER,      -
     .    ,  
       POWER,   
       .   
     POWER,      LOAD  
           100, .. 
     LOAD CUSTOM2 100 (RETURN).    -
         POWER    -
        .


      

          ,   -
     ,   ,  - -
       POWER.    ,
       ,      -
      .     ,
             DS. -
           , 
           ,    ,
         ASCII;    
         ., .  .D.
       .   NORTH STAR COMPUTER 
       ,     
     ,     " 
     ".      .



                             - 87 -


      

           . 
         ,     -
         ,   
         POWER;     
        ,      
      POWER.
        ...     ; 
         TYPE, ,  ,  -
           .
        0 (CONTROL K) - 0106.
          ...   
       DS,   ,    
       ( ASCII,  ,
      ,  ).   -
     E 2 () - 0108.
         A ...    DS
        ,     -
        .    7
     () - 0109.
        ...     
      ,   POWER. 
          -
       POWER 0=.   
     1 (ESCAPE) - 010.
          ...   
           . (.
     (CONTROL S)  ()   ) -
     010F.


        

         POWER...   , 
          0 ,  -
       0   
        POWER (0=).   -
      FF,       
      .      -
      0,  0 ,     
     (=),       -
            -
      (2=,3=,  ..) - 011.
         POWER...  , -
       , ,     -
      POWER,      /. 
       3D ( ) - 0107.
         ...   , 
             
     TYPEX  DUMPX.      -
      FF,     64 ,   
        ,    
     80 ,      01 -  40 .
        40     ASCII 
         -
      .    , 
           - 0118.



                            - 88 -


        ...      
         .  
             
     .    00,      
          [P]  -
     0105.
        ...   ,   
        .   0 -
     ,       
      ,  ,    
      .    0D, 
           - 011F.
           ...   
     ,      -
      TEST,     . 
       3D (=) - 010.
        POWER      
     .   [S]   
     (OFF) (),       
     .    ,    
        -    
     .   SETSYS   
     .
          ...    
       ,     
          . -
        HA  FF,   
      - 0112.
        ...    -
            -
      :      
           00,      /;
           01,     POWER ( 
               );
           FF,     POWER   -
               010.

         A...   
         "  ", 
         :
            1.       -
                ,   ,
                 .   
                  ,  
                ,     -
                  A - 0170;
            2.       -
                  (   ) - 0171-0177;
           "  ",
           "  -
     "   .
            3.        
               ,    "
                ".     
                - 0178;
            4.       -
                  (  ) - 0179-017F; 



                             - 89 - 


              TEST,READ,
     READGR,WRITE,WRITEGR...    
     ,      
       ,     ,
     , ,     ,
        .
            00,      
            
             READ
      WRITE,      TEST   
         "*",   
         .   
       FF,     -
           - 010C.


      

        CONTROL C...     
      01,   POWER  -
       (CONTROL C), ..  , 
        .   
         (CONTROL C). , 
      ,      -
         ,    
     ,      -  
     .
       .      
     (CONTROL C),       -
     0116.
           ...    -
       Y  LOAD  POWER  -
      ,     ,  -
       ,    ;
           00=   POWER    -
               ,       
                (0=);
           01=   POWER   
               ,      -
               ,     ;
           FF=   POWER    -
               ,     ,  -
                  COPY  LOAD.
              - 011.
       .   "   -
     ".
          ...  ,  
     TEST     ,  ,
        ,  ,  
     ,     ,  
     .   5.
         POWER     
          COPY,  (. -
      "    ")   
         ,  
      ,       
             
       LOAD - 011.



                             - 90 -


         ...    
     ,       .
        128, ..  7F.
       .  ,   
      ,   255, .. 
     FF - 011D.
         ...    
          (CONTROL C)  (EXIT),
      ,         
     ,   (?).     -
      .      -
      9,       - 0120.
         A  NORTH STAR; 
           . -
       ,    
     ,      PW/NSTAR.OVR
       POWER.      LOAD,
      GO:
           0=LOAD PW/NSTAR.OVR 100 (RETURN) 
           0=GO PW/NSTAR.OVR 100 (RETURN).
       .  ,    
       NORTH STAR   -
      POWER,      
         SAVE.
        ,      , 
       ,   
         - 0120-013F.
          ...   
     DIR [X],      , 
       .    0,  
     POWER    .   
     01,       (:), 
     02 -       
     (:)  A (:),  ..
       :      , 
      ,       
     ,         
     ,   ,   
     BDOS   010    OFF ().
       "  BDOS" - 0160.
          .BAK...   
     LOG ,      
       COPY,      
       ,      -
     ,    POWER   
     /   ( FF),  
         .BAK (-
      00) - 016.
         BDOS...     
       POWER     BDOS 
     :
             FF,  
     BDOS  ,     POWER 
          -
         [X]   DIR.  -
       NORTH STAR,    POWER  
       FF.   NORTH STAR 
        ,    -
      .



                            - 91 -


            01,  
     BDOS   ,     
          DIR [X]. 
      "   ".
            ,   BDOS 
      ,     
     .
            
     /-86;       -
      FE,      ,  
           FF  -
       /,     
      .
            
     /-86:  BDOS  .
          - 010D.


       POWER

         POWER... ,   
      ,    (@@@.SUB).
         ,  
     POWER     
      .      FF,
         .  
         POWER,   -
          ;  :=1,
     :=2  ..
           
     /-86.    /  
      .     (CNTROL D)
     (DETASH).      /.
          02F0.
         POWER   ,  
      ...      ,
         .
       ,   ,  
     POWER     (@@@.SUB). -
     ,       
     POWER,         ,
       ,   ASCII,   
      . (.   
     REN).
             POWER;  -
     ,     POWER  -
       RUN,    [@] (. -
      LOG).      
     POWER ,     
      /
             
           .
        
      /,    
     POWER      
     .   POWER     -
        .   
     ,    POWER 
       .    
           POWER  
     ,    .
           - 02F1-02FF.



                         - 92 -


       

          ...   -
       ,   POWER 
        ,     
       .   
     O   .   
      00 00,   POWER   
     ,     / -  
     0114-0115.
        ...      -
      ,     -
      /   .    
       ,   
        , ..   -
       ,     . 
          FF,  
           ,
           - 0116.
             ...
            ,
             
         .   
        FF,    
      ,    - 016.
       ...   ,   , 
      POWER     BDOS, -
       .      -
        ,  
        8080  Z80.  
        /-86  /-86 (CF=1, D7=2,
     DF=3, E7=4, EF=5, F7=6, FF=7) - 0117.
         ...   
        - 0119.
       ...      -
        ,   -
      POWER.
              KEYSTAT.(3  ) - 0300-0302
              CINPT...(3  ) - 0303-0305
              PRINCHA.(S3 HH HH) - 0306-0308
              INBUFFER(3  ) - 0309-030B
            PGM (-1 = ) - 030-030D
          (.    
      ) - 030-030F.
         - 0310.
        ...    -
            
     ,    .
       .        
      PWRETOOL.
           UR1............................0140-0147
           UR2............................0148-014F
           UR3............................0150-0157
           UR4............................0158-015F



                          - 93 -


                           P O W E R

                                           

        ?            .
     CHECK           
                    , -
                  T .
                  .
     COPY             -
                   .
     DIR           .
     DISK            
                 
     DS               
                 , , 
		  ASCII   ,   -
		      
		      .
     DUMP	   ASCII    ,
		      -
		  .
     DUMPA	   ASCII    ,
		   16   .
     DUMPH 	     
                  ,   16   .
     DUMPX	    ,  
		   ASCII    , P
 		 16   .
     ERA	    .
     	 	     ,
		      POWER.
     EXIT	    POWER    
                    /.
     FILL	    -
                  .
     GO		     -
		       (  
 		  100).
     GROUP	    
		  /,    .
     JP		      
 		     
 		     -
		  /.
     LOAD	      , 
		   .
     LOG	      (
		 [ ] )  POWER.
     MOVE	     
		 .
     PASS	     
		 .
     READ	       
     ()         .
     READ             
     ()        .
     READGR         /  -
     ()          
		  .



                          - 94 -


     READGR         /  -
     ()         .
     RECLAIM         
		       -
                  .
     REN	    .
     RESET	  ,  
 		 /   O ,
		   (CONTROL C).
     RETCOL	    
                 POWER.
     RUN	     
		  POWER.
     SAVE	     
		   .
     SEARCH	   ASCII  -
		   (     
		 )     -
		  .    
		   ,   
		 .
     SET          .
     SETDIR	   ,   -
		     DIR.
     SETRO	   R/O,   
		  .
     SETSYS	   SYS,    -
		    ,  -
		  [S]   (ON).
     SETWR         R/W,   
		  .
     SIZE	       
		   .
     SORT	    
		  .
     SPEED           -
		 .
     STAT	    -
		     ,  -
 		   .   
		  (CONTROL C)   -
                 .
     TEST	     
		  :    -
   		   A   
		      
		 .  P  
		 .
     TYPE	   ASCII    
 		     
		  .
     TYPEA	     SCII  
		     16  
		 .
     TYPEH	     
		     16   
		 .
     TYPEX	        
		 16     -
		 ,     
		   .



                            - 95 -


     USER             
                   ( 0  15)
     UR1             ,
     UR2          . ( , -
     UR3              -  
     UR4         ,   "").
     WRITE           ,
                      .
     WRITEGR           
                     /
     XUSER       '   -  
                       
                     
                  .
 

      

       ,    
             , 
       PASS  PWRETOOL.


     PASS...     POWER.

       :  PASS    -
          16  31.  -
          
       /      -
      POWER.  PASS    ,
         -  ,
          .  
           , 
         RETOOL  POWER.
        ,     -
      ,     ,  -
     .  -,   , 
       ,     .  -
       ,    ,
        "FATAL ERROR" ( ),
      .
          PASS   
       . ,   
      ,      -
      ,    .
            "POWER", -
      ,    -
      .
       : 0=PASS () ( ) (RETURN)
       .  PASS    
      USER  XUSER,    ,
      .



                           - 96 -


        , .
 
         :
        1 :     (0=)   PASS
               () POWER, "" -
                , .
       ,       
      PASS (),    
     "PASSWORD?" (?),     
       ,    "PASSWORD?",
       ,  POWER  , 
         .    -
      POWER     , 
          .
        2 :      (0=)  -
                XUSER 25,  ,  
                    0 
                   25.
       .  ,    
        16  31.   
      25.  (RETURN).
        3 :    POWER (0-25=),
	         ,   POWER 
                    0
                  25.  COPY
               (RETURN).
        4 :  POWER   
                    0 -
                : - (0:),    
               (SELECT),   10-,   ,
                    10   -
               .  (RETURN).
        5 :  POWER    
                (DESTINATION DRIVE).  , 
                    
                 .
        6 :   POWER  , 
                   (()OPY),   
                 (()OVE).    (-
               ),      -
                  25   
                   0. -
                    
               ,       -
                    
               .       (-
               ),    
                    
               ,     
                0     .
                 "   -
                ".
        7 :  POWER    -
                .    
               ,    (0=25=).



                            - 97 -


        

        "" ,      
            USER/XUSER.
        8 :  ,     (0=25=), -
                USER0 (RETURN).    -
                 0,      
                .    -
                (RETURN).   , 
               PASS      -
               ,     
               16-31  . ,  ,
                 "RASSWORD?".
       .      
          ,   POWER
         
      . ,      -
      POWER,         -
     E     
     .  ,     , 
         0=PASS (RETURN),  -
      EXIT.


        ,  

         :
        1 :     (0=)   
               PASS () POWER (RETURN).
        2 :         
                 25,  
                 ,   ,
                  0=USER 25 (RETURN).
        3 :   (=25);  
               ,      -
                 25   :.  -
                     
                0    25=XUSER 0.
        4 :  COPY (RETURN);  -
                    25,   -
                (SELECT?).
        5 :     , TRADE.COM, -
                   .3.    -
                   (), 
               ,      , 
                    25,
                    
               0   .
        6 :     
                0,     
               0=USER 0.     
               .
       .       , -
      ,       
       25  ,   -
        .



                           - 98 - 


         
     (C)OPY  (M)OVE

            
         ,      
       ;    ,    -
     .       
              .
      ,        
     .  ,    
     (M)OVE        -
      ,      
           ,   .
              
            ,
         ,     
         -.
         E,      
          ,  , 
        RECLAIM.  
            ,   -
     ,      , 
            RECLAIM.
        ,       
      ,      -
         .    
      ,       -
         ,   ,
          .


          
      0     

        ,   ,  
             -
     ,   ,  
            
       0,   ,  -
           ,
      .      
           0:  , 
         25:.  
         ,       -
      ,    , 
         .
            
     ,  ,   ,
      ,   .   
        ,   
     POWER      ,  ,
     , ,      
         ,   -
       / (>),     
     ,   , ,   -
      C    ,   
      .



                            - 99 -


      

               ,
        ,   /  (COTROL C),
         .  COPY  MOVE
      ,     .
       POWER      -
        .      
       (CONTROL C).


         

        DIR[U]  DIR[X],   
          ,  -
          16  31,  
          
       15. (.  "").
             ,
       POWER   "NO FILES
     ????????.??? ON A:" (  ????????.???  :). 
       ,      -
            
     USER,      DIR.
       .       -
       / 2.     .


      

       :     
        ,     -
     .      POWER -
      ,     ,   
          , -
       ,    .
       .  ,     
      ,     ,  
      POWER  PASS.
       : =GO PASS
                  5000 (RETURN)POWER(RETURN)NEWPASS(RETURN)
       :      , 
       :    (RETURN)  
       (RETURN)   .
        !!!     
          
     "FATAL ERROR",    ,  
      "".    
        .
         :
        1 :     (0=)   GO PASS
               5000   (RETURN).
        2 :     .  -
               ,   POWER   
                     PASS,  -
                  .   
                  (  
               POWER).  POWER   (RETURN) 
                .



                            - 100 -


        3 :       
                 ,   
                .     ,
                 15    
                      
                  .  
               ,    .  -
                     
                PW2.  (RETURN)    
                 POWER.   
                  POWER  PW2.
        4 :  ,     
                POWER    PW2  , 
                 0=SAVE POWER.COM 100 (RETURN).
       .      -
       POWER  ,   "POWER"
      .     
     POWER     ,    
      :   0=SAVE (---POWER)
     () ( ).

