mirror of
https://github.com/PDP-10/its.git
synced 2026-01-19 09:29:15 +00:00
d84c52edb5
There are now separate scripts for: EMACS, LISP (and MACSYMA), SCHEME, and miscellaneous unessential programs.
86 lines
3.7 KiB
Tcl
86 lines
3.7 KiB
Tcl
respond "*" ":midas sysbin;_.teco.;teco\r"
|
|
expect ":KILL"
|
|
respond "*" ":job teco\r"
|
|
respond "*" ":load sysbin;teco bin\r"
|
|
sleep 2
|
|
respond "*" "dumpit\033g"
|
|
sleep 2
|
|
respond "TECPUR" "\r"
|
|
respond "*" ":kill\r"
|
|
respond "*" ":link sys3;ts teco,.teco.;tecpur >\r"
|
|
|
|
respond "*" ":link sys2;ts emacs,emacs;ts >\r"
|
|
respond "*" ":emacs\r"
|
|
respond "EMACS Editor" "\033xrun\033einit\033? Generate\r"
|
|
expect -timeout 2000 "EINIT"
|
|
respond ":EJ" "\033xgenerate\033emacs;aux\033emacs1;aux\r"
|
|
respond ":EJ" "\030\003"
|
|
respond "*" ":kill\r"
|
|
|
|
respond "*" ":delete emacs;ts 126\r"
|
|
respond "*" ":delete \[prfy\] <\r"
|
|
respond "*" ":delete \[pure\] 162\r"
|
|
respond "*" ":rename \[pure\] 163, \[pure\] 162\r"
|
|
|
|
respond "*" "emacs\033\023"
|
|
respond "*" ":teco\r"
|
|
respond "&" "mmrun\033purify\033dump\033ts 126\033\033"
|
|
respond "&" "\003"
|
|
respond "*" ":kill\r"
|
|
respond "*" ":link sys2;ts edit,sys2;ts emacs\r"
|
|
|
|
# BABYL, BABYLM, CACHE, FIXLIB, IVORY, MKDUMP, OUTLINE-MODE, PL1,
|
|
# TEACH-C100, TMACS and WORDAB are generated with IVORY.
|
|
respond "*" ":emacs\r"
|
|
respond "EMACS Editor" "\033xload\033ivory\r"
|
|
respond "\n" "\033xgenerate\033emacs;ivory\033emacs1;ivory\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;pl1\033emacs1;pl1\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;wordab\033emacs1;wordab\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;tmacs\033emacs1;tmacs\033tmucs\r"
|
|
respond ":EJ" "\030\003"
|
|
respond "*" ":kill\r"
|
|
|
|
respond "*" ":emacs\r"
|
|
respond "EMACS Editor" "\033xload\033purify\r"
|
|
respond "\n" "\033xgenerate\033emacs;abstr\033emacs1;abstr\r"
|
|
respond ":EJ" "\025\033x& compress file\033emacs1;auto-s\r"
|
|
respond "Compressing file" "\033xgenerate\033emacs;auto-s\033emacs1;auto-s\r"
|
|
respond ":EJ" "\033xbare\033emacs1;bare\r"
|
|
respond "\n" "\033xgenerate\033emacs;c\033emacs1;c\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;delim\033emacs1;delim\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;dired\033emacs1;dired\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;doclsp\033emacs1;doclsp\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;docond\033emacs1;docond\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;env\033dcp;eenv\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;elisp\033emacs1;elisp\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;info\033emacs1;info\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;kbdmac\033emacs1;kbdmac\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;ledit\033emacs1;ledit\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;lispt\033emacs1;lispt\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;lsputl\033emacs1;lsputl\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;modlin\033emacs1;modlin\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;muddle\033emacs1;muddle\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;page\033emacs1;page\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;pictur\033emacs1;pictur\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;\[rmai\]\033emacs1;rmailx\033rmailz\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;scribe\033emacs1;scribe\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;scrlin\033emacs1;scrlin\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;slowly\033emacs1;slowly\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;sort\033emacs1;sort\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;tags\033emacs1;tags\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;taggen\033emacs1;taggen\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;tdebug\033emacs1;tdebug\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;tex\033emacs1;tex\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;texmac\033emacs1;texmac\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;time\033emacs1;time\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;trmtyp\033emacs1;trmtyp\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;vt100\033emacs1;vt100\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;vt52\033emacs1;vt52\r"
|
|
respond ":EJ" "\033xgenerate\033emacs;xlisp\033emacs1;xlisp\r"
|
|
|
|
respond ":EJ" "\033xrun\033einit\033? Document\r"
|
|
respond "\n" "\030\003"
|
|
respond "*" ":kill\r"
|
|
|
|
respond "*" ":rename emacs;\[rmai\] \021:ej, emacs;\[rmai\] 146\r"
|