Google
 

Trailing-Edge - PDP-10 Archives - BB-T573C-DD_1986 - 35,1414/rdp1fm.ctl
There is 1 other file named rdp1fm.ctl in the archive. Click here to see a list.
;RPD1FM.CTL - CONTROL FILE TO RUN DDRPI PAKINT ON RPD1
;
;DEC 16 1982 - T. IACOBONE
;
;.SUB RPD1FM.CTL/TIME/UNIQ:0
;
.ERROR
;
;SETUP SEARCH LIST FOR DIAMON
.PATH LIB:/SEA=KLAD:[6,10]
;
;
;START THE DIAGNOSTIC
;
.ERROR ?
;
.RUN DIAMON
S
DDRPI
Y
10
0
N
Y
RPD1
Y
E31
31
PAKINT
Y
Y
^C
;
;
.IF (NOERROR) .GOTO SUB
;
.ERROR
;
.RUN DIAMON
S
DDRPI
Y
10
0
N
Y
RPD1
Y
E31
Y
31
PAKINT
Y
Y
^C
;
SUB::
.PLEASE ***RPD1FM COMPLETED SUCCESSFULLY ***^[
;
.SUBMIT RPD1TC[35,1414]/TIME/UNIQ:0
;
.GOTO END
;
%ERR::
.PLEASE ???? ERROR IN RPD1FM.CTL CHECK LOG AND RESUBMIT ????^[
%CERR::
.PLEASE ???? ERROR IN RPD1FM.CTL CHECK LOG AND RESUBMIT ????^[
;
END::
%FIN::