1
0
mirror of https://github.com/PDP-10/its.git synced 2026-05-01 14:06:28 +00:00

Add :VK where needed, remove where not needed.

Replace a few instances of sleep with :VK to get a * prompt.

Running :VK after making a link is no longer needed.
This commit is contained in:
Lars Brinkhoff
2025-02-09 07:46:43 +01:00
parent d2b8d49e70
commit 3af19c73d8
8 changed files with 7 additions and 32 deletions

View File

@@ -52,12 +52,10 @@ respond "*" ":pdump .teco.; ts 335\r"
respond "*" ":kill\r"
respond "*" ":link teach;teach emacs,emacs;teach emacs\r"
type ":vk\r"
respond "*" "teach\033\023"
respond "*" ":emacs\r"
expect ":KILL"
respond "*" ":link sys2;ts teachemacs,emacs;tstch >\r"
type ":vk\r"
# nsalv, timesharing version
respond "*" ":midas sys1;ts nsalv_kshack;nsalv\r"
@@ -86,19 +84,12 @@ expect ":KILL"
respond "*" ":midas sysbin;_sysen3;whoj\r"
expect ":KILL"
respond "*" ":link sys1;ts talk,sysbin;whoj bin\r"
type ":vk\r"
respond "*" ":link sys1;ts who,sysbin;whoj bin\r"
type ":vk\r"
respond "*" ":link sys1;ts whoj,sysbin;whoj bin\r"
type ":vk\r"
respond "*" ":link sys1;ts whom,sysbin;whoj bin\r"
type ":vk\r"
respond "*" ":link sys2;ts users,sysbin;whoj bin\r"
type ":vk\r"
respond "*" ":link sys1;ts w,sys1;ts who\r"
type ":vk\r"
respond "*" ":link sys2;ts u,sys2;ts users\r"
type ":vk\r"
#Inter-Entity Communication
respond "*" ":midas sysbin;_sysen2; iec\r"
@@ -1240,7 +1231,6 @@ respond "@" "imlac; ssv22 iml_sysbin; ssv22 bin\r"
respond "@" "\021"
expect ":KILL"
respond "*" ":link imlac; .prgm. normal, imlac; ssv22 iml\r"
type ":vk\r"
# Assemble SSV4.
respond "*" ":midas imlac; ts assv4_assv4\r"
@@ -1622,9 +1612,7 @@ expect ":KILL"
respond "*" ":midas rug;_loder\r"
expect ":KILL"
respond "*" ":link sys; ts nloder, rug; loder bin\r"
type ":vk\r"
respond "*" ":link sys1; ts mloder, rug; loder bin\r"
type ":vk\r"
# SITS.
cwd "sits"