.ENABLE SUBSTITUTION
	.DISABLE CLI
	.SETS CLI <CLI>
	SET /MCR=TI:
;
; SFD X0.0  '<DATE>' '<TIME>'
;
; A set of files to modify RSX-11M-PLUS V4.3 so that it
; handles subdirectories.
; NOTE! This has only been tested on RSX-11M-PLUS V4.3.
; It might work on other versions as well.
;
; I take no responsibility for any ill effects that might
; result from the use of this package.
;
; All modifications are copyright by Johnny Billquist
;
; This files tries to make as much of the installation as
; possible automatic. However, due to the way these patches
; are applied, some steps must be taken manually.
;
	.ASK [<TRUE>] GOON Do you want to go on with the installation
	.IFF GOON .GOTO EXIT
;
; Create a new directory find route, which can traverse
; a tree.
; It's based on the standard routine, with modifications.
; Compile it, and insert into the correct libraries.
;
	PIP [50,10]OLDDIRFND.MAC/RE/NV=[50,10]DIRFND.MAC
	SLP @DIRFND.SLP
	MAC @DIRFND
	LBR [1,1]SYSLIB/RP=[50,24]DIRFND
	LBR [1,1]EISLIB/RP=[50,24]DIRFND
	LBR [1,1]NOANSLIB/RP=[50,24]DIRFND
;
; Now modify MCR to accept longer directory names.
;
	PIP [12,10]OLDST3OV.MAC/RE/NV=[12,10]ST3OV.MAC
	SLP @ST3OV.SLP
	MAC @ST3OV
	LBR [1,24]MCR/RP=[12,24]ST3OV
;
; Next we need to modify a few directives in the kernel.
; We need a new filename parser and a few modifications
; to the directoives which sets the default directory.
;
	PIP [11,10]OLDDRPFN.MAC/RE/NV=[11,10]DRPFN.MAC
	PIP [11,10]OLDDRLOG.MAC/RE/NV=[11,10]DRLOG.MAC
	SLP @DRPFN
	SLP @DRLOG
;
; Now all parts of the system has been modified as much as
; this routine can do.
; The next steps must be made by hand, since they involve
; SYSGEN.
;
; All the following steps should be made, and in this order.
; Some of the steps rely on the fact that previous steps
; have already been done.
;
; 1) With SYSGEN, rebuild FCSRES. This can be done by asking
;    for FCSRS1 as the non-privilegied program to build.
; 2) Rebuild *all* normal tasks. (RES and FSL don't need to
;    be rebuilt)
; 3) Do a full SYSGEN. This is needed for the new version of
;    the directives to take effeect.
;
; After this, you should have a RSX system with subdirectores
; a'la VMS.
;
; Check the AAAREAD.ME file for limitations and various other
; information about this.
;
.EXIT:
;
; Installation finished '<DATE>' '<TIME>'.
;
	SET /CLI=TI:'CLI'