Google
 

Trailing-Edge - PDP-10 Archives - red405a2 - uetp/lib/ps-save.mic
There is 1 other file named ps-save.mic in the archive. Click here to see a list.
;<UETP.LIB>PS-SAVE.MIC.1,  7-Jun-79 15:17:22, EDIT BY EIBEN
;creates a DUMPER-tape of RED-pack
@DAYTIME
@terminal no page
@do <UETP.LIB>ERAZE ps:
@ena
@DEF MAG: 'a
@DEF PACK: PS:
@ASS MAG:
@REW MAG:
@COPY PACK:<SYSTEM>KS10.RAM (TO) MAG:
@COPY PACK:<SYSTEM>MTBOOT.RDI (TO) MAG:
@COPY PACK:<SYSTEM>MONITR.EXE (TO) MAG:
@GET PACK:<SYSTEM>EXEC.EXE
@SAV MAG:
@COPY PACK:<UETP.LIB>INSTALL.CMD MAG:
@GET PACK:<SUBSYS>MIC.EXE
@SAV MAG:
@COPY PACK:<UETP.LIB>RESTORE.MIC MAG:
@GET PACK:SYS:DLUSER.EXE
@SAV MAG:
@copy pack:<uetp.lib>users.txt mag:
@GET PACK:SYS:DUMPER.EXE
@SAV MAG:
@START
*TA MAG:
*SSNAME RED405-BACKUP
*save pack:<DIAGNOSTICS>*.* ps:<DIAGNOSTICS>*.*
*save pack:<F-S>*.* ps:<F-S>*.*
*save pack:<RED>*.* ps:<RED>*.*
*save pack:<SUBSYS>*.* ps:<SUBSYS>*.*
*save pack:<SYSTEM>*.* ps:<SYSTEM>*.*
*save pack:<REL>*.* ps:<REL>*.*
*save pack:<uetp.lib>*.* ps:<uetp.lib>*.*
*save pack:<uetp.MIC>*.* ps:<uetp.MIC>*.*
*save pack:<UNSUPPORTED>*.* ps:<UNSUPPORTED>*.*
*rew
*ex
@undel pack:<*>*.*
@DEF PACK:
@dea mag:
@DEF MAG:
@DISABLE
@unload 'A
@CONNECT
@DAYTIME
@terminal page