DEFM
$OPTION COMMAND
!MODE SIMM
$NOTE MOUNT NBCC RELEASE 1.2.0 TAPE AND MAKE DRIVE READY
$NOTE HIT ENTER WHEN READY
SET %99
SET %SAMP Y
SET %DOCS Y
SET %TAPE M91000
$NOTE DO YOU WISH TO INSTALL THE OPTIONAL C SAMPLE PROGRAMS (cr = Y)
SET %99
IFA %99 GOTO NEXT1
IFT %99 EQ Y GOTO NEXT1
$NOTE SKIPPING SAMPLE PROGRAMS
SET %SAMP N
%NEXT1
$NOTE DO YOU WISH TO INSTALL THE OPTIONAL ON-LINE C DOC FILES (cr = Y)
SET %99
IFA %99 GOTO NEXT2
IFT %99 EQ Y GOTO NEXT2
$NOTE SKIPPING DOC FILES
SET %DOCS N
%NEXT2
$NOTE ENTER TAPE DEVICE ADDRESS (devmnc or cr = M91000)
SET %99
IFA %99 GOTO NEXT3
$NOTE SETTING TAPE TO %99
SET %TAPE %99
%NEXT3
$AS TAP TO DEV=%TAPE BLOC=N
$PAGE 0
IFT %SAMP EQ Y GOTO SPY
IFT %DOCS EQ Y GOT SPN
$NOTE SKIPPING OPTIONAL FILES
$VOLMGR
REWIND
SKIP I
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
REWIND
EXIT
GOTO %END
%SPN
$NOTE RESTORING ALL BUT SAMPLE FILES
$VOLMGR
REWIND
SKIP I
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
SKIP I
RESTORE VOLUME=SYSTEM
REWIND
EXIT
GOTO %END
%SPY
IFT %DOCS EQ Y GOTO ALL
$NOTE RESTORING ALL BUT DOC FILES
$VOLMGR
REWIND
SKIP I
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
REWIND
EXIT
GOTO %END
%ALL
$NOTE RESTORING ALL FILES
$VOLMGR
REWIND
SKIP I
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
RESTORE VOLUME=SYSTEM
REWIND
EXIT
%END
$NOTE
$NOTE SETTING PAGE LENGTH TO 22
$NOTE
$PAGE 22
$ENDM
