.;BASE4.COM
	.ENABLE SUBSTITUTION, GLOBAL
SET TERM NOQUIET
SET ERROR NONE
	.GOSUB KITBLD	.; Generate *B.COM kit builder command files
	.GOSUB AODT	.; Assemble ODT
	.GOSUB CUSPS	.; Assemble, link and build all CUSPS 
	.GOSUB SORCE	.; Copy source files from SRC to BIN
		
	.GOSUB STRIP	.; Strip sources and copy to BIN

	.GOSUB TESTS	.; Build SYSLIB/EMT Test Package

	; The master binary disk has been created successfully
	; with the exception of MDUP.AI, MDUP.MM, MDUP.MS, MDUP.MT,
	; MDUP.MU, MDUP.UP and RT11UP.SYS.
	;
	; These must be built manually and added to the binary
	; volume. ** THIS MUST BE DONE BEFORE THE BINARY KIT
	; CAN BE CONSIDERED COMPLETE **
	;
	; For instructions for building RT11UP.SYS and MDUP.%%
	; TYPE or PRINT the file MDUP.TXT.
	;
	; Good bye and good luck
	.EXIT


.KITBLD:
	.;Generate kit builder command files
	@KITBLD.COM

	.IF <EXSTAT> EQ <SUCCES> .RETURN
	;
	;Error generating kit builder command files
	.RETURN

.SORCE:
	.;Copy sources from SRC to BIN
	$@BASE41.COM

	.IF <EXSTAT> EQ <SUCCES> .RETURN
	;
	;Error copying sources from SRC to BIN
	.RETURN

.STRIP:
	.;Strip sources and put them on BIN
	$@BASE42.COM
	
	.IF <EXSTAT> EQ <SUCCES> .RETURN
	;
	;Error stripping sources from SRC to BIN
	.RETURN

.TESTS:
	.;Build SYSLIB/EMT Test Package
	$@SRC:BLDST.COM
	
	.IF <EXSTAT> EQ <SUCCES> .RETURN
	;
	;Error(s) building SYSLIB/EMT Test Package
	.RETURN

.CUSPS:
	.;Build all CUSPS
	$@BASE43.COM

	.IF <EXSTAT> EQ <SUCCES> .GOTO 10
	;
	;Error running BASE43.COM
.10:
	@SRC:KEDSUP.COM

	.IF <EXSTAT> EQ <SUCCES> .GOTO 20
	;
	;Error building KED and/or KEX
.20:
	.RETURN

.AODT:
	.;Assemble ODT
	;
	;The following assembly of ODT should get one error
	$@SRC:ODT.COM
	.RETURN