QUIET
IF DX THEN
GOTO DXBLD
END
IF DY THEN
GOTO DYBLD
END
IF DK THEN
GOTO DKBLD
END
IF DT THEN
GOTO DTBLD
END
IF DS THEN
GOTO DSBLD
END
IF DB THEN
GOTO DBBLD
END
IF DP THEN
GOTO DPBLD
END
IF DL THEN
GOTO DLBLD
END
IF DR THEN
GOTO DRBLD
END
IF DM THEN
GOTO DMBLD
END
IF MM THEN
PRINT
PRINT WARNING!  WARNING!  DATA ON
PRINT MM0 WILL BE DESTROYED!
PRINT TYPE CTRL-X TO CONTINUE
PRINT OR CTRL-C TO ABORT
WAIT
GOTO MMBLD
END
IF MT THEN
PRINT
PRINT WARNING!  WARNING!  DATA ON
PRINT MT0 WILL BE DESTROYED!
PRINT TYPE CTRL-X TO CONTINUE
PRINT OR CTRL-C TO ABORT
WAIT
GOTO MTBLD
END
IF MS THEN
PRINT
PRINT WARNING!  WARNING!  DATA ON
PRINT MS0 WILL BE DESTROYED!
PRINT TYPE CTRL-X TO CONTINUE
PRINT OR CTRL-C TO ABORT
WAIT
GOTO MSBLD
END
IF DD THEN
GOTO DDBLD
END
IF PD THEN
GOTO PDBLD
END
IF HELP THEN
QUIET
;XXBLD IS A BATCH CONTROL FILE THAT IS USED TO EITHER BUILD NEW
;XXDP+ MEDIA OR TO UPDATE OLD XXDP+ MEDIA WITH NEW SYSTEM FILES.
;ONLY RANDOM ACCESS DEVICES MAY BE UPDATED WITHOUT LOSS OF DATA.
;(YOU SHOULD BACK YOUR MEDIA UP BEFORE USING XXBLD, ANYWAY.)
;SEQUENTIAL ACCESS MEDIA (MAGTAPES) WILL BE ZEROED AS PART OF
;THE BUILD PROCESS.  YOU WILL RECEIVE A WARNING WHEN YOU TRY TO
;BUILD ONE OF THESE MEDIA SO THAT YOU CAN PROTECT YOUR DATA.
;
;THIS PROGRAM ASSUMES THAT THE MEDIA TO BE BUILT/UPDATED IS IN
;DRIVE 0 OF THE DEVICE AND THAT THIS BATCH FILE AND ALL XXDP+
;FILES ARE ON THE SYSTEM DEVICE (THE DEVICE BOOTED).
;
;TO USE THIS BATCH CONTROL FILE, USE THE FOLLOWING COMMAND:
;       C XXBLD/DEVICE/MODE
;
;WHERE:  DEVICE IS THE TWO CHARACTER MNEMONIC FOR THE DEVICE (E.G., DK).
;        MODE IS ONE OF THE FOLLOWING:
;             DEVICE  -  BUILD A BOOTABLE MEDIA WITH ALL DEVICE DRIVERS
;             MONITOR -    "   "    "       "    "    "  DEVICE MONITORS
;             UTILITY -    "   "    "       "    "    "  UTILITIES
;             SYSTEM  -  COMBINE THE FUNCTION OF THE ABOVE THREE MODES.
;        IF NO MODE IS SPECIFIED, A BOOTABLE MEDIA WILL BE BUILT WHICH
;        CONTAINS THE DIRECTORY UTILITY, UPD2, AND THE DRIVER FOR THAT MEDIA.
;
;EXAMPLE:  TO BUILD AN RL02 WITH ALL SYSTEM FILES:
;                C XXBLD/DL/SYSTEM
;
;EXAMPLE: TO BUILD A BOOTABLE RX02:
;                C XXBLD/DY
;
QUIT
END
QUIET
;ENTER FOLLOWING COMMAND FOR HELP:
;  C XXBLD/HELP
QUIT
DXBLD:
R UPD2
LOAD HMDX??.SYS
SAVM DX0:
FILE DX0:=HSAA??.SYS
FILE DX0:=HUDI??.SYS
FILE DX0:=HDDX??.SYS
FILE DX0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DX0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DX0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DX0:=UPD1.BI?
FILE DX0:=SETUP.BI?
FILE DX0:=PATCH.BI?
FILE DX0:=XTECO.BI?
FILE DX0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DX0:=HD????.SYS
FILE DX0:=HM????.SYS
FILE DX0:=UPD1.BI?
FILE DX0:=SETUP.BI?
FILE DX0:=PATCH.BI?
FILE DX0:=XTECO.BI?
FILE DX0:=DXCL.BI?
EXIT
END
QUIT
DYBLD:
R UPD2
LOAD HMDY??.SYS
SAVM DY0:
FILE DY0:=HSAA??.SYS
FILE DY0:=HUDI??.SYS
FILE DY0:=HDDY??.SYS
FILE DY0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DY0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DY0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DY0:=UPD1.BI?
FILE DY0:=SETUP.BI?
FILE DY0:=PATCH.BI?
FILE DY0:=XTECO.BI?
FILE DY0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DY0:=HD????.SYS
FILE DY0:=HM????.SYS
FILE DY0:=UPD1.BI?
FILE DY0:=SETUP.BI?
FILE DY0:=PATCH.BI?
FILE DY0:=XTECO.BI?
FILE DY0:=DXCL.BI?
EXIT
END
QUIT
DKBLD:
R UPD2
LOAD HMDK??.SYS
SAVM DK0:
FILE DK0:=HSAA??.SYS
FILE DK0:=HUDI??.SYS
FILE DK0:=HDDK??.SYS
FILE DK0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DK0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DK0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DK0:=UPD1.BI?
FILE DK0:=SETUP.BI?
FILE DK0:=PATCH.BI?
FILE DK0:=XTECO.BI?
FILE DK0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DK0:=HD????.SYS
FILE DK0:=HM????.SYS
FILE DK0:=UPD1.BI?
FILE DK0:=SETUP.BI?
FILE DK0:=PATCH.BI?
FILE DK0:=XTECO.BI?
FILE DK0:=DXCL.BI?
EXIT
END
QUIT
DKBLD:
R UPD2
LOAD HMDT??.SYS
SAVM DT0:
FILE DT0:=HSAA??.SYS
FILE DT0:=HUDI??.SYS
FILE DT0:=HDDT??.SYS
FILE DT0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DT0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DT0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DT0:=UPD1.BI?
FILE DT0:=SETUP.BI?
FILE DT0:=PATCH.BI?
FILE DT0:=XTECO.BI?
FILE DT0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DT0:=HD????.SYS
FILE DT0:=HM????.SYS
FILE DT0:=UPD1.BI?
FILE DT0:=SETUP.BI?
FILE DT0:=PATCH.BI?
FILE DT0:=XTECO.BI?
FILE DT0:=DXCL.BI?
EXIT
END
QUIT
DSBLD:
R UPD2
LOAD HMDS??.SYS
SAVM DS0:
FILE DS0:=HSAA??.SYS
FILE DS0:=HUDI??.SYS
FILE DS0:=HDDS??.SYS
FILE DS0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DS0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DS0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DS0:=UPD1.BI?
FILE DS0:=SETUP.BI?
FILE DS0:=PATCH.BI?
FILE DS0:=XTECO.BI?
FILE DS0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DS0:=HD????.SYS
FILE DS0:=HM????.SYS
FILE DS0:=UPD1.BI?
FILE DS0:=SETUP.BI?
FILE DS0:=PATCH.BI?
FILE DS0:=XTECO.BI?
FILE DS0:=DXCL.BI?
EXIT
END
QUIT
DBBLD:
R UPD2
LOAD HMDB??.SYS
SAVM DB0:
FILE DB0:=HSAA??.SYS
FILE DB0:=HUDI??.SYS
FILE DB0:=HDDB??.SYS
FILE DB0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DB0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DB0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DB0:=UPD1.BI?
FILE DB0:=SETUP.BI?
FILE DB0:=PATCH.BI?
FILE DB0:=XTECO.BI?
FILE DB0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DB0:=HD????.SYS
FILE DB0:=HM????.SYS
FILE DB0:=UPD1.BI?
FILE DB0:=SETUP.BI?
FILE DB0:=PATCH.BI?
FILE DB0:=XTECO.BI?
FILE DB0:=DXCL.BI?
EXIT
END
QUIT
DPBLD:
R UPD2
LOAD HMDP??.SYS
SAVM DP0:
FILE DP0:=HSAA??.SYS
FILE DP0:=HUDI??.SYS
FILE DP0:=HDDP??.SYS
FILE DP0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DP0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DP0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DP0:=UPD1.BI?
FILE DP0:=SETUP.BI?
FILE DP0:=PATCH.BI?
FILE DP0:=XTECO.BI?
FILE DP0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DP0:=HD????.SYS
FILE DP0:=HM????.SYS
FILE DP0:=UPD1.BI?
FILE DP0:=SETUP.BI?
FILE DP0:=PATCH.BI?
FILE DP0:=XTECO.BI?
FILE DP0:=DXCL.BI?
EXIT
END
QUIT
DLBLD:
R UPD2
LOAD HMDL??.SYS
SAVM DL0:
FILE DL0:=HSAA??.SYS
FILE DL0:=HUDI??.SYS
FILE DL0:=HDDL??.SYS
FILE DL0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DL0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DL0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DL0:=UPD1.BI?
FILE DL0:=SETUP.BI?
FILE DL0:=PATCH.BI?
FILE DL0:=XTECO.BI?
FILE DL0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DL0:=HD????.SYS
FILE DL0:=HM????.SYS
FILE DL0:=UPD1.BI?
FILE DL0:=SETUP.BI?
FILE DL0:=PATCH.BI?
FILE DL0:=XTECO.BI?
FILE DL0:=DXCL.BI?
EXIT
END
QUIT
DRBLD:
DRBLD:
R UPD2
LOAD HMDR??.SYS
SAVM DR0:
FILE DR0:=HSAA??.SYS
FILE DR0:=HUDI??.SYS
FILE DR0:=HDDR??.SYS
FILE DR0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DR0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DR0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DR0:=UPD1.BI?
FILE DR0:=SETUP.BI?
FILE DR0:=PATCH.BI?
FILE DR0:=XTECO.BI?
FILE DR0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DR0:=HD????.SYS
FILE DR0:=HM????.SYS
FILE DR0:=UPD1.BI?
FILE DR0:=SETUP.BI?
FILE DR0:=PATCH.BI?
FILE DR0:=XTECO.BI?
FILE DR0:=DXCL.BI?
EXIT
END
QUIT
QUIT
DMBLD:
R UPD2
LOAD HMDM??.SYS
SAVM DM0:
FILE DM0:=HSAA??.SYS
FILE DM0:=HUDI??.SYS
FILE DM0:=HDDM??.SYS
FILE DM0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DM0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DM0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DM0:=UPD1.BI?
FILE DM0:=SETUP.BI?
FILE DM0:=PATCH.BI?
FILE DM0:=XTECO.BI?
FILE DM0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DM0:=HD????.SYS
FILE DM0:=HM????.SYS
FILE DM0:=UPD1.BI?
FILE DM0:=SETUP.BI?
FILE DM0:=PATCH.BI?
FILE DM0:=XTECO.BI?
FILE DM0:=DXCL.BI?
EXIT
END
QUIT
MMBLD:
R UPD2
ZERO MM0:
Y
LOAD HMMM??.SYS
SAVE MM0:MMDP.SAV
LOAD HMMT??.SYS
SAVE MM0:MTDP.SAV
FILE MM0:/Q=HSAA??.SYS
FILE MM0:/Q=HUDI??.SYS
FILE MM0:/Q=HDMM??.SYS
FILE MM0:/Q=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE MM0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE MM0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE MM0:=UPD1.BI?
FILE MM0:=SETUP.BI?
FILE MM0:=PATCH.BI?
FILE MM0:=XTECO.BI?
FILE MM0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE MM0:=HD????.SYS
FILE MM0:=HM????.SYS
FILE MM0:=UPD1.BI?
FILE MM0:=SETUP.BI?
FILE MM0:=PATCH.BI?
FILE MM0:=XTECO.BI?
FILE MM0:=DXCL.BI?
EXIT
END
QUIT
MTBLD:
R UPD2
ZERO MT0:
Y
LOAD HMMT??.SYS
SAVE MT0:MTDP.SAV
LOAD HMMM??.SYS
SAVE MT0:MMDP.SAV
FILE MT0:/Q=HSAA??.SYS
FILE MT0:/Q=HUDI??.SYS
FILE MT0:/Q=HDMT??.SYS
FILE MT0:/Q=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE MT0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE MT0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE MT0:=UPD1.BI?
FILE MT0:=SETUP.BI?
FILE MT0:=PATCH.BI?
FILE MT0:=XTECO.BI?
FILE MT0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE MT0:=HD????.SYS
FILE MT0:=HM????.SYS
FILE MT0:=UPD1.BI?
FILE MT0:=SETUP.BI?
FILE MT0:=PATCH.BI?
FILE MT0:=XTECO.BI?
FILE MT0:=DXCL.BI?
EXIT
END
QUIT
MSBLD:
R UPD2
ZERO MS0:
Y
LOAD HMMS??.SYS
SAVE MS0:MSDP.SAV
FILE MS0:/Q=HSAA??.SYS
FILE MS0:/Q=HUDI??.SYS
FILE MS0:/Q=HDMS??.SYS
FILE MS0:/Q=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE MS0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE MS0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE MS0:=UPD1.BI?
FILE MS0:=SETUP.BI?
FILE MS0:=PATCH.BI?
FILE MS0:=XTECO.BI?
FILE MS0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE MS0:=HD????.SYS
FILE MS0:=HM????.SYS
FILE MS0:=UPD1.BI?
FILE MS0:=SETUP.BI?
FILE MS0:=PATCH.BI?
FILE MS0:=XTECO.BI?
FILE MS0:=DXCL.BI?
EXIT
END
QUIT
DDBLD:
R UPD2
LOAD HMDD??.SYS
SAVM DD0:
FILE DD0:=HSAA??.SYS
FILE DD0:=HUDI??.SYS
FILE DD0:=HDDD??.SYS
FILE DD0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE DD0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE DD0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE DD0:=UPD1.BI?
FILE DD0:=SETUP.BI?
FILE DD0:=PATCH.BI?
FILE DD0:=XTECO.BI?
FILE DD0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE DD0:=HD????.SYS
FILE DD0:=HM????.SYS
FILE DD0:=UPD1.BI?
FILE DD0:=SETUP.BI?
FILE DD0:=PATCH.BI?
FILE DD0:=XTECO.BI?
FILE DD0:=DXCL.BI?
EXIT
END
QUIT
PDBLD:
R UPD2
LOAD HMPD??.SYS
SAVM PD0:
FILE PD0:=HSAA??.SYS
FILE PD0:=HUDI??.SYS
FILE PD0:=HDPD??.SYS
FILE PD0:=UPD2.BI?
EXIT
IF DRIVER THEN
R UPD2
FILE PD0:=HD????.SYS
EXIT
END
IF MONITOR THEN
R UPD2
FILE PD0:=HM????.SYS
EXIT
END
IF UTILITY THEN
R UPD2
FILE PD0:=UPD1.BI?
FILE PD0:=SETUP.BI?
FILE PD0:=PATCH.BI?
FILE PD0:=XTECO.BI?
FILE PD0:=DXCL.BI?
EXIT
END
IF SYSTEM THEN
R UPD2
FILE PD0:=HD????.SYS
FILE PD0:=HM????.SYS
FILE PD0:=UPD1.BI?
FILE PD0:=SETUP.BI?
FILE PD0:=PATCH.BI?
FILE PD0:=XTECO.BI?
FILE PD0:=DXCL.BI?
EXIT
END
QUIT
Q