billr@saab.CNA.TEK.COM (Bill Randle) (06/02/90)
Submitted-by: VANCLEEF@mps.ohio-state.edu
Posting-number: Volume 10, Issue 14
Archive-name: gb3/Part14
Supersedes: GB2: Volume 7, Issue 44-51
#! /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 14 (of 14)."
# Contents: Docs/allocate.doc Docs/autoreport.doc Docs/colonies.doc
# Docs/cs.doc Docs/daemon.doc Docs/dock.doc Docs/examine.doc
# Docs/explore.doc Docs/fix.doc Docs/give.doc Docs/god.doc
# Docs/info.doc Docs/launch.doc Docs/make.doc Docs/makeuniv.doc
# Docs/name.doc Docs/page.doc Docs/power.doc Docs/quit.doc
# Docs/relation.doc Docs/report.doc Docs/scrap.doc Docs/ship.doc
# Docs/stock.doc Docs/telegram.doc Docs/time.doc Docs/toggle.doc
# Docs/toxicity.doc Docs/transfer.doc Docs/undock.doc Docs/who.doc
# client/GB_copyright.h client/Makefile client/client.h
# client/patchlevel.h server/GB_copyright.h server/b.c
# server/buffers.h server/config.h server/daemon.dat
# server/docommand.c server/files.c server/gdb_guardian.c
# server/get4args.c server/guardian.c server/interface.h
# server/list.c server/misc.c server/patchlevel.h server/power.h
# server/traverse.c
# Wrapped by billr@saab on Fri Jun 1 11:53:48 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'Docs/allocate.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/allocate.doc'\"
else
echo shar: Extracting \"'Docs/allocate.doc'\" \(798 characters\)
sed "s/^X//" >'Docs/allocate.doc' <<'END_OF_FILE'
XALLOCATE Galactic Bloodshed ALLOCATE
X
X
XNAME
X [0] allocate -- allocate action points from global level
X
XSYNTAX
X allocate <action points>
X
XDESCRIPTION
X The purpose of this command is to allocate global action points to
Xstar level action points. To do this, you must change scope to star
Xlevel or lower and execute the 'allocate' command. You may then transfer
Xglobal action points to the current star level. This command allows you
Xto use global action points as a command reserve and represents the
Xstrategic capabilities of the race's leadership. Star level action points
Xcan be thought of as representing the local leadership of the system.
XAction points cannot be transferred to the global level from lower levels
Xand any allocations can not be reversed.
X
XSEE ALSO
X actionpoints
END_OF_FILE
if test 798 -ne `wc -c <'Docs/allocate.doc'`; then
echo shar: \"'Docs/allocate.doc'\" unpacked with wrong size!
fi
# end of 'Docs/allocate.doc'
fi
if test -f 'Docs/autoreport.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/autoreport.doc'\"
else
echo shar: Extracting \"'Docs/autoreport.doc'\" \(838 characters\)
sed "s/^X//" >'Docs/autoreport.doc' <<'END_OF_FILE'
XAUTOREPORT Galactic Bloodshed AUTOREPORT
X
X
XNAME
X [0] autoreport -- designate a report to be sent each turn
X
XSYNOPSIS
X autoreport [path]
X
XDESCRIPTION
X
X ``Autoreport'', when used on a planet, will cause a report to be generated
Xeach turn concerning that planet: what resources were used, what had been
Xconstructed, the increase (or decrease) in population, how many sectors had
Xbeen conquered, etc. If ``path'' is not specified, autoreport will apply
Xitself to the current scope.
X
X The report generated is sent to the user's telegram file.
X
X Autoreport is disabled after 7 turns, at which point it must be renewed.
XThis feature is to prevent telegrams from accumulating in the files of players
Xwho never seem to read them.
X
X If automatic reporting is already designated for that planet, it will be
Xdeactivated from then on.
X
X
END_OF_FILE
if test 838 -ne `wc -c <'Docs/autoreport.doc'`; then
echo shar: \"'Docs/autoreport.doc'\" unpacked with wrong size!
fi
# end of 'Docs/autoreport.doc'
fi
if test -f 'Docs/colonies.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/colonies.doc'\"
else
echo shar: Extracting \"'Docs/colonies.doc'\" \(329 characters\)
sed "s/^X//" >'Docs/colonies.doc' <<'END_OF_FILE'
XCOLONIES Galactic Bloodshed COLONIES
X
X
XNAME
X [0] colonies -- list colonies
X
XSYNTAX
X colonies
X
X
XDESCRIPTION
X
X This command list the attributes of all current colonies belonging
Xto the player.
X
X If the name if the planet is followed by an asterik '*', this means that
Xautoreport is on at that colony.
X
XSEE ALSO
X explore
END_OF_FILE
if test 329 -ne `wc -c <'Docs/colonies.doc'`; then
echo shar: \"'Docs/colonies.doc'\" unpacked with wrong size!
fi
# end of 'Docs/colonies.doc'
fi
if test -f 'Docs/cs.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/cs.doc'\"
else
echo shar: Extracting \"'Docs/cs.doc'\" \(512 characters\)
sed "s/^X//" >'Docs/cs.doc' <<'END_OF_FILE'
XCS Galactic Bloodshed CS
X
X
XNAME
X [0] cs -- change scope
X
XSYNTAX
X cs <-d> <path>
X where path = ``#shipnumber'' | ``:'' | ``/[path]'' | ``..[/path]''
X | [name]
X
XDESCRIPTION
X cs changes from the current ``operative scope'' to the specified one.
XIf no scope is specified, cs will change to the ``default scope''.
X If the ``-d'' option is specified, cs will make [path] the new ``default
Xscope''.
X You cannot cs into areas that have not yet been explored by you.
X
X
XSEE ALSO
X scope, orbit
END_OF_FILE
if test 512 -ne `wc -c <'Docs/cs.doc'`; then
echo shar: \"'Docs/cs.doc'\" unpacked with wrong size!
fi
# end of 'Docs/cs.doc'
fi
if test -f 'Docs/daemon.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/daemon.doc'\"
else
echo shar: Extracting \"'Docs/daemon.doc'\" \(785 characters\)
sed "s/^X//" >'Docs/daemon.doc' <<'END_OF_FILE'
X The Galactic Bloodshed game sequence is controled by a
X`daemon' program which updates the positions of ships, planets
Xand stars at a set time interval (usually 1 to 3 hours, set by the
Xgame master). The growth/depletion of the planetary resources, population,
Xfuel and destructive capacity is monitored and updated by this program.
XBetween updates, players may issue commands, construct ships, initiate
Xattacks and do whatever they see fit with the available commands.
X
X It isn't necessary to be present at all times, since interstellar
Xtravel takes some time, and it takes several iterations of the daemon to
Xgenerate significant changes in planetary status. It is wise, however,
Xto check up on things from time to time to keep yourself from getting
Xoverrun by some hostile race.
X
END_OF_FILE
if test 785 -ne `wc -c <'Docs/daemon.doc'`; then
echo shar: \"'Docs/daemon.doc'\" unpacked with wrong size!
fi
# end of 'Docs/daemon.doc'
fi
if test -f 'Docs/dock.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/dock.doc'\"
else
echo shar: Extracting \"'Docs/dock.doc'\" \(289 characters\)
sed "s/^X//" >'Docs/dock.doc' <<'END_OF_FILE'
X
XDOCK Galactic Bloodshed DOCK
X
X
XNAME
X [1] dock -- land a ship
X
XSYNTAX
X dock <#shipnumber> <#to shipnumber>
X
XDESCRIPTION
X This command docks two ships together. The two ships in question must
Xbe closer than the minimum landing distance.
X
XSEE ALSO
X land, dock, launch, undock
END_OF_FILE
if test 289 -ne `wc -c <'Docs/dock.doc'`; then
echo shar: \"'Docs/dock.doc'\" unpacked with wrong size!
fi
# end of 'Docs/dock.doc'
fi
if test -f 'Docs/examine.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/examine.doc'\"
else
echo shar: Extracting \"'Docs/examine.doc'\" \(539 characters\)
sed "s/^X//" >'Docs/examine.doc' <<'END_OF_FILE'
XEXAMINE Galactic Bloodshed EXAMINE
X
X
XNAME
X [1] examine -- look at a ship/object
X
XSYNTAX
X examine <#shipnum>
X
XDESCRIPTION
X
X ``Examine'' gives the user a short paragraph-summary description of a ship or
Xobject and how it can be used. This command can be applied to any ship or
Xobject in a system where a player has equipment (ships, objects, or a
Xcolonized planet.)
X
X This command deducts 1 AP for the time and research spent in examination,
Xhowever subsequent examinations of the same ship/object use no AP's.
X
X
XSEE ALSO
X build
X
END_OF_FILE
if test 539 -ne `wc -c <'Docs/examine.doc'`; then
echo shar: \"'Docs/examine.doc'\" unpacked with wrong size!
fi
# end of 'Docs/examine.doc'
fi
if test -f 'Docs/explore.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/explore.doc'\"
else
echo shar: Extracting \"'Docs/explore.doc'\" \(356 characters\)
sed "s/^X//" >'Docs/explore.doc' <<'END_OF_FILE'
XEXPLORE Galactic Bloodshed EXPLORE
X
X
XNAME
X [0] explore -- global survey of explored worlds
X
XSYNTAX
X explore <where>
X
XDESCRIPTION
X This command gives a brief census of all stars and worlds the player
Xcurrently occupies or has occupied.
X
X More detailed information about stars/planets can be found using
Xthe 'survey' command.
X
XSEE ALSO
X survey
END_OF_FILE
if test 356 -ne `wc -c <'Docs/explore.doc'`; then
echo shar: \"'Docs/explore.doc'\" unpacked with wrong size!
fi
# end of 'Docs/explore.doc'
fi
if test -f 'Docs/fix.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/fix.doc'\"
else
echo shar: Extracting \"'Docs/fix.doc'\" \(636 characters\)
sed "s/^X//" >'Docs/fix.doc' <<'END_OF_FILE'
XFIX Galactic Bloodshed FIX
X
X
XNAME
X [0] fix -- alter conditions on planet/race/ship/star (manager only)
X
XSYNOPSIS
X fix [sectorx,y] ["race"]
X
XDESCRIPTION
X
X Fix cycles through attributes of a race,planet,ship,star, or sector. These
Xcan be altered by typing in a number of the appropriate type, or hitting
Xreturn to go to the next attribute. The manager must "cs" to the object
Xbeing altered. If the manager wishes to fix a sector, the current scope
Xmust be that planet. To fix the attributes of a player itself, the manager
Xmust login as that player, and type "fix race".
X
X This command was included to counteract bugs.
X
X
END_OF_FILE
if test 636 -ne `wc -c <'Docs/fix.doc'`; then
echo shar: \"'Docs/fix.doc'\" unpacked with wrong size!
fi
# end of 'Docs/fix.doc'
fi
if test -f 'Docs/give.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/give.doc'\"
else
echo shar: Extracting \"'Docs/give.doc'\" \(409 characters\)
sed "s/^X//" >'Docs/give.doc' <<'END_OF_FILE'
XGIVE Galactic Bloodshed GIVE
X
X
XNAME
X [0] give -- give a mutual ally a ship.
X
XSYNTAX
X give <player> <ship>
X
XDESCRIPTION
X
X You can give another player a ship if you are both mutually allied.
XThe ship becomes immediately under the new player's control. Inhabited
Xand explored bits are also set for the new player in the system where
Xthe ship resides. Spore pods cannot have their ownership changed.
X
END_OF_FILE
if test 409 -ne `wc -c <'Docs/give.doc'`; then
echo shar: \"'Docs/give.doc'\" unpacked with wrong size!
fi
# end of 'Docs/give.doc'
fi
if test -f 'Docs/god.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/god.doc'\"
else
echo shar: Extracting \"'Docs/god.doc'\" \(195 characters\)
sed "s/^X//" >'Docs/god.doc' <<'END_OF_FILE'
XGOD Galactic Bloodshed GOD
X
X
XNAME
X god -- turn off diety priveledges
X
XSYNTAX
X god
X
XDESCRIPTION
X
X If the user had diety priveledges before, this revokes them, for
Xdevelopment purposes.
X
END_OF_FILE
if test 195 -ne `wc -c <'Docs/god.doc'`; then
echo shar: \"'Docs/god.doc'\" unpacked with wrong size!
fi
# end of 'Docs/god.doc'
fi
if test -f 'Docs/info.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/info.doc'\"
else
echo shar: Extracting \"'Docs/info.doc'\" \(407 characters\)
sed "s/^X//" >'Docs/info.doc' <<'END_OF_FILE'
X 4/24/90
X
XGalactic Bloodshed, copyright (c) 1989 1990 by Robert P. Chansky,
Xsmq@ucscb.ucsc.edu, Univ of California at Santa Cruz.
X
X Version 1.0-1.3 modifications by:
X Garrett Van Cleef, Ph.D
X Jet Propulsion Laboratory
X California Institute of Technology
X Pasadena, California 91109
X
Xsend game correspondence to
X Garrett 'vancleef@pooh.caltech.edu'
X or Rob 'smq@ucscb.ucsc.edu'
END_OF_FILE
if test 407 -ne `wc -c <'Docs/info.doc'`; then
echo shar: \"'Docs/info.doc'\" unpacked with wrong size!
fi
# end of 'Docs/info.doc'
fi
if test -f 'Docs/launch.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/launch.doc'\"
else
echo shar: Extracting \"'Docs/launch.doc'\" \(526 characters\)
sed "s/^X//" >'Docs/launch.doc' <<'END_OF_FILE'
XLAUNCH Galactic Bloodshed LAUNCH
X
X
XNAME
X [1] launch -- launch a ship
X
XSYNOPSIS
X launch <#shipnum>
X
XDESCRIPTION
X This command attempts to launch ships that are landed on planets.
X
X To do so a ship must have an amount of fuel proportional to the
Xgravitational field of the planet and the mass of the ship. If the ship does
Xnot have enough fuel, it will not be able to launch. The ship must also
Xcontain at least one crew member or be a robotic ship, and must not be
Xirradiated.
X
X
XSEE ALSO
X undock, land, dock
END_OF_FILE
if test 526 -ne `wc -c <'Docs/launch.doc'`; then
echo shar: \"'Docs/launch.doc'\" unpacked with wrong size!
fi
# end of 'Docs/launch.doc'
fi
if test -f 'Docs/make.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/make.doc'\"
else
echo shar: Extracting \"'Docs/make.doc'\" \(649 characters\)
sed "s/^X//" >'Docs/make.doc' <<'END_OF_FILE'
XMAKE Galactic Bloodshed MAKE
X
X
XNAME
X [0] make -- This commands a factory to make a specific ship type.
X
XSYNTAX
X make <ship type>
X
XDESCRIPTION
X
X In order to build ships, a factory must be programmed to produce the
Xdesired type of ship. For example, if a factory is to produce explorers,
Xthe player must issue the command 'make e'.
X
X The make with a ship argument can only be issued to offline factories.
XOnce online, the ship design is set.
X
X if no argument is specified, the command will list the characteristics
Xof the ship type being produced. These characteristics can be altered
Xvia the 'modify' command.
X
XSEE ALSO
X modify, build
END_OF_FILE
if test 649 -ne `wc -c <'Docs/make.doc'`; then
echo shar: \"'Docs/make.doc'\" unpacked with wrong size!
fi
# end of 'Docs/make.doc'
fi
if test -f 'Docs/makeuniv.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/makeuniv.doc'\"
else
echo shar: Extracting \"'Docs/makeuniv.doc'\" \(803 characters\)
sed "s/^X//" >'Docs/makeuniv.doc' <<'END_OF_FILE'
XMAKEUNIV Galactic Bloodshed MAKEUNIV
X
X
XNAME
X makeuniv -- construct data files for ``Galactic Bloodshed''
X
XSYNTAX
X makeuniv [-v] { from UNIX shell only }
X
XDESCRIPTION
X
X This command constructs the data files used in the game. The ``-v''
Xoption causes makeuniv to print out sector maps and information about planets,
Xsystems, etc. otherwise the construction will be relatively silent.
X
X Makeuniv asks for the number of stars (which cannot exceed the maximum
Xlisted there without dire consequences), a lower and upper range of planets
Xthat the program will not exceed, and the name of each star system. The
Xplanets of each system will be named according to the star and a roman
Xnumeral representing its position, i.e. "Sol/Sol-III".
X
X Makeuniv will destroy any game previously in operation.
X
END_OF_FILE
if test 803 -ne `wc -c <'Docs/makeuniv.doc'`; then
echo shar: \"'Docs/makeuniv.doc'\" unpacked with wrong size!
fi
# end of 'Docs/makeuniv.doc'
fi
if test -f 'Docs/name.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/name.doc'\"
else
echo shar: Extracting \"'Docs/name.doc'\" \(826 characters\)
sed "s/^X//" >'Docs/name.doc' <<'END_OF_FILE'
XNAME Galactic Bloodshed NAME
X
X
XDESCRIPTION
X [2] name -- rename an object (ship, star, planet, your race)
X
XSYNTAX
X name <what> <name>
X
XDESCRIPTION
X
X In order to rename a ship, planet, or star you must first 'cs' to that object
Xthen do 'name ship <name>', 'name star <name>', or 'name planet <name>'.
XYou can also rename your race with 'name race <name>'. You must own the
Xship or have explored the star or planet to rename them.
X
X An additional constraint against the player is that he have more AP's
Xthan any other player in the system in which he is naming (only if the
Xobject is a star). The AP cost will be deducted from that system,
Xunless the object named is the racial name or a ship in interstellar space,
Xin which case the AP cost will be deducted from the ``universal'' scope.
X
X
XSEE ALSO
X cs, actionpoints
END_OF_FILE
if test 826 -ne `wc -c <'Docs/name.doc'`; then
echo shar: \"'Docs/name.doc'\" unpacked with wrong size!
fi
# end of 'Docs/name.doc'
fi
if test -f 'Docs/page.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/page.doc'\"
else
echo shar: Extracting \"'Docs/page.doc'\" \(485 characters\)
sed "s/^X//" >'Docs/page.doc' <<'END_OF_FILE'
XPAGE Galactic Bloodshed PAGE
X
X
XNAME
X [0] page -- tell anothe player that you are looking for them
X
XSYNOPSIS
X page <player>
X
XDESCRIPTION
X
X If a player not at universal scope, he/she can page another player.
XThe player must have diety status or physically be inhabiting the system in
Xsome capacity. The paged player will get a message that the paging player
Xis looking for him in the system. This is a way of calling someone for
Xa conference.
X
X
XSEE ALSO
X announce, who
X
END_OF_FILE
if test 485 -ne `wc -c <'Docs/page.doc'`; then
echo shar: \"'Docs/page.doc'\" unpacked with wrong size!
fi
# end of 'Docs/page.doc'
fi
if test -f 'Docs/power.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/power.doc'\"
else
echo shar: Extracting \"'Docs/power.doc'\" \(331 characters\)
sed "s/^X//" >'Docs/power.doc' <<'END_OF_FILE'
XPOWER Galactic Bloodshed POWER
X
X
XNAME
X [0] power -- list empires and their approximate influence
X
XSYNTAX
X power
X
XDESCRIPTION
X
X This command lists all players currently in the game, and their accumulated
Xtotal stockpiles, number of planets on which they have colonies, number of
Xships, and various other information.
X
END_OF_FILE
if test 331 -ne `wc -c <'Docs/power.doc'`; then
echo shar: \"'Docs/power.doc'\" unpacked with wrong size!
fi
# end of 'Docs/power.doc'
fi
if test -f 'Docs/quit.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/quit.doc'\"
else
echo shar: Extracting \"'Docs/quit.doc'\" \(192 characters\)
sed "s/^X//" >'Docs/quit.doc' <<'END_OF_FILE'
XQUIT Galactic Bloodshed QUIT
X
X
XNAME
X [0] quit -- disconnect from the server.
X
XSYNTAX
X quit
X
XDESCRIPTION
X
X This closes down the connection between the user's site and the
Xserver.
X
END_OF_FILE
if test 192 -ne `wc -c <'Docs/quit.doc'`; then
echo shar: \"'Docs/quit.doc'\" unpacked with wrong size!
fi
# end of 'Docs/quit.doc'
fi
if test -f 'Docs/relation.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/relation.doc'\"
else
echo shar: Extracting \"'Docs/relation.doc'\" \(489 characters\)
sed "s/^X//" >'Docs/relation.doc' <<'END_OF_FILE'
XRELATION Galactic Bloodshed RELATION
X
X
XNAME
X [0] relation -- state relations
X
XSYNTAX
X relation <player>
X
XDESCRIPTION
X This command prints out the relations between the player's race and those
Xof the other players in the game. It also gives the translation modifiers
Xfor each player.
X
X If an argument is given, the relationship towards that player is displayed
Xonly. If no arguments are given, the relationships between all races are
Xshown.
X
XSEE ALSO
X power, read, declare
X
END_OF_FILE
if test 489 -ne `wc -c <'Docs/relation.doc'`; then
echo shar: \"'Docs/relation.doc'\" unpacked with wrong size!
fi
# end of 'Docs/relation.doc'
fi
if test -f 'Docs/report.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/report.doc'\"
else
echo shar: Extracting \"'Docs/report.doc'\" \(604 characters\)
sed "s/^X//" >'Docs/report.doc' <<'END_OF_FILE'
XREPORT Galactic Bloodshed REPORT
X
X
XNAME
X [0] report -- navigational ship report
X
XSYNTAX
X report <#shipnum or ship types>
X
XDESCRIPTION
X This command allows users to survey their ships. Where ``stock'' gives
Xinformation about what a ship is carrying, ``report'' will give
Xinformation about where the ship is and where it is going.
X
X If given with no arguments, ``report'' will start with the current scope
Xand give reports on all ships from there down.
X
X Additional information about the ship can be obtained with the ``examine''
Xcommand.
X
X
XSEE ALSO
X examine, ship, stock, tactical, scope
X
END_OF_FILE
if test 604 -ne `wc -c <'Docs/report.doc'`; then
echo shar: \"'Docs/report.doc'\" unpacked with wrong size!
fi
# end of 'Docs/report.doc'
fi
if test -f 'Docs/scrap.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/scrap.doc'\"
else
echo shar: Extracting \"'Docs/scrap.doc'\" \(643 characters\)
sed "s/^X//" >'Docs/scrap.doc' <<'END_OF_FILE'
XSCRAP Galactic Bloodshed SCRAP
X
X
XNAME
X [1] scrap -- junk a ship
X
XSYNTAX
X scrap <#shipnum>
X
XDESCRIPTION
X
X Scrap allows users to reclaim the resources consumed in building
Xa ship or object. Because of labor costs, only 50% of the original cost of
Xthe ship/object can be reclaimed.
X
X Upon scrapping the ship, its reclamation value plus any commodities it may
Xhave in its hold, are added to the stockpiles of the planet it is on.
X
X If the ship is not landed on a planet, no resources may be reclaimed; however,
Xthe ship can self-destruct if it has a self-destruct charge (1 or more
Xdestructive capacity).
X
XSEE ALSO
X load, stock, build
X
END_OF_FILE
if test 643 -ne `wc -c <'Docs/scrap.doc'`; then
echo shar: \"'Docs/scrap.doc'\" unpacked with wrong size!
fi
# end of 'Docs/scrap.doc'
fi
if test -f 'Docs/ship.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/ship.doc'\"
else
echo shar: Extracting \"'Docs/ship.doc'\" \(505 characters\)
sed "s/^X//" >'Docs/ship.doc' <<'END_OF_FILE'
X
XSHIP Galactic Bloodshed SHIP
X
X
XNAME
X [0] ship -- ship report
X
XSYNTAX
X ship <#shipnum or shiptypes>
X
XDESCRIPTION
X This command allows users to survey their ships. It is equivalent to
Xrequesting a stock, report, and tactical report for each ship. This command
Xuses scoping in the same way the other commands do. Ship types are detailed
Xin the ``build'' docs.
X
X Additional information about ships can be obtained with the ``examine''
Xcommand.
X
X
X
XSEE ALSO
X examine, report, tactical, scope
X
END_OF_FILE
if test 505 -ne `wc -c <'Docs/ship.doc'`; then
echo shar: \"'Docs/ship.doc'\" unpacked with wrong size!
fi
# end of 'Docs/ship.doc'
fi
if test -f 'Docs/stock.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/stock.doc'\"
else
echo shar: Extracting \"'Docs/stock.doc'\" \(398 characters\)
sed "s/^X//" >'Docs/stock.doc' <<'END_OF_FILE'
XSTOCK Galactic Bloodshed STOCK
X
X
XNAME
X [0] stock -- stockpile report
X
XSYNTAX
X stock <#shipnum or shiptypes>
X
XDESCRIPTION
X This command allows users to survey their ships. It gives basic
Xinformation about cargo and crew.
X
X If given with no arguments, ``stock'' will start with the current scope
Xand give reports on all ships from there down.
X
X
XSEE ALSO
X ship, report, tactical, scope
X
END_OF_FILE
if test 398 -ne `wc -c <'Docs/stock.doc'`; then
echo shar: \"'Docs/stock.doc'\" unpacked with wrong size!
fi
# end of 'Docs/stock.doc'
fi
if test -f 'Docs/telegram.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/telegram.doc'\"
else
echo shar: Extracting \"'Docs/telegram.doc'\" \(844 characters\)
sed "s/^X//" >'Docs/telegram.doc' <<'END_OF_FILE'
XTELGRAM Galactic Bloodshed TELGRAM
X
X
XCONCEPT
X Send messages to other players
X
XSYNTAX
X [1] send <player> <message> -- This will send a message to another player.
X [0] read <telegram type> -- This will read all of the telegrams of the said type.
X
XDESCRIPTION
X
X This command allows users to communicate with each other. The player
Xmust specify who/what they wish to contact, and a message to send to
Xthat player. To specify a place instead of a single player, the string
Xmust begin with one of the following characters: / : . # If the string
Xis specified in this way, all players that currently occupy the area
Xspecified will be sent the telegram. If the area is a ship, only the owner
Xof that ship will be the recipient.
X
X You can send a message to all members of your alliance block if you
Xuse the string 'block' for <player>.
X
X
END_OF_FILE
if test 844 -ne `wc -c <'Docs/telegram.doc'`; then
echo shar: \"'Docs/telegram.doc'\" unpacked with wrong size!
fi
# end of 'Docs/telegram.doc'
fi
if test -f 'Docs/time.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/time.doc'\"
else
echo shar: Extracting \"'Docs/time.doc'\" \(271 characters\)
sed "s/^X//" >'Docs/time.doc' <<'END_OF_FILE'
XTIME Galactic Bloodshed TIME
X
X
XNAME
X [0] time -- give player information of the time for game functions.
X
XSYNTAX
X time
X
XDESCRIPTION
X
X This command tells the player the current local time, the time of the
Xlast update and when the server was last started.
X
X
X
END_OF_FILE
if test 271 -ne `wc -c <'Docs/time.doc'`; then
echo shar: \"'Docs/time.doc'\" unpacked with wrong size!
fi
# end of 'Docs/time.doc'
fi
if test -f 'Docs/toggle.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/toggle.doc'\"
else
echo shar: Extracting \"'Docs/toggle.doc'\" \(352 characters\)
sed "s/^X//" >'Docs/toggle.doc' <<'END_OF_FILE'
XTOGGLE Galactic Bloodshed TOGGLE
X
X
XNAME
X [0] toggle -- turn on/off some options
X
XSYNOPSIS
X toggle <option_name>
X
XDESCRIPTION
X
X Toggle turns on or off the named option. If no option is given,
Xtoggle will list all available options and their values.
X
X Currently the only options available deal with the "map" command.
X
XSEE ALSO
X map
X
END_OF_FILE
if test 352 -ne `wc -c <'Docs/toggle.doc'`; then
echo shar: \"'Docs/toggle.doc'\" unpacked with wrong size!
fi
# end of 'Docs/toggle.doc'
fi
if test -f 'Docs/toxicity.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/toxicity.doc'\"
else
echo shar: Extracting \"'Docs/toxicity.doc'\" \(408 characters\)
sed "s/^X//" >'Docs/toxicity.doc' <<'END_OF_FILE'
XTOXICTY Galactic Bloodshed TOXICTY
X
X
XNAME
X [1] toxicity -- set threshold for building toxic waste canisters
X
XSYNOPSIS
X toxicity
X
XDESCRIPTION
X
X This command sets a toxicity threshold for the planet in the current
Xscope. When toxicity of the planet is greater than or equal to this threshold,
Xa toxic waste canister will be built and as much toxic waste loaded on as
Xwill fit.
X
XSEE ALSO
X survey
END_OF_FILE
if test 408 -ne `wc -c <'Docs/toxicity.doc'`; then
echo shar: \"'Docs/toxicity.doc'\" unpacked with wrong size!
fi
# end of 'Docs/toxicity.doc'
fi
if test -f 'Docs/transfer.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/transfer.doc'\"
else
echo shar: Extracting \"'Docs/transfer.doc'\" \(511 characters\)
sed "s/^X//" >'Docs/transfer.doc' <<'END_OF_FILE'
XTRANSFER Galactic Bloodshed TRANSFER
X
X
XNAME
X [2] transfer -- transfer supplies to alien stockpiles
X
XSYNTAX
X
X transfer <player> <commodity> <amount>
X
X
XDESCRIPTION
X
X This command allows the player to transfer resources/fuel/destruct
Xto another player. To do this the player must have the planet where the
Xtransfer is to take place as the current scope. Transferred supplies
Xare immediately deducted from the transferring players stockpiles
Xand added to the targeted players stockpiles.
X
X
XSEE ALSO
X scope
END_OF_FILE
if test 511 -ne `wc -c <'Docs/transfer.doc'`; then
echo shar: \"'Docs/transfer.doc'\" unpacked with wrong size!
fi
# end of 'Docs/transfer.doc'
fi
if test -f 'Docs/undock.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/undock.doc'\"
else
echo shar: Extracting \"'Docs/undock.doc'\" \(196 characters\)
sed "s/^X//" >'Docs/undock.doc' <<'END_OF_FILE'
XUNDOCK Galactic Bloodshed UNDOCK
X
X
XNAME
X [1] undock -- undock a ship
X
XSYNOPSIS
X undock <#shipnum>
X
XDESCRIPTION
X this command is a synonym for launch.
X
X
XSEE ALSO
X launch, land, dock
X
END_OF_FILE
if test 196 -ne `wc -c <'Docs/undock.doc'`; then
echo shar: \"'Docs/undock.doc'\" unpacked with wrong size!
fi
# end of 'Docs/undock.doc'
fi
if test -f 'Docs/who.doc' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'Docs/who.doc'\"
else
echo shar: Extracting \"'Docs/who.doc'\" \(231 characters\)
sed "s/^X//" >'Docs/who.doc' <<'END_OF_FILE'
XWHO Galactic Bloodshed WHO
X
X
XNAME
X [0] who -- describes who is currently connected to the game
X
XSYNTAX
X who
X
XDESCRIPTION
X
X This describes which players are currently logged into the game.
X
X
XSEE ALSO
X announce, page
X
END_OF_FILE
if test 231 -ne `wc -c <'Docs/who.doc'`; then
echo shar: \"'Docs/who.doc'\" unpacked with wrong size!
fi
# end of 'Docs/who.doc'
fi
if test -f 'client/GB_copyright.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'client/GB_copyright.h'\"
else
echo shar: Extracting \"'client/GB_copyright.h'\" \(723 characters\)
sed "s/^X//" >'client/GB_copyright.h' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 1990 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, Univ of Ca Santa Cruz.
X * You may copy, alter and distribute this game as you please as
X * long as these notices remain intact. No duplication for
X * commercial purposes without permission of the author.
X *
X * Version 1.1 mods by:
X * Garrett Van Cleef, Ph.D
X * Dept. of Physics
X * Ohio State University
X * V1.1 playtesting by:
X * Hanan Baddar
X * Ken Bloch
X * John Davis
X * Robert Jones
X * Menelaos Kafkaladis
X * Brett Lowry
X * Paul Murphy
X * Garrett van Cleef
X * Wolfgang Wenzel
X * and
X * tons of people
X * at U.C. Santa Cruz
X *
X */
X
X
END_OF_FILE
if test 723 -ne `wc -c <'client/GB_copyright.h'`; then
echo shar: \"'client/GB_copyright.h'\" unpacked with wrong size!
fi
# end of 'client/GB_copyright.h'
fi
if test -f 'client/Makefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'client/Makefile'\"
else
echo shar: Extracting \"'client/Makefile'\" \(475 characters\)
sed "s/^X//" >'client/Makefile' <<'END_OF_FILE'
X# Galactic Bloodshed (Robert Chansky, smq@b)
X# Makefile
X
X# (the -pipe -g are for development.)
X# $(HP) comes from top level makefile for host and port info.
XCFLAGS = -O -DTERMCAP $(HP)
X#CFLAGS = -g -DTERMCAP $(HP)
X#CFLAGS = -pipe -g -DTERMCAP
X
X# objects for shell
XSHOBJS = GB_client.o \
X keyboard.o \
X util.o \
X wrap.o \
X orbit.o \
X map.o
X
Xall: GB_client
X
X# the shell
XGB_client : ${SHOBJS}
X cc -o GB_client ${SHOBJS} -lcurses -ltermcap -lm
X
Xclear:
X rm -f *.o core a.out
END_OF_FILE
if test 475 -ne `wc -c <'client/Makefile'`; then
echo shar: \"'client/Makefile'\" unpacked with wrong size!
fi
# end of 'client/Makefile'
fi
if test -f 'client/client.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'client/client.h'\"
else
echo shar: Extracting \"'client/client.h'\" \(283 characters\)
sed "s/^X//" >'client/client.h' <<'END_OF_FILE'
X#define VERS "1.0"
X
X#ifndef TRUE
X#define TRUE 1
X#endif
X
X#ifndef FALSE
X#define FALSE 0
X#endif
X
X#define MAXSTRLEN 2047
X#define HUGESTRLEN (2*MAXSTRLEN + 1)
X#define SMALLSTR 31
X
Xtypedef char string[MAXSTRLEN];
Xtypedef char hugestr[HUGESTRLEN];
Xtypedef char smallstr[SMALLSTR];
END_OF_FILE
if test 283 -ne `wc -c <'client/client.h'`; then
echo shar: \"'client/client.h'\" unpacked with wrong size!
fi
# end of 'client/client.h'
fi
if test -f 'client/patchlevel.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'client/patchlevel.h'\"
else
echo shar: Extracting \"'client/patchlevel.h'\" \(21 characters\)
sed "s/^X//" >'client/patchlevel.h' <<'END_OF_FILE'
X#define PATCHLEVEL 1
END_OF_FILE
if test 21 -ne `wc -c <'client/patchlevel.h'`; then
echo shar: \"'client/patchlevel.h'\" unpacked with wrong size!
fi
# end of 'client/patchlevel.h'
fi
if test -f 'server/GB_copyright.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/GB_copyright.h'\"
else
echo shar: Extracting \"'server/GB_copyright.h'\" \(859 characters\)
sed "s/^X//" >'server/GB_copyright.h' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 1990 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, Univ of Ca Santa Cruz.
X * You may copy, alter and distribute this game as you please as
X * long as these notices remain intact. No duplication for
X * commercial purposes without permission of the author.
X *
X * Version 1.1 mods by:
X * Garrett Van Cleef, Ph.D
X * Dept. of Physics
X * Ohio State University
X * V1.1 playtesting by:
X * Hanan Baddar
X * Ken Bloch
X * John Davis
X * Robert Jones
X * Menelaos Kafkaladis
X * Brett Lowry
X * Paul Murphy
X * Garrett van Cleef
X * Wolfgang Wenzel
X * and
X * tons of people
X * at U.C. Santa Cruz
X *
X */
X
X/* Special thanks to Jeff Wallace(jeffw@swindle.berkeley.edu) for helping
X* get some major client problems straightened out (1.3.2).
X*/
END_OF_FILE
if test 859 -ne `wc -c <'server/GB_copyright.h'`; then
echo shar: \"'server/GB_copyright.h'\" unpacked with wrong size!
fi
# end of 'server/GB_copyright.h'
fi
if test -f 'server/b.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/b.c'\"
else
echo shar: Extracting \"'server/b.c'\" \(88 characters\)
sed "s/^X//" >'server/b.c' <<'END_OF_FILE'
X#include <math.h>
Xmain(){
Xdouble x;
Xfor (x=0.; x<200; x++)
Xprintf("%g\n", log1p(x) );
X}
END_OF_FILE
if test 88 -ne `wc -c <'server/b.c'`; then
echo shar: \"'server/b.c'\" unpacked with wrong size!
fi
# end of 'server/b.c'
fi
if test -f 'server/buffers.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/buffers.h'\"
else
echo shar: Extracting \"'server/buffers.h'\" \(66 characters\)
sed "s/^X//" >'server/buffers.h' <<'END_OF_FILE'
XEXTERN char buf[2047];
XEXTERN char telegram_buf[AUTO_TELEG_SIZE];
END_OF_FILE
if test 66 -ne `wc -c <'server/buffers.h'`; then
echo shar: \"'server/buffers.h'\" unpacked with wrong size!
fi
# end of 'server/buffers.h'
fi
if test -f 'server/config.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/config.h'\"
else
echo shar: Extracting \"'server/config.h'\" \(736 characters\)
sed "s/^X//" >'server/config.h' <<'END_OF_FILE'
X#include "files.h" /* for PATH() definition */
X
X#define VERS "2.0 5/29/90"
X
X#ifndef GB_HOST
X#define GB_HOST "pooh.caltech.edu"
X#endif
X
X#ifndef GB_PORT
X#define GB_PORT 2010
X#endif
X
X
X#define COMMAND_TIME_MSEC 250 /* time slice length in milliseconds */
X#define COMMANDS_PER_TIME 1 /* commands per time slice after burst */
X#define COMMAND_BURST_SIZE 250 /* commands allowed per user in a burst */
X
X#define MAX_OUTPUT 16384
X#define DAEMON_PASSWORD "put_your_update_password_here"
X
X#define QUIT_COMMAND "quit"
X#define WHO_COMMAND "who"
X#define HELP_COMMAND "help"
X
X/* put full pathnames in here as required */
X#define DAEMONFL PATH(daemon.dat)
X#define WELCOME_FILE PATH(welcome.txt)
X#define LEAVE_MESSAGE "\n*** Have a nice day :-) ***\n"
END_OF_FILE
if test 736 -ne `wc -c <'server/config.h'`; then
echo shar: \"'server/config.h'\" unpacked with wrong size!
fi
# end of 'server/config.h'
fi
if test -f 'server/daemon.dat' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/daemon.dat'\"
else
echo shar: Extracting \"'server/daemon.dat'\" \(35 characters\)
sed "s/^X//" >'server/daemon.dat' <<'END_OF_FILE'
Xput_your_update_password_here
Xquit
END_OF_FILE
if test 35 -ne `wc -c <'server/daemon.dat'`; then
echo shar: \"'server/daemon.dat'\" unpacked with wrong size!
fi
# end of 'server/daemon.dat'
fi
if test -f 'server/docommand.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/docommand.c'\"
else
echo shar: Extracting \"'server/docommand.c'\" \(677 characters\)
sed "s/^X//" >'server/docommand.c' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, mods by people in GB_copyright.h.
X * Restrictions in GB_copyright.h.
X * docommand.c -- figures out what command it is and the arguments,
X * executes the command via the proper subroutine
X */
X
X#include "GB_copyright.h"
X#include "vars.h"
X#include "races.h"
X#include <curses.h>
X#include <strings.h>
X#include <ctype.h>
Xextern int God;
Xextern char telegram_file[50];
Xextern startype *Stars[NUMSTARS];
X
Xint docommand(commstring)
Xchar commstring[];
X{
Xint i,argn=0;
Xbool parse_exit=0;
Xchar args[MAXARGS][COMMANDSIZE];
Xchar *string;
X
X
X return(1); /* main() knows user is not quitting */
X}
END_OF_FILE
if test 677 -ne `wc -c <'server/docommand.c'`; then
echo shar: \"'server/docommand.c'\" unpacked with wrong size!
fi
# end of 'server/docommand.c'
fi
if test -f 'server/files.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/files.c'\"
else
echo shar: Extracting \"'server/files.c'\" \(526 characters\)
sed "s/^X//" >'server/files.c' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, mods by people in GB_copyright.h.
X * Restrictions in GB._copyright.h.
X */
X
X#include "GB_copyright.h"
X#include "files.h"
X
X
Xchar *Files[] = {
X PATH(mor),
X PATH(Data),
X PATH(Docs),
X PATH(exam.dat),
X PATH(enroll.dat),
X PATH(GB_doturn),
X DFILE(star),
X DFILE(sector),
X DFILE(planet),
X DFILE(race),
X DFILE(block),
X DFILE(ship),
X DFILE(shipfree),
X DFILE(dummy),
X DFILE(players),
X DFILE(Tele),
X DFILE(Tele/tele),
X DFILE(power),
X DFILE(LOCK)
X};
END_OF_FILE
if test 526 -ne `wc -c <'server/files.c'`; then
echo shar: \"'server/files.c'\" unpacked with wrong size!
fi
# end of 'server/files.c'
fi
if test -f 'server/gdb_guardian.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/gdb_guardian.c'\"
else
echo shar: Extracting \"'server/gdb_guardian.c'\" \(749 characters\)
sed "s/^X//" >'server/gdb_guardian.c' <<'END_OF_FILE'
X/*
X * guardian.c - makes sure your server keeps running.
X *
X */
X
X#include <stdio.h>
X
Xchar *prog;
X
Xmain(argc,argv)
X int argc;
X char *argv[];
X{
X int pid;
X
X prog = *argv++; /* remember guardian name */
X fprintf(stderr,"%s: ",prog);
X while (1) {
X sleep(60); /* wait a minute then try to start it up again */
X switch (pid=fork()) {
X case -1: /* error! */
X perror("can't fork a child");
X sleep(600); /* 10 min */
X break;
X case 0: /* child */
X execvp(argv[0],argv);
X perror("can't exec child");
X exit(1);
X break;
X default: /* parent */
X fprintf(stderr,"starting %s with pid [%d]\n",argv[0],pid);
X wait(0); /* wait for the little brat */
X break;
X }
X fprintf(stderr,"%s: re",prog);
X }
X}
END_OF_FILE
if test 749 -ne `wc -c <'server/gdb_guardian.c'`; then
echo shar: \"'server/gdb_guardian.c'\" unpacked with wrong size!
fi
# end of 'server/gdb_guardian.c'
fi
if test -f 'server/get4args.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/get4args.c'\"
else
echo shar: Extracting \"'server/get4args.c'\" \(641 characters\)
sed "s/^X//" >'server/get4args.c' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, mods by people in GB_copyright.h.
X * Restrictions in GB_copyright.h.
X *
X */
X
X#include "GB_copyright.h"
X
Xget4args(s,xl,xh,yl,yh)
Xchar *s;
Xint *xl,*xh,*yl,*yh;
X{
Xchar *p,s1[17],s2[17];
X p=s;
X
X sscanf(p,"%[^,]",s1);
X while ( (*p!=':') && (*p!=',') ) p++;
X if (*p==':') {
X sscanf(s1,"%d:%d",xl,xh);
X while (*p!=',') p++;
X }
X else if (*p==',') {
X sscanf(s1,"%d",xl);
X *xh=(*xl);
X }
X
X sscanf(p,"%s",s2);
X while ( (*p!=':') && (*p!='\0') ) p++;
X if (*p==':') {
X sscanf(s2,",%d:%d",yl,yh);
X }
X else {
X sscanf(s2,",%d,",yl);
X *yh=(*yl);
X }
X
X}
END_OF_FILE
if test 641 -ne `wc -c <'server/get4args.c'`; then
echo shar: \"'server/get4args.c'\" unpacked with wrong size!
fi
# end of 'server/get4args.c'
fi
if test -f 'server/guardian.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/guardian.c'\"
else
echo shar: Extracting \"'server/guardian.c'\" \(838 characters\)
sed "s/^X//" >'server/guardian.c' <<'END_OF_FILE'
X/*
X * guardian.c - makes sure your server keeps running.
X *
X */
X
X#include <stdio.h>
X#include <signal.h>
X
Xchar *prog;
X
Xmain(argc,argv)
X int argc;
X char *argv[];
X{
X int pid;
X
X (void)sigblock(SIGHUP); /* ignore signal when owner logs out */
X
X prog = *argv++; /* remember guardian name */
X fprintf(stderr,"%s: ",prog);
X while (1) {
X switch (pid=fork()) {
X case -1: /* error! */
X perror("can't fork a child");
X sleep(600); /* 10 min */
X break;
X case 0: /* child */
X execvp(argv[0],argv);
X perror("can't exec child");
X exit(1);
X break;
X default: /* parent */
X fprintf(stderr,"starting %s with pid [%d]\n",argv[0],pid);
X wait(0); /* wait for the little brat */
X break;
X }
X fprintf(stderr,"%s: re",prog);
X sleep(60); /* wait a minute then try to start it up again */
X }
X}
END_OF_FILE
if test 838 -ne `wc -c <'server/guardian.c'`; then
echo shar: \"'server/guardian.c'\" unpacked with wrong size!
fi
# end of 'server/guardian.c'
fi
if test -f 'server/interface.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/interface.h'\"
else
echo shar: Extracting \"'server/interface.h'\" \(735 characters\)
sed "s/^X//" >'server/interface.h' <<'END_OF_FILE'
X#include "TinyMUD_copyright.h"
X
X#ifdef __STDC__
X/* these symbols must be defined by the interface */
Xextern int notify(int Playernum, char *msg);
Xextern int shutdown_flag; /* if non-zero, interface should shut down */
Xextern void emergency_shutdown(void);
X
X/* the following symbols are provided by game.c */
X
Xextern void process_command(int Playernum, char *command);
X
Xextern void panic(const char *);
X#else
X#define const
Xextern int notify();
Xextern int shutdown_flag; /* if non-zero, interface should shut down */
Xextern void emergency_shutdown();
Xextern void process_command();
Xextern void panic();
X#endif
X
X/* max length of command argument to process_command */
X#define MAX_COMMAND_LEN 512
X#define BUFFER_LEN ((MAX_COMMAND_LEN)*8)
END_OF_FILE
if test 735 -ne `wc -c <'server/interface.h'`; then
echo shar: \"'server/interface.h'\" unpacked with wrong size!
fi
# end of 'server/interface.h'
fi
if test -f 'server/list.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/list.c'\"
else
echo shar: Extracting \"'server/list.c'\" \(460 characters\)
sed "s/^X//" >'server/list.c' <<'END_OF_FILE'
X#include "GB_copyright.h"
X
Xlist(arg)
Xint arg;
X{
X/* lists all ships for debugging purposes */
Xshiptype *ship;
Xint shdata,i;
X
Xif(!God)
X return;
X
X openshdata(&shdata);
X Num_ships = Numships(shdata);
X printf("Num ships %d\n", Num_ships);
X
X ships = (shiptype **)malloc(sizeof(shiptype *) * Num_ships);
X for (i=1; i<=Num_ships; i++) {
X getship(shdata,&ships[i],i);
X
X printf("ship #%d (%d) -> #%d\n",i,ships[i]->owner,ships[i]->nextship);
X }
X close_file(shdata);
X
X}
END_OF_FILE
if test 460 -ne `wc -c <'server/list.c'`; then
echo shar: \"'server/list.c'\" unpacked with wrong size!
fi
# end of 'server/list.c'
fi
if test -f 'server/misc.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/misc.c'\"
else
echo shar: Extracting \"'server/misc.c'\" \(540 characters\)
sed "s/^X//" >'server/misc.c' <<'END_OF_FILE'
X/*
X * Galactic Bloodshed, copyright (c) 1989 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, mods by people in GB_copyright.h.
X * Restrictions in GB_copyright.h.
X *
X * scales used in production efficiency etc.
X * input both: int 0-100
X * output both: float 0.0 - 1.0 (logscaleOB 0.5 - .95)
X */
X
X#include "GB_copyright.h"
X#include <math.h>
X
Xfloat powscale(x)
Xregister int x;
X{
X register float f;
X return (f=(float)x/100.0)*f;
X}
X
Xfloat logscale(x)
Xregister int x;
X{
X/* return (x+5.0) / (x+10.0); */
X return (float)log10((double)x+1.0)/2.0;
X}
X
END_OF_FILE
if test 540 -ne `wc -c <'server/misc.c'`; then
echo shar: \"'server/misc.c'\" unpacked with wrong size!
fi
# end of 'server/misc.c'
fi
if test -f 'server/patchlevel.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/patchlevel.h'\"
else
echo shar: Extracting \"'server/patchlevel.h'\" \(21 characters\)
sed "s/^X//" >'server/patchlevel.h' <<'END_OF_FILE'
X#define PATCHLEVEL 1
END_OF_FILE
if test 21 -ne `wc -c <'server/patchlevel.h'`; then
echo shar: \"'server/patchlevel.h'\" unpacked with wrong size!
fi
# end of 'server/patchlevel.h'
fi
if test -f 'server/power.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/power.h'\"
else
echo shar: Extracting \"'server/power.h'\" \(520 characters\)
sed "s/^X//" >'server/power.h' <<'END_OF_FILE'
X
X/*
X * Galactic Bloodshed, copyright (c) 1989 by Robert P. Chansky,
X * smq@ucscb.ucsc.edu, mods by people in GB.c, enroll.dat.
X * Restrictions in GB.c.
X */
X
X /* for power report */
X
Xstruct power {
X ul popn; /* total population */
X ul resource; /* total resource in stock */
X ul fuel;
X ul destruct; /* total dest in stock */
X us ships_owned; /* # of ships owned */
X us planets_owned;
X ul sectors_owned;
X ul sum_mob; /* total mobilization */
X ul sum_eff; /* total efficiency */
X};
X
XEXTERN struct power Power[MAXPLAYERS];
END_OF_FILE
if test 520 -ne `wc -c <'server/power.h'`; then
echo shar: \"'server/power.h'\" unpacked with wrong size!
fi
# end of 'server/power.h'
fi
if test -f 'server/traverse.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'server/traverse.c'\"
else
echo shar: Extracting \"'server/traverse.c'\" \(764 characters\)
sed "s/^X//" >'server/traverse.c' <<'END_OF_FILE'
X#include "GB_copyright.h"
X#define EXTERN
X#include "vars.h"
X#include "races.h"
X#include "ships.h"
X
X
Xmain()
X{
X int stardata, pdata;
X reg int star,i,pnum;
X planettype *p;
X
X openstardata(&stardata);
X getsdata(stardata,&Sdata);
X openpdata(&pdata);
X for (star=0; star<Sdata.numstars; star++) {
X getstar(stardata, &Stars[star], star);
X for (pnum=0; pnum<Stars[star]->numplanets; pnum++) {
X getplanet(pdata,&p,Stars[star]->planetpos[pnum]);
X printf("st %d pl %d mappos %d\n", star,pnum, p->sectormappos);
X for (i=1; i<MAXPLAYERS; i++) {
X p->info[i-1].resource *= 0.1;
X p->info[i-1].fuel *= 0.1;
X p->info[i-1].destruct *= 0.1;
X }
X putplanet(pdata,p,Stars[star]->planetpos[pnum]);
X free(p);
X }
X }
X close_file(stardata);
X close_file(pdata);
X
X}
END_OF_FILE
if test 764 -ne `wc -c <'server/traverse.c'`; then
echo shar: \"'server/traverse.c'\" unpacked with wrong size!
fi
# end of 'server/traverse.c'
fi
echo shar: End of archive 14 \(of 14\).
cp /dev/null ark14isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 14 archives.
rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
echo You still need to unpack the following archives:
echo " " ${MISSING}
fi
## End of shell archive.
exit 0