Trailing-Edge
-
PDP-10 Archives
-
k20v7d
-
utilities/maklad.mic
There is 1 other file named maklad.mic in the archive. Click here to see a list.
@ENA
@TYPE <UTILITIES>WARNING.TXT
@CONN <UTILITIES>
@UNITS
;
; PARAMETERS:
; A = RH20 # = 'A
; B = DRIVE = 'B
; C = PS NUMBER (for CFS pack) = 'C
;
;
; This MIC file will wipe out any pack which is spun up
; on RH20 # 'A, CONTRL -1, Drive 'B (But not mounted)
;
; Then submit MAKKLAD.CTL to build new KLAD from structure MAST: (Master)
; (MAST: must be premounted via OPR command:
; OPR> "MOUNT STRUCTURE MAST: /STRUCTURE-ID:PS:"
;
; TYPE ^P TO PROCEED (^A TO ABORT)
=^B
!
@SYS:CHECKD
CREATE PS'C:
KLAD
1
'A,-1,'B
10000
8800
*
N
EXIT
!NOW MOUNT IT FOR THE SYSTEM
@OPR
*MOU STR KLAD:/STR PS'C:
*WAIT 2
*EXIT
@
@SUB <UTILITIES>MAKLAD.CTL/BATCH:SUPER/OUT:NOL/TIME:10:00/REST:NO/PRIO:62
@DAY
@I B
@KMIC