--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/war.c	Sat Dec 06 05:41:29 1997 +0000
@@ -0,0 +1,103 @@
+/* $Id: war.c,v 1.1.1.1 1997/12/06 05:41:31 darius Exp $ */
+
+/*
+ * war.c
+ */
+#include "copyright.h"
+
+#include <stdio.h>
+#include <math.h>
+#include <signal.h>
+#include "Wlib.h"
+#include "defs.h"
+#include "struct.h"
+#include "data.h"
+#include "packets.h"
+#include "proto.h"
+
+static int newhostile;
+
+/* Set up the war window and map it */
+static char *feds = "FED - ";
+static char *roms = "ROM - ";
+static char *klis = "KLI - ";
+static char *oris = "ORI - ";
+static char *gos = "  Re-program";
+static char *exs = "  Exit - no change";
+static char *peaces = "Peace";
+static char *hostiles = "Hostile";
+static char *wars = "War";
+
+/* Prototypes */
+static void fillwin P((int menunum, char *string, int hostile, int warbits, int team));
+static void warrefresh P((void));
+
+void
+warwindow()
+{
+    W_MapWindow(war);
+    newhostile = me->p_hostile;
+    warrefresh();
+}
+
+static void
+warrefresh()
+{
+    fillwin(0, feds, newhostile, me->p_swar, FEDm);
+    fillwin(1, roms, newhostile, me->p_swar, ROMm);
+    fillwin(2, klis, newhostile, me->p_swar, KLIm);
+    fillwin(3, oris, newhostile, me->p_swar, ORIm);
+    W_WriteText(war, 0, 4, textColor, gos, strlen(gos), 0);
+    W_WriteText(war, 0, 5, textColor, exs, strlen(exs), 0);
+}
+
+static void
+fillwin(menunum, string, hostile, warbits, teammask)
+    int     menunum;
+    char   *string;
+    int     hostile, warbits;
+    int     teammask;
+{
+    char    buf[80];
+
+    if (teammask & warbits) {
+	(void) sprintf(buf, "  %s%s", string, wars);
+	W_WriteText(war, 0, menunum, rColor, buf, strlen(buf), 0);
+    } else if (teammask & hostile) {
+	(void) sprintf(buf, "  %s%s", string, hostiles);
+	W_WriteText(war, 0, menunum, yColor, buf, strlen(buf), 0);
+    } else {
+	(void) sprintf(buf, "  %s%s", string, peaces);
+	W_WriteText(war, 0, menunum, gColor, buf, strlen(buf), 0);
+    }
+}
+
+void
+waraction(data)
+    W_Event *data;
+{
+    int     enemymask;
+
+    if (data->y == 4) {
+	W_UnmapWindow(war);
+	sendWarReq(newhostile);
+	return;
+    }
+    if (data->y == 5) {
+	W_UnmapWindow(war);
+	return;
+    }
+    enemymask = 1 << data->y;
+
+    if (me->p_swar & enemymask) {
+	warning("You are already at war!");
+	W_Beep();
+    } else {
+	if (idx_to_mask(me->p_teami) == enemymask) {
+	    warning("It would never work ... your crew would have you in the brig in no time.");
+	} else {
+	    newhostile ^= enemymask;
+	}
+    }
+    warrefresh();
+}