games-request@tekred.TEK.COM (06/29/87)
Submitted by: Steve Schoch <schoch@ames.arpa> Comp.sources.games: Volume 1, Issue 63 Archive-name: kriegspiel/Part04 #! /bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh <file", e.g.. If this archive is complete, you # will see the following message at the end: # "End of archive 4 (of 4)." # Contents: README2 error.c # Wrapped by billr@tekred on Fri Jun 26 18:21:19 1987 PATH=/bin:/usr/bin:/usr/ucb ; export PATH if test -f README2 -a "${1}" != "-c" ; then echo shar: Will not over-write existing file \"README2\" else echo shar: Extracting \"README2\" \(617 characters\) sed "s/^X//" >README2 <<'END_OF_README2' XTo: games@tekred.TEK.COM XSubject: Kriegspiel (a chess variant) X XThis program was first written by Bert Enderton, then by David Wolfe X<wolfe@ernie.berkeley.edu>, then later written to work with the X window Xsystem by Steve Schoch <schoch@ames.arpa>. The files in this shar will Xmake two versions of the program: one using curses(3), and one using Xthe X window system libraries. X XIt compiles on a 4.3 BSD system, and can easily be made to work with other XBSD's, but the IPC would need to be changed quite a bit to work with other XOS's. If anyone on ther internet would like to play me a game of ks, Xgive me a shout! X END_OF_README2 if test 617 -ne `wc -c <README2`; then echo shar: \"README2\" unpacked with wrong size! fi # end of overwriting check fi if test -f error.c -a "${1}" != "-c" ; then echo shar: Will not over-write existing file \"error.c\" else echo shar: Extracting \"error.c\" \(446 characters\) sed "s/^X//" >error.c <<'END_OF_error.c' X#ifndef lint Xstatic char rcsid[] = "$Header: error.c,v 1.3 87/02/12 10:57:44 schoch Exp $"; X#endif X X#include "externs.h" X#include <errno.h> X#include <signal.h> X Xerror (s) X char *s; X{ X#ifndef XKS X clear(); X refresh(); X endwin(); X#endif X if (errno == EPIPE) X dead = TRUE; X else { X if (s != (char *) NULL) X if (errno) X perror (s); X else X fprintf(stderr, "%s\n", s); X if (out) X fclose(out); X if (inp) X fclose(inp); X exit (0); X } X} END_OF_error.c if test 446 -ne `wc -c <error.c`; then echo shar: \"error.c\" unpacked with wrong size! fi # end of overwriting check fi echo shar: End of archive 4 \(of 4\). cp /dev/null ark4isdone MISSING="" for I in 1 2 3 4 ; do if test ! -f ark${I}isdone ; then MISSING="${MISSING} ${I}" fi done if test "${MISSING}" = "" ; then echo You have unpacked all 4 archives. rm -f ark[1-9]isdone else echo You still need to unpack the following archives: echo " " ${MISSING} fi ## End of shell archive. exit