Google
 

Trailing-Edge - PDP-10 Archives - bb-d868b-bm_tops20_v3a_2020_dist - 3a-sources/s20tap.ctl
There are 40 other files named s20tap.ctl in the archive. Click here to see a list.
! Obtain a tape drive
@TMOUNT (TAPE) TAPE: (VOLID) S20TAP,
@WRITE-ENABLED
@
@ENABLE (CAPABILITIES)
@REWIND (DEVICE) TAPE:
! WRITE MICROCODE
@COPY (FROM) SYSTEM:KS10.MCR (TO) TAPE:

! WRITE BOOTSTRAP
@COPY (FROM) SYSTEM:MTBOOT.RDI (TO) TAPE:

! Save the monitor
@GET (PROGRAM) PS:<SYSTEM>MONITR.EXE
@SAVE (ON FILE) TAPE:

! Save the TOPS-20 Command Language Interpreter
@GET (PROGRAM) SYSTEM:EXEC.EXE
@SAVE (ON FILE) TAPE:

! Save the DLUSER program
@GET (PROGRAM) SYS:DLUSER.EXE
@SAVE (ON FILE) TAPE:

! Run the same DLUSER program, saving the directory structure on tape
@START
*DUMP (TO FILE) TAPE:
*EXIT

! Save DUMPER
@GET (PROGRAM) SYS:DUMPER.EXE
@SAVE (ON FILE) TAPE:

! Run the same DUMPER, saving SYSTEM: and SYS:
@START
*TAPE (FILESPEC) TAPE:
*LIST (LOG INFORMATION ON FILE) S20TAP.LPT
*SSNAME SYSTEM-FILES
*SAVE (DISK FILES) PS:<NEW-SYSTEM>,PS:<SYSTEM>
*SSNAME SUBSYS-FILES
*SAVE (DISK FILES) PS:<NEW-SUBSYS>,PS:<SUBSYS>
*EXIT

! Print the DUMPER log file
@PRINT S20TAP.LPT/NOTE:"BACKUP TAPE"

@UNLOAD (DEVICE) TAPE: