.ENABLE GLOBAL
.ENABLE SUBSTITUTION
;			S Y S G E N X . C M D - - - - BATCH SYSGEN
;				R S X 1 1 M    V 3 . 2
;				'<DATE>'     '<TIME>'
;
; DELETE ALL OLD FILES ON SY:[1,54] BEFORE RUNNING ALSO !!!
SET /UIC=[1,24]
.SETF INSLBR
ASN =LB:
.IFNINS LBR .SETT INSLBR
.IFT INSLBR INS $LBR
ASN SY:=LB:
ASN SY:=TK:
.SETS DEV "SY"
.10:.ASKS DEV WHAT IS THE DISK TO WHICH THE TASKS SHOULD BE BUILT [DDU]
.SETF BADDEV
.IFF <RAD50> .SETT BADDEV
.IFT BADDEV ; NON RAD50 CHARACTER DETECTED
.IFT BADDEV .GOTO 15
.SETS TEMP DEV[1:2]
.IF TEMP NE "DK" .SETT BADDEV
.IFT BADDEV ; FIRST TWO CHARACTERS OF DEVICE STRING NOT  DK
.IFT BADDEV .GOTO 15
.SETS TEMP DEV[3:3]
.IF TEMP LT "1" .OR .IF TEMP GT "5" .SETT BADDEV
.IFT BADDEV ; THIRD CHARACTER OF STRING <0 OR >5
.15:.IFT BADDEV ; ILLEGAL DEVICE STRING -TRY AGAIN
.IFT BADDEV .GOTO 10
.IF DEV NE "" ASN 'DEV':=TK:
.ASK $RESLB SHALL THE EXECUTIVE TASKS BE BUILT WITH FCSRES
.SETT $MAPTS
.SETS $S "4"
.SETS $SYS "[1,54]"
.SETT $BPAR
ASN SY:=MP:
.ASK $FDUP ARE YOU BUILDING WITH A FULL DUPLEX DRIVER?
.ASK BIGEXC ARE YOU BUILDING A 20K EXECUTIVE
.ASK EXEBLD HAVE YOU ALREADY BUILT THE EXEC
.ASK RSXLIB DELETE OLD AND CREATE A NEW RSX11M.OLB AND TTDRV.OLB
PIP MCR.OLB;1/DE/NM
PIP MCR.OLB;1=MCR.VLB
.IFT $FDUP LBR MCR/RP=MCRTTFD.OBJ
.IFT EXEBLD .GOTO 310
SET /UIC=[1,24]
PIP [200,200]SGNPARM.CMD/PR/FO
PIP [200,200]SGNPARM.CMD/PU
PIP [1,34]*.*;*/DE/NM
.IFT RSXLIB PIP RSX11M.OLB;*/DE/NM,TTDRV.OLB;*
.IFT RSXLIB LBR RSX11M.OLB/CR:80.:640.:128.=[11,24]RSX11M.OBJ
.IFT RSXLIB .IFT $FDUP LBR TTDRV.OLB/CR:70.:256.:64.=[11,24]TTDRV.OBJ
;PIP [11,24]RSX11M.OBJ;*/DE/NM,TTDRV.OBJ;*
PIP RSXBLD.CMD;*/DE
PIP TTDRVBLD.CMD/PU
PIP =[11,24]RSXBLD.CMD
PIP RSXBLD.CMD/PU
TKB @RSXBLD
.IFT $FDUP TKB @TTDRVBLD
SET /UIC=[1,34]
PIP *.MPP;*/RE=*.MAP;*
PIP [1,34]*.MPP/SP
.WAIT PRT...
PIP *.MAP;*/RE=*.MPP;*
.ASK Z DO YOU WANT TO CONTINUE AND BUILD THE TASKS NOW
.IFT Z .GOTO 310
;
; WE WILL EXIT NOW.  WHEN YOU ARE READY TO RESUME
; THE BUILDING OF THE SYSTEM, EXECUTE THIS INDIRECT COMMAND FILE
; AND ANSWER Y TO THE FOLLOWING QUESTION:
;	>* HAVE YOU ALREADY BUILT THE EXEC? [Y/N]:
;
.GOTO 730
.310:SET /UIC=[1,54]
.SETS BLKS "230." 
.IF DEV EQ "SY" .GOTO 320
PIP TK:=SY:RSX11M.TSK,RSX11M.STB,TTDRV.*,LDR.TSK
.320:PIP TK:RSX11M.SYS/CO/NV/BL:'BLKS'=TK:RSX11M.TSK
SET /UIC=[1,24]
TIME	
ASN NL:=MP:

TKB @BOOBLD
TKB @MCRMUBLD
TKB @SAVBLD				!USES FULL DUPLEX MCR MODS
PIP MCR.OLB;1/DE
PIP MCR.OLB/RE=MCR.VLB
.IFF $RESLB TKB @ACNTBLD
.IFT $RESLB TKB @ACNTFCS.CMD		! BUILD ACNT WITH FCSRES
TKB @ACSBLD
.IFF $RESLB TKB @BROBLD
.IFT $RESLB TKB @BROFCSBLD
TKB @BTQBLD				! TASK TO DISPLAY BATCH QUEUE
.IFF $RESLB TKB @BYEBLD			! BYE WITHOUT FCSRES
.IFT $RESLB TKB @BYEFCSBLD		! BYE BUILT WITH FCSRES
.IFT $RESLB TKB @COTFCSBLD
.IFF $RESLB TKB @COTBLD
.IFF $RESLB TKB @CVLBLD			! CHANGE DISK VOLUME LABLES
.IFT $RESLB TKB @CVLFCSBLD		! CHANGE DISK VOLUME LABLES BUILT(FCSRES)
@DEFINE
TKB @DMOBLD
TKB @ERFBLD
.IFF $RESLB TKB @ERLBLD
.IFT $RESLB TKB @ERLFCSBLD
TKB @FCPLRGBLD
TKB @F11MSGBLD
.IFT $RESLB .IFF BIGEXC TKB @HELFCSBLD	! HELLO BUILT WITH FCSRES IF 16 K EXEC
.IFF $RESLB .OR .IFT BIGEXC TKB @HELBLD	! HELLO WITHOUT FCSRES
TKB @INDBLD
TKB @INIBLD
TKB @INSBLD
TKB @LOABLD
.IFF $RESLB TKB @LPPBLD
.IFT $RESLB TKB @LPPFCSBLD		! PRINT SYMBIONT WITH FCSRES
TKB @MAITSKBLD				! TASK TO NOTIFY USERS WHEN MAIL SENT
TKB @MCRUNBLD
TKB @MOUBLD
TKB @MTABLD
.IFF $RESLB TKB @PMDBLD
.IFT $RESLB TKB @PMDFCSBLD
TKB @PRTBLD				!BUILD PRT... WITH FCSMTA.OLB
.IFF $RESLB TKB @QMGBLD
.IFT $RESLB TKB @QMGFCSBLD		! QUEUE MANAGER WITH FCSRES
.IFF $RESLB TKB @QMGCLIBLD		! ...QUE WITHOUT FCSRES
.IFT $RESLB TKB @QMGCLIFCS		! ...QUE WITH FCSRES
TKB @QMGPRTBLD
TKB @RMDBLD				! BUILD A ONCE ONLY RMDEMO FOR 4014
TKB @RMD52BLD
TKB @SHFBLD
TKB @SHUTUPBLD
TKB @SPQBLD				! TASK TO DISPLAY SPOOL QUEUE
TKB @TKNBLD
.IFT $RESLB TKB @TTYDISFCS		! DISPLAY FULL DUPLEX TERMINAL STATUS(FCSRES)
.IFF $RESLB TKB @TTYDISBLD		! DISPLAY FULL DUPLEX TERMINAL STATUS
TKB @UFDBLD
TKB @UNLBLD
.IFF $RESLB TKB @UPDATEBLD		! ACCOUNT FILE DISK BLOCK USAGE UPDATE 
.IFT $RESLB TKB @UPDFCSBLD		! ACCOUNT FILE DISK BLOCK USAGE UPDATE (FCSRES)
PIP MCR.VLB/RE=MCR.OLB
; BUILD THE DATA ACQUISITION DEVICES LOADABLE DRIVERS
@[1,56]USRDRV2
; BUILD THE DEC LOADABLE DRIVERS(MM, CO:, DK:, TT?)
SET /UIC=[200,200]
.SETT $MAP
.SETF $UWD
.SETF $11S
.SETF $KMC
.SETT $X$DK
.SETT $$$DK
.SETT $X$MM
.SETT $$$MM
.SETT $X$CO
.SETT $$$CO
.SETT $X$TX
.SETT $X$ZL
.IFT $FDUP .SETT $FUD
.IFF $FDUP .SETF $FUD
.SETT $ALDRV
.SETT $LPR
.SETT $DRVMP
@SGNBLDDRV
; NOW RUN VIRTUAL MCR SO THAT YOU MAY INITIALIZE
; YOUR SYSTEM.
.730:SET /UIC=[200,200]
.740:; SYSGENZ COMPLETE  '<DATE>'    '<TIME>'