V10/games/trek/dock.c

# include	"trek.h"

/**
 **	dock to starbase
 **/

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

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

	Status.energy = Initial.energy;
	Status.torped = Initial.torped;
	Status.shield = Initial.shield;
	Status.crew = Initial.crew;
	Status.brigfree = Initial.brigfree;
	Status.shldup = 0;
	Status.cloaked = 0;
	Status.cond = DOCKED;
	Status.reserves = Initial.reserves;
	Status.sinsbad = 0;
	dumpssradio();
	/* reschedule any device repairs */
	for (i = 0; i < MAXEVENTS; i++)
	{
		e = &Event[i];
		if (e->evcode != E_FIXDV)
			continue;
		reschedule(e, (Status.date - e->date)*(1 - Param.dockfac));
	}
	return;
}


/**
 **	leave a starbase
 **/

undock()
{
	register EVENT		*e;
	register int		i;

	if (Status.cond != DOCKED)
	{
		printf("Sulu: Pardon me captain, but we are not docked.\n");
		return;
	}
	Status.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, (Status.date - e->date)*(1 - 1 / Param.dockfac));
	}
	return;
}