/*
Copyright (C) 1996-1997 Id Software, Inc.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/
// sbar.c -- status bar code

#include "client.h"
#include "cmd.h"
#include "common.h"
#include "draw.h"
#include "protocol.h"
#include "quakedef.h"
#include "sbar.h"
#include "screen.h"
#include "vid.h"
#include "wad.h"

int sb_updates;			// if >= vid.numpages, no update needed

#define STAT_MINUS		10	// num frame for '-' stats digit
qpic_t *sb_nums[2][11];
qpic_t *sb_colon, *sb_slash;
qpic_t *sb_ibar;
qpic_t *sb_sbar;
qpic_t *sb_scorebar;

qpic_t *sb_weapons[7][8];	// 0 is active, 1 is owned, 2-5 are flashes
qpic_t *sb_ammo[4];
qpic_t *sb_sigil[4];
qpic_t *sb_armor[3];
qpic_t *sb_items[32];

qpic_t *sb_faces[7][2];		// 0 is gibbed, 1 is dead, 2-6 are alive

							// 0 is static, 1 is temporary animation
qpic_t *sb_face_invis;
qpic_t *sb_face_quad;
qpic_t *sb_face_invuln;
qpic_t *sb_face_invis_invuln;

qboolean sb_showscores;
qboolean sb_showteamscores;

int sb_lines;			// scan lines to draw

void Sbar_DeathmatchOverlay(int start);
void Sbar_TeamOverlay(void);
void Sbar_MiniDeathmatchOverlay(void);

static qboolean largegame = false;

/*
===============
Sbar_ShowTeamScores

Tab key down
===============
*/
void
Sbar_ShowTeamScores(void)
{
    if (sb_showteamscores)
	return;

    sb_showteamscores = true;
    sb_updates = 0;
}

/*
===============
Sbar_DontShowTeamScores

Tab key up
===============
*/
void
Sbar_DontShowTeamScores(void)
{
    sb_showteamscores = false;
    sb_updates = 0;
}

/*
===============
Sbar_ShowScores

Tab key down
===============
*/
void
Sbar_ShowScores(void)
{
    if (sb_showscores)
	return;

    sb_showscores = true;
    sb_updates = 0;
}

/*
===============
Sbar_DontShowScores

Tab key up
===============
*/
void
Sbar_DontShowScores(void)
{
    sb_showscores = false;
    sb_updates = 0;
}

/*
===============
Sbar_Changed
===============
*/
void
Sbar_Changed(void)
{
    sb_updates = 0;		// update next frame
}

/*
===============
Sbar_Init
===============
*/
void
Sbar_Init(void)
{
    int i;

    for (i = 0; i < 10; i++) {
	sb_nums[0][i] = Draw_PicFromWad(va("num_%i", i));
	sb_nums[1][i] = Draw_PicFromWad(va("anum_%i", i));
    }

    sb_nums[0][10] = Draw_PicFromWad("num_minus");
    sb_nums[1][10] = Draw_PicFromWad("anum_minus");

    sb_colon = Draw_PicFromWad("num_colon");
    sb_slash = Draw_PicFromWad("num_slash");

    sb_weapons[0][0] = Draw_PicFromWad("inv_shotgun");
    sb_weapons[0][1] = Draw_PicFromWad("inv_sshotgun");
    sb_weapons[0][2] = Draw_PicFromWad("inv_nailgun");
    sb_weapons[0][3] = Draw_PicFromWad("inv_snailgun");
    sb_weapons[0][4] = Draw_PicFromWad("inv_rlaunch");
    sb_weapons[0][5] = Draw_PicFromWad("inv_srlaunch");
    sb_weapons[0][6] = Draw_PicFromWad("inv_lightng");

    sb_weapons[1][0] = Draw_PicFromWad("inv2_shotgun");
    sb_weapons[1][1] = Draw_PicFromWad("inv2_sshotgun");
    sb_weapons[1][2] = Draw_PicFromWad("inv2_nailgun");
    sb_weapons[1][3] = Draw_PicFromWad("inv2_snailgun");
    sb_weapons[1][4] = Draw_PicFromWad("inv2_rlaunch");
    sb_weapons[1][5] = Draw_PicFromWad("inv2_srlaunch");
    sb_weapons[1][6] = Draw_PicFromWad("inv2_lightng");

    for (i = 0; i < 5; i++) {
	sb_weapons[2 + i][0] = Draw_PicFromWad(va("inva%i_shotgun", i + 1));
	sb_weapons[2 + i][1] = Draw_PicFromWad(va("inva%i_sshotgun", i + 1));
	sb_weapons[2 + i][2] = Draw_PicFromWad(va("inva%i_nailgun", i + 1));
	sb_weapons[2 + i][3] = Draw_PicFromWad(va("inva%i_snailgun", i + 1));
	sb_weapons[2 + i][4] = Draw_PicFromWad(va("inva%i_rlaunch", i + 1));
	sb_weapons[2 + i][5] = Draw_PicFromWad(va("inva%i_srlaunch", i + 1));
	sb_weapons[2 + i][6] = Draw_PicFromWad(va("inva%i_lightng", i + 1));
    }

    sb_ammo[0] = Draw_PicFromWad("sb_shells");
    sb_ammo[1] = Draw_PicFromWad("sb_nails");
    sb_ammo[2] = Draw_PicFromWad("sb_rocket");
    sb_ammo[3] = Draw_PicFromWad("sb_cells");

    sb_armor[0] = Draw_PicFromWad("sb_armor1");
    sb_armor[1] = Draw_PicFromWad("sb_armor2");
    sb_armor[2] = Draw_PicFromWad("sb_armor3");

    sb_items[0] = Draw_PicFromWad("sb_key1");
    sb_items[1] = Draw_PicFromWad("sb_key2");
    sb_items[2] = Draw_PicFromWad("sb_invis");
    sb_items[3] = Draw_PicFromWad("sb_invuln");
    sb_items[4] = Draw_PicFromWad("sb_suit");
    sb_items[5] = Draw_PicFromWad("sb_quad");

    sb_sigil[0] = Draw_PicFromWad("sb_sigil1");
    sb_sigil[1] = Draw_PicFromWad("sb_sigil2");
    sb_sigil[2] = Draw_PicFromWad("sb_sigil3");
    sb_sigil[3] = Draw_PicFromWad("sb_sigil4");

    sb_faces[4][0] = Draw_PicFromWad("face1");
    sb_faces[4][1] = Draw_PicFromWad("face_p1");
    sb_faces[3][0] = Draw_PicFromWad("face2");
    sb_faces[3][1] = Draw_PicFromWad("face_p2");
    sb_faces[2][0] = Draw_PicFromWad("face3");
    sb_faces[2][1] = Draw_PicFromWad("face_p3");
    sb_faces[1][0] = Draw_PicFromWad("face4");
    sb_faces[1][1] = Draw_PicFromWad("face_p4");
    sb_faces[0][0] = Draw_PicFromWad("face5");
    sb_faces[0][1] = Draw_PicFromWad("face_p5");

    sb_face_invis = Draw_PicFromWad("face_invis");
    sb_face_invuln = Draw_PicFromWad("face_invul2");
    sb_face_invis_invuln = Draw_PicFromWad("face_inv2");
    sb_face_quad = Draw_PicFromWad("face_quad");

    Cmd_AddCommand("+showscores", Sbar_ShowScores);
    Cmd_AddCommand("-showscores", Sbar_DontShowScores);

    Cmd_AddCommand("+showteamscores", Sbar_ShowTeamScores);
    Cmd_AddCommand("-showteamscores", Sbar_DontShowTeamScores);

    sb_sbar = Draw_PicFromWad("sbar");
    sb_ibar = Draw_PicFromWad("ibar");
    sb_scorebar = Draw_PicFromWad("scorebar");
}


//=============================================================================

// drawing routines are reletive to the status bar location

/*
=============
Sbar_DrawPic
=============
*/
void
Sbar_DrawPic(int x, int y, qpic_t *pic)
{
    Draw_Pic(x /* + ((vid.width - 320)>>1) */ ,
	     y + (vid.height - SBAR_HEIGHT), pic);
}

/*
=============
Sbar_DrawSubPic
=============
JACK: Draws a portion of the picture in the status bar.
*/

void
Sbar_DrawSubPic(int x, int y, qpic_t *pic, int srcx, int srcy, int width,
		int height)
{
    Draw_SubPic(x, y + (vid.height - SBAR_HEIGHT), pic, srcx, srcy, width,
		height);
}


/*
=============
Sbar_DrawTransPic
=============
*/
void
Sbar_DrawTransPic(int x, int y, qpic_t *pic)
{
    Draw_TransPic(x /*+ ((vid.width - 320)>>1) */ ,
		  y + (vid.height - SBAR_HEIGHT), pic);
}

/*
================
Sbar_DrawCharacter

Draws one solid graphics character
================
*/
void
Sbar_DrawCharacter(int x, int y, int num)
{
    Draw_Character(x /*+ ((vid.width - 320)>>1) */  + 4,
		   y + vid.height - SBAR_HEIGHT, num);
}

/*
================
Sbar_DrawString
================
*/
void
Sbar_DrawString(int x, int y, char *str)
{
    Draw_String(x /*+ ((vid.width - 320)>>1) */ ,
		y + vid.height - SBAR_HEIGHT, str);
}

/*
=============
Sbar_itoa
=============
*/
int
Sbar_itoa(int num, char *buf)
{
    char *str;
    int pow10;
    int dig;

    str = buf;

    if (num < 0) {
	*str++ = '-';
	num = -num;
    }

    for (pow10 = 10; num >= pow10; pow10 *= 10);

    do {
	pow10 /= 10;
	dig = num / pow10;
	*str++ = '0' + dig;
	num -= dig * pow10;
    } while (pow10 != 1);

    *str = 0;

    return str - buf;
}


/*
=============
Sbar_DrawNum
=============
*/
void
Sbar_DrawNum(int x, int y, int num, int digits, int color)
{
    char str[12];
    char *ptr;
    int l, frame;

    l = Sbar_itoa(num, str);
    ptr = str;
    if (l > digits)
	ptr += (l - digits);
    if (l < digits)
	x += (digits - l) * 24;

    while (*ptr) {
	if (*ptr == '-')
	    frame = STAT_MINUS;
	else
	    frame = *ptr - '0';

	Sbar_DrawTransPic(x, y, sb_nums[color][frame]);
	x += 24;
	ptr++;
    }
}

//=============================================================================

//ZOID: this should be MAX_CLIENTS, not MAX_SCOREBOARD!!
//int           fragsort[MAX_SCOREBOARD];
int fragsort[MAX_CLIENTS];
int scoreboardlines;
typedef struct {
    char team[16 + 1];
    int frags;
    int players;
    int plow, phigh, ptotal;
} team_t;
team_t teams[MAX_CLIENTS];
int teamsort[MAX_CLIENTS];
int scoreboardteams;

/*
===============
Sbar_SortFrags
===============
*/
void
Sbar_SortFrags(qboolean includespec)
{
    int i, j, k;

// sort by frags
    scoreboardlines = 0;
    for (i = 0; i < MAX_CLIENTS; i++) {
	if (cl.players[i].name[0] &&
	    (!cl.players[i].spectator || includespec)) {
	    fragsort[scoreboardlines] = i;
	    scoreboardlines++;
	    if (cl.players[i].spectator)
		cl.players[i].frags = -999;
	}
    }

    for (i = 0; i < scoreboardlines; i++)
	for (j = 0; j < scoreboardlines - 1 - i; j++)
	    if (cl.players[fragsort[j]].frags <
		cl.players[fragsort[j + 1]].frags) {
		k = fragsort[j];
		fragsort[j] = fragsort[j + 1];
		fragsort[j + 1] = k;
	    }
}

void
Sbar_SortTeams(void)
{
    int i, j, k;
    player_info_t *s;
    int teamplay;
    char t[16 + 1];

// request new ping times every two second
    scoreboardteams = 0;

    teamplay = atoi(Info_ValueForKey(cl.serverinfo, "teamplay"));
    if (!teamplay)
	return;

// sort the teams
    memset(teams, 0, sizeof(teams));
    for (i = 0; i < MAX_CLIENTS; i++)
	teams[i].plow = 999;

    for (i = 0; i < MAX_CLIENTS; i++) {
	s = &cl.players[i];
	if (!s->name[0])
	    continue;
	if (s->spectator)
	    continue;

	// find his team in the list
	t[16] = 0;
	strncpy(t, Info_ValueForKey(s->userinfo, "team"), 16);
	if (!t[0])
	    continue;		// not on team
	for (j = 0; j < scoreboardteams; j++)
	    if (!strcmp(teams[j].team, t)) {
		teams[j].frags += s->frags;
		teams[j].players++;
		goto addpinginfo;
	    }
	if (j == scoreboardteams) {	// must add him
	    j = scoreboardteams++;
	    strcpy(teams[j].team, t);
	    teams[j].frags = s->frags;
	    teams[j].players = 1;
	  addpinginfo:
	    if (teams[j].plow > s->ping)
		teams[j].plow = s->ping;
	    if (teams[j].phigh < s->ping)
		teams[j].phigh = s->ping;
	    teams[j].ptotal += s->ping;
	}
    }

    // sort
    for (i = 0; i < scoreboardteams; i++)
	teamsort[i] = i;

    // good 'ol bubble sort
    for (i = 0; i < scoreboardteams - 1; i++)
	for (j = i + 1; j < scoreboardteams; j++)
	    if (teams[teamsort[i]].frags < teams[teamsort[j]].frags) {
		k = teamsort[i];
		teamsort[i] = teamsort[j];
		teamsort[j] = k;
	    }
}

int
Sbar_ColorForMap(int m)
{
    m = (m < 0) ? 0 : ((m > 13) ? 13 : m);

    m *= 16;
    return m < 128 ? m + 8 : m + 8;
}


/*
===============
Sbar_SoloScoreboard
===============
*/
void
Sbar_SoloScoreboard(void)
{
    char str[80];
    int minutes, seconds, tens, units;

    Sbar_DrawPic(0, 0, sb_scorebar);

    // time
    minutes = cl.time / 60;
    seconds = cl.time - 60 * minutes;
    tens = seconds / 10;
    units = seconds - 10 * tens;
    sprintf(str, "Time :%3i:%i%i", minutes, tens, units);
    Sbar_DrawString(184, 4, str);
}

//=============================================================================

/*
===============
Sbar_DrawInventory
===============
*/
void
Sbar_DrawInventory(void)
{
    int i;
    char num[6];
    float time;
    int flashon;
    qboolean headsup;
    qboolean hudswap;

    headsup = !(cl_sbar.value || scr_viewsize.value < 100);
    hudswap = cl_hudswap.value;	// Get that nasty float out :)

    if (!headsup)
	Sbar_DrawPic(0, -24, sb_ibar);
// weapons
    for (i = 0; i < 7; i++) {
	if (cl.stats[STAT_ITEMS] & (IT_SHOTGUN << i)) {
	    time = cl.item_gettime[i];
	    flashon = (int)((cl.time - time) * 10);
	    if (flashon < 0)
		flashon = 0;
	    if (flashon >= 10) {
		if (cl.stats[STAT_ACTIVEWEAPON] == (IT_SHOTGUN << i))
		    flashon = 1;
		else
		    flashon = 0;
	    } else
		flashon = (flashon % 5) + 2;

	    if (headsup) {
		if (i || vid.height > 200)
		    Sbar_DrawSubPic((hudswap) ? 0 : (vid.width - 24),
				    -68 - (7 - i) * 16,
				    sb_weapons[flashon][i], 0, 0, 24, 16);

	    } else
		Sbar_DrawPic(i * 24, -16, sb_weapons[flashon][i]);
//                      Sbar_DrawSubPic (0,0,20,20,i*24, -16, sb_weapons[flashon][i]);

	    if (flashon > 1)
		sb_updates = 0;	// force update to remove flash
	}
    }

// ammo counts
    for (i = 0; i < 4; i++) {
	sprintf(num, "%3i", cl.stats[STAT_SHELLS + i]);
	if (headsup) {
//                      Sbar_DrawSubPic(3, -24, sb_ibar, 3, 0, 42,11);
	    Sbar_DrawSubPic((hudswap) ? 0 : (vid.width - 42),
			    -24 - (4 - i) * 11, sb_ibar, 3 + (i * 48), 0, 42,
			    11);
	    if (num[0] != ' ')
		Sbar_DrawCharacter((hudswap) ? 3 : (vid.width - 39),
				   -24 - (4 - i) * 11, 18 + num[0] - '0');
	    if (num[1] != ' ')
		Sbar_DrawCharacter((hudswap) ? 11 : (vid.width - 31),
				   -24 - (4 - i) * 11, 18 + num[1] - '0');
	    if (num[2] != ' ')
		Sbar_DrawCharacter((hudswap) ? 19 : (vid.width - 23),
				   -24 - (4 - i) * 11, 18 + num[2] - '0');
	} else {
	    if (num[0] != ' ')
		Sbar_DrawCharacter((6 * i + 1) * 8 - 2, -24,
				   18 + num[0] - '0');
	    if (num[1] != ' ')
		Sbar_DrawCharacter((6 * i + 2) * 8 - 2, -24,
				   18 + num[1] - '0');
	    if (num[2] != ' ')
		Sbar_DrawCharacter((6 * i + 3) * 8 - 2, -24,
				   18 + num[2] - '0');
	}
    }

    flashon = 0;
// items
    for (i = 0; i < 6; i++)
	if (cl.stats[STAT_ITEMS] & (1 << (17 + i))) {
	    time = cl.item_gettime[17 + i];
	    if (time && time > cl.time - 2 && flashon) {	// flash frame
		sb_updates = 0;
	    } else
		Sbar_DrawPic(192 + i * 16, -16, sb_items[i]);
	    if (time && time > cl.time - 2)
		sb_updates = 0;
	}
// sigils
    for (i = 0; i < 4; i++)
	if (cl.stats[STAT_ITEMS] & (1 << (28 + i))) {
	    time = cl.item_gettime[28 + i];
	    if (time && time > cl.time - 2 && flashon) {	// flash frame
		sb_updates = 0;
	    } else
		Sbar_DrawPic(320 - 32 + i * 8, -16, sb_sigil[i]);
	    if (time && time > cl.time - 2)
		sb_updates = 0;
	}
}

//=============================================================================

/*
===============
Sbar_DrawFrags
===============
*/
void
Sbar_DrawFrags(void)
{
    int i, k, l;
    int top, bottom;
    int x, y, f;
    char num[12];
    player_info_t *s;

    Sbar_SortFrags(false);

// draw the text
    l = scoreboardlines <= 4 ? scoreboardlines : 4;

    x = 23;
//      xofs = (vid.width - 320)>>1;
    y = vid.height - SBAR_HEIGHT - 23;

    for (i = 0; i < l; i++) {
	k = fragsort[i];
	s = &cl.players[k];
	if (!s->name[0])
	    continue;
	if (s->spectator)
	    continue;

	// draw background
	top = s->topcolor;
	bottom = s->bottomcolor;
	top = (top < 0) ? 0 : ((top > 13) ? 13 : top);
	bottom = (bottom < 0) ? 0 : ((bottom > 13) ? 13 : bottom);

	top = Sbar_ColorForMap(top);
	bottom = Sbar_ColorForMap(bottom);

//              Draw_Fill (xofs + x*8 + 10, y, 28, 4, top);
//              Draw_Fill (xofs + x*8 + 10, y+4, 28, 3, bottom);
	Draw_Fill(x * 8 + 10, y, 28, 4, top);
	Draw_Fill(x * 8 + 10, y + 4, 28, 3, bottom);

	// draw number
	f = s->frags;
	sprintf(num, "%3i", f);

	Sbar_DrawCharacter((x + 1) * 8, -24, num[0]);
	Sbar_DrawCharacter((x + 2) * 8, -24, num[1]);
	Sbar_DrawCharacter((x + 3) * 8, -24, num[2]);

	if (k == cl.playernum) {
	    Sbar_DrawCharacter(x * 8 + 2, -24, 16);
	    Sbar_DrawCharacter((x + 4) * 8 - 4, -24, 17);
	}
	x += 4;
    }
}

//=============================================================================


/*
===============
Sbar_DrawFace
===============
*/
void
Sbar_DrawFace(void)
{
    int f, anim;

    if ((cl.stats[STAT_ITEMS] & (IT_INVISIBILITY | IT_INVULNERABILITY))
	== (IT_INVISIBILITY | IT_INVULNERABILITY)) {
	Sbar_DrawPic(112, 0, sb_face_invis_invuln);
	return;
    }
    if (cl.stats[STAT_ITEMS] & IT_QUAD) {
	Sbar_DrawPic(112, 0, sb_face_quad);
	return;
    }
    if (cl.stats[STAT_ITEMS] & IT_INVISIBILITY) {
	Sbar_DrawPic(112, 0, sb_face_invis);
	return;
    }
    if (cl.stats[STAT_ITEMS] & IT_INVULNERABILITY) {
	Sbar_DrawPic(112, 0, sb_face_invuln);
	return;
    }

    if (cl.stats[STAT_HEALTH] >= 100)
	f = 4;
    else
	f = cl.stats[STAT_HEALTH] / 20;

    if (cl.time <= cl.faceanimtime) {
	anim = 1;
	sb_updates = 0;		// make sure the anim gets drawn over
    } else
	anim = 0;
    Sbar_DrawPic(112, 0, sb_faces[f][anim]);
}

/*
=============
Sbar_DrawNormal
=============
*/
void
Sbar_DrawNormal(void)
{
    if (cl_sbar.value || scr_viewsize.value < 100)
	Sbar_DrawPic(0, 0, sb_sbar);

// armor
    if (cl.stats[STAT_ITEMS] & IT_INVULNERABILITY) {
	Sbar_DrawNum(24, 0, 666, 3, 1);
	Sbar_DrawPic(0, 0, draw_disc);
    } else {
	Sbar_DrawNum(24, 0, cl.stats[STAT_ARMOR], 3,
		     cl.stats[STAT_ARMOR] <= 25);
	if (cl.stats[STAT_ITEMS] & IT_ARMOR3)
	    Sbar_DrawPic(0, 0, sb_armor[2]);
	else if (cl.stats[STAT_ITEMS] & IT_ARMOR2)
	    Sbar_DrawPic(0, 0, sb_armor[1]);
	else if (cl.stats[STAT_ITEMS] & IT_ARMOR1)
	    Sbar_DrawPic(0, 0, sb_armor[0]);
    }

// face
    Sbar_DrawFace();

// health
    Sbar_DrawNum(136, 0, cl.stats[STAT_HEALTH], 3,
		 cl.stats[STAT_HEALTH] <= 25);

// ammo icon
    if (cl.stats[STAT_ITEMS] & IT_SHELLS)
	Sbar_DrawPic(224, 0, sb_ammo[0]);
    else if (cl.stats[STAT_ITEMS] & IT_NAILS)
	Sbar_DrawPic(224, 0, sb_ammo[1]);
    else if (cl.stats[STAT_ITEMS] & IT_ROCKETS)
	Sbar_DrawPic(224, 0, sb_ammo[2]);
    else if (cl.stats[STAT_ITEMS] & IT_CELLS)
	Sbar_DrawPic(224, 0, sb_ammo[3]);

    Sbar_DrawNum(248, 0, cl.stats[STAT_AMMO], 3, cl.stats[STAT_AMMO] <= 10);
}

/*
===============
Sbar_Draw
===============
*/
void
Sbar_Draw(void)
{
    qboolean headsup;
    char st[512];

    headsup = !(cl_sbar.value || scr_viewsize.value < 100);
    if ((sb_updates >= vid.numpages) && !headsup)
	return;

    if (scr_con_current == vid.height)
	return;			// console is full screen

    scr_copyeverything = 1;
//      scr_fullupdate = 0;

    sb_updates++;

// top line
    if (sb_lines > 24) {
	if (!cl.spectator || autocam == CAM_TRACK)
	    Sbar_DrawInventory();
	if (!headsup || vid.width < 512)
	    Sbar_DrawFrags();
    }
// main area
    if (sb_lines > 0) {
	if (cl.spectator) {
	    if (autocam != CAM_TRACK) {
		Sbar_DrawPic(0, 0, sb_scorebar);
		Sbar_DrawString(160 - 7 * 8, 4, "SPECTATOR MODE");
		Sbar_DrawString(160 - 14 * 8 + 4, 12,
				"Press [ATTACK] for AutoCamera");
	    } else {
		if (sb_showscores || cl.stats[STAT_HEALTH] <= 0)
		    Sbar_SoloScoreboard();
		else
		    Sbar_DrawNormal();

//                                      Sbar_DrawString (160-14*8+4,4, "SPECTATOR MODE - TRACK CAMERA");
		sprintf(st, "Tracking %-.13s, [JUMP] for next",
			cl.players[spec_track].name);
		Sbar_DrawString(0, -8, st);
	    }
	} else if (sb_showscores || cl.stats[STAT_HEALTH] <= 0)
	    Sbar_SoloScoreboard();
	else
	    Sbar_DrawNormal();
    }
// main screen deathmatch rankings
    // if we're dead show team scores in team games
    if (cl.stats[STAT_HEALTH] <= 0 && !cl.spectator)
	if (atoi(Info_ValueForKey(cl.serverinfo, "teamplay")) > 0 &&
	    !sb_showscores)
	    Sbar_TeamOverlay();
	else
	    Sbar_DeathmatchOverlay(0);
    else if (sb_showscores)
	Sbar_DeathmatchOverlay(0);
    else if (sb_showteamscores)
	Sbar_TeamOverlay();

#ifdef GLQUAKE
    if (sb_showscores || sb_showteamscores || cl.stats[STAT_HEALTH] <= 0)
	sb_updates = 0;
    // clear unused areas in gl
#if 0
    {
	int x = (vid.width - 320) >> 1;

	// left
	if (x > 0) {
	    Draw_TileClear(0, vid.height - sb_lines, x, sb_lines);
	    Draw_TileClear(x + 320, vid.height - sb_lines,
			   vid.width - x + 320, sb_lines);
	}
    }
#endif
    if (vid.width > 320 && !headsup)
	Draw_TileClear(320, vid.height - sb_lines, vid.width - 320, sb_lines);
#endif

    if (sb_lines > 0)
	Sbar_MiniDeathmatchOverlay();
}

//=============================================================================

/*
==================
Sbar_IntermissionNumber

==================
*/
void
Sbar_IntermissionNumber(int x, int y, int num, int digits, int color)
{
    char str[12];
    char *ptr;
    int l, frame;

    l = Sbar_itoa(num, str);
    ptr = str;
    if (l > digits)
	ptr += (l - digits);
    if (l < digits)
	x += (digits - l) * 24;

    while (*ptr) {
	if (*ptr == '-')
	    frame = STAT_MINUS;
	else
	    frame = *ptr - '0';

	Draw_TransPic(x, y, sb_nums[color][frame]);
	x += 24;
	ptr++;
    }
}

/*
==================
Sbar_TeamOverlay

team frags
added by Zoid
==================
*/
void
Sbar_TeamOverlay(void)
{
    qpic_t *pic;
    int i, k, l;
    int x, y;
    char num[12];
    int teamplay;
    char team[5];
    team_t *tm;
    int plow, phigh, pavg;

// request new ping times every two second
    teamplay = atoi(Info_ValueForKey(cl.serverinfo, "teamplay"));

    if (!teamplay) {
	Sbar_DeathmatchOverlay(0);
	return;
    }

    scr_copyeverything = 1;
    scr_fullupdate = 0;

    pic = Draw_CachePic("gfx/ranking.lmp");
    Draw_Pic(160 - pic->width / 2, 0, pic);

    y = 24;
    x = 36;
    Draw_String(x, y, "low/avg/high team total players");
    y += 8;
//      Draw_String(x, y, "------------ ---- ----- -------");
    Draw_String(x, y,
		"\x1d\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1f \x1d\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1e\x1e\x1f");
    y += 8;

// sort the teams
    Sbar_SortTeams();

// draw the text
    l = scoreboardlines;

    for (i = 0; i < scoreboardteams && y <= vid.height - 10; i++) {
	k = teamsort[i];
	tm = teams + k;

	// draw pings
	plow = tm->plow;
	if (plow < 0 || plow > 999)
	    plow = 999;
	phigh = tm->phigh;
	if (phigh < 0 || phigh > 999)
	    phigh = 999;
	if (!tm->players)
	    pavg = 999;
	else
	    pavg = tm->ptotal / tm->players;
	if (pavg < 0 || pavg > 999)
	    pavg = 999;

	sprintf(num, "%3i/%3i/%3i", plow, pavg, phigh);
	Draw_String(x, y, num);

	// draw team
	team[4] = 0;
	strncpy(team, tm->team, 4);
	Draw_String(x + 104, y, team);

	// draw total
	sprintf(num, "%5i", tm->frags);
	Draw_String(x + 104 + 40, y, num);

	// draw players
	sprintf(num, "%5i", tm->players);
	Draw_String(x + 104 + 88, y, num);

	if (!strncmp(Info_ValueForKey(cl.players[cl.playernum].userinfo,
				      "team"), tm->team, 16)) {
	    Draw_Character(x + 104 - 8, y, 16);
	    Draw_Character(x + 104 + 32, y, 17);
	}

	y += 8;
    }
    y += 8;
    Sbar_DeathmatchOverlay(y);
}

/*
==================
Sbar_DeathmatchOverlay

ping time frags name
==================
*/
void
Sbar_DeathmatchOverlay(int start)
{
    qpic_t *pic;
    int i, k, l;
    int top, bottom;
    int x, y, f;
    char num[12];
    player_info_t *s;
    int total;
    int minutes;
    int p;
    int teamplay;
    char team[5];
    int skip = 10;

    if (largegame)
	skip = 8;

// request new ping times every two second
    if (realtime - cl.last_ping_request > 2) {
	cl.last_ping_request = realtime;
	MSG_WriteByte(&cls.netchan.message, clc_stringcmd);
	SZ_Print(&cls.netchan.message, "pings");
    }

    teamplay = atoi(Info_ValueForKey(cl.serverinfo, "teamplay"));

    scr_copyeverything = 1;
    scr_fullupdate = 0;

    if (!start) {
	pic = Draw_CachePic("gfx/ranking.lmp");
	Draw_Pic(160 - pic->width / 2, 0, pic);
    }
// scores
    Sbar_SortFrags(true);

// draw the text
    l = scoreboardlines;

    if (start)
	y = start;
    else
	y = 24;
    if (teamplay) {
	x = 4;
//                            0    40 64   104   152  192
	Draw_String(x, y, "ping pl time frags team name");
	y += 8;
//              Draw_String ( x , y, "---- -- ---- ----- ---- ----------------");
	Draw_String(x, y,
		    "\x1d\x1e\x1e\x1f \x1d\x1f \x1d\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1f \x1d\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1f");
	y += 8;
    } else {
	x = 16;
//                            0    40 64   104   152
	Draw_String(x, y, "ping pl time frags name");
	y += 8;
//              Draw_String ( x , y, "---- -- ---- ----- ----------------");
	Draw_String(x, y,
		    "\x1d\x1e\x1e\x1f \x1d\x1f \x1d\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1f \x1d\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1e\x1f");
	y += 8;
    }

    for (i = 0; i < l && y <= vid.height - 10; i++) {
	k = fragsort[i];
	s = &cl.players[k];
	if (!s->name[0])
	    continue;

	// draw ping
	p = s->ping;
	if (p < 0 || p > 999)
	    p = 999;
	sprintf(num, "%4i", p);
	Draw_String(x, y, num);

	// draw pl
	p = s->pl;
	sprintf(num, "%3i", p);
	if (p > 25)
	    Draw_Alt_String(x + 32, y, num);
	else
	    Draw_String(x + 32, y, num);

	if (s->spectator) {
	    Draw_String(x + 40, y, "(spectator)");
	    // draw name
	    if (teamplay)
		Draw_String(x + 152 + 40, y, s->name);
	    else
		Draw_String(x + 152, y, s->name);
	    y += skip;
	    continue;
	}
	// draw time
	if (cl.intermission)
	    total = cl.completed_time - s->entertime;
	else
	    total = realtime - s->entertime;
	minutes = (int)total / 60;
	sprintf(num, "%4i", minutes);
	Draw_String(x + 64, y, num);

	// draw background
	top = s->topcolor;
	bottom = s->bottomcolor;
	top = Sbar_ColorForMap(top);
	bottom = Sbar_ColorForMap(bottom);

	if (largegame)
	    Draw_Fill(x + 104, y + 1, 40, 3, top);
	else
	    Draw_Fill(x + 104, y, 40, 4, top);
	Draw_Fill(x + 104, y + 4, 40, 4, bottom);

	// draw number
	f = s->frags;
	sprintf(num, "%3i", f);

	Draw_Character(x + 112, y, num[0]);
	Draw_Character(x + 120, y, num[1]);
	Draw_Character(x + 128, y, num[2]);

	if (k == cl.playernum) {
	    Draw_Character(x + 104, y, 16);
	    Draw_Character(x + 136, y, 17);
	}
	// team
	if (teamplay) {
	    team[4] = 0;
	    strncpy(team, Info_ValueForKey(s->userinfo, "team"), 4);
	    Draw_String(x + 152, y, team);
	}
	// draw name
	if (teamplay)
	    Draw_String(x + 152 + 40, y, s->name);
	else
	    Draw_String(x + 152, y, s->name);

	y += skip;
    }

    if (y >= vid.height - 10)	// we ran over the screen size, squish
	largegame = true;
}

/*
==================
Sbar_MiniDeathmatchOverlay

frags name
frags team name
displayed to right of status bar if there's room
==================
*/
void
Sbar_MiniDeathmatchOverlay(void)
{
    int i, k;
    int top, bottom;
    int x, y, f;
    char num[12];
    player_info_t *s;
    int teamplay;
    char team[5];
    int numlines;
    char name[16 + 1];
    team_t *tm;

    if (vid.width < 512 || !sb_lines)
	return;			// not enuff room

    teamplay = atoi(Info_ValueForKey(cl.serverinfo, "teamplay"));

    scr_copyeverything = 1;
    scr_fullupdate = 0;

// scores
    Sbar_SortFrags(false);
    if (vid.width >= 640)
	Sbar_SortTeams();

    if (!scoreboardlines)
	return;			// no one there?

// draw the text
    y = vid.height - sb_lines - 1;
    numlines = sb_lines / 8;
    if (numlines < 3)
	return;			// not enough room

    // find us
    for (i = 0; i < scoreboardlines; i++)
	if (fragsort[i] == cl.playernum)
	    break;

    if (i == scoreboardlines)	// we're not there, we are probably a spectator, just display top
	i = 0;
    else			// figure out start
	i = i - numlines / 2;

    if (i > scoreboardlines - numlines)
	i = scoreboardlines - numlines;
    if (i < 0)
	i = 0;

    x = 324;

    for ( /* */ ; i < scoreboardlines && y < vid.height - 8 + 1; i++) {
	k = fragsort[i];
	s = &cl.players[k];
	if (!s->name[0])
	    continue;

	// draw ping
	top = s->topcolor;
	bottom = s->bottomcolor;
	top = Sbar_ColorForMap(top);
	bottom = Sbar_ColorForMap(bottom);

	Draw_Fill(x, y + 1, 40, 3, top);
	Draw_Fill(x, y + 4, 40, 4, bottom);

	// draw number
	f = s->frags;
	sprintf(num, "%3i", f);

	Draw_Character(x + 8, y, num[0]);
	Draw_Character(x + 16, y, num[1]);
	Draw_Character(x + 24, y, num[2]);

	if (k == cl.playernum) {
	    Draw_Character(x, y, 16);
	    Draw_Character(x + 32, y, 17);
	}
	// team
	if (teamplay) {
	    team[4] = 0;
	    strncpy(team, Info_ValueForKey(s->userinfo, "team"), 4);
	    Draw_String(x + 48, y, team);
	}
	// draw name
	name[16] = 0;
	strncpy(name, s->name, 16);
	if (teamplay)
	    Draw_String(x + 48 + 40, y, name);
	else
	    Draw_String(x + 48, y, name);
	y += 8;
    }

    // draw teams if room
    if (vid.width < 640 || !teamplay)
	return;

    // draw seperator
    x += 208;
    for (y = vid.height - sb_lines; y < vid.height - 6; y += 2)
	Draw_Character(x, y, 14);

    x += 16;

    y = vid.height - sb_lines;
    for (i = 0; i < scoreboardteams && y <= vid.height; i++) {
	k = teamsort[i];
	tm = teams + k;

	// draw pings
	team[4] = 0;
	strncpy(team, tm->team, 4);
	Draw_String(x, y, team);

	// draw total
	sprintf(num, "%5i", tm->frags);
	Draw_String(x + 40, y, num);

	if (!strncmp(Info_ValueForKey(cl.players[cl.playernum].userinfo,
				      "team"), tm->team, 16)) {
	    Draw_Character(x - 8, y, 16);
	    Draw_Character(x + 32, y, 17);
	}

	y += 8;
    }

}


/*
==================
Sbar_IntermissionOverlay

==================
*/
void
Sbar_IntermissionOverlay(void)
{
    scr_copyeverything = 1;
    scr_fullupdate = 0;

    if (atoi(Info_ValueForKey(cl.serverinfo, "teamplay")) > 0
	&& !sb_showscores)
	Sbar_TeamOverlay();
    else
	Sbar_DeathmatchOverlay(0);
}


/*
==================
Sbar_FinaleOverlay

==================
*/
void
Sbar_FinaleOverlay(void)
{
    qpic_t *pic;

    scr_copyeverything = 1;

    pic = Draw_CachePic("gfx/finale.lmp");
    Draw_TransPic((vid.width - pic->width) / 2, 16, pic);
}
