Google
 

Trailing-Edge - PDP-10 Archives - k20v7d - utilities/p2020-make.mic
There is 1 other file named p2020-make.mic in the archive. Click here to see a list.
;
;	This Mic file creates P2020.MIC file to used to copy
;	appropriate diagnostics to the 20 <*-DIAGNOSTICS> areas
;	from the <4-DIAGNOSTICS> area during KLAD diagnostic installation
;	and will reflect the current state of the <*-DIAGNOSTIC> areas.
;
;	Type "^P" to continue. Type "^A" to Abort.
;
=^B
@
@NOERROR
@DEF DSK:
@
@CONN <UTILITIES>
@VDIR P2020*.*
;
@VDIR <1-DIAGNOSTICS>*.*.0,
@SEPARATE
@OUTPUT 1-DIAGS.DIR
@
!	For <1-DIAGNOSTICS>
!
@TV
*;Y<UTILITIES>1-DIAGS.DIR
=S;0L-ZK
*<S;0LI@COPY <4-DIAGNOSTICS>DS;-S.KI <1-DIAGNOSTICS>@I//I
>
=ZK0J
*;X<UTILITIES>1-DIAGS.INS
!
@VDIR <2-DIAGNOSTICS>*.*.0,
@SEPARATE
@OUTPUT 2-DIAGS.DIR
@
!	For <2-DIAGNOSTICS>
!
@TV
*;Y<UTILITIES>2-DIAGS.DIR
=S;0L-ZK
*<S;0LI@COPY <4-DIAGNOSTICS>DS;-S.KI <2-DIAGNOSTICS>@I//I
>
=ZK0J
*;X<UTILITIES>2-DIAGS.INS
!
@VDIR <3-DIAGNOSTICS>*.*.0,
@SEPARATE
@OUTPUT 3-DIAGS.DIR
@
!	For <3-DIAGNOSTICS>
!
@TV
*;Y<UTILITIES>3-DIAGS.DIR
=S;0L-ZK
*<S;0LI@COPY <4-DIAGNOSTICS>DS;-S.KI <3-DIAGNOSTICS>@I//I
>
=ZK0J
*;X<UTILITIES>3-DIAGS.INS
!
@NOERROR
@
@TV
*I!	This Mic files copies appropriate diags from <4-DIAGNOSTICS>

*I!	to appropriate <*-DIAGNOSTICS> areas.

*I!

*I!	Type "^IP" to proceed. Type "^IA" to abort.

*I!

*I@^IB

*I!

*I@NOERROR

*I!

*I!

*I!	<1-DIAGNOSTICS>

*I!

*I!

*;Y1-DIAGS.INS
=ZJ
*I!

*I!	<2-DIAGNOSTICS>

*I!

*I!

*;Y2-DIAGS.INS
=ZJ
*I!

*I!	<3-DIAGNOSTICS>

*I!

*I!

*;Y3-DIAGS.INS
=ZJ
*I!

*I!	DONE !

*I!

*I!	NOTE: This mic file may require updating per release.

*I!

*I@kmic

=0J
*;XP2020.NEW
!
!
!	First save the old P2020.MIC as P2020.OLD
!
@NOERROR
@COPY P2020.MIC P2020.OLD
!
!	Now install new P2020.MIC
!
@COPY P2020.NEW P2020.MIC
@
@DELETE 1-DIAGS.INS
@DELETE 2-DIAGS.INS
@DELETE 3-DIAGS.INS
!
@V P2020*.*
!
!	DONE !
!