MD0:SYSGEN.CMD;2=KT0:[200,200]SYSGEN.CMD/-AU/-BF
\
-16,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/E$$DVC,ERL=4/,,/;GACMOD/
	.IIF DF E$$NAB,DV.MBC=0	;IF ENABLE MMU, NO 11/70 MASSBUS SUPPORT
-/$DEVTB::/,.,/;GACMOD/
-/3190:/
-/PIP TTDRV.OBJ/,,/;GACMOD/
.IFT $FUD PIP /NV=['$UIC',2'$GRP']*.TTZ
-/.MG:/
-/PIP RSX11/,.,/;GACMOD/
.IFF $MLH PIP RSX11'$SYS'.OBS;*/DE/NM,TTDRV.OBJ;*,['$UIC',2'$GRP']*.OBJ;*,*.TTY;*,*.TTZ;*
/
MD0:SGNEXEC.CMD;2=KT1:[200,200]SGNEXEC.CMD/-AU/-BF
\
-19,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/.;LOADABLE DRIVERS/
-/.ASK $LOD 15./,.,/;GACMOD/
.SETT $LOD
-/.ASK $LLD 16./,.,/;GACMOD/
.IFT $LOD .SETT $LLD
-/$GTWRD/
-/.IFF $UWD...739/,.,/;GACMOD/
-/$PTWRD/
-/.IFF $UWD...739/,.,/;GACMOD/
/
MD0:SGNBLDDRV.CMD;2=KT0:[200,200]SGNBLDDRV.CMD/-AU/-BF
\
-17,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/"MS"/+1,,/;GACMOD/
.SETS TEMPS "NL"
.IFDF $X$NL .GOSUB 'SUB'
-/.OPEN...DRVBLD.CMD/
-/LB:['$SYGRP'...'TEMPS2'DRV/,.,/;GACMOD/
LB:['$SYGRP',2'$GRP']'SYS'/LB:'TEMPS2'DRV:'TEMPS'TAB
/
MD0:SGNPER.CMD;2=KT1:[200,200]SGNPER.CMD/-AU/-BF
\
-22,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/.AD'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.ADDCB
-/.AF'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.AFDCB
-/.AR'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.ARDCB
-/.LA'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.LADCB
-/.LS'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.LSDCB
-/.UD0::/+1,.,/;GACMOD/
	.WORD	.UDDCB
-/.XB'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XBDCB
-/.XE'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XEDCB
-/.XL'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XLDCB
-/.XM'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XMDCB
-/.XP'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XPDCB
-/.XQ'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XQDCB
-/.XU'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XUDCB
-/.XW'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.XWDCB
-/.CR'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.CRDCB
-/.BYTE...0,0/,.,/;GACMOD
	.BYTE	0,US.MDE
-/.GR0::/+1,.,/;GACMOD/
	.WORD	.GRDCB
-/.LP'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.LPDCB
-/.PP'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.PPDCB
-/.PR'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.PRDCB
-/.DB'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DBDCB
-/.DD'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DDDCB
-/.DF'TEMPN'::/+1,.,/;GACMOD/
	.WORD	.DFDCB
-/.DK'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DKDCB
-/.DL'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DLDCB
-/.DM'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DMDCB
-/.DP'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DPDCB
-/.DR'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DRDCB
-/.DS'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DSDCB
-/.DT'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DTDCB
-/.DU'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DUDCB
-/.DX'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DXDCB
-/.DY'UNIT'::/+1,.,/;GACMOD/
	.WORD	.DYDCB
-/.EM'UNIT'::/+1,.,/;GACMOD/
	.WORD	.EMDCB
-/.CT'UNIT'::/+1,.,/;GACMOD/
	.WORD	.CTDCB
-/.MF'UNIT'::/+1,.,/;GACMOD/
	.WORD	.MFDCB
-/.MM'UNIT'::/+1,.,/;GACMOD/
	.WORD	.MMDCB
-/.MS'UNIT'::/+1,.,/;GACMOD/
	.WORD	.MSDCB
-/.MT'UNIT'::/+1,.,/;GACMOD/
	.WORD	.MTDCB
-/.CO0::/+1,.+1,/;GACMOD/
	.WORD	.CODCB
	.WORD	.-2
-/.;TT/+1,,/;GACMOD/
.TTAGN:
.ASKS $TTVAR Specify TTDRV system variant prefix
-/$NYJ/,,/;GACMOD/
.IF $TTVAR NE "" .ASKN [1:'YL.':'YL.'] $NYL Number of DL11s in this system
.IF $TTVAR NE "" .ASKN [0:'YH.':'YH.'] $NYH Number of DH11s in this system
.IF $TTVAR NE "" .ASKN [0:'YV.':'YV.'] $NYV Number of DHU11/DHV11s in this system
.IF $TTVAR NE "" .ASKN [0:'YZ.':'YZ.'] $NYZ Number of DZ11s in this system
.IF $TTVAR NE "" .ASKN [0:'YJ.':'YJ.'] $NYJ Number of DJ11s in this system
-/.IF YL GT 0/,.+9,/;GACMOD/
.IF $NYL GT 0 .IF TEMPS NE "" .SETS TEMPS TEMPS+", "
.IF $NYL GT 0 .SETS TEMPS TEMPS+"YL"
.IF $NYH GT 0 .IF TEMPS NE "" .SETS TEMPS TEMPS+", "
.IF $NYH GT 0 .SETS TEMPS TEMPS+"YH"
.IF $NYV GT 0 .IF TEMPS NE "" .SETS TEMPS TEMPS+", "
.IF $NYV GT 0 .SETS TEMPS TEMPS+"YV"
.IF $NYZ GT 0 .IF TEMPS NE "" .SETS TEMPS TEMPS+", "
.IF $NYZ GT 0 .SETS TEMPS TEMPS+"YZ"
.IF $NYJ GT 0 .IF TEMPS NE "" .SETS TEMPS TEMPS+", "
.IF $NYJ GT 0 .SETS TEMPS TEMPS+"YJ"
-/.;DL/
-/.IF YL EQ 0/,.,/;GACMOD/
.IF $NYL EQ 0 .GOTO YL100
-/.IF TEMPN LT YL/,.,/;GACMOD/
.IF TEMPN LT $NYL .GOTO DALE1
-/.IF YH EQ 0/,.,/;GACMOD/
.IF $NYH EQ 0 .GOTO YH100
-/.IF TEMPN LT YH/,.,/;GACMOD/
.IF TEMPN LT $NYH .GOTO DALE2
-/.IF YV EQ 0/,.,/;GACMOD/
.IF $NYV EQ 0 .GOTO YV100
-/.IF TEMPN LT YV/,.,/;GACMOD/
.IF TEMPN LT $NYV .GOTO DALE3
-/.IF YJ EQ 0/,.,/;GACMOD/
.IF $NYJ EQ 0 .GOTO YJ100
-/.IF TEMPN LT YJ/,.,/;GACMOD/
.IF TEMPN LT $NYJ .GOTO DALE4
-/.IF YZ EQ 0/,.,/;GACMOD/
.IF $NYZ EQ 0 .GOTO YZ100
-/.IF TEMPN LT YZ/,.,/;GACMOD/
.IF TEMPN LT $NYZ .GOTO DALE5
-/@...SGNTT/,,/;GACMOD/
.SETF AGN
.IF $TTVAR NE "" .ASK AGN Generate another terminal driver device configuration
.IF $TTVAR NE "" .IFT AGN .GOTO TTAGN
-/.NL:/
-/.SETF LOD/,.,/;GACMOD/
.IFT $LOD .GOSUB PRMBLD
.SET'$LOD' LOD
-/.NL0::/+1,.,/;GACMOD/
	.WORD	.NLDCB
-/.ENABLE DATA #2/,.,/;GACMOD/
.CLOSE #2
.OPENA #2 '$EXC'['$UIC',10]NLTAB.MAC
.ENABLE DATA #2
-/.DISABLE DATA #2/,,/;GACMOD/
.CLOSE #2
.OPENA #2 '$EXC'['$UIC',10]SYSTB.MAC
-/.ENABLE DATA #2/,,/;GACMOD/
$DEVTB::
-/.ANSGET:/,,/;GACMOD/
.IFT REPEAT .IFDF DN'DEV''NN' .ERASE DN'DEV''NN'
-/.IFT $SAVED/,,/;GACMOD/
.IFDF DN'DEV''NN' .GOTO PARZ6
-/.MES0:/
-/.IFT $SAVE/,.,/;GACMOD/
.IFT $SAVE .IFNDF DN'DEV''NN' .DATA .SETS $$'DEV''NN' "'STR'"
-/.ZEX:/,,/;GACMOD/
.SETT DN'DEV''NN'
-/.GOTO ANSGET/,.+1,/;GACMOD/
.SETF TRMDEV
.IF DEV EQ "DH" .SETT TRMDEV
.IF DEV EQ "DH" .SETS TDEV "YH"
.IF DEV EQ "DHU" .OR .IF DEV EQ "DHV" .SETT TRMDEV
.IF DEV EQ "DHU" .OR .IF DEV EQ "DHV" .SETS TDEV "YV"
.IF DEV EQ "DJ" .SETT TRMDEV
.IF DEV EQ "DJ" .SETS TDEV "YJ"
.IF DEV EQ "DZ" .SETT TRMDEV
.IF DEV EQ "DZ" .SETS TDEV "YZ"
.IF DEV EQ "YL" .SETT TRMDEV
.IF DEV EQ "YL" .SETS TDEV "YL"
.IFF TRMDEV .IF N LT 'DEV' .GOTO ANSGET
.IFF TRMDEV .GOTO NOTTRM
.IF N LT $N'TDEV' .GOTO ANSGET
.NOTTRM:.IFF ASKLOD .OR .IFF LOD .GOTO ZAP
-/.DCB:/
-/.LDABLE:/
-/.SETS TEMPS4 ""/,,/;GACMOD/
.SETS TEMPS5 ""
.IF $ALD NE "NL:" .SETS TEMPS5 ",'$LST''DEV'TAB'TEMPS3''$SPL'"
-/$XEPRE/,.,/;GACMOD/
.DATA #3 '$DIR''DEV'DRV'TEMPS4'='$XEPRE','$DRV'XEDRV
.DATA #3 '$DIR''DEV'TAB'TEMPS5'='$XEPRE','$DRV'XETAB
-/.IFF KMC....DATA #3/,,/;GACMOD/
.IFF KMC	.DATA #3 '$DIR''DEV'TAB'TEMPS5'='$PREFX','$DRV''DEV'TAB
-/.DYCOM:/+1
.CLOSE #2
.OPEN #2 '$EXC'['$UIC',10]'DEV'TAB.MAC
.ENABLE DATA #2
	.TITLE	'DEV'TAB
	.IDENT	/M4.1/
;
;		COPYRIGHT (c) 1983 BY
;	DIGITAL EQUIPMENT CORPORATION, MAYNARD
;	 MASSACHUSETTS.  ALL RIGHTS RESERVED.
; 
; THIS  SOFTWARE  IS FURNISHED UNDER A LICENSE AND MAY
; BE USED AND  COPIED  ONLY  IN  ACCORDANCE  WITH  THE
; TERMS  OF SUCH LICENSE AND WITH THE INCLUSION OF THE
; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR ANY  OTHER
; COPIES  THEREOF  MAY  NOT  BE  PROVIDED OR OTHERWISE
; MADE AVAILABLE TO ANY OTHER  PERSON.   NO  TITLE  TO
; AND OWNERSHIP OF THE SOFTWARE IS HEREBY TRANSFERRED.
; 
; THE  INFORMATION  IN  THIS  SOFTWARE  IS  SUBJECT TO
; CHANGE WITHOUT NOTICE AND SHOULD  NOT  BE  CONSTRUED
; AS  A  COMMITMENT  BY DIGITAL EQUIPMENT CORPORATION.
; 
; DIGITAL ASSUMES NO RESPONSIBILITY  FOR  THE  USE  OR
; RELIABILITY  OF  ITS  SOFTWARE  ON EQUIPMENT THAT IS
; NOT SUPPLIED BY DIGITAL.
;
;  
; VERSION M4.1  BASELEVEL '$BASEL''$BLREV'
;
; CREATED BY SYSGEN VERSION '$PHAS1'
;
; 'DEV'DRV DEVICE DRIVER TABLES
;
; MACRO LIBRARY CALLS
;
	.MCALL	HWDDF$,SCBDF$,UCBDF$,CLKDF$
	HWDDF$			;DEFINE HARDWARE REGISTERS
	SCBDF$	,,SYSDEF	;DEFINE SCB OFFSETS
	UCBDF$	,,TTDEF		;DEFINE UCB OFFSETS
	CLKDF$			;DEFINE CLOCK QUEUE OFFSETS
;
; LOCAL ASSIGNMENTS
;
	UMD=0
	.IIF DF	D$$IAG,UMD=400	;DIAGNOSTIC FUNCTIONS BECOME LEGAL
	ERL=0
	.IIF DF E$$DVC,ERL=4
	.IIF DF E$$NAB,DV.MBC=0	;IF ENABLE MMU, NO 11/70 MASSBUS SUPPORT
;
; 'DEV' DEVICE TABLES
;
	.PSECT	......
$'DEV'DAT::
.DISABLE DATA #2
-/.DC'$DCBN':/,.+1,/;GACMOD/
.'DEV'DCB::
	.WORD	0
-/SCBIC:/
-/.DATA #2...PSECT/,.,/;GACMOD/
			.DATA #2	.PSECT	......
-/.;RETURN TO DEVICE OPERATION/
-/.RETN:/,.,/;GACMOD/
.RETN: .ENABLE DATA #2
$'DEV'END::
	.END
.DISABLE DATA #2
.CLOSE #2
.OPENA #2 '$EXC'['$UIC',10]SYSTB.MAC
.RETURN
-/.PSEDEV:/
-/.WORD...'ACTDEV'0/,.,/;GACMOD/
	.WORD	.-2
/
MD0:SGNTT.CMD;2=KT1:[200,200]SGNTT.CMD/-AU/-BF
\
-7,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/.SETN CDV 14/,,/;GACMOD/
	.CLOSE #2
	.OPEN #2 '$DRV'['$UIC',10]TTTAB'$TTVAR'.MAC
	.ENABLE DATA #2
	.TITLE	TTTAB
	.IDENT	/M4.1/
;
;		COPYRIGHT (c) 1983 BY
;	DIGITAL EQUIPMENT CORPORATION, MAYNARD
;	 MASSACHUSETTS.  ALL RIGHTS RESERVED.
; 
; THIS  SOFTWARE  IS FURNISHED UNDER A LICENSE AND MAY
; BE USED AND  COPIED  ONLY  IN  ACCORDANCE  WITH  THE
; TERMS  OF SUCH LICENSE AND WITH THE INCLUSION OF THE
; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR ANY  OTHER
; COPIES  THEREOF  MAY  NOT  BE  PROVIDED OR OTHERWISE
; MADE AVAILABLE TO ANY OTHER  PERSON.   NO  TITLE  TO
; AND OWNERSHIP OF THE SOFTWARE IS HEREBY TRANSFERRED.
; 
; THE  INFORMATION  IN  THIS  SOFTWARE  IS  SUBJECT TO
; CHANGE WITHOUT NOTICE AND SHOULD  NOT  BE  CONSTRUED
; AS  A  COMMITMENT  BY DIGITAL EQUIPMENT CORPORATION.
; 
; DIGITAL ASSUMES NO RESPONSIBILITY  FOR  THE  USE  OR
; RELIABILITY  OF  ITS  SOFTWARE  ON EQUIPMENT THAT IS
; NOT SUPPLIED BY DIGITAL.
;
;  
; VERSION M4.1  BASELEVEL '$BASEL''$BLREV'
;
; CREATED BY SYSGEN VERSION '$PHAS1'
;
; TTDRV DEVICE DRIVER TABLES
;
; MACRO LIBRARY CALLS
;
	.MCALL	HWDDF$,SCBDF$,UCBDF$,CLKDF$
	HWDDF$			;DEFINE HARDWARE REGISTERS
	SCBDF$	,,SYSDEF	;DEFINE SCB OFFSETS
	UCBDF$	,,TTDEF		;DEFINE UCB OFFSETS
	CLKDF$			;DEFINE CLOCK QUEUE OFFSETS
;
; LOCAL ASSIGNMENTS
;
	UMD=0
	.IIF DF	D$$IAG,UMD=400	;DIAGNOSTIC FUNCTIONS BECOME LEGAL
	ERL=0
	.IIF DF E$$DVC,ERL=4
;
; TT DEVICE TABLES
;
	.PSECT	......
$TTDAT::
.DISABLE DATA #2
-/.DATA #1 D$$L11='NCONTR.'/,.,/;GACMOD/
	.IFNDF $YLDON .DATA #1 D$$L11='NCONTR.'		;DL11 A/B/C/D LINE INTERFACES
-/.DATA #1 D$$H11='NCONTR.'/,.,/;GACMOD/
	.IFNDF $YHDON .DATA #1 D$$H11='NCONTR.'		;DH11 ASYNCHRONOUS LINE MULTIPLEXERS
-/.ENABLE DATA #1/,.,/;GACMOD/
	.IFDF $YHDON .GOTO YH11
	.ENABLE DATA #1
-/.DATA #1 D$$M11='NDM.'/,.,/;GACMOD/
	.IFNDF $YHDON .DATA #1 D$$M11='NDM.'		;DM11BB MODEM CONTROL INTERFACES
-/.DATA #1 D$$J11='NCONTR.'/,.,/;GACMOD/
	.IFNDF $YJDON .DATA #1 D$$J11='NCONTR.'		;DJ11 ASYNCHRONOUS LINE MULTIPLEXERS
-/.DATA #1 D$$V11='NCONTR.'/,.,/;GACMOD/
	.IFNDF $YVDON .DATA #1 D$$V11='NCONTR.'		;DHU11/DHV11 ASYNCHRONOUS LINE MULTIPLEXERS
-/.ENABLE DATA #1/,.,/;GACMOD/
	.IFDF $YVDON .GOTO YV11
	.ENABLE DATA #1
-/.DISABLE DATA #1/+1,.,/;GACMOD/
.YV11:
-/.DATA #1 D$$VMD=0/,.,/;GACMOD/
	.IFNDF $YVDON .DATA #1 D$$VMD=0			;DHU11/DHV11 MODEM CONTROL
-/.DATA #1 D$$Z11='NCONTR.'/,.,/;GACMOD/
	.IFNDF $YZDON .DATA #1 D$$Z11='NCONTR.'	;DZ11 ASYNCHRONOUS LINE MULTIPLEXERS
-/.DATA #1 D$$ZMD=0/,.,/;GACMOD/
	.IFNDF $YZDON .DATA #1 D$$ZMD=0		;DZ11 MODEM SUPPORT
-/.YZ100:/,,/;GACMOD/
	.ENABLE DATA #2
.DC'$DCBN'=0
$TTEND::
	.END
.DISABLE DATA #2
	.CLOSE #2
	.OPENA #2 '$EXC'['$UIC',10]SYSTB.MAC
-/.ENABLE DATA #2/,.,/;GACMOD/
	.IFDF $TTDON .GOTO NOCLKQ
	.ENABLE DATA #2
-/.SETS TEMPS3 ""/,.,/;GACMOD/
.NOCLKQ:.SETS TEMPS3 ""
-/LI:TTM"/,,/;GACMOD/
	.IFDF $TTDON .GOTO DBONLY
-/.SETS TEMPS "TTYH"/,.+8,/;GACMOD/
.DBONLY:.SETS TEMPS "TTYH"
	.IF $NYH NE 0 .IFNDF $YHDON .GOSUB FUDASM
	.SETS TEMPS "TTYHV"
	.IF $NYH NE 0 .IFNDF $YHDON .GOSUB FUDASM
	.IF $NYH NE 0 .SETT $YHDON
	.SETS TEMPS "TTYJ"
	.IF $NYJ NE 0 .IFNDF $YJDON .GOSUB FUDASM
	.IF $NYJ NE 0 .SETT $YJDON
	.SETS TEMPS "TTYL"
	.IF $NYL NE 0 .IFNDF $YLDON .GOSUB FUDASM
	.IF $NYL NE 0 .SETT $YLDON
	.SETS TEMPS "TTYZ"
	.IF $NYZ NE 0 .IFNDF $YZDON .GOSUB FUDASM
	.IF $NYZ NE 0 .SETT $YZDON
	.SETS TEMPS "TTTAB'$TTVAR'"
-/.FUDASM:/,,/;GACMOD/
	.SETS TEMPS2 ""
	.TEST TEMPS
	.IF <STRLEN> GE 5 .SETS TEMPS2 TEMPS[1:5]
	.SETS TMPEXT ".TTY"
	.IF TEMPS2 EQ "TTTAB" .SETS TMPEXT ".TTZ"
-/.TTY/,.,/;GACMOD/
	.DATA #3 '$DIR''TEMPS''TMPEXT''TEMPS2'='$PREFX','$DRV'TTMAC,'TEMPS'
-/.PENNI:/
-/.OPEN #0/,.,/;GACMOD/
	.IFNDF $TTDON .OPEN #0 TTDRVBLD.CMD
	.IFDF $TTDON .OPENA #0 TTDRVBLD.CMD
-/.ENABLE DATA #0/+1,.,/;GACMOD/
'$UICMS'TTDRV'$TTVAR'/-MM/-HD/-FP,'$MPD'['$SYGRP',34]TTDRV'$TTVAR''TEMPS''$SPL',SY:'$UICMS'TTDRV'$TTVAR'=
-/LB:['$SYGRP',24]...TTYH/,.+1,/;GACMOD/
LB:['$SYGRP',24]TTDRV/LB:TTMIS:TTMOD:TTODN:TTOIS:TTRW:TTSUB:TTTBL
.DISABLE DATA #0
	.IF $NYH NE 0 .IFF $QBUS .DATA #0 LB:['$SYGRP',24]TTDRV/LB:TTYH
	.IF $NYH NE 0 .IFT $QBUS .DATA #0 LB:['$SYGRP',24]TTDRV/LB:TTYHV
	.IF $NYJ NE 0 .DATA #0 LB:['$SYGRP',24]TTDRV/LB:TTYJ
	.IF $NYL NE 0 .DATA #0 LB:['$SYGRP',24]TTDRV/LB:TTYL
	.IF $NYZ NE 0 .DATA #0 LB:['$SYGRP',24]TTDRV/LB:TTYZ
	.ENABLE DATA #0
LB:['$SYGRP',24]TTTAB'$TTVAR'.TTZ
-/GBLPAT=TTATT/,,/;GACMOD/
.DISABLE DATA #0
.;
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHSTAX:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHABOX:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHRESX:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHSTOX:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHPWUP:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHMTIM:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHCPUP:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHUPUP:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHCONL:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHCOFF:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHUONL:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHUOFF:0
.IF $NYH EQ 0 .IFF $QBUS .DATA #0 GBLDEF=YHLPAR:0
.;
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVSTAX:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVABOX:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVRESX:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVSTOX:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVPWUP:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVMTIM:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVCPUP:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVUPUP:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVCONL:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVCOFF:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVUONL:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVUOFF:0
.IF $NYH EQ 0 .IFT $QBUS .DATA #0 GBLDEF=YVLPAR:0
.;
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJABOX:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJSTOX:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJPWUP:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJMTIM:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJCPUP:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJUPUP:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJCONL:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJCOFF:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJUONL:0
.IF $NYJ EQ 0 .DATA #0 GBLDEF=YJUOFF:0
.;
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLSTAX:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLABOX:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLRESX:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLSTOX:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLPWUP:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLMTIM:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLCPUP:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLUPUP:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLCONL:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLCOFF:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLUONL:0
.IF $NYL EQ 0 .DATA #0 GBLDEF=YLUOFF:0
.;
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZABOX:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZSTOX:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZPWUP:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZMTIM:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZCPUP:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZUPUP:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZCONL:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZCOFF:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZUONL:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZUOFF:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZLPAR:0
.IF $NYZ EQ 0 .DATA #0 GBLDEF=YZPOLL:0
.;
.ENABLE DATA #0
-/.CLOSE #0/,,/;GACMOD/
	.SETT $TTDON
-/.DCB:/
-/.DATA #1 LD$TT=0/,.,/;GACMOD/
	.IFNDF $TTDON .DATA #1 LD$TT=0			;LOADABLE TTDRV
-/.SCB30:/
-/.PSECT/,.,/;GACMOD/
	.PSECT	......
/
MD0:SYSGEN2.CMD;2=KT0:[200,200]SYSGEN2.CMD/-AU/-BF
\
-18,,/;GACMOD/
.;
.; Modified by Carl Mickelson, Goodyear Aerospace Corp
.;          to support loadable device driver data bases
.;
%
-/.185A0:/,.+1,/;GACMOD/
.185A0:.IFT $MLH .GOTO 185A2
;
; System image and symbol table files can be created for each system
; variant specified during terminal driver configuration.  Simply
; list the variant names separated by commas in response to the next
; question.
;
.ASKS ALLVAR List the system variant names
.SETS VARLST ALLVAR
.185A1:
.PARSE VARLST "," VARI VARLST
PIP RSX11'$SYS''VARI'.SYS/CO/NV/BL:'BLKS'.=RSX11'$SYS'.TSK
.IF VARI NE "" PIP RSX11'$SYS''VARI'.STB/NV=RSX11'$SYS'.STB
.IF VARLST NE "" .GOTO 185A1
.185A2:.IFF $MLH ;
-/.730:/
-/"MCM"/,,/;GACMOD/
.IFT $MUP .INC NDX
.IFT $MUP .SETS $TSK'NDX' "TDX"
-/.PATTI:/
-/.OPEN SYSVMR.CMD/,.+1,/;GACMOD/
.SETS VARLST ALLVAR
.PATTI1:
.PARSE VARLST "," VARI VARLST
.OPEN SYSVMR'VARI'.CMD
	.DATA RSX11'$SYS''VARI'
-/MAIN=DRVPAR/+1,.+37,/;GACMOD/
.SETF DBLDED
.SETF DDLDED
.SETF DFLDED
.SETF DKLDED
.SETF DLLDED
.SETF DMLDED
.SETF DPLDED
.SETF DRLDED
.SETF DSLDED
.SETF DTLDED
.SETF DULDED
.SETF DXLDED
.SETF DYLDED
.SETF EMLDED
.SETF ADLDED
.SETF AFLDED
.SETF ARLDED
.SETF CRLDED
.SETF CTLDED
.SETF IPLDED
.SETF LALDED
.SETF LPLDED
.SETF LSLDED
.SETF MFLDED
.SETF MMLDED
.SETF MTLDED
.SETF MSLDED
.SETF PPLDED
.SETF PRLDED
.SETF TTLDED
.SETF XBLDED
.SETF XELDED
.SETF XLLDED
.SETF XMLDED
.SETF XPLDED
.SETF XQLDED
.SETF XULDED
.SETF XWLDED
.SETF COLDED
.SETF NLLDED
;
; List the device names (without ":") that are to be installed by VMR in
; the RSX11'$SYS''VARI' system.  Include NL and CO if required for a
; particular system.
;
.ASKS VMRDVL VMR loaded drivers for RSX11'$SYS''VARI'
.PATTI2:
.PARSE VMRDVL "," VMRDV VMRDVL
.IF VMRDV EQ "" .GOTO PATTI3
.IFDF $'VMRDV' .DATA LOA 'VMRDV':
.IFDF $'VMRDV' .SETT 'VMRDV'LDED
.GOTO PATTI2
.PATTI3:
-/[1,1]ISCOM/,,/;GACMOD/
.SETN $ICLOC 0
.SETN $IPLOC 0
.SETN $UDLOC 0
.SETN $ISLOC 0
-/INS COT/,.+5,/;GACMOD/
.IF CO GT 0 .IFT COLDED .DATA INS COT		! INSTALL CO DRIVER TASK
.IFT $PRN .IFT LPLDED .DATA INS QMG
.IFT $PRN .IFT LPLDED .DATA INS QMGCLI
.IFT $PRN .IFT LPLDED .DATA INS QMGCLI/TASK=...PRI/CKP=NO
.IFT $PRN .IFT LPLDED .DATA INS QMGPRT
.IFT $PRN .IFT LPLDED .DATA INS LPP
-/INS F11MSG/,.+2,/;GACMOD/
.IFT $ANM .AND .IFT MFLDED .OR .IFT MMLDED .OR .IFT MSLDED .OR .IFT MTLDED .DATA INS F11MSG	! MAGTAPE ERROR PROCESSOR
.IFT $ANM .AND .IFT MFLDED .OR .IFT MMLDED .OR .IFT MSLDED .OR .IFT MTLDED .DATA INS MTAACP	! ANSI MAGTAPE ACP
.IFT $ANM .AND .IFT MFLDED .OR .IFT MMLDED .OR .IFT MSLDED .OR .IFT MTLDED .DATA INS MAG		! MAGTAPE ACP CONTROL TASK
-/INS PRT/,.,/;GACMOD/
.IFT $PRT .IFT LPLDED .DATA INS PRT		! INSTALL PRINT SPOOLER
-/INS RCT/,.,/;GACMOD/
.IFDF $DU .IFT DULDED .DATA INS RCT		! INSTALL UDA50 (DU:) INTERFACE TASK
-/INS UML/,.,/;GACMOD/
.IFDF $XE .IFT XELDED .DATA INS UML		! INSTALL DEUNA RING HANDLING ROUTINES
-/INS LPINIT/,.+2,/;GACMOD/
.IFT $KMC .IFT LPLDED .DATA INS LPINIT		! INSTALL KMC-11 uCODE LOADER
.IFT $LPA11 .IFT LPLDED .DATA INS LAINIT	! INSTALL LPA11 MICRO CODE LOADER
.IFT $LPA11 .IFT LPLDED .DATA INS LAIN0		! INSTALL LPA11 LOADER REQUESTOR FOR UNIT 0
-/.935:/,,/;GACMOD/
.IF VARLST NE "" .GOTO PATTI1
-/.950/
-/.GOTO CONTNU/,.,/;GACMOD/
.SETS VARI ""
.IF ALLVAR EQ "" .GOTO 9501
;
; Before running VMR on any of the system images created earlier, it is
; necessary to select which terminal driver will be used in a given system.
; This is done by copying the selected terminal driver task image and
; symbol table files to TTDRV.TSK and TTDRV.STB and then running VMR to
; load the proper terminal driver for the bootable system hardware
; configuration.  For example:
;
; PIP SY:[1,5'$GRP']TTDRV.TSK/NV/CD=SY:[1,5'$GRP']TTDRVxyz.TSK
;     and
; PIP SY:[1,5'$GRP']TTDRV.STB/NV/CD=SY:[1,5'$GRP']TTDRVxyz.STB
; 
; After running VMR on the system image, the TTDRV.TSK and TTDRV.STB files
; can be deleted.  However DO NOT DELETE the TTDRVxyz files.
;
; Note that it is necessary to perform this driver selection operation for any
; system image to be VMRed since the SYSGEN procedure has not produced a
; TTDRV.TSK or TTDRV.STB file for a multiple configuration SYSGEN.
;
; The answer to the next question should be the system variant name to
; be used to VMR the system on which this SYSGEN procedure is being conducted.
;
.ASKS [0:3] VARI Specify system terminal configuration variant name
.9501:.IF <SYSTEM> EQ 6 .GOTO CONTNU
-/VMR @SYSVMR/,.,/;GACMOD/
.IFT $MLH .OR .IFT $ONL .GOTO CONTNU
.SETS CURUIC "'<UIC>'"
SET /UIC=[1,5'$GRP']
PIP SY:[1,5'$GRP']TTDRV.TSK/NV/CD=SY:[1,5'$GRP']TTDRV'VARI'.TSK
PIP SY:[1,5'$GRP']TTDRV.STB/NV/CD=SY:[1,5'$GRP']TTDRV'VARI'.STB
SET /UIC='CURUIC'
.IFINS VMR VMR @SYSVMR'VARI'
SET /UIC=[1,5'$GRP']
PIP SY:[1,5'$GRP']TTDRV.TSK;0/DE
PIP SY:[1,5'$GRP']TTDRV.STB;0/DE
SET /UIC='CURUIC'
/