static void DrawPlanets(void)
/*
* Draw the planets on the local map.
*/
{
register int dx, dy;
register struct planet *l;
const int view = SCALE * TWINSIDE / 2;
for (l = planets + MAXPLANETS - 1; l >= planets; --l)
{
dx = l->pl_x - me->p_x;
dy = l->pl_y - me->p_y;
if (dx > view || dx < -view || dy > view || dy < -view)
continue;
dx = dx / SCALE + TWINSIDE / 2;
dy = dy / SCALE + TWINSIDE / 2;
W_WriteBitmap(dx - (planet_width / 2), dy - (planet_height / 2),
planetBitmap(l), planetColor(l));
if (showIND && ((l->pl_info & me->p_team)
#ifdef RECORDGAME
|| playback
#endif
) && (l->pl_owner == NOBODY))
{
W_CacheLine(w, dx - (planet_width / 2), dy - (planet_height / 2),
dx + (planet_width / 2 - 1), dy + (planet_height / 2 - 1),
W_White);
W_CacheLine(w, dx + (planet_width / 2 - 1), dy - (planet_height / 2),
dx - (planet_width / 2), dy + (planet_height / 2 - 1),
W_White);
}
if (namemode)
{
W_MaskText(w, dx - (planet_width / 2), dy + (planet_height / 2),
planetColor(l), l->pl_name, l->pl_namelen,
planetFont(l));
clearzone[0][clearcount] = dx - (planet_width / 2);
clearzone[1][clearcount] = dy + (planet_height / 2);
clearzone[2][clearcount] = W_Textwidth * l->pl_namelen;
clearzone[3][clearcount] = W_Textheight;
clearcount++;
}
clearzone[0][clearcount] = dx - (planet_width / 2);
clearzone[1][clearcount] = dy - (planet_height / 2);
clearzone[2][clearcount] = planet_width;
clearzone[3][clearcount] = planet_height;
clearcount++;
}
}
inline void clearLocal(void)
/*
* Clear the local map (intelligently rather than just simply wiping
* the map).
*/
{
if (W_FastClear)
{
W_ClearWindow(w);
clearcount = 0;
clearlcount = 0;
}
else
{
#ifndef WIN32
while (clearcount)
{
clearcount--;
/* XFIX */
W_CacheClearArea(w, clearzone[0][clearcount],
clearzone[1][clearcount], clearzone[2][clearcount],
clearzone[3][clearcount]);
/* W_ClearArea(w, clearzone[0][clearcount], * *
* clearzone[1][clearcount], clearzone[2][clearcount], * *
* clearzone[3][clearcount]); */
}
while (clearlcount)
{
clearlcount--;
/* XFIX */
W_CacheLine(w, clearline[0][clearlcount], clearline[1][clearlcount],
clearline[2][clearlcount], clearline[3][clearlcount],
backColor);
/* W_MakeLine(w, clearline[0][clearlcount], * *
* clearline[1][clearlcount], clearline[2][clearlcount], * *
* clearline[3][clearlcount], backColor); */
}
/* XFIX */
W_FlushClearAreaCache(w);
W_FlushLineCaches(w);
#else
// Much more efficient way of clearing -- X programmers take note!
W_ClearAreas(w, clearzone[0], clearzone[1], clearzone[2], clearzone[3], clearcount);
clearcount = 0;
if (tpline != -1)
{
/* Fixup for SAC's integer linedraw */
W_MakeTractLine(w, clearline[0][tpline], clearline[1][tpline],
clearline[2][tpline], clearline[3][tpline], backColor);
W_MakeTractLine(w, clearline[0][tpline + 1], clearline[1][tpline + 1],
clearline[2][tpline + 1], clearline[3][tpline + 1], backColor);
tpline = -1;
}
W_MakeLines(w, clearline[0], clearline[1], clearline[2], clearline[3], clearlcount, backColor);
clearlcount = 0;
#endif
}
}
void
redraw(void)
{
/* erase warning line if necessary */
if ((warntimer <= udcounter && hwarncount <= udcounter) &&
(warncount || hwarncount)) {
W_ClearWindow(warnw);
}
if (warntimer <= udcounter && warncount) {
W_MaskText(w, center - (warncount / 2) * W_Textwidth,
winside - W_Textheight - HUD_Y, backColor, warningbuf,
warncount, W_RegularFont);
warncount = 0;
}
if (hwarntimer <= udcounter && hwarncount) {
W_MaskText(w, center - (hwarncount / 2) * W_Textwidth, HUD_Y,
backColor, hwarningbuf, hwarncount, W_BoldFont);
hwarncount = 0;
}
if(W_IsBuffered(w)) { /* buffered, clear the entire buffer [BDyess] */
W_ClearBuffer(w);
clearcount = 0;
clearlcount = 0;
tractcurrent = tracthead;
} else
{
if (W_FastClear) {
W_ClearWindow(w);
clearcount = 0;
clearlcount = 0;
tractcurrent = tracthead;
} else {
while (clearcount) {
clearcount--;
/* XFIX */
W_CacheClearArea(w, clearzone[clearcount].x,
clearzone[clearcount].y, clearzone[clearcount].width,
clearzone[clearcount].height);
}
while (clearlcount) {
clearlcount--;
/* XFIX */
W_CacheLine(w, clearline[0][clearlcount],
clearline[1][clearlcount], clearline[2][clearlcount],
clearline[3][clearlcount], backColor);
}
/* XFIX */
W_FlushClearAreaCache(w);
W_FlushLineCaches(w);
/* erase the tractor lines [BDyess] */
for (tractrunner = tracthead; tractrunner != tractcurrent;
tractrunner = tractrunner->next) {
W_MakeTractLine(w, tractrunner->sx, tractrunner->sy,
tractrunner->d1x, tractrunner->d1y,
backColor);
W_MakeTractLine(w, tractrunner->sx, tractrunner->sy,
tractrunner->d2x, tractrunner->d2y,
backColor);
}
tractcurrent = tracthead;
}
}
local(); /* redraw local window */
/* XFIX */
W_FlushLineCaches(w);
stline(0); /* draw dashboard [BDyess] */
/* flush buffers [BDyess] */
W_DisplayBuffer(tstatw); /* dashboard [BDyess] */
W_DisplayBuffer(w); /* local [BDyess] */
/* would do it in W_EventsPending, just have
it here so the display is updated sooner. */
W_Flush();
if (W_IsMapped(statwin)) {
updateStats();
}
if (W_IsMapped(newstatwin)) {
updateNewStats();
}
updateInform(); /* check and update info window [BDyess] */
/* XFIX: last since its least accurate information */
if (mapmode) {
map();
/* write the buffered data, if any [BDyess] */
W_DisplayBuffer(mapw);
}
}
static void DrawShips(void)
{
register struct player *j;
register struct phaser *php;
char idbuf[10];
const int view = SCALE * TWINSIDE / 2;
int dx, dy, px, py, wx, wy, tx, ty, lx, ly;
#ifndef DYNAMIC_BITMAPS
W_Icon(*ship_bits)[VIEWS];
#endif
/* Kludge to try to fix missing ID chars on tactical (short range) display.
*
*/
idbuf[0] = '0';
idbuf[1] = '\0';
for (j = players + MAXPLAYER - 1; j >= players; --j)
{
#ifdef HAVE_XPM
void *sprite = S_Ship(j->p_no);
#else
if ((j->p_status != PALIVE) && (j->p_status != PEXPLODE))
continue;
if (j->p_flags & PFOBSERV)
{
/* observer and NOT locked onto a player (ie. locked onto planet or
* * * vacuum) */
if (!(j->p_flags & PFPLOCK))
continue;
/* observer and NOT cloaked - don't display ship but do tractors *
* * phasers and torps are done for that ship already */
if (!(j->p_flags & PFCLOAK))
continue;
}
#endif /* HAVE_XPM */
/* jmn - observer support.. tried to diplay tractors but no works */
if (j->p_flags & PFCLOAK)
{
if (j->p_cloakphase < (CLOAK_PHASES - 1))
{
#ifdef SOUND
if (myPlayer(j) && (j->p_cloakphase == 0)) {
#if defined(HAVE_SDL)
Play_Sound(CLOAKED_WAV);
#else
Play_Sound(CLOAK_SOUND);
#endif
}
#endif
j->p_cloakphase++;
}
}
else
{
if (j->p_cloakphase)
{
#ifdef SOUND
if (myPlayer(j))
if (j->p_cloakphase == CLOAK_PHASES - 1) {
#if defined(HAVE_SDL)
Play_Sound(UNCLOAK_WAV);
#else
Play_Sound(UNCLOAK_SOUND);
} else {
Abort_Sound(CLOAK_SOUND);
#endif
}
#endif
j->p_cloakphase--;
}
}
dx = j->p_x - me->p_x;
dy = j->p_y - me->p_y;
#ifdef HAVE_XPM
if ((sprite == NULL) && (dx > view || dx < -view || dy > view || dy < -view))
#else
if (dx > view || dx < -view || dy > view || dy < -view)
#endif
continue;
dx = dx / SCALE + TWINSIDE / 2;
dy = dy / SCALE + TWINSIDE / 2;
#ifdef HAVE_XPM
if ((sprite == NULL) || (pixFlags & NO_CLK_PIX))
#endif
if (j->p_flags & PFCLOAK && (j->p_cloakphase == (CLOAK_PHASES - 1)))
{
if (myPlayer(j)
#ifdef RECORDGAME
|| playback
#endif
)
{
W_WriteBitmap(dx - (cloak_width / 2), dy - (cloak_height / 2),
cloakicon, myColor);
#ifdef VARY_HULL
clearzone[0][clearcount] = dx - (shield_width / 2 + 1);
clearzone[1][clearcount] = dy - (shield_height / 2 + 1);
clearzone[2][clearcount] = shield_width + 3;
clearzone[3][clearcount] = shield_height + 3;
clearcount++;
#else
clearzone[0][clearcount] = dx - (shield_width / 2);
clearzone[1][clearcount] = dy - (shield_height / 2);
clearzone[2][clearcount] = shield_width;
clearzone[3][clearcount] = shield_height;
clearcount++;
#endif
goto shieldlabel; /* draw the shield even when
* * * cloaked */
}
continue;
}
if (j->p_status == PALIVE)
{
#ifndef DYNAMIC_BITMAPS
switch (j->p_team)
{
case FED:
#ifdef TNG_FED_BITMAPS
if (use_tng_fed_bitmaps)
ship_bits = tng_fed_bitmaps;
else
#endif
ship_bits = fed_bitmaps;
break;
case ROM:
ship_bits = rom_bitmaps;
break;
case KLI:
ship_bits = kli_bitmaps;
break;
case ORI:
ship_bits = ori_bitmaps;
break;
default:
ship_bits = ind_bitmaps;
break;
}
#endif
#if defined (VARY_HULL) || defined (BEEPLITE)
clearzone[0][clearcount] = dx - (shield_width / 2 + 6);
clearzone[1][clearcount] = dy - (shield_height / 2 + 6);
clearzone[2][clearcount] = shield_width + 12;
clearzone[3][clearcount] = shield_height + 12;
clearcount++;
#else
clearzone[0][clearcount] = dx - (shield_width / 2);
clearzone[1][clearcount] = dy - (shield_height / 2);
clearzone[2][clearcount] = shield_width;
clearzone[3][clearcount] = shield_height;
clearcount++;
#endif
#ifdef HAVE_XPM
if (sprite != NULL)
{
clearsize = W_DrawSprite(sprite, dx, dy, TWINSIDE);
#if defined (VARY_HULL)
if (clearsize > shield_width + 12)
#else
if (clearsize > shield_width)
#endif
{
clearcount--;
clearzone[0][clearcount] = dx - (clearsize / 2);
clearzone[1][clearcount] = dy - (clearsize / 2);
clearzone[2][clearcount] = clearsize;
clearzone[3][clearcount] = clearsize;
clearcount++;
}
}
else
#endif /* HAVE_XPM */
if (j->p_team == ROM && j->p_ship.s_type == CRUISER &&
ROMVLVS)
W_WriteBitmap(dx - (j->p_ship.s_width / 2),
dy - (j->p_ship.s_height / 2), ROMVLVS_bitmap[rosette(j->p_dir)],
playerColor(j));
else
W_WriteBitmap(dx - (j->p_ship.s_width / 2),
dy - (j->p_ship.s_height / 2),
#ifndef DYNAMIC_BITMAPS
ship_bits[j->p_ship.s_type][rosette(j->p_dir)],
#else
ship_bitmaps[PlayerBitmap(j)][rosette(j->p_dir)],
#endif
playerColor(j));
if (j->p_cloakphase > 0)
{
#ifdef HAVE_XPM
if (sprite == NULL)
#endif
W_WriteBitmap(dx - (cloak_width / 2),
dy - (cloak_height / 2), cloakicon, playerColor(j));
if (!myPlayer(j)) /* if myplayer draw the shield */
continue;
}
shieldlabel:
#ifdef BEEPLITE
if ((UseLite && emph_player_seq_n[j->p_no] > 0)
&& (liteflag & LITE_PLAYERS_LOCAL))
{
int seq_n = emph_player_seq_n[j->p_no] % emph_player_seql_frames;
W_WriteBitmap(dx - (emph_player_seql_width / 2),
dy - (emph_player_seql_height / 2),
emph_player_seql[seq_n],
W_White);
}
#endif
#ifdef VARY_HULL
if (j == me && vary_hull)
{
int hull_left = (100 * (me->p_ship.s_maxdamage -
me->p_damage)) / me->p_ship.s_maxdamage, hull_num = 7;
int hull_color;
if (hull_left <= 16)
{
hull_num = 0;
hull_color = W_Red;
}
else if (hull_left <= 28)
{
hull_num = 1;
hull_color = W_Yellow;
}
else if (hull_left <= 40)
{
hull_num = 2;
hull_color = W_Green;
}
else if (hull_left <= 52)
{
hull_num = 3;
hull_color = W_Green;
}
else if (hull_left <= 64)
{
hull_num = 4;
hull_color = W_Green;
}
else if (hull_left <= 76)
{
hull_num = 5;
hull_color = W_White;
}
else if (hull_left <= 88)
{
hull_num = 6;
hull_color = W_White;
}
else
hull_color = playerColor(j);
W_WriteBitmap(dx - (shield_width / 2 + 1),
dy - (shield_height / 2 + 1),
hull[hull_num], hull_color);
}
#endif
#ifdef SOUND
if (j->p_no == me->p_no)
{
if ((sound_flags & PFSHIELD) && !(j->p_flags & PFSHIELD)) {
#if defined(HAVE_SDL)
Play_Sound(SHIELD_DOWN_WAV);
#else
Play_Sound(SHIELD_DOWN_SOUND);
#endif
}
if (!(sound_flags & PFSHIELD) && (j->p_flags & PFSHIELD)) {
#if defined(HAVE_SDL)
Play_Sound(SHIELD_UP_WAV);
#else
Play_Sound(SHIELD_UP_SOUND);
#endif
}
}
#endif
/* It used to be that if "showShields" was false, shields were not
* * * shown. COW has already stopped accepting showShields flags
* * from * the server, now stop using showShields altogether.
* James * Soutter * (Zork) 4 Jan 95 */
if (j->p_flags & PFSHIELD)
{
int color = playerColor(j);
#ifdef VSHIELD_BITMAPS
int shieldnum;
if (j == me && VShieldBitmaps)
{
shieldnum = SHIELD_FRAMES * me->p_shield / me->p_ship.s_maxshield;
if (shieldnum >= SHIELD_FRAMES)
shieldnum = SHIELD_FRAMES - 1;
color = gColor;
if (shieldnum < SHIELD_FRAMES * 2 / 3)
{
color = yColor;
if (shieldnum < SHIELD_FRAMES * 2 / 3)
{
color = rColor;
}
}
}
else
{
color = playerColor(j);
shieldnum = 2;
}
#endif
if (warnShields && j == me)
{
switch (me->p_flags & (PFGREEN | PFYELLOW | PFRED))
{
case PFGREEN:
color = gColor;
break;
case PFYELLOW:
color = yColor;
break;
case PFRED:
color = rColor;
break;
}
}
#ifdef VSHIELD_BITMAPS
W_WriteBitmap(dx - (shield_width / 2),
dy - (shield_height / 2), shield[shieldnum], color);
#else
W_WriteBitmap(dx - (shield_width / 2),
dy - (shield_height / 2), shield, color);
#endif
}
/* Det circle */
if (detCircle)
{
if (myPlayer(j) || isObsLockPlayer(j))
{
int dcr = DETDIST*2/SCALE;
int dcx = dx - (dcr/2);
int dcy = dy - (dcr/2);
W_WriteCircle(w, dcy, dcy, dcr, W_Red);
clearzone[0][clearcount] = dcx;
clearzone[1][clearcount] = dcy;
clearzone[2][clearcount] = dcr + dcr;
clearzone[3][clearcount] = dcr + dcr;
clearcount++;
detCircle--;
}
}
if (j->p_flags & PFCLOAK) /* when cloaked stop here */
continue;
{
int color = playerColor(j);
idbuf[0] = *(shipnos + j->p_no);
if (myPlayer(j) || isObsLockPlayer(j))
{
switch (me->p_flags & (PFGREEN | PFYELLOW | PFRED))
{
case PFGREEN:
color = gColor;
break;
case PFYELLOW:
color = yColor;
break;
case PFRED:
color = rColor;
break;
}
}
W_MaskText(w, dx + (j->p_ship.s_width / 2),
dy - (j->p_ship.s_height / 2), color,
idbuf, 1, shipFont(j));
clearzone[0][clearcount] = dx + (j->p_ship.s_width / 2);
clearzone[1][clearcount] = dy - (j->p_ship.s_height / 2);
clearzone[2][clearcount] = W_Textwidth;
clearzone[3][clearcount] = W_Textheight;
clearcount++;
}
}
else if (j->p_status == PEXPLODE)
{
int i;
i = j->p_explode;
#ifdef SOUND
if (i == 1)
#if defined(HAVE_SDL)
Play_Sound(j == me ? EXPLOSION_WAV : EXPLOSION_OTHER_WAV);
#else
Play_Sound(j == me ? EXPLOSION_SOUND : OTHER_EXPLOSION_SOUND);
#endif
#endif
#ifdef HAVE_XPM
if (sprite != NULL)
{
clearsize = W_DrawSprite(sprite, dx, dy, TWINSIDE);
clearzone[0][clearcount] = dx - (clearsize / 2);
clearzone[1][clearcount] = dy - (clearsize / 2);
clearzone[2][clearcount] = clearsize;
clearzone[3][clearcount] = clearsize;
clearcount++;
}
else
#endif
if (i < EX_FRAMES ||
(i < SBEXPVIEWS && j->p_ship.s_type == STARBASE))
{
if (j->p_ship.s_type == STARBASE)
{
W_WriteBitmap(dx - (sbexp_width / 2),
dy - (sbexp_height / 2), sbexpview[i],
playerColor(j));
clearzone[0][clearcount] = dx - (sbexp_width / 2);
clearzone[1][clearcount] = dy - (sbexp_height / 2);
clearzone[2][clearcount] = sbexp_width;
clearzone[3][clearcount] = sbexp_height;
}
else
{
W_WriteBitmap(dx - (ex_width / 2), dy - (ex_height / 2),
expview[i], playerColor(j));
clearzone[0][clearcount] = dx - (ex_width / 2);
clearzone[1][clearcount] = dy - (ex_height / 2);
clearzone[2][clearcount] = ex_width;
clearzone[3][clearcount] = ex_height;
}
clearcount++;
j->p_explode++;
}
}
/* Now draw his phaser (if it exists) */
php = &phasers[j->p_no];
if (php->ph_status != PHFREE)
{
#ifdef SOUND
if (!sound_phaser)
{
#if defined(HAVE_SDL)
Play_Sound(j == me ? PHASER_WAV : PHASER_OTHER_WAV);
#else
Play_Sound(j == me ? PHASER_SOUND : OTHER_PHASER_SOUND);
#endif
sound_phaser++;
}
#endif
if ((php->ph_updateFuse -= weaponUpdate) == 0)
{
/* Expire the phaser */
#if 0
fputs("[phaser]", stderr);
fflush(stderr);
#endif
php->ph_status = PHFREE;
}
else
{
if (php->ph_status == PHMISS)
{
/* Here I will have to compute end coordinate */
tx = PHASEDIST * j->p_ship.s_phaserdamage / 100 *
Cos[php->ph_dir];
ty = PHASEDIST * j->p_ship.s_phaserdamage / 100 *
Sin[php->ph_dir];
tx = (j->p_x + tx - me->p_x) / SCALE + TWINSIDE / 2;
ty = (j->p_y + ty - me->p_y) / SCALE + TWINSIDE / 2;
php->ph_fuse = 0;
}
else if (php->ph_status == PHHIT2)
{
tx = (php->ph_x - me->p_x) / SCALE + TWINSIDE / 2;
ty = (php->ph_y - me->p_y) / SCALE + TWINSIDE / 2;
}
else
{ /* Start point is dx, dy */
tx = (players[php->ph_target].p_x - me->p_x) /
SCALE + TWINSIDE / 2;
ty = (players[php->ph_target].p_y - me->p_y) /
SCALE + TWINSIDE / 2;
}
/* Shrink the phasers if necessary: * * Measure length in 16ths
*
* * to make the maths a little * easier for the computer (div
* 16 * is a 4 bit shift). * * Add 8 to each sum to round
* properly. */
if (shrinkPhaserOnMiss || php->ph_status != PHMISS)
{
if (j == me)
{
px = (dx * (16 - phaserShrink) + tx * phaserShrink + 8)
/ 16;
py = (dy * (16 - phaserShrink) + ty * phaserShrink + 8)
/ 16;
}
else
{
px = (dx * (16 - theirPhaserShrink) +
tx * theirPhaserShrink + 8) / 16;
py = (dy * (16 - theirPhaserShrink) +
ty * theirPhaserShrink + 8) / 16;
}
}
else
{
px = dx;
py = dy;
}
/* Now draw the phasers */
if (friendlyPlayer(j))
{
if (highlightFriendlyPhasers && (php->ph_status == PHHIT))
W_CacheLine(w, px, py, tx, ty, foreColor);
else
{
if ((php->ph_fuse % 2) == 1)
W_CacheLine(w, px, py, tx, ty, foreColor);
else
W_CacheLine(w, px, py, tx, ty, shipCol[remap[j->p_team]]);
}
php->ph_fuse++;
clearline[0][clearlcount] = px;
clearline[1][clearlcount] = py;
clearline[2][clearlcount] = tx;
clearline[3][clearlcount] = ty;
clearlcount++;
}
else
{
if ((enemyPhasers > 0) && (enemyPhasers <= 10))
{
unsigned char dir;
if (tx == px && ty == py)
continue;
#ifdef SHORT_PACKETS
if (php->ph_status != PHMISS) /* KOC 10/20/95 */
{ /* hack for SP_2 */
#define XPI 3.1415926
dir = (unsigned char) nint(atan2((double) (ty - py),
(double) (tx - px)) / XPI * 128.0);
#undef XPI
}
else
#endif
{
dir = NORMALIZE(php->ph_dir + 64);
}
wx = px + enemyPhasers * Cos[dir];
wy = py + enemyPhasers * Sin[dir];
lx = px - enemyPhasers * Cos[dir];
ly = py - enemyPhasers * Sin[dir];
W_MakePhaserLine(w, wx, wy, tx, ty,
shipCol[remap[j->p_team]]);
W_MakePhaserLine(w, lx, ly, tx, ty,
shipCol[remap[j->p_team]]);
php->ph_fuse++;
clearline[0][clearlcount] = wx;
clearline[1][clearlcount] = wy;
clearline[2][clearlcount] = tx;
clearline[3][clearlcount] = ty;
clearlcount++;
clearline[0][clearlcount] = lx;
clearline[1][clearlcount] = ly;
clearline[2][clearlcount] = tx;
clearline[3][clearlcount] = ty;
clearlcount++;
}
else
{
W_MakePhaserLine(w, px, py, tx, ty,
shipCol[remap[j->p_team]]);
php->ph_fuse++;
clearline[0][clearlcount] = px;
clearline[1][clearlcount] = py;
clearline[2][clearlcount] = tx;
clearline[3][clearlcount] = ty;
clearlcount++;
}
}
}
}
#ifdef SOUND
else if (j->p_no == me->p_no)
sound_phaser = 0;
#endif
/* ATM - show tractor/pressor beams (modified by James Collins) */
/* showTractorPressor is a variable set by xtrekrc. */
if (showTractorPressor)
{
if (myPlayer(j) && isAlive(me) && (j->p_flags & PFTRACT || j->p_flags & PFPRESS))
{
double theta;
unsigned char dir;
int lx[2], ly[2], target_width;
struct player *tractee;
if (me->p_tractor < 0 || me->p_tractor >= MAXPLAYER)
continue;
tractee = &players[me->p_tractor];
if (tractee->p_status != PALIVE ||
((tractee->p_flags & PFCLOAK) &&
(tractee->p_cloakphase == (CLOAK_PHASES - 1))))
{
continue;
}
if (tcounter >= 2)
{ /* continue tractor stuff */
if (!continuetractor)
tcounter--;
px = (players[me->p_tractor].p_x - me->p_x)
/ SCALE + TWINSIDE / 2;
py = (players[me->p_tractor].p_y - me->p_y)
/ SCALE + TWINSIDE / 2;
if (px == dx && py == dy)
continue; /* this had better be last *
*
* * in for(..) */
#define XPI 3.1415926
theta = atan2((double) (px - dx),
(double) (dy - py)) + XPI / 2.0;
dir = (unsigned char) nint(theta / XPI * 128.0);
if (tractee->p_flags & PFSHIELD)
target_width = shield_width;
else
{
target_width = tractee->p_ship.s_width / 2;
}
lx[0] = px + (Cos[dir] * (target_width / 2));
ly[0] = py + (Sin[dir] * (target_width / 2));
lx[1] = px - (Cos[dir] * (target_width / 2));
ly[1] = py - (Sin[dir] * (target_width / 2));
#undef XPI
if (j->p_flags & PFPRESS)
{
W_MakeTractLine(w, dx, dy, lx[0], ly[0], W_Yellow);
W_MakeTractLine(w, dx, dy, lx[1], ly[1], W_Yellow);
}
else
{
W_MakeTractLine(w, dx, dy, lx[0], ly[0], W_Green);
W_MakeTractLine(w, dx, dy, lx[1], ly[1], W_Green);
}
#ifdef WIN32
/* Fixup for minor inconsistencies between SAC's interger *
*
* * linedraw and Win32 LineTo() */
tpline = clearlcount;
#endif
clearline[0][clearlcount] = dx;
clearline[1][clearlcount] = dy;
clearline[2][clearlcount] = lx[0];
clearline[3][clearlcount] = ly[0];
clearlcount++;
clearline[0][clearlcount] = dx;
clearline[1][clearlcount] = dy;
clearline[2][clearlcount] = lx[1];
clearline[3][clearlcount] = ly[1];
clearlcount++;
}
}
else if (!(me->p_flags & PFPRESS || me->p_flags & PFTRACT))
tcounter = 2;
}
}
}
static void DrawMisc(void)
{
register struct player *j;
register int dx, dy;
const int view = SCALE * TWINSIDE / 2;
#ifdef HOCKEY_LINES
register struct s_line *sl;
const int HALF_WINSIDE = TWINSIDE / 2;
int ex, ey, sx, sy;
#endif
#ifdef HOCKEY_LINES
if (hockey_s_lines && 1)
for (sl = s_lines + NUM_HOCKEY_LINES - 1; sl >= s_lines; --sl)
{
/* Treat the line differently based on the orientation */
if (sl->orientation == S_LINE_VERTICAL)
{
if (((sx = (sl->begin_x - me->p_x) / SCALE) < HALF_WINSIDE)
&& (sx > -HALF_WINSIDE))
{
sx += HALF_WINSIDE;
ex = sx;
if ((sy = HALF_WINSIDE - (me->p_y - sl->begin_y) / SCALE) < 0)
sy = 0;
if (sy > (TWINSIDE - 1))
sy = TWINSIDE - 1;
if ((ey = HALF_WINSIDE - (me->p_y - sl->end_y) / SCALE) < 0)
ey = 0;
if (ey > (TWINSIDE - 1))
ey = TWINSIDE - 1;
if (sy == ey)
continue;
}
else
continue;
}
else if (sl->orientation == S_LINE_HORIZONTAL)
{
if (((sy = (sl->begin_y - me->p_y) / SCALE) < HALF_WINSIDE)
&& (sy > -HALF_WINSIDE))
{
sy += HALF_WINSIDE;
ey = sy;
if ((sx = HALF_WINSIDE - (me->p_x - sl->begin_x) / SCALE) < 0)
sx = 0;
if (sx > (TWINSIDE - 1))
sx = TWINSIDE - 1;
if ((ex = HALF_WINSIDE - (me->p_x - sl->end_x) / SCALE) < 0)
ex = 0;
if (ex > (TWINSIDE - 1))
ex = TWINSIDE - 1;
if (sx == ex)
continue;
}
else
continue;
}
else
continue;
W_CacheLine(w, sx, sy, ex, ey, sl->color);
clearline[0][clearlcount] = sx;
clearline[1][clearlcount] = sy;
clearline[2][clearlcount] = ex;
clearline[3][clearlcount] = ey;
clearlcount++;
} /* End for Hockey Lines * *
* * Ends the if, too */
#endif /* HOCKEY_LINES */
/* Draw Edges */
if (me->p_x < (TWINSIDE / 2) * SCALE)
{
dx = (TWINSIDE / 2) - (me->p_x) / SCALE;
sy = (TWINSIDE / 2) + (0 - me->p_y) / SCALE;
ey = (TWINSIDE / 2) + (GWIDTH - me->p_y) / SCALE;
if (sy < 0)
sy = 0;
if (ey > TWINSIDE - 1)
ey = TWINSIDE - 1;
/* XFIX */
W_CacheLine(w, dx, sy, dx, ey, warningColor);
/* W_MakeLine(w, dx, sy, dx, ey, warningColor); */
clearline[0][clearlcount] = dx;
clearline[1][clearlcount] = sy;
clearline[2][clearlcount] = dx;
clearline[3][clearlcount] = ey;
clearlcount++;
}
if ((GWIDTH - me->p_x) < (TWINSIDE / 2) * SCALE)
{
dx = (TWINSIDE / 2) + (GWIDTH - me->p_x) / SCALE;
sy = (TWINSIDE / 2) + (0 - me->p_y) / SCALE;
ey = (TWINSIDE / 2) + (GWIDTH - me->p_y) / SCALE;
if (sy < 0)
sy = 0;
if (ey > TWINSIDE - 1)
ey = TWINSIDE - 1;
/* XFIX */
W_CacheLine(w, dx, sy, dx, ey, warningColor);
/* W_MakeLine(w, dx, sy, dx, ey, warningColor); */
clearline[0][clearlcount] = dx;
clearline[1][clearlcount] = sy;
clearline[2][clearlcount] = dx;
clearline[3][clearlcount] = ey;
clearlcount++;
}
if (me->p_y < (TWINSIDE / 2) * SCALE)
{
dy = (TWINSIDE / 2) - (me->p_y) / SCALE;
sx = (TWINSIDE / 2) + (0 - me->p_x) / SCALE;
ex = (TWINSIDE / 2) + (GWIDTH - me->p_x) / SCALE;
if (sx < 0)
sx = 0;
if (ex > TWINSIDE - 1)
ex = TWINSIDE - 1;
/* XFIX */
W_CacheLine(w, sx, dy, ex, dy, warningColor);
/* W_MakeLine(w, sx, dy, ex, dy, warningColor); */
clearline[0][clearlcount] = sx;
clearline[1][clearlcount] = dy;
clearline[2][clearlcount] = ex;
clearline[3][clearlcount] = dy;
clearlcount++;
}
if ((GWIDTH - me->p_y) < (TWINSIDE / 2) * SCALE)
{
dy = (TWINSIDE / 2) + (GWIDTH - me->p_y) / SCALE;
sx = (TWINSIDE / 2) + (0 - me->p_x) / SCALE;
ex = (TWINSIDE / 2) + (GWIDTH - me->p_x) / SCALE;
if (sx < 0)
sx = 0;
if (ex > TWINSIDE - 1)
ex = TWINSIDE - 1;
/* XFIX */
W_CacheLine(w, sx, dy, ex, dy, warningColor);
/* W_MakeLine(w, sx, dy, ex, dy, warningColor); */
clearline[0][clearlcount] = sx;
clearline[1][clearlcount] = dy;
clearline[2][clearlcount] = ex;
clearline[3][clearlcount] = dy;
clearlcount++;
}
/* Change border color to signify alert status */
if (oldalert != (me->p_flags & (PFGREEN | PFYELLOW | PFRED)))
{
oldalert = (me->p_flags & (PFGREEN | PFYELLOW | PFRED));
switch (oldalert)
{
case PFGREEN:
if (extraBorder)
W_ChangeBorder(w, gColor);
W_ChangeBorder(baseWin, gColor);
W_ChangeBorder(iconWin, gColor);
#if defined(SOUND) && !defined(HAVE_SDL)
Abort_Sound(WARNING_SOUND);
#endif
break;
case PFYELLOW:
if (extraBorder)
W_ChangeBorder(w, yColor);
W_ChangeBorder(baseWin, yColor);
W_ChangeBorder(iconWin, yColor);
#if defined(SOUND) && !defined(HAVE_SDL)
Abort_Sound(WARNING_SOUND);
#endif
break;
case PFRED:
if (extraBorder)
W_ChangeBorder(w, rColor);
W_ChangeBorder(baseWin, rColor);
W_ChangeBorder(iconWin, rColor);
#ifdef SOUND
#if defined(HAVE_SDL)
Play_Sound(WARNING_WAV);
#else
Play_Sound(WARNING_SOUND);
#endif
#endif
break;
}
}
#ifdef SOUND
#if defined(HAVE_SDL)
if (sound_torps < me->p_ntorp)
Play_Sound(FIRE_TORP_WAV);
if (sound_other_torps < num_other_torps)
Play_Sound(FIRE_TORP_OTHER_WAV);
if (sound_plasma < me->p_nplasmatorp)
Play_Sound(FIRE_PLASMA_WAV);
#else
if (sound_torps < me->p_ntorp)
Play_Sound(FIRE_TORP_SOUND);
if (sound_other_torps < num_other_torps)
Play_Sound(OTHER_FIRE_TORP_SOUND);
if (sound_plasma < me->p_nplasmatorp)
Play_Sound(FIRE_PLASMA_SOUND);
#endif
sound_flags = me->p_flags;
sound_torps = me->p_ntorp;
sound_other_torps = num_other_torps;
num_other_torps = 0;
sound_plasma = me->p_nplasmatorp;
#endif
/* show 'lock' icon on local map (Actually an EM hack ) */
if (showLock & 2)
{
int tri_x = -1, tri_y = -1, facing = 0;
int tri_size = 4;
if (me->p_flags & PFPLOCK)
{
/* locked onto a ship */
j = &players[me->p_playerl];
if (!(j->p_flags & PFCLOAK))
{
dx = j->p_x - me->p_x;
dy = j->p_y - me->p_y;
if (ABS(dx) < view && ABS(dy) < view)
{
dx = dx / SCALE + TWINSIDE / 2;
dy = dy / SCALE + TWINSIDE / 2;
tri_x = dx + 0;
tri_y = dy + 20; /* below ship */
facing = 1;
}
/* printf("Drawing local triangle at %d %d\n", tri_x, tri_y); */
}
}
else if (me->p_flags & PFPLLOCK)
{
/* locked onto a planet */
struct planet *l = &planets[me->p_planet];
dx = l->pl_x - me->p_x;
dy = l->pl_y - me->p_y;
if (ABS(dx) < view && ABS(dy) < view)
{
dx = dx / SCALE + TWINSIDE / 2;
dy = dy / SCALE + TWINSIDE / 2;
tri_x = dx;
tri_y = dy - 20; /* below planet */
facing = 0;
}
/* printf("Drawing local triangle at %d %d\n", tri_x, tri_y); */
}
if (tri_x != -1)
{
W_WriteTriangle(w, tri_x, tri_y, 4, facing, foreColor);
clearzone[0][clearcount] = tri_x - tri_size - 1;
clearzone[1][clearcount] = tri_y - 1 +
(facing ? 0 : -tri_size);
clearzone[2][clearcount] = tri_size * 2 + 2;
clearzone[3][clearcount] = tri_size + 2;
clearcount++;
}
}
}
static void
DrawTorps(void)
{
register struct torp *k, *t;
register int dx, dy;
#ifdef HAVE_XPM
register int tno, tsub;
void *sprite;
#endif
struct player *j;
int torpCount;
const int view = SCALE * TWINSIDE / 2;
#ifdef HAVE_XPM
for (t = torps, j = players, tno = 0
; j != players + MAXPLAYER
; t += MAXTORP, ++j, tno += MAXTORP)
#else
for (t = torps, j = players
; j != players + MAXPLAYER
; t += MAXTORP, ++j)
#endif
{
#ifdef SOUND
if (j != me)
num_other_torps += j->p_ntorp;
#endif
torpCount = j->p_ntorp;
#ifdef HAVE_XPM
for (tsub = 0, k = t; torpCount > 0; ++k, ++tsub)
#else
for (k = t; torpCount > 0; ++k)
#endif
{
/* Work until all the torps for a given player have been examined.
* * In the current INL server torps are allocated from low to high
* * so this loop must work so that k is incrimented rather than *
* decrimented. */
if (!k->t_status)
continue;
--torpCount;
/* Age a torp only if some weapon has been updated * (eg this is *
* not a pause). */
if ((k->t_updateFuse -= weaponUpdate) == 0)
{
if (k->t_status != TEXPLODE)
{
/* Expire the torp */
#if 0
fputs("[torp]", stderr);
fflush(stderr);
#endif
k->t_status = TFREE;
j->p_ntorp--;
continue;
}
else
{
/* Leave the torp to explode on its own */
k->t_updateFuse = 100;
}
}
dx = k->t_x - me->p_x;
dy = k->t_y - me->p_y;
if (dx > view || dx < -view || dy > view || dy < -view)
{
/* Call any torps off screen "free" (if owned by other) */
if (k->t_status == TEXPLODE && j != me)
{
k->t_status = TFREE;
j->p_ntorp--;
}
continue;
}
dx = dx / SCALE + TWINSIDE / 2;
dy = dy / SCALE + TWINSIDE / 2;
#ifdef HAVE_XPM
if ((sprite = S_Torp(tno + tsub)) != NULL)
{
clearsize = W_DrawSprite(sprite, dx, dy, TWINSIDE);
clearzone[0][clearcount] = dx - (clearsize / 2);
clearzone[1][clearcount] = dy - (clearsize / 2);
clearzone[2][clearcount] = clearsize;
clearzone[3][clearcount] = clearsize;
clearcount++;
}
else
#endif
if (k->t_status == TEXPLODE)
{
k->t_fuse--;
if (k->t_fuse <= 0)
{
k->t_status = TFREE;
j->p_ntorp--;
continue;
}
if (k->t_fuse >= NUMDETFRAMES)
{
k->t_fuse = NUMDETFRAMES - 1;
}
#ifdef SOUND
if (k->t_fuse == NUMDETFRAMES - 1)
#if defined(HAVE_SDL)
Play_Sound(TORP_HIT_WAV);
#else
Play_Sound(TORP_HIT_SOUND);
#endif
#endif
W_WriteBitmap(dx - (cloud_width / 2), dy - (cloud_height / 2),
cloud[k->t_fuse], torpColor(k));
clearzone[0][clearcount] = dx - (cloud_width / 2);
clearzone[1][clearcount] = dy - (cloud_height / 2);
clearzone[2][clearcount] = cloud_width;
clearzone[3][clearcount] = cloud_height;
clearcount++;
}
else if (j != me && ((k->t_war & me->p_team) ||
(j->p_team & (me->p_hostile | me->p_swar))))
{
/* solid. Looks strange. W_FillArea(w, dx - (etorp_width/2), *
*
* * dy - (etorp_height/2), etorp_width, etorp_height, * *
* torpColor(k)); */
/* XFIX */
W_CacheLine(w, dx - (etorp_width / 2), dy - (etorp_height / 2),
dx + (etorp_width / 2), dy + (etorp_height / 2), torpColor(k));
W_CacheLine(w, dx + (etorp_width / 2), dy - (etorp_height / 2),
dx - (etorp_width / 2), dy + (etorp_height / 2), torpColor(k));
/* W_WriteBitmap(dx - (etorp_width/2), dy - (etorp_height/2), *
*
* * etorp, torpColor(k)); */
clearzone[0][clearcount] = dx - (etorp_width / 2);
clearzone[1][clearcount] = dy - (etorp_height / 2);
clearzone[2][clearcount] = etorp_width;
clearzone[3][clearcount] = etorp_height;
clearcount++;
}
else
{
W_CacheLine(w, dx - (mtorp_width / 2), dy,
dx + (mtorp_width / 2), dy,
torpColor(k));
W_CacheLine(w, dx, dy - (mtorp_width / 2), dx,
dy + (mtorp_width / 2),
torpColor(k));
/* W_WriteBitmap(dx - (mtorp_width/2), dy - (mtorp_height/2), *
*
* * mtorp, torpColor(k)); */
clearzone[0][clearcount] = dx - (mtorp_width / 2);
clearzone[1][clearcount] = dy - (mtorp_height / 2);
clearzone[2][clearcount] = mtorp_width;
clearzone[3][clearcount] = mtorp_height;
clearcount++;
}
}
}
}
redraw()
{
/* erase warning line if necessary */
if ((warntimer <= udcounter) && (warncount > 0)) {
W_ClearArea(warnw, 5, 5, W_Textwidth * warncount, W_Textheight, backColor);
warncount = 0;
}
if (W_FastClear) {
W_ClearWindow(w);
clearcount=0;
clearlcount=0;
} else {
/* TSH 2/10/93 */
while (clearcount) {
clearcount--;
W_CacheClearArea(w, clearzone[0][clearcount],
clearzone[1][clearcount],
clearzone[2][clearcount], clearzone[3][clearcount]);
}
while (clearlcount) {
clearlcount--;
W_CacheLine(w, clearline[0][clearlcount], clearline[1][clearlcount],
clearline[2][clearlcount], clearline[3][clearlcount],
backColor);
}
W_FlushClearAreaCache(w);
W_FlushLineCaches(w);
while (mclearlcount){
mclearlcount--;
W_CacheLine(mapw, mclearline[0][mclearlcount],
mclearline[1][mclearlcount], mclearline[2][mclearlcount],
mclearline[3][mclearlcount],
backColor);
}
while (mclearpcount){
mclearpcount--;
W_CachePoint(mapw, mclearpoint[0][mclearpcount],
mclearpoint[1][mclearpcount], backColor);
}
W_FlushLineCaches(mapw);
W_FlushPointCaches(mapw);
}
local(); /* redraw local window */
if (mapmode) map();
if (W_IsMapped(statwin)){
updateStats();
}
/* need a status line but we'll make do with the bottom of the local
display for now */
if(runclock)
run_clock(1); /* isae */
if(record)
show_record(1);
if(playback)
show_playback(1);
if(playback && extracting)
show_extracting(extracting); /* 7/27/93 BM */
/* W_Flush(); */
}
