.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 INS, .AT,SAVE, AND MCR ARE ON [12,10] AND UFD'S
; [12,10], [12,24], [12,40], [1,24], [1,54] ALL EXIST ON THE DISK.
; ADDITIONALLY ON [1,24] MUST EXIST, INS.OLB, SAV.OLB, MCRMU.OLB, 
; IND.OLB, INDBLD.CMD, INSBLD.CMD, MCRMUBLD.CMD, AND SAVBLD.CMD.
; SYS.TSK NEED NOT BE REBUILT.
;
; 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.
;
.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]
SET /UIC=[12,40]
PIP ='UIC'*.SLP
.ASK Z ARE THE SLP FILES IN THE RIGHT PLACE
.IFF Z .GOTO EXIT
.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]INSHD.SLP
SLP @[12,40]INSPS.SLP
SLP @[12,40]INSROT.SLP
SLP @[12,40]MCRDIS.SLP
SLP @[12,40]SAVE.SLP
SLP @[12,40]INDMGCML.SLP
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$ "INSHD"
.GOSUB ASMMCR
.SETS A$ "INSPS"
.GOSUB ASMMCR
.SETS A$ "INSROT"
.GOSUB ASMMCR
.SETS A$ "MCRDIS"
.GOSUB  ASMMCR
.SETS A$ "INSLB"
.GOSUB ASMMCR
.SETS	A$ "SAVE"
.GOSUB ASMMCR
.SETS A$ "INDMGCML"
.GOSUB ASMMCR
SET /UIC='UIC'
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
 
SET /UIC=[1,24]
TKB @'UIC'EDDRVBLD
.IFNINS LBR INS $LBR
LBR MCR.OLB/RP=[12,24]MCRDIS
LBR SAV/RP=[12,24]SAVE
LBR INS/RP=[12,24]INSHD,INSROT,INSPS
LBR IND/RP=[12,24]INDMGCML
LBR IND/RP=[12,24]INDFIL,INDFDC,INDINX,INDNP1,INDMCR,INDPRC,INDROT
LBR IND/RP=[12,24]INDIF1
PIP INDBLDOLD.ODL;1/RE=INDBLD.ODL;-1
PIP ='UIC'INDBLD.ODL, INDBLD.CMD
ASN NL:=MP:
TKB @INDBLD
TKB @SAVBLD
TKB @MCRMUBLD
TKB @INSBLD
SET /UIC='UIC'
@CCL
.GOTO EXIT
 
.ASMMCR:
	MAC [12,24]'A$';1=LB:[1,1]EXEMC/ML,[200,200]RSXMC/PA:1,SY:[12,10]'A$'
	.RETURN
 
.EXIT:	; ALL DONE