home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
games
/
xtrek.zip
/
XTREK6.6
< prev
Wrap
Text File
|
1987-07-05
|
5KB
|
157 lines
Article 52 of comp.sources.games:
Path: ncrcce!rd1632!ncrlnk!ncrcae!ece-csc!mcnc!seismo!rochester!cornell!uw-beaver!tektronix!tekgen!tekred!games-request
From: games-request@tekred.TEK.COM
Newsgroups: comp.sources.games
Subject: v01i078: xtrek - multiplayer space war for X-windows, Part06/06
Message-ID: <1371@tekred.TEK.COM>
Date: 2 Jul 87 20:56:33 GMT
Sender: billr@tekred.TEK.COM
Lines: 143
Approved: billr@tekred.TEK.COM
Submitted by: Chris Guthrie <chris%ic.Berkeley.EDU@ucbvax.berkeley.edu>
Comp.sources.games: Volume 1, Issue 78
Archive-name: xtrek/Part06
#! /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 6 (of 6)."
# Contents: getship.c warning.c
# Wrapped by billr@tekred on Thu Jul 2 10:26:36 1987
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f getship.c -a "${1}" != "-c" ; then
echo shar: Will not over-write existing file \"getship.c\"
else
echo shar: Extracting \"getship.c\" \(1253 characters\)
sed "s/^X//" >getship.c <<'END_OF_getship.c'
X
X/*
X
X Copyright (c) 1986 Chris Guthrie
X
XPermission to use, copy, modify, and distribute this
Xsoftware and its documentation for any purpose and without
Xfee is hereby granted, provided that the above copyright
Xnotice appear in all copies and that both that copyright
Xnotice and this permission notice appear in supporting
Xdocumentation. No representations are made about the
Xsuitability of this software for any purpose. It is
Xprovided "as is" without express or implied warranty.
X
X*/
X
X#include <X/Xlib.h>
X#include <stdio.h>
X#include <sys/types.h>
X#include <sys/ipc.h>
X#include <sys/shm.h>
X#include "defs.h"
X#include "struct.h"
X#include "data.h"
X
X/* fill in ship characteristics */
X
Xgetship(shipp)
Xstruct ship *shipp;
X{
X shipp->s_turns = 128000;
X shipp->s_accint = 100;
X shipp->s_decint = 200;
X shipp->s_accs = 100;
X shipp->s_torpdamage = 30;
X shipp->s_phaserdamage = 100;
X shipp->s_torpspeed = 12;
X shipp->s_maxspeed = 9;
X shipp->s_repair = 100;
X shipp->s_maxfuel = 10000;
X shipp->s_detcost = 100;
X shipp->s_torpcost = 10 * shipp->s_torpdamage;
X shipp->s_phasercost = 10 * shipp->s_phaserdamage;
X shipp->s_warpcost = 4;
X shipp->s_cloakcost = 30;
X shipp->s_recharge = 10;
X shipp->s_maxarmies = 10;
X}
END_OF_getship.c
if test 1253 -ne `wc -c <getship.c`; then
echo shar: \"getship.c\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f warning.c -a "${1}" != "-c" ; then
echo shar: Will not over-write existing file \"warning.c\"
else
echo shar: Extracting \"warning.c\" \(1122 characters\)
sed "s/^X//" >warning.c <<'END_OF_warning.c'
X
X/*
X
X Copyright (c) 1986 Chris Guthrie
X
XPermission to use, copy, modify, and distribute this
Xsoftware and its documentation for any purpose and without
Xfee is hereby granted, provided that the above copyright
Xnotice appear in all copies and that both that copyright
Xnotice and this permission notice appear in supporting
Xdocumentation. No representations are made about the
Xsuitability of this software for any purpose. It is
Xprovided "as is" without express or implied warranty.
X
X*/
X
X
X#include <X/Xlib.h>
X#include <stdio.h>
X#include <math.h>
X#include <signal.h>
X#include "defs.h"
X#include "struct.h"
X#include "data.h"
X
X/*
X** The warning in text will be printed in the warning window.
X** The message will last WARNTIME/10 seconds unless another message
X** comes through and overwrites it.
X*/
Xwarning(text)
Xchar *text;
X{
X warntimer = udcounter + WARNTIME; /* set the line to be cleared */
X if (warncount > 0)
X XPixSet(warnw, 5, 5, dfontinfo->width * warncount, dfontinfo->height,
X backColor);
X warncount = strlen(text);
X XText(warnw, 5, 5, text, warncount, dfont, textColor, backColor);
X XFlush();
X}
END_OF_warning.c
if test 1122 -ne `wc -c <warning.c`; then
echo shar: \"warning.c\" unpacked with wrong size!
fi
# end of overwriting check
fi
echo shar: End of archive 6 \(of 6\).
cp /dev/null ark6isdone
MISSING=""
for I in 1 2 3 4 5 6 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 6 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 0