/*
Copyright (C) 1996-2001 Id Software, Inc.
Copyright (C) 2002-2009 John Fitzgibbons and others
Copyright (C) 2010-2014 QuakeSpasm developers

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 "quakedef.h"

int32_t         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;

bool    sb_showscores;

int32_t         sb_lines;                       // scan lines to draw

qpic_t          *rsb_invbar[2];
qpic_t          *rsb_weapons[5];
qpic_t          *rsb_items[2];
qpic_t          *rsb_ammo[3];
qpic_t          *rsb_teambord;          // PGM 01/19/97 - team color border

//MED 01/04/97 added two more weapons + 3 alternates for grenade launcher
qpic_t          *hsb_weapons[7][5];   // 0 is active, 1 is owned, 2-5 are flashes
//MED 01/04/97 added array to simplify weapon parsing
int32_t         hipweapons[4] = {HIT_LASER_CANNON_BIT, HIT_MJOLNIR_BIT, 4, HIT_PROXIMITY_GUN_BIT};
//MED 01/04/97 added hipnotic items array
qpic_t          *hsb_items[2];

void Sbar_MiniDeathmatchOverlay(void);
void Sbar_DeathmatchOverlay(void);
void M_DrawPic(int32_t x, int32_t y, qpic_t *pic);

/*
===============
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_LoadPics -- johnfitz -- load all the sbar pics
===============
*/
void Sbar_LoadPics(void)
{
	int32_t         i;

	for(i = 0; i < 10; i++)
	{
		sb_nums[0][i] = Draw_PicFromWad(va("num_%" PRIi32 "", i));
		sb_nums[1][i] = Draw_PicFromWad(va("anum_%" PRIi32 "", 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%" PRIi32 "_shotgun", i + 1));
		sb_weapons[2 + i][1] = Draw_PicFromWad(va("inva%" PRIi32 "_sshotgun", i + 1));
		sb_weapons[2 + i][2] = Draw_PicFromWad(va("inva%" PRIi32 "_nailgun", i + 1));
		sb_weapons[2 + i][3] = Draw_PicFromWad(va("inva%" PRIi32 "_snailgun", i + 1));
		sb_weapons[2 + i][4] = Draw_PicFromWad(va("inva%" PRIi32 "_rlaunch", i + 1));
		sb_weapons[2 + i][5] = Draw_PicFromWad(va("inva%" PRIi32 "_srlaunch", i + 1));
		sb_weapons[2 + i][6] = Draw_PicFromWad(va("inva%" PRIi32 "_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");

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

//MED 01/04/97 added new hipnotic weapons
	if(hipnotic)
	{
		hsb_weapons[0][0] = Draw_PicFromWad("inv_laser");
		hsb_weapons[0][1] = Draw_PicFromWad("inv_mjolnir");
		hsb_weapons[0][2] = Draw_PicFromWad("inv_gren_prox");
		hsb_weapons[0][3] = Draw_PicFromWad("inv_prox_gren");
		hsb_weapons[0][4] = Draw_PicFromWad("inv_prox");

		hsb_weapons[1][0] = Draw_PicFromWad("inv2_laser");
		hsb_weapons[1][1] = Draw_PicFromWad("inv2_mjolnir");
		hsb_weapons[1][2] = Draw_PicFromWad("inv2_gren_prox");
		hsb_weapons[1][3] = Draw_PicFromWad("inv2_prox_gren");
		hsb_weapons[1][4] = Draw_PicFromWad("inv2_prox");

		for(i = 0; i < 5; i++)
		{
			hsb_weapons[2 + i][0] = Draw_PicFromWad(va("inva%" PRIi32 "_laser", i + 1));
			hsb_weapons[2 + i][1] = Draw_PicFromWad(va("inva%" PRIi32 "_mjolnir", i + 1));
			hsb_weapons[2 + i][2] = Draw_PicFromWad(va("inva%" PRIi32 "_gren_prox", i + 1));
			hsb_weapons[2 + i][3] = Draw_PicFromWad(va("inva%" PRIi32 "_prox_gren", i + 1));
			hsb_weapons[2 + i][4] = Draw_PicFromWad(va("inva%" PRIi32 "_prox", i + 1));
		}

		hsb_items[0] = Draw_PicFromWad("sb_wsuit");
		hsb_items[1] = Draw_PicFromWad("sb_eshld");
	}

	if(rogue)
	{
		rsb_invbar[0] = Draw_PicFromWad("r_invbar1");
		rsb_invbar[1] = Draw_PicFromWad("r_invbar2");

		rsb_weapons[0] = Draw_PicFromWad("r_lava");
		rsb_weapons[1] = Draw_PicFromWad("r_superlava");
		rsb_weapons[2] = Draw_PicFromWad("r_gren");
		rsb_weapons[3] = Draw_PicFromWad("r_multirock");
		rsb_weapons[4] = Draw_PicFromWad("r_plasma");

		rsb_items[0] = Draw_PicFromWad("r_shield1");
		rsb_items[1] = Draw_PicFromWad("r_agrav1");

// PGM 01/19/97 - team color border
		rsb_teambord = Draw_PicFromWad("r_teambord");
// PGM 01/19/97 - team color border

		rsb_ammo[0] = Draw_PicFromWad("r_ammolava");
		rsb_ammo[1] = Draw_PicFromWad("r_ammomulti");
		rsb_ammo[2] = Draw_PicFromWad("r_ammoplasma");
	}
}

/*
===============
Sbar_Init -- johnfitz -- rewritten
===============
*/
void Sbar_Init(void)
{
	Cmd_AddCommand("+showscores", Sbar_ShowScores);
	Cmd_AddCommand("-showscores", Sbar_DontShowScores);

	Sbar_LoadPics();
}


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

// drawing routines are relative to the status bar location

/*
=============
Sbar_DrawPic -- johnfitz -- rewritten now that GL_SetCanvas is doing the work
=============
*/
void Sbar_DrawPic(int32_t x, int32_t y, qpic_t *pic)
{
	Draw_Pic(x, y + 24, pic);
}

/*
=============
Sbar_DrawPicAlpha -- johnfitz
=============
*/
void Sbar_DrawPicAlpha(int32_t x, int32_t y, qpic_t *pic, float alpha)
{
	glDisable(GL_ALPHA_TEST);
	glEnable(GL_BLEND);
	glColor4f(1, 1, 1, alpha);
	Draw_Pic(x, y + 24, pic);
	glColor4f(1, 1, 1, 1); // ericw -- changed from glColor3f to work around intel 855 bug with "r_oldwater 0" and "scr_sbaralpha 0"
	glDisable(GL_BLEND);
	glEnable(GL_ALPHA_TEST);
}

/*
================
Sbar_DrawCharacter -- johnfitz -- rewritten now that GL_SetCanvas is doing the work
================
*/
void Sbar_DrawCharacter(int32_t x, int32_t y, int32_t num)
{
	Draw_Character(x, y + 24, num);
}

/*
================
Sbar_DrawString -- johnfitz -- rewritten now that GL_SetCanvas is doing the work
================
*/
void Sbar_DrawString(int32_t x, int32_t y, const char *str)
{
	Draw_String(x, y + 24, str);
}

/*
===============
Sbar_DrawScrollString -- johnfitz

scroll the string inside a glscissor region
===============
*/
void Sbar_DrawScrollString(int32_t x, int32_t y, int32_t width, const char *str)
{
	float scale;
	int32_t len, ofs, left;

	scale = CLAMP(1.0, scr_sbarscale.value, (float)glwidth / 320.0);
	left = x * scale;
	if(cl.gametype != GAME_DEATHMATCH)
		left += (((float)glwidth - 320.0 * scale) / 2);

	glEnable(GL_SCISSOR_TEST);
	glScissor(left, 0, width * scale, glheight);

	len = strlen(str) * 8 + 40;
	ofs = ((int32_t)(realtime * 30)) % len;
	Sbar_DrawString(x - ofs, y, str);
	Sbar_DrawCharacter(x - ofs + len - 32, y, '/');
	Sbar_DrawCharacter(x - ofs + len - 24, y, '/');
	Sbar_DrawCharacter(x - ofs + len - 16, y, '/');
	Sbar_DrawString(x - ofs + len, y, str);

	glDisable(GL_SCISSOR_TEST);
}

/*
=============
Sbar_itoa
=============
*/
int32_t Sbar_itoa(int32_t num, char *buf)
{
	char    *str;
	int32_t pow10;
	int32_t 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(int32_t x, int32_t y, int32_t num, int32_t digits, int32_t color)
{
	char    str[12];
	char    *ptr;
	int32_t l, frame;

	num = q_min(999, num); //johnfitz -- cap high values rather than truncating number

	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_DrawPic(x, y, sb_nums[color][frame]); //johnfitz -- DrawTransPic is obsolete
		x += 24;
		ptr++;
	}
}

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

int32_t         fragsort[MAX_SCOREBOARD];

char            scoreboardtext[MAX_SCOREBOARD][20];
int32_t         scoreboardtop[MAX_SCOREBOARD];
int32_t         scoreboardbottom[MAX_SCOREBOARD];
int32_t         scoreboardcount[MAX_SCOREBOARD];
int32_t         scoreboardlines;

/*
===============
Sbar_SortFrags
===============
*/
void Sbar_SortFrags(void)
{
	int32_t         i, j, k;

// sort by frags
	scoreboardlines = 0;
	for(i = 0; i < cl.maxclients; i++)
	{
		if(cl.scores[i].name[0])
		{
			fragsort[scoreboardlines] = i;
			scoreboardlines++;
		}
	}

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

int32_t Sbar_ColorForMap(int32_t m)
{
	return m < 128 ? m + 8 : m + 8;
}

/*
===============
Sbar_UpdateScoreboard
===============
*/
void Sbar_UpdateScoreboard(void)
{
	int32_t         i, k;
	int32_t         top, bottom;
	scoreboard_t    *s;

	Sbar_SortFrags();

// draw the text
	memset(scoreboardtext, 0, sizeof(scoreboardtext));

	for(i = 0; i < scoreboardlines; i++)
	{
		k = fragsort[i];
		s = &cl.scores[k];
		sprintf(&scoreboardtext[i][1], "%3" PRIi32 " %s", s->frags, s->name);

		top = s->colors & 0xf0;
		bottom = (s->colors & 15) << 4;
		scoreboardtop[i] = Sbar_ColorForMap(top);
		scoreboardbottom[i] = Sbar_ColorForMap(bottom);
	}
}

/*
===============
Sbar_SoloScoreboard -- johnfitz -- new layout
===============
*/
void Sbar_SoloScoreboard(void)
{
	char    str[256];
	int32_t minutes, seconds, tens, units;
	int32_t len;

	sprintf(str, "Kills: %" PRIi32 "/%" PRIi32 "", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]);
	Sbar_DrawString(8, 12, str);

	sprintf(str, "Secrets: %" PRIi32 "/%" PRIi32 "", cl.stats[STAT_SECRETS], cl.stats[STAT_TOTALSECRETS]);
	Sbar_DrawString(312 - strlen(str) * 8, 12, str);

	minutes = cl.time / 60;
	seconds = cl.time - 60 * minutes;
	tens = seconds / 10;
	units = seconds - 10 * tens;
	sprintf(str, "%" PRIi32 ":%" PRIi32 "%" PRIi32 "", minutes, tens, units);
	Sbar_DrawString(160 - strlen(str) * 4, 12, str);

	len = strlen(cl.levelname);
	if(len > 40)
		Sbar_DrawScrollString(0, 4, 320, cl.levelname);
	else
		Sbar_DrawString(160 - len * 4, 4, cl.levelname);
}

/*
===============
Sbar_DrawScoreboard
===============
*/
void Sbar_DrawScoreboard(void)
{
	Sbar_SoloScoreboard();
	if(cl.gametype == GAME_DEATHMATCH)
		Sbar_DeathmatchOverlay();
}

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

/*
===============
Sbar_DrawInventory
===============
*/
void Sbar_DrawInventory(void)
{
	int32_t i, val;
	char    num[6];
	float   time;
	int32_t flashon;

	if(rogue)
	{
		if(cl.stats[STAT_ACTIVEWEAPON] >= RIT_LAVA_NAILGUN)
			Sbar_DrawPicAlpha(0, -24, rsb_invbar[0], scr_sbaralpha.value);  //johnfitz -- scr_sbaralpha
		else
			Sbar_DrawPicAlpha(0, -24, rsb_invbar[1], scr_sbaralpha.value);  //johnfitz -- scr_sbaralpha
	}
	else
	{
		Sbar_DrawPicAlpha(0, -24, sb_ibar, scr_sbaralpha.value);  //johnfitz -- scr_sbaralpha
	}

// weapons
	for(i = 0; i < 7; i++)
	{
		if(cl.items & (IT_SHOTGUN << i))
		{
			time = cl.item_gettime[i];
			flashon = (int32_t)((cl.time - time) * 10);
			if(flashon >= 10)
			{
				if(cl.stats[STAT_ACTIVEWEAPON] == (IT_SHOTGUN << i))
					flashon = 1;
				else
					flashon = 0;
			}
			else
				flashon = (flashon % 5) + 2;

			Sbar_DrawPic(i * 24, -16, sb_weapons[flashon][i]);

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

// MED 01/04/97
// hipnotic weapons
	if(hipnotic)
	{
		int32_t grenadeflashing = 0;
		for(i = 0; i < 4; i++)
		{
			if(cl.items & (1 << hipweapons[i]))
			{
				time = cl.item_gettime[hipweapons[i]];
				flashon = (int32_t)((cl.time - time) * 10);
				if(flashon >= 10)
				{
					if(cl.stats[STAT_ACTIVEWEAPON] == (1 << hipweapons[i]))
						flashon = 1;
					else
						flashon = 0;
				}
				else
					flashon = (flashon % 5) + 2;

				// check grenade launcher
				if(i == 2)
				{
					if(cl.items & HIT_PROXIMITY_GUN)
					{
						if(flashon)
						{
							grenadeflashing = 1;
							Sbar_DrawPic(96, -16, hsb_weapons[flashon][2]);
						}
					}
				}
				else if(i == 3)
				{
					if(cl.items & (IT_SHOTGUN << 4))
					{
						if(flashon && !grenadeflashing)
						{
							Sbar_DrawPic(96, -16, hsb_weapons[flashon][3]);
						}
						else if(!grenadeflashing)
						{
							Sbar_DrawPic(96, -16, hsb_weapons[0][3]);
						}
					}
					else
						Sbar_DrawPic(96, -16, hsb_weapons[flashon][4]);
				}
				else
					Sbar_DrawPic(176 + (i * 24), -16, hsb_weapons[flashon][i]);

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

	if(rogue)
	{
		// check for powered up weapon.
		if(cl.stats[STAT_ACTIVEWEAPON] >= RIT_LAVA_NAILGUN)
		{
			for(i = 0; i < 5; i++)
			{
				if(cl.stats[STAT_ACTIVEWEAPON] == (RIT_LAVA_NAILGUN << i))
				{
					Sbar_DrawPic((i + 2) * 24, -16, rsb_weapons[i]);
				}
			}
		}
	}

// ammo counts
	for(i = 0; i < 4; i++)
	{
		val = cl.stats[STAT_SHELLS + i];
		val = (val < 0) ? 0 : q_min(999, val); //johnfitz -- cap displayed value to 999
		sprintf(num, "%3" PRIi32 "", val);
		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.items & (1 << (17 + i)))
		{
			time = cl.item_gettime[17 + i];
			if(time && time > cl.time - 2 && flashon)
			{
				// flash frame
				sb_updates = 0;
			}
			else
			{
				//MED 01/04/97 changed keys
				if(!hipnotic || (i > 1))
				{
					Sbar_DrawPic(192 + i * 16, -16, sb_items[i]);
				}
			}
			if(time && time > cl.time - 2)
				sb_updates = 0;
		}
	}
	//MED 01/04/97 added hipnotic items
	// hipnotic items
	if(hipnotic)
	{
		for(i = 0; i < 2; i++)
		{
			if(cl.items & (1 << (24 + i)))
			{
				time = cl.item_gettime[24 + i];
				if(time && time > cl.time - 2 && flashon)
				{
					// flash frame
					sb_updates = 0;
				}
				else
				{
					Sbar_DrawPic(288 + i * 16, -16, hsb_items[i]);
				}
				if(time && time > cl.time - 2)
					sb_updates = 0;
			}
		}
	}

	if(rogue)
	{
		// new rogue items
		for(i = 0; i < 2; i++)
		{
			if(cl.items & (1 << (29 + i)))
			{
				time = cl.item_gettime[29 + i];
				if(time && time > cl.time - 2 && flashon)
				{
					// flash frame
					sb_updates = 0;
				}
				else
				{
					Sbar_DrawPic(288 + i * 16, -16, rsb_items[i]);
				}
				if(time && time > cl.time - 2)
					sb_updates = 0;
			}
		}
	}
	else
	{
		// sigils
		for(i = 0; i < 4; i++)
		{
			if(cl.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 -- johnfitz -- heavy revision
===============
*/
void Sbar_DrawFrags(void)
{
	int32_t numscores, i, x, color;
	char    num[12];
	scoreboard_t    *s;

	Sbar_SortFrags();

// draw the text
	numscores = q_min(scoreboardlines, 4);

	for(i = 0, x = 184; i < numscores; i++, x += 32)
	{
		s = &cl.scores[fragsort[i]];
		if(!s->name[0])
			continue;

		// top color
		color = s->colors & 0xf0;
		color = Sbar_ColorForMap(color);
		Draw_Fill(x + 10, 1, 28, 4, color, 1);

		// bottom color
		color = (s->colors & 15) << 4;
		color = Sbar_ColorForMap(color);
		Draw_Fill(x + 10, 5, 28, 3, color, 1);

		// number
		sprintf(num, "%3" PRIi32 "", s->frags);
		Sbar_DrawCharacter(x + 12, -24, num[0]);
		Sbar_DrawCharacter(x + 20, -24, num[1]);
		Sbar_DrawCharacter(x + 28, -24, num[2]);

		// brackets
		if(fragsort[i] == cl.viewentity - 1)
		{
			Sbar_DrawCharacter(x + 6, -24, 16);
			Sbar_DrawCharacter(x + 32, -24, 17);
		}
	}
}

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


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

// PGM 01/19/97 - team color drawing
// PGM 03/02/97 - fixed so color swatch only appears in CTF modes
	if(rogue && (cl.maxclients != 1) && (teamplay.value > 3) && (teamplay.value < 7))
	{
		int32_t top, bottom;
		int32_t xofs;
		char    num[12];
		scoreboard_t    *s;

		s = &cl.scores[cl.viewentity - 1];
		// draw background
		top = s->colors & 0xf0;
		bottom = (s->colors & 15) << 4;
		top = Sbar_ColorForMap(top);
		bottom = Sbar_ColorForMap(bottom);

		if(cl.gametype == GAME_DEATHMATCH)
			xofs = 113;
		else
			xofs = ((vid.width - 320) >> 1) + 113;

		Sbar_DrawPic(112, 0, rsb_teambord);
		Draw_Fill(xofs, /*vid.height-*/24 + 3, 22, 9, top, 1); //johnfitz -- sbar coords are now relative
		Draw_Fill(xofs, /*vid.height-*/24 + 12, 22, 9, bottom, 1); //johnfitz -- sbar coords are now relative

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

		if(top == 8)
		{
			if(num[0] != ' ')
				Sbar_DrawCharacter(113, 3, 18 + num[0] - '0');
			if(num[1] != ' ')
				Sbar_DrawCharacter(120, 3, 18 + num[1] - '0');
			if(num[2] != ' ')
				Sbar_DrawCharacter(127, 3, 18 + num[2] - '0');
		}
		else
		{
			Sbar_DrawCharacter(113, 3, num[0]);
			Sbar_DrawCharacter(120, 3, num[1]);
			Sbar_DrawCharacter(127, 3, num[2]);
		}

		return;
	}
// PGM 01/19/97 - team color drawing

	if((cl.items & (IT_INVISIBILITY | IT_INVULNERABILITY))
	                == (IT_INVISIBILITY | IT_INVULNERABILITY))
	{
		Sbar_DrawPic(112, 0, sb_face_invis_invuln);
		return;
	}
	if(cl.items & IT_QUAD)
	{
		Sbar_DrawPic(112, 0, sb_face_quad);
		return;
	}
	if(cl.items & IT_INVISIBILITY)
	{
		Sbar_DrawPic(112, 0, sb_face_invis);
		return;
	}
	if(cl.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(f < 0)       // in case we ever decide to draw when health <= 0
		f = 0;

	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_Draw
===============
*/
void Sbar_Draw(void)
{
	float w; //johnfitz

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

	if(cl.intermission)
		return; //johnfitz -- never draw sbar during intermission

	if(sb_updates >= vid.numpages && !gl_clear.value && scr_sbaralpha.value >= 1  //johnfitz -- gl_clear, scr_sbaralpha
	                && !(gl_glsl_gamma_able && vid_gamma.value != 1))                         //ericw -- must draw sbar every frame if doing glsl gamma
		return;

	sb_updates++;

	GL_SetCanvas(CANVAS_DEFAULT);  //johnfitz

	//johnfitz -- don't waste fillrate by clearing the area behind the sbar
	w = CLAMP(320.0f, scr_sbarscale.value * 320.0f, (float)glwidth);
	if(sb_lines && glwidth > w)
	{
		if(scr_sbaralpha.value < 1)
			Draw_TileClear(0, glheight - sb_lines, glwidth, sb_lines);
		if(cl.gametype == GAME_DEATHMATCH)
			Draw_TileClear(w, glheight - sb_lines, glwidth - w, sb_lines);
		else
		{
			Draw_TileClear(0, glheight - sb_lines, (glwidth - w) / 2.0f, sb_lines);
			Draw_TileClear((glwidth - w) / 2.0f + w, glheight - sb_lines, (glwidth - w) / 2.0f, sb_lines);
		}
	}
	//johnfitz

	GL_SetCanvas(CANVAS_SBAR);  //johnfitz

	if(scr_viewsize.value < 110)  //johnfitz -- check viewsize instead of sb_lines
	{
		Sbar_DrawInventory();
		if(cl.maxclients != 1)
			Sbar_DrawFrags();
	}

	if(sb_showscores || cl.stats[STAT_HEALTH] <= 0)
	{
		Sbar_DrawPicAlpha(0, 0, sb_scorebar, scr_sbaralpha.value);  //johnfitz -- scr_sbaralpha
		Sbar_DrawScoreboard();
		sb_updates = 0;
	}
	else if(scr_viewsize.value < 120)  //johnfitz -- check viewsize instead of sb_lines
	{
		Sbar_DrawPicAlpha(0, 0, sb_sbar, scr_sbaralpha.value);  //johnfitz -- scr_sbaralpha

		// keys (hipnotic only)
		//MED 01/04/97 moved keys here so they would not be overwritten
		if(hipnotic)
		{
			if(cl.items & IT_KEY1)
				Sbar_DrawPic(209, 3, sb_items[0]);
			if(cl.items & IT_KEY2)
				Sbar_DrawPic(209, 12, sb_items[1]);
		}
		// armor
		if(cl.items & IT_INVULNERABILITY)
		{
			Sbar_DrawNum(24, 0, 666, 3, 1);
			Sbar_DrawPic(0, 0, draw_disc);
		}
		else
		{
			if(rogue)
			{
				Sbar_DrawNum(24, 0, cl.stats[STAT_ARMOR], 3,
				             cl.stats[STAT_ARMOR] <= 25);
				if(cl.items & RIT_ARMOR3)
					Sbar_DrawPic(0, 0, sb_armor[2]);
				else if(cl.items & RIT_ARMOR2)
					Sbar_DrawPic(0, 0, sb_armor[1]);
				else if(cl.items & RIT_ARMOR1)
					Sbar_DrawPic(0, 0, sb_armor[0]);
			}
			else
			{
				Sbar_DrawNum(24, 0, cl.stats[STAT_ARMOR], 3
				             , cl.stats[STAT_ARMOR] <= 25);
				if(cl.items & IT_ARMOR3)
					Sbar_DrawPic(0, 0, sb_armor[2]);
				else if(cl.items & IT_ARMOR2)
					Sbar_DrawPic(0, 0, sb_armor[1]);
				else if(cl.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(rogue)
		{
			if(cl.items & RIT_SHELLS)
				Sbar_DrawPic(224, 0, sb_ammo[0]);
			else if(cl.items & RIT_NAILS)
				Sbar_DrawPic(224, 0, sb_ammo[1]);
			else if(cl.items & RIT_ROCKETS)
				Sbar_DrawPic(224, 0, sb_ammo[2]);
			else if(cl.items & RIT_CELLS)
				Sbar_DrawPic(224, 0, sb_ammo[3]);
			else if(cl.items & RIT_LAVA_NAILS)
				Sbar_DrawPic(224, 0, rsb_ammo[0]);
			else if(cl.items & RIT_PLASMA_AMMO)
				Sbar_DrawPic(224, 0, rsb_ammo[1]);
			else if(cl.items & RIT_MULTI_ROCKETS)
				Sbar_DrawPic(224, 0, rsb_ammo[2]);
		}
		else
		{
			if(cl.items & IT_SHELLS)
				Sbar_DrawPic(224, 0, sb_ammo[0]);
			else if(cl.items & IT_NAILS)
				Sbar_DrawPic(224, 0, sb_ammo[1]);
			else if(cl.items & IT_ROCKETS)
				Sbar_DrawPic(224, 0, sb_ammo[2]);
			else if(cl.items & IT_CELLS)
				Sbar_DrawPic(224, 0, sb_ammo[3]);
		}

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

	//johnfitz -- removed the vid.width > 320 check here
	if(cl.gametype == GAME_DEATHMATCH)
		Sbar_MiniDeathmatchOverlay();
}

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

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

==================
*/
void Sbar_IntermissionNumber(int32_t x, int32_t y, int32_t num, int32_t digits, int32_t color)
{
	char    str[12];
	char    *ptr;
	int32_t 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_Pic(x, y, sb_nums[color][frame]); //johnfitz -- stretched menus
		x += 24;
		ptr++;
	}
}

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

==================
*/
void Sbar_DeathmatchOverlay(void)
{
	qpic_t  *pic;
	int32_t i, k, l;
	int32_t top, bottom;
	int32_t x, y, f;
	char    num[12];
	scoreboard_t    *s;

	GL_SetCanvas(CANVAS_MENU);  //johnfitz

	pic = Draw_CachePic("gfx/ranking.lmp");
	M_DrawPic((320 - pic->width) / 2, 8, pic);

// scores
	Sbar_SortFrags();

// draw the text
	l = scoreboardlines;

	x = 80; //johnfitz -- simplified becuase some positioning is handled elsewhere
	y = 40;
	for(i = 0; i < l; i++)
	{
		k = fragsort[i];
		s = &cl.scores[k];
		if(!s->name[0])
			continue;

		// draw background
		top = s->colors & 0xf0;
		bottom = (s->colors & 15) << 4;
		top = Sbar_ColorForMap(top);
		bottom = Sbar_ColorForMap(bottom);

		Draw_Fill(x, y, 40, 4, top, 1);   //johnfitz -- stretched overlays
		Draw_Fill(x, y + 4, 40, 4, bottom, 1); //johnfitz -- stretched overlays

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

		Draw_Character(x + 8, y, num[0]);  //johnfitz -- stretched overlays
		Draw_Character(x + 16, y, num[1]);  //johnfitz -- stretched overlays
		Draw_Character(x + 24, y, num[2]);  //johnfitz -- stretched overlays

		if(k == cl.viewentity - 1)
			Draw_Character(x - 8, y, 12);   //johnfitz -- stretched overlays

		// draw name
		M_Print(x + 64, y, s->name); //johnfitz -- was Draw_String, changed for stretched overlays

		y += 10;
	}

	GL_SetCanvas(CANVAS_SBAR);  //johnfitz
}

/*
==================
Sbar_MiniDeathmatchOverlay
==================
*/
void Sbar_MiniDeathmatchOverlay(void)
{
	int32_t i, k, top, bottom, x, y, f, numlines;
	char    num[12];
	float   scale; //johnfitz
	scoreboard_t    *s;

	scale = CLAMP(1.0, scr_sbarscale.value, (float)glwidth / 320.0);  //johnfitz

	//MAX_SCOREBOARDNAME = 32, so total width for this overlay plus sbar is 632, but we can cut off some i guess
	if(glwidth / scale < 512 || scr_viewsize.value >= 120) //johnfitz -- test should consider scr_sbarscale
		return;

// scores
	Sbar_SortFrags();

// draw the text
	numlines = (scr_viewsize.value >= 110) ? 3 : 6; //johnfitz

	//find us
	for(i = 0; i < scoreboardlines; i++)
		if(fragsort[i] == cl.viewentity - 1)
			break;
	if(i == scoreboardlines)  // we're not there
		i = 0;
	else // figure out start
		i = i - numlines / 2;
	if(i > scoreboardlines - numlines)
		i = scoreboardlines - numlines;
	if(i < 0)
		i = 0;

	x = 324;
	y = (scr_viewsize.value >= 110) ? 24 : 0; //johnfitz -- start at the right place
	for(; i < scoreboardlines && y <= 48; i++, y += 8) //johnfitz -- change y init, test, inc
	{
		k = fragsort[i];
		s = &cl.scores[k];
		if(!s->name[0])
			continue;

		// colors
		top = s->colors & 0xf0;
		bottom = (s->colors & 15) << 4;
		top = Sbar_ColorForMap(top);
		bottom = Sbar_ColorForMap(bottom);

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

		// number
		f = s->frags;
		sprintf(num, "%3" PRIi32 "", f);
		Draw_Character(x + 8, y, num[0]);
		Draw_Character(x + 16, y, num[1]);
		Draw_Character(x + 24, y, num[2]);

		// brackets
		if(k == cl.viewentity - 1)
		{
			Draw_Character(x, y, 16);
			Draw_Character(x + 32, y, 17);
		}

		// name
		Draw_String(x + 48, y, s->name);
	}
}

/*
==================
Sbar_IntermissionOverlay
==================
*/
void Sbar_IntermissionOverlay(void)
{
	qpic_t  *pic;
	int32_t dig;
	int32_t num;

	if(cl.gametype == GAME_DEATHMATCH)
	{
		Sbar_DeathmatchOverlay();
		return;
	}

	GL_SetCanvas(CANVAS_MENU);  //johnfitz

	pic = Draw_CachePic("gfx/complete.lmp");
	Draw_Pic(64, 24, pic);

	pic = Draw_CachePic("gfx/inter.lmp");
	Draw_Pic(0, 56, pic);

	dig = cl.completed_time / 60;
	Sbar_IntermissionNumber(152, 64, dig, 3, 0);  //johnfitz -- was 160
	num = cl.completed_time - dig * 60;
	Draw_Pic(224, 64, sb_colon); //johnfitz -- was 234
	Draw_Pic(240, 64, sb_nums[0][num / 10]); //johnfitz -- was 246
	Draw_Pic(264, 64, sb_nums[0][num % 10]); //johnfitz -- was 266

	Sbar_IntermissionNumber(152, 104, cl.stats[STAT_SECRETS], 3, 0);  //johnfitz -- was 160
	Draw_Pic(224, 104, sb_slash); //johnfitz -- was 232
	Sbar_IntermissionNumber(240, 104, cl.stats[STAT_TOTALSECRETS], 3, 0);  //johnfitz -- was 248

	Sbar_IntermissionNumber(152, 144, cl.stats[STAT_MONSTERS], 3, 0);  //johnfitz -- was 160
	Draw_Pic(224, 144, sb_slash); //johnfitz -- was 232
	Sbar_IntermissionNumber(240, 144, cl.stats[STAT_TOTALMONSTERS], 3, 0);  //johnfitz -- was 248
}


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

	GL_SetCanvas(CANVAS_MENU);  //johnfitz

	pic = Draw_CachePic("gfx/finale.lmp");
	Draw_Pic((320 - pic->width) / 2, 16, pic); //johnfitz -- stretched menus
}