Return to dock.c CVS log

Up to [CSRG BSD Unix] / 42BSD / games / trek

Annotation of 42BSD/games/trek/dock.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)dock.c     4.2     (Berkeley)      5/9/83";
                      3: #endif not lint
                      4: 
                      5: # include      "trek.h"
                      6: 
                      7: /*
                      8: **  DOCK TO STARBASE
                      9: **
                     10: **     The starship is docked to a starbase.  For this to work you
                     11: **     must be adjacent to a starbase.
                     12: **
                     13: **     You get your supplies replenished and your captives are
                     14: **     disembarked.  Note that your score is updated now, not when
                     15: **     you actually take the captives.
                     16: **
                     17: **     Any repairs that need to be done are rescheduled to take
                     18: **     place sooner.  This provides for the faster repairs when you
                     19: **     are docked.
                     20: */
                     21: 
                     22: dock()
                     23: {
                     24:        register int            i, j;
                     25:        int                     ok;
                     26:        register struct event   *e;
                     27: 
                     28:        if (Ship.cond == DOCKED)
                     29:                return (printf("Chekov: But captain, we are already docked\n"));
                     30:        /* check for ok to dock, i.e., adjacent to a starbase */
                     31:        ok = 0;
                     32:        for (i = Ship.sectx - 1; i <= Ship.sectx + 1 && !ok; i++)
                     33:        {
                     34:                if (i < 0 || i >= NSECTS)
                     35:                        continue;
                     36:                for (j = Ship.secty - 1; j <= Ship.secty + 1; j++)
                     37:                {
                     38:                        if (j  < 0 || j >= NSECTS)
                     39:                                continue;
                     40:                        if (Sect[i][j] == BASE)
                     41:                        {
                     42:                                ok++;
                     43:                                break;
                     44:                        }
                     45:                }
                     46:        }
                     47:        if (!ok)
                     48:                return (printf("Chekov: But captain, we are not adjacent to a starbase.\n"));
                     49: 
                     50:        /* restore resources */
                     51:        Ship.energy = Param.energy;
                     52:        Ship.torped = Param.torped;
                     53:        Ship.shield = Param.shield;
                     54:        Ship.crew = Param.crew;
                     55:        Game.captives += Param.brigfree - Ship.brigfree;
                     56:        Ship.brigfree = Param.brigfree;
                     57: 
                     58:        /* reset ship's defenses */
                     59:        Ship.shldup = 0;
                     60:        Ship.cloaked = 0;
                     61:        Ship.cond = DOCKED;
                     62:        Ship.reserves = Param.reserves;
                     63: 
                     64:        /* recalibrate space inertial navigation system */
                     65:        Ship.sinsbad = 0;
                     66: 
                     67:        /* output any saved radio messages */
                     68:        dumpssradio();
                     69: 
                     70:        /* reschedule any device repairs */
                     71:        for (i = 0; i < MAXEVENTS; i++)
                     72:        {
                     73:                e = &Event[i];
                     74:                if (e->evcode != E_FIXDV)
                     75:                        continue;
                     76:                reschedule(e, (e->date - Now.date) * Param.dockfac);
                     77:        }
                     78:        return;
                     79: }
                     80: 
                     81: 
                     82: /*
                     83: **  LEAVE A STARBASE
                     84: **
                     85: **     This is the inverse of dock().  The main function it performs
                     86: **     is to reschedule any damages so that they will take longer.
                     87: */
                     88: 
                     89: undock()
                     90: {
                     91:        register struct event   *e;
                     92:        register int            i;
                     93: 
                     94:        if (Ship.cond != DOCKED)
                     95:        {
                     96:                printf("Sulu: Pardon me captain, but we are not docked.\n");
                     97:                return;
                     98:        }
                     99:        Ship.cond = GREEN;
                    100:        Move.free = 0;
                    101: 
                    102:        /* reschedule device repair times (again) */
                    103:        for (i = 0; i < MAXEVENTS; i++)
                    104:        {
                    105:                e = &Event[i];
                    106:                if (e->evcode != E_FIXDV)
                    107:                        continue;
                    108:                reschedule(e, (e->date - Now.date) / Param.dockfac);
                    109:        }
                    110:        return;
                    111: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.