Google
 

Trailing-Edge - PDP-10 Archives - k20v7d - utilities/pu2011-make.mic
There is 1 other file named pu2011-make.mic in the archive. Click here to see a list.
;
;	This Mic file creates PU2011.ASCII and PU2011.CMD
;	PIP command files to copy all files presently in
;	the <4-DIAGNOSTICS> area to DB0:[6,11]
;
;	Type "^P" to continue. Type "^A" to Abort.
;
=^B
@
@NOERROR
@DEF DSK:
@
@CONN <UTILITIES>
@VDIR PU2011.*
;
@VDIR <4-DIAGNOSTICS>*.*.0,
@SEPARATE
@OUTPUT PU2011.DIR
@
@NOERROR
@
!
@TV PU2011.DIR
*S;0L-ZK<+DS;-S.0XFIDB0:[6,11]GFI;*/DEL
DB0:[6,11]=FE:[340,33]GFI;0
FE:[340,33]GFI;*/DELKI
>ZK0J;XPU2011.NEW
@
;
;
@RESET
;
;	Saving previous PU2011.ASCII as PU2011.BAK
;
@COPY PU2011.ASCII PU2011.BAK
;
;	Installing PU2011.NEW as PU2011.ASCII
;
@COPY PU2011.NEW PU2011.ASCII
;
;	Converting PU2011.ASCII to FE format PU2011.CMD
;
@TERM NO PAGE
@RSXFMT
*CONVERT PU2011.ASCII PU2011.CMD
*EXIT
;
@
@VDIR PU2011*.*
;
;	FINISHED
;
@GOTO END
!
%ERR::
;	FATAL ERROR - CAN'T CONTINUE
;
END::
@DAY
@KMIC