DIRlock UTILITY
   
                     Also assembler source listing DIRCODE 
   
   DIRlock  is  Public  Domain  software,  and   may  be  freely  copied  and
   distributed as long as  the author's name is not removed  from the code or
   altered in any way. The author retains copyright.
   
   DIRlock is a utility designed primarily for ADFS. It's purpose is to allow
   any directory to be  locked in as the root or $  directory. Any * commands
   that would normally  act upon the $  directory are forced to  act upon the
   chosen directory.
   
   There are four commands for DIRlock:
   
      *ZL <dirname>
   Forces any directory to become the $ directory.
   
      *ZA
   Re-activates DIRlock if previously turned off.
   
      *ZI
   Turns off DIRlock and allows normal operation of all * commands.
   
      *ZC
   Toggles DIRlock between the on and off states.
   
   
   For example, say you copied a large suite of programs into a sub directory
   of  an ADFS  disk,  and then  found  that the  programs  kept issuing  the
   command:
   
      *DIR $ 
   
   This  would  prevent  the  suite  of  programs  from  working  unless  you
   transferred the  whole lot into the  root $ directory. [This  is precisely
   the problem experienced with the TBI disks,  where the BBC PD menus expect
   to be in the root directory, but have been copied into sub-directories due
   to the amount that needs to be fitted on each disk].
   
   DIRlock allows you to overcome this problem by issuing the command:
   
      *ZL <dirname>
   
   This has  the effect  of setting the  directory 'dirname'  up as  the root
   directory. It  works by replacing  ANY occurance of  the character $  in *
   command with $.dirname.
   
   You may set any directory up as the root directory, but you must give it's
   full pathname except for the $. prefix.
   
   So to set up the directory;
   
      $.UTILS.PRINTING.DUMPS
   
   as the root directory you would type in:
   
      *ZL UTILS.PRINTING.DUMPS
   
   
   DIRlock will also respond to the
   
      *H.
   
     command telling  you if  is active  ($ replacement  occurs) or  inactive
   (normal operation) as well as the current replacement string.
   
   The source  assembler (DIRCODE)  is also given  so that  you may  chose to
   assemble it  at a different  address, or change  the letters used  for the
   commands.