mirror of
https://github.com/PDP-10/its.git
synced 2026-04-25 20:01:40 +00:00
43810baab6
The TS RBYE binary starts Zork from CFS; MADADV SAVE. The assembly info says the source file was AR1: CFS; ZORK 2. Tape backup records show this archive file was updated on 1979-02-13, which is shortly before the TS RBYE timestamp. As a convenience to users, TS ZORK is linked to RBYE from SYS1 on the assumption users will probably play the newest Zork. The older SYS2; TS ZORK which starts the MADMAN; MADADV SAVE file is renamed to OZORK.
23 lines
530 B
Tcl
23 lines
530 B
Tcl
log_progress "ENTERING BUILD SCRIPT: ZORK"
|
|
|
|
# Old Zork startup
|
|
respond "*" ":midas sys2; ts ozork_taa; zork\r"
|
|
expect ":KILL"
|
|
|
|
# New Zork startup
|
|
respond "*" ":midas sys; ts rbye_cfs; zork\r"
|
|
expect ":KILL"
|
|
respond "*" ":link sys1;ts zork, sys; ts rbye\r"
|
|
|
|
mkdir "cfs"
|
|
|
|
respond "*" ":xxfile lcf;comp log_lcf;comp xxfile\r"
|
|
expect -timeout 6000 "Job XXFILE interrupted: .VALUE;"
|
|
type "\033p"
|
|
expect ":KILL"
|
|
|
|
respond "*" ":xxfile lcf;zork log_lcf;zork xxfile\r"
|
|
expect "Job XXFILE interrupted: .VALUE;"
|
|
type "\033p"
|
|
expect ":KILL"
|