.; [1,2]INITNB0.CMD .; .ENABLE SUBSTITUTION .TESTDEVICE NB0: .PARSE "," NB0DEV REST ALL NB0: .DISABLE DISPLAY .ASK ANS Spin up a new pack for nightly backup in 'NB0DEV', then press Return .ENABLE DISPLAY INI NB0:''BACKUP .IF EQ 1 .GOTO 1$ .DISABLE QUIET ; ; ERROR - could not initialize new incremental backup pack. The pack ; will have to be initialized before it is used as an incremental ; backup pack. A file LB0:[1,2]INITBCKUP.CMD will be provided ; for you to use when a pack to be used for incremental backup ; is ready on the nightly backup drive (NB0:). ; .ENABLE QUIET .; make file for later initialization of nightly backup pack .OPEN [1,2]INITBCKUP.CMD .DATA .; Initialize new nightly backup pack on drive NB0: .DATA .ENABLE SUBSTITUTION .DATA .TESTDEVICE NB0: .DATA .PARSE "," NB0DEV REST .DATA .ASK ANS Is pack in drive 'NB0DEV' to be initialized (erased) for nightly backups .DATA .IFF ANS .EXIT .DATA INI NB0:''BACKUP .DATA .IF NE 1 .EXIT .DATA .ENABLE QUIET .DATA PIP LB0:[1,2]INITBCKUP.CMD;/DE .CLOSE .GOTO DONE .; .1$: .; reflect the new backup pack's initialization date MOU NB0:/OVR UFD NB0:[2,24] .OPEN NB0:[2,24]INITDATE.DAT .DATA Pack initialized as a BACKUP pack : .DATA '' .CLOSE DMO NB0: .; .DONE: .;