.ENABLE SUBSTITUTION
.SETS UIC <UIC>
; THIS IS NOT AS INTELLIGENT COMMAND FILE AS ACNTGEN.CMD AND WILL PROBABLY 
; HAVE TO BE MODIFIED BY THE USER TO REFLECT THE SYSTEM.  THIS COMMAND FILE 
; EXPECTS THE MCR SOURCES FOR .AT, AND MCR ARE ON [12,10] AND UFD'S
; [12,10], [12,24], [12,40], [1,24], [1,54] ALL EXIST ON THE DISK.
; ON [200,200] SHOULD EXIST RSXMC.MAC.
; ADDITIONALLY ON [1,24] MUST EXIST, MCRMU.OLB, IND.OLB, INDBLD.CMD, 
; AND MCRMUBLD.CMD. SYS.TSK NEED NOT BE REBUILT. (ALTHOUGH IT WILL BE BY
; MCRMUBLD UNLESS MODIFIED).
;
; NOTE THAT INDBLD.CMD AND MCRMUBLD.CMD MAY HAVE TO BE MODIFIED TO REFLECT
; THE CURRENT LOCATION OF RSX11M.STB. IF ALL THE FILES EXIST ON LB: SOME
; THOUGHT SHOULD BE GIVEN TO MODIFYING THE COMMAND FILES SO THAT THE TASKS
; MCRMU AND IND BUILD TO SOME UIC OTHER THAN [1,54]
;
; ALSO PRIOR TO RUNNING THIS FILE THE ORIGIONAL DISTRIBUTION SOURCES SHOULD BE
; RENAMED TO .VGN;1 AS A SAVETY MEASURE(THIS IS ALSO WHAT THE SLP FILES LOOK FOR)
; UNTIL YOU ARE SURE ALL WORKS OK AND NO NEEDED SOURCES WILL EVER DISAPPEAR.
;
; THE USER SHOULD NOTE THAT RSX11M NOW SUPPORTS THE SWAWN DIRECTIVE .
; THE INDIRECT COMMAND FILE MODIFIDATIONS ASSUME THE SPAWN DIRECTIVE WAS
; INCLUDED.  IF IT WASN'T, YOU ARE ON YOUR OWN.  HOWEVER IT SHOULDN'T BE TOO
; HARD TO INCLUDE SINCE I HAD THE 3.2 INDIRECT FILE PROCESSOR RUNNING ON
; A V3.1 SYSTEM FOR OVER 2 WEEKS BY ESCENTIALLY MAKING THESE SAME MODIFICATIONS.
; (ALSO NEEDED INDNP1NSP.SLP).
;
;>>>> PLEASE NOTE<<<<
;	THOSE USER'S WISHING TO USE EDDRV, SHOULD NOTE THAT THE NUMBER OF TERMINALS
; IT SUPORTS MUST BE EXPLICITLY BUILT INTO THE CODE.  AT PRESENT, EDDRV
; SUPPORTS TERMINALS TT0-TT6.
;
; PRIOR TO RUNNING THIS FILE IT IS NECESSARY TO ADD THE SYMBOL
; R$$PRV=0 TO LB:[200,200]RSXMC.MAC. THE SLP FILE RSXMC.SLP IS
; PROVIDED TO DO THIS. THE NEW INS IS NOW ONLY BUILT AS PART OF ACNTGEN.
;
.ASK ANS WOULD YOU LIKE TO STOP TO PLACE FILES IN THE RIGHT PLACES
.IFT ANS .GOTO EXIT
;
; THE SLP FILES ARE FIRST TRANSFERED  TO [12,40]
.ASK XFER TRANSFER THE SLP FILES TO [12,40]
.IFT XFER SET /UIC=[12,40]
.IFT XFER PIP ='UIC'*.SLP
.ASK Z ARE THE SLP FILES IN THE RIGHT PLACE
.IFF Z .GOTO EEXIT
.ASK SLPEM APPLY THE SLP FILES TO THE VIRGEN SOURCE FILES
.IFF SLPEM .GOTO ASMBL
.IFNINS SLP INS $SLP
SET /UIC=[12,10]
SLP @[12,40]INDFDC.SLP
SLP @[12,40]INDFIL.SLP
SLP @[12,40]INDIF1.SLP
SLP @[12,40]INDINX.SLP
SLP @[12,40]INDMCR.SLP
SLP @[12,40]INDNP1.SLP
SLP @[12,40]INDROT.SLP
SLP @[12,40]MCRDIS.SLP
SLP @[12,40]INDMGCML.SLP
.ASMBL:
.ASK ASM ASSEMBLE THE SOURCES
.IFF ASM .GOTO BUILD
SET /UIC=[12,24]
.SETS A$ "INDFDC"
.GOSUB ASMMCR
.SETS A$ "INDFIL"
.GOSUB ASMMCR
.SETS A$ "INDIF1"
.GOSUB ASMMCR
.SETS  A$ "INDMCR""
.GOSUB ASMMCR
.SETS A$ "INDNP1"
.GOSUB ASMMCR
.SETS A$ "INDINX"
.GOSUB ASMMCR
.SETS A$ "INDROT"
.GOSUB ASMMCR
.SETS A$ "IMGCML"
.GOSUB ASMMCR
SET /UIC=[1,24]
.SETS A$ "MCRDIS"
.GOSUB  ASMMCR
SET /UIC='UIC'
.ASK ASM ASSEMBLE EDDRV
.IFF ASM .GOTO BUILD
MAC EDDRV.OBJ;1=LB:[1,1]EXEMC/ML,[200,200]RSXMC,SY:'UIC'EDDRV
MAC EDTAB.OBJ;1=LB:[1,1]EXEMC/ML,[200,200]RSXMC/PA:1,SY:'UIC'EDTAB
 
.BUILD:
SET /UIC=[1,24]
.ASK BLD BUILD EDDRV
.IFT BLD TKB @'UIC'EDDRVBLD
.IFNINS LBR INS $LBR
.ASK REPLAC REPLACE MCRDIS IN MCR.OLB
.IFT REPLAC LBR MCR.OLB/RP=[12,24]MCRDIS
.ASK REPLAC REPLACE OBJECTS IN IND.OLB
.IFT REPLAC LBR IND/RP=[12,24]INDMGCML,INDIF1
.IFT REPLAC LBR IND/RP=[12,24]INDFIL,INDFDC,INDINX,INDNP1,INDMCR,INDROT
PIP /NV='UIC'INDBLD.ODL, INDBLD.CMD
ASN NL:=MP:
.ASK BLD BUILD THE NEW INDIRECT
.IFT BLD TKB @INDBLD
.ASK BLD BUILD THE MODIFIED MCR
.IFT BLD TKB @MCRMUBLD
.ASK BLD BUILD CCL
SET /UIC='UIC'
.IFT BLD @CCL
.GOTO EEXIT
 
.ASMMCR:
	.ASK ASM ASSEMBLE 'A$'
.IFT ASM MAC [12,24]'A$';1=LB:[1,1]EXEMC/ML,[200,200]RSXMC/PA:1,SY:[12,10]'A$'
	.RETURN
 
.EEXIT:	; ALL DONE
	; ONLY ONE TRICKY TASK REMAINS, THAT OF INSTALLING THE NEW MCR.
	; IND AND CCL ARE EASILY INSTALLED AND TESTED WITHOUT USING VMR.
	; FIRST SAVE YOUR SYSTEM IN CASE AN UNWORKING MCR RESULTS.
	; ON A COPY OF YOUR SYSTEM, USE VMR TO REMOVE MCRMU AND THEN INSTALL
	; THE NEW VERSION.  BOOT THE SYSTEM AND HAVE FUN WITH CCL.