Imlac Spacewar.

Makefile

@@ -27,13 +27,13 @@ SRC = syseng sysen1 sysen2 sysen3 sysnet kshack dragon channa	\
       macsym lmcons dmcg hack hibou agb gt40 rug maeda ms kle aap common \
       fonts zork 11logo kmp info aplogo bkph bbn pdp11 chsncp sca music1 \
       moon teach ken lmio1 llogo a2deh chsgtv clib sys3 lmio turnip \
-      mits_s rab stan_k bs cstacy kp dcp2 -pics- victor
+      mits_s rab stan_k bs cstacy kp dcp2 -pics- victor imlac
 DOC = info _info_ sysdoc sysnet syshst kshack _teco_ emacs emacs1 c kcc \
       chprog sail draw wl pc tj6 share _glpr_ _xgpr_ inquir mudman system \
       xfont maxout ucode moon acount alan channa fonts games graphs humor \
       kldcp libdoc lisp _mail_ midas quux scheme manual wp chess ms macdoc \
       aplogo _klfe_ pdp11 chsncp cbf rug bawden llogo eak clib teach pcnet \
-      combat pdl minits mits_s chaos hal -pics-
+      combat pdl minits mits_s chaos hal -pics- imlac
 BIN = sys2 emacs _teco_ lisp liblsp alan inquir sail comlap c decsys \
       graphs draw datdrw fonts fonts1 fonts2 games macsym maint imlac \
       _www_ hqm gt40 llogo bawden sysbin -pics-

build/misc.tcl

@@ -1165,6 +1165,15 @@ respond "M IML" "\r"
 respond ":PDUMP" "games; ts maze\r"
 respond "*" ":kill\r"
 
+# SWAR
+respond "*" ":midas imlac;_imsrc; swar\r"
+respond "INFINITE FUEL AND BULLETS VERSION?" "N\r"
+expect ":KILL"
+respond "*" ":imtran\r"
+respond "@" "imlac; swar iml_imlac; swar bin\r"
+respond "@" "\032"
+type ":kill\r"
+
 # KLH's Knight TV clock.
 respond "*" ":midas klh; ts tinyw_klh; clock\r"
 respond "=" "1\r"

doc/imlac/sw.info

@@ -0,0 +1,59 @@
+SPACE-WAR
+
+     This is Spacewar for the IMLAC PDS-1.
+
+     Spacewar is controlled from the switches on the Programmer's
+Console of a PDS-1.  The keyset and keyboard are also used to a limited
+extent.  The meanings of the console switches are as follows:
+
+
+       SHIP 1          CONTROL          SHIP 3          SHIP 2
+    (stubby ship)                  (triangle ship)   (needle ship)
+  |               |               |               |                |
+  | 0   1   2   3 | 4   5   6   7 | 8   9  10  11 | 12  13  14  15 |
+  |               |               |               |                |
+    <- ->   a   f   s   g   3   r   <- ->   a   f   <-  ->   a   f  
+                    p   r   r   a
+                    i   a   d   n
+                    n   v       d
+			i   s   o
+			t   h   m
+			y   i
+			    p
+
+
+     For each ship, the left button is counter-clockwise roll, the
+second is clockwise roll, the third is rocket thrust, and the right-
+most is bullet firing.
+     Putting both rolls on at once causes warping.
+     Putting thrust and both rolls on at the same time makes you
+invisible or visible, depending on your current state.
+
+     Control switches:
+
+Switch 4 - In down position, turns on spin mode, in which angular
+	   momentum is conserved.  In non-spin mode, the ship will not
+	   rotate if neither rotation switch is down.
+
+Switch 5 - In down position, turns off the Sun's gravity.
+
+Switch 6 - In down position, adds 3rd ship (triangle ship) at start of
+	   game.  If this ship is in the game, it uses the keyset (to
+	   eliminate the tangle of fingers on the console switches.
+
+Switch 7 - In down position, randomizes starting positions.
+
+     The rightmost four keys on the keyset will also control ship 1 or
+ship 3 (depending upon whether there are 2 or 3 ships in the game)in a
+manner similar to the four switches.
+
+     Typing "BREAK" causes the game to be interrupted into a mode where
+the scores are displayed and keyboard commands may be typed.  Commands
+currently available are:
+
+	R - reset scores to zero.
+
+     Spacewar loads into the high 4K of the IMLAC and thus may be
+loaded on top of SSV without destroying it.  To return to SSV, type
+control-Z on the keyboard.
+de

doc/programs.md

@@ -282,6 +282,7 @@
 - STYLOG, convert PTY output file into ASCII file.
 - SUPARD, draw ARDS graphics to SUPDUP.
 - SUPDUP, Supdup client.
+- SWAR, Imlac Spacewar.
 - SYSCHK, check up on system job.
 - SYSLOD, system load histogram.
 - SYSMSG, displays system messages.

src/imlac/disfix.9

@@ -0,0 +1,12 @@
+TITLE DISPLAY MACRO FIX FILE
+
+EQUALS ..DLXA DLXA
+EQUALS ..DLYA DLYA
+EXPUNG DLXA DLYA
+
+DEFINE DLXA (ARGG)
+	..DLXA <ARGG*2> TERMIN
+
+DEFINE DLYA (ARGG)
+	..DLYA <ARGG*2> TERMIN
+

src/imlac/imdefs.999999

@@ -0,0 +1 @@
+imsrc/imdefs.>