Trailing-Edge
-
PDP-10 Archives
-
BB-T573C-DD_1986
-
35,1414/pakint.mic
There is 1 other file named pakint.mic in the archive. Click here to see a list.
!*******************************************************************
!THIS CONTROL FILE IS ONLY TO BE USED IF YOU MORE THAN ONE DISK
!ON THE SYSTEM. IT WILL RUN DDRPI-PAKINT ON ANY PHYSICAL UNIT ON THE
!SYSTEM EXCEPT THE KLAD WHICH SHOULD BE MOUNTED ON RPA0.
!TYPE DO PAKINT[35,1414] STR,PHYS,UNIT
!*******************************************************************
.SILENCE
.IF ("'A"="KLAD") .GOTO NONO
.IF ("'B"="RPA0") .GOTO NONO
.REVIVE
.PATH LIB:/SEARCH=KLAD:[6,10]
.RU DIAMON
DDRPI
Y
10
0
N
Y
'B
Y
E'C
'C
PAKINT
Y
Y
=^C
.PATH /CLEAR
!*******************************************************************
!PAKINT IS FINISHED. TO MOUNT A STRUCTURE ON SYSTEM DO TWICE.MIC
!AS DESCRIBED IIN MRFAT0042.
!*******************************************************************
.SILENCE
.GOTO DONE
NONO::
.REVIVE
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
!YOU HAVE SELECTED THE WRONG DRIVE TO RUN THIS FILE. THE KLAD
!SHOULD BE MOUNTED ON RPA0. CHECK YOUR CONFIGURATION AND REFER TO
!MRFAT00009 AND MRFAT00042.
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
.SILENCE
.GOTO DONE
%ERR::
.REVIVE
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
!ERROR IN PAKINT.MIC. NOT CONTINUING.
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
.SILENCE
%CERR::
.REVIVE
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
!ERROR IN PAKINT.MIC. NOT CONTINUING.
!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
.SILENCE
DONE::
%FIN::