github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-25 19:56:53 +00:00
Code Issues Releases Wiki Activity

Added NGAME and games invoked by it.

Browse Source
This commit is contained in:
Eric Swenson
2018-05-19 22:26:29 -07:00
parent 94eb2a1810
commit 088ec2d6d9
53 changed files with 22974 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
build/lisp.tcl
View File

@@ -806,3 +806,32 @@ respond "*" ":midas sys; atsign 10slav_sysen2; ld10\r"
respond " PDP6F = " "0\r"
respond "GT40F=" "0\r"
expect ":KILL"
# animal
respond "*" ":midas games;_lsrrtn\r"
expect ":KILL"
respond "*" "complr\013"
respond "_" "games;_games;parse\r"
respond "_" "games;_games;pattrn\r"
respond "_" "games;_games;words\r"
respond "_" "games;_games;word\r"
respond "_" "games;_games;animal 133\r"
respond "_" "\032"
type ":kill\r"
respond "*" "l\013"
respond "Alloc?" "n"
respond "*" "(load '((games) animal fasl))"
respond "53694." "(dump '((games) ts animal))"
expect "KILL"
# think
respond "*" "complr\013"
respond "_" "games;_games;think\r"
respond "_" "\032"
type ":kill\r"
# wa
respond "*" "complr\013"
respond "_" "games;_games;wa 10\r"
respond "_" "\032"
type ":kill\r"

17
build/misc.tcl
View File

@@ -95,10 +95,12 @@ respond "*" ":midas sys1;ts quote_sysen1;limeri\r"
respond "Use what filename instead?" "ecc;quotes >\r"
expect ":KILL"
respond "*" ":midas sys1;ts quote_sysen1;limeri\r"
respond "*" ":midas sys2;ts limeri_sysen1;limeri\r"
respond "Use what filename instead?" "eak; lims >\r"
expect ":KILL"
respond "*" ":link sys2;ts limmer,sys2;ts limeri\r"
respond "*" ":midas sysbin;_eak;limser\r"
expect ":KILL"
respond "*" ":link device;chaos limeri,sysbin;limser bin\r"
@@ -434,6 +436,19 @@ type "beg7\033g"
respond ". words" ":pdump sys1;ts jotto\r"
respond "*" ":kill\r"
# ngame
respond "*" ":midas games;ts game_ejs;ngame\r"
respond "Star Trek: " "ts,trek,games\r"
respond "Adventure (2): " "ts,adv448,games\r"
respond "Adventure (1.5): " "ts,adv350,games\r"
expect ":KILL"
respond "*" ":link sys3;ts game,games;ts game\r"
respond "*" ":link info;o.info,_info_;\r"
# guess
respond "*" ":midas games;ts guess_games;guess\r"
expect ":KILL"
# ten50
respond "*" ":midas sys3;ts ten50_mrc; ten50\r"
expect ":KILL"