usr/src/games/trek/dock.c

/*
 * Copyright (c) 1980 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms are permitted
 * provided that the above copyright notice and this paragraph are
 * duplicated in all such forms and that any documentation,
 * advertising materials, and other materials related to such
 * distribution and use acknowledge that the software was developed
 * by the University of California, Berkeley.  The name of the
 * University may not be used to endorse or promote products derived
 * from this software without specific prior written permission.
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */

#ifndef lint
static char sccsid[] = "@(#)dock.c      5.3 (Berkeley) 6/18/88";
#endif /* not lint */

# include       "trek.h"

/*
**  DOCK TO STARBASE
**
**      The starship is docked to a starbase.  For this to work you
**      must be adjacent to a starbase.
**
**      You get your supplies replenished and your captives are
**      disembarked.  Note that your score is updated now, not when
**      you actually take the captives.
**
**      Any repairs that need to be done are rescheduled to take
**      place sooner.  This provides for the faster repairs when you
**      are docked.
*/

dock()
{
        register int            i, j;
        int                     ok;
        register struct event   *e;

        if (Ship.cond == DOCKED)
                return (printf("Chekov: But captain, we are already docked\n"));
        /* check for ok to dock, i.e., adjacent to a starbase */
        ok = 0;
        for (i = Ship.sectx - 1; i <= Ship.sectx + 1 && !ok; i++)
        {
                if (i < 0 || i >= NSECTS)
                        continue;
                for (j = Ship.secty - 1; j <= Ship.secty + 1; j++)
                {
                        if (j  < 0 || j >= NSECTS)
                                continue;
                        if (Sect[i][j] == BASE)
                        {
                                ok++;
                                break;
                        }
                }
        }
        if (!ok)
                return (printf("Chekov: But captain, we are not adjacent to a starbase.\n"));

        /* restore resources */
        Ship.energy = Param.energy;
        Ship.torped = Param.torped;
        Ship.shield = Param.shield;
        Ship.crew = Param.crew;
        Game.captives += Param.brigfree - Ship.brigfree;
        Ship.brigfree = Param.brigfree;

        /* reset ship's defenses */
        Ship.shldup = 0;
        Ship.cloaked = 0;
        Ship.cond = DOCKED;
        Ship.reserves = Param.reserves;

        /* recalibrate space inertial navigation system */
        Ship.sinsbad = 0;

        /* output any saved radio messages */
        dumpssradio();

        /* reschedule any device repairs */
        for (i = 0; i < MAXEVENTS; i++)
        {
                e = &Event[i];
                if (e->evcode != E_FIXDV)
                        continue;
                reschedule(e, (e->date - Now.date) * Param.dockfac);
        }
        return;
}


/*
**  LEAVE A STARBASE
**
**      This is the inverse of dock().  The main function it performs
**      is to reschedule any damages so that they will take longer.
*/

undock()
{
        register struct event   *e;
        register int            i;

        if (Ship.cond != DOCKED)
        {
                printf("Sulu: Pardon me captain, but we are not docked.\n");
                return;
        }
        Ship.cond = GREEN;
        Move.free = 0;

        /* reschedule device repair times (again) */
        for (i = 0; i < MAXEVENTS; i++)
        {
                e = &Event[i];
                if (e->evcode != E_FIXDV)
                        continue;
                reschedule(e, (e->date - Now.date) / Param.dockfac);
        }
        return;
}