/*
	cl_tent.c
	client side temporary entities

	$Header: /cvsroot/uhexen2/hexenworld/Client/cl_tent.c,v 1.29 2007/07/08 11:55:34 sezero Exp $
*/


// HEADER FILES ------------------------------------------------------------

#include "quakedef.h"

// MACROS ------------------------------------------------------------------

#define	MAX_BEAMS			8
#define MAX_STREAMS			32
#define STREAM_ATTACHED			16
#define STREAM_TRANSLUCENT		32
#define	MAX_EXPLOSIONS			128

#define FRANDOM() (rand()*(1.0/RAND_MAX))

static unsigned int randomseed;
void setseed(unsigned int seed)
{
	randomseed = seed;
}

//unsigned int seedrand(int max)
float seedrand(void)
{
	randomseed = (randomseed * 877 + 573) % 9968;
	return (float)randomseed / 9968;
}

// TYPES -------------------------------------------------------------------

typedef struct
{
	int	entity;
	struct model_s	*model;
	float	endtime;
	vec3_t	start, end;
} beam_t;

typedef struct
{
	int	type;
	int	entity;
	int	tag;
	int	flags;
	int	skin;
	struct model_s *models[4];
	vec3_t	source;
	vec3_t	dest;
	vec3_t	offset;
	float	endTime;
	float	lastTrailTime;
} stream_t;

typedef enum
{
	EXFLAG_ROTATE = 1,
	EXFLAG_COLLIDE = 2,
	EXFLAG_STILL_FRAME = 4
} exflags_t;

typedef struct explosion_t explosion_t;

struct explosion_t
{
	vec3_t		origin;
	vec3_t		oldorg;// holds position from last frame
	float		startTime;
	float		endTime;
	vec3_t		velocity;
	vec3_t		accel;
	vec3_t		angles;
	vec3_t		avel;	// angular velocity
	int		flags;
	int		abslight;
//	exflags_t	exflags;
	int		exflags;
	int		skin;
	int		scale;
	model_t		*model;
	void (*frameFunc)(explosion_t *ex);
	void (*removeFunc)(explosion_t *ex);
	float		data; //for easy transition of script code that relied on counters of some sort
};

// PUBLIC FUNCTION DEFINITIONS ---------------------------------------------

int TempSoundChannel (void)
{
	static int last = -1;
	last--;
	if (last < -20)
		last = -1;
	return last;
}

// PRIVATE FUNCTION PROTOTYPES ---------------------------------------------

static void ParseStream(int type);
static stream_t *NewStream(int ent, int tag);

static void MultiGrenadeThink (explosion_t *ex);
static void MultiGrenadePieceThink (explosion_t *ex);
static void MultiGrenadePiece2Think (explosion_t *ex);
static void ChunkThink(explosion_t *ex);
static void BubbleThink(explosion_t *ex);
static void MissileFlashThink(explosion_t *ex);
static void TeleportFlashThink(explosion_t *ex);
static void CheckSpaceThink(explosion_t *ex);
static void SwordFrameFunc(explosion_t *ex);
static void zapFrameFunc(explosion_t *ex);
static void fireBallUpdate(explosion_t *ex);
static void sunBallUpdate(explosion_t *ex);
static void sunPowerUpdate(explosion_t *ex);
#if 0
static void purify1Update(explosion_t *ex);
#endif
static void telEffectUpdate (explosion_t *ex);
static void CL_UpdateTargetBall(void);
static void updateBloodRain(explosion_t *ex);
static void updatePurify2(explosion_t *ex);
static void updateSwordShot(explosion_t *ex);
static void updateIceShot(explosion_t *ex);
static void updateMeteor(explosion_t *ex);
static void SmokeRingFrameFunc(explosion_t *ex);
static void updateAcidBlob(explosion_t *ex);
static void updateAcidBall(explosion_t *ex);
static void MeteorCrushSpawnThink(explosion_t *ex);

// PRIVATE DATA DEFINITIONS ------------------------------------------------

static beam_t		cl_beams[MAX_BEAMS];
static explosion_t	cl_explosions[MAX_EXPLOSIONS];
static stream_t		cl_Streams[MAX_STREAMS];
static float	playIceSound = .6;
static int		MultiGrenadeCurrentChannel;

//static sfx_t		*cl_sfx_wizhit;
//static sfx_t		*cl_sfx_knighthit;
static sfx_t		*cl_sfx_tink1;
static sfx_t		*cl_sfx_ric1;
static sfx_t		*cl_sfx_ric2;
static sfx_t		*cl_sfx_ric3;
static sfx_t		*cl_sfx_r_exp3;
static sfx_t		*cl_sfx_explode;
static sfx_t		*cl_sfx_bonehit;
static sfx_t		*cl_sfx_bonewal;
static sfx_t		*cl_sfx_bonephit;
static sfx_t		*cl_sfx_ravendie;
static sfx_t		*cl_sfx_buzzbee;

static sfx_t		*cl_sfx_iceflesh;
static sfx_t		*cl_sfx_icewall;
static sfx_t		*cl_sfx_iceshatter;
static sfx_t		*cl_sfx_icestorm;
static sfx_t		*cl_sfx_sunstaff;
static sfx_t		*cl_sfx_sunhit;
static sfx_t		*cl_sfx_lightning1;
static sfx_t		*cl_sfx_lightning2;
static sfx_t		*cl_sfx_hammersound;
static sfx_t		*cl_sfx_tornado;
static sfx_t		*cl_sfx_swordExplode;
static sfx_t		*cl_sfx_axeBounce;
static sfx_t		*cl_sfx_axeExplode;
static sfx_t		*cl_sfx_fireBall;
static sfx_t		*cl_sfx_purify2;
static sfx_t		*cl_sfx_telefrag;
static sfx_t		*cl_sfx_big_gib;
static sfx_t		*cl_sfx_gib1;
static sfx_t		*cl_sfx_gib2;
static sfx_t		*cl_sfx_purify1_fire;
static sfx_t		*cl_sfx_purify1_hit;
static sfx_t		*cl_sfx_acidhit;
static sfx_t		*cl_sfx_dropfizzle;
static sfx_t		*cl_sfx_flameend;

static sfx_t		*cl_sfx_teleport[5];
static sfx_t		*cl_sfx_ravengo;


/*
=================
CL_InitTEnts
=================
*/
void CL_InitTEnts (void)
{
//	cl_sfx_wizhit = S_PrecacheSound ("wizard/hit.wav");
//	cl_sfx_knighthit = S_PrecacheSound ("hknight/hit.wav");
	cl_sfx_tink1 = S_PrecacheSound ("weapons/tink1.wav");
	cl_sfx_ric1 = S_PrecacheSound ("weapons/ric1.wav");
	cl_sfx_ric2 = S_PrecacheSound ("weapons/ric2.wav");
	cl_sfx_ric3 = S_PrecacheSound ("weapons/ric3.wav");
	cl_sfx_r_exp3 = S_PrecacheSound ("weapons/r_exp3.wav");
	cl_sfx_explode = S_PrecacheSound ("weapons/explode.wav");
	cl_sfx_bonephit = S_PrecacheSound ("necro/bonephit.wav");
	cl_sfx_bonehit = S_PrecacheSound ("necro/bonenhit.wav");
	cl_sfx_bonewal = S_PrecacheSound ("necro/bonenwal.wav");
	cl_sfx_ravendie = S_PrecacheSound ("raven/death.wav");
	cl_sfx_buzzbee = S_PrecacheSound ("assassin/scrbfly.wav");

	cl_sfx_iceflesh = S_PrecacheSound ("crusader/icehit.wav");
	cl_sfx_icewall = S_PrecacheSound ("crusader/icewall.wav");
	cl_sfx_iceshatter = S_PrecacheSound ("misc/icestatx.wav");
	cl_sfx_icestorm = S_PrecacheSound ("crusader/blizzard.wav");
	cl_sfx_sunstaff = S_PrecacheSound ("crusader/sunhum.wav");
	cl_sfx_sunhit = S_PrecacheSound ("crusader/sunhit.wav");
	cl_sfx_lightning1 = S_PrecacheSound ("crusader/lghtn1.wav");
	cl_sfx_lightning2 = S_PrecacheSound ("crusader/lghtn2.wav");
	cl_sfx_hammersound = S_PrecacheSound ("paladin/axblade.wav");
	cl_sfx_tornado = S_PrecacheSound ("crusader/tornado.wav");
	cl_sfx_swordExplode = S_PrecacheSound ("weapons/explode.wav");
	cl_sfx_axeBounce = S_PrecacheSound ("paladin/axric1.wav");
	cl_sfx_axeExplode = S_PrecacheSound ("weapons/explode.wav");
	cl_sfx_fireBall = S_PrecacheSound ("weapons/fbfire.wav");
	cl_sfx_purify2 = S_PrecacheSound ("weapons/exphuge.wav");
	cl_sfx_telefrag = S_PrecacheSound ("player/telefrag.wav");
	cl_sfx_big_gib = S_PrecacheSound ("player/megagib.wav");
	cl_sfx_gib1 = S_PrecacheSound ("player/gib1.wav");
	cl_sfx_gib2 = S_PrecacheSound ("player/gib2.wav");
	cl_sfx_purify1_fire = S_PrecacheSound ("paladin/purfire.wav");
	cl_sfx_purify1_hit = S_PrecacheSound ("weapons/expsmall.wav");
	cl_sfx_acidhit = S_PrecacheSound ("succubus/acidhit.wav");
	cl_sfx_dropfizzle = S_PrecacheSound ("succubus/dropfizz.wav");
	cl_sfx_flameend = S_PrecacheSound ("succubus/flamend.wav");

	cl_sfx_teleport[0] = S_PrecacheSound ("misc/teleprt1.wav");
	cl_sfx_teleport[1] = S_PrecacheSound ("misc/teleprt2.wav");
	cl_sfx_teleport[2] = S_PrecacheSound ("misc/teleprt3.wav");
	cl_sfx_teleport[3] = S_PrecacheSound ("misc/teleprt4.wav");
	cl_sfx_teleport[4] = S_PrecacheSound ("misc/teleprt5.wav");

	cl_sfx_ravengo = S_PrecacheSound ("raven/ravengo.wav");
}

static void vectoangles(vec3_t vec, vec3_t ang)
{
	float	forward;
	float	yaw, pitch;

	if (vec[1] == 0 && vec[0] == 0)
	{
		yaw = 0;
		if (vec[2] > 0)
			pitch = 90;
		else
			pitch = 270;
	}
	else
	{
		yaw = (int) (atan2(vec[1], vec[0]) * 180 / M_PI);
		if (yaw < 0)
			yaw += 360;

		forward = sqrt (vec[0]*vec[0] + vec[1]*vec[1]);
		pitch = (int) (atan2(vec[2], forward) * 180 / M_PI);
		if (pitch < 0)
			pitch += 360;
	}

	ang[0] = pitch;
	ang[1] = yaw;
	ang[2] = 0;
}


/*
=================
CL_ClearTEnts
=================
*/
void CL_ClearTEnts (void)
{
	memset (&cl_beams, 0, sizeof(cl_beams));
	memset (&cl_explosions, 0, sizeof(cl_explosions));
	memset (cl_Streams, 0, sizeof(cl_Streams));
}

/*
=================
CL_AllocExplosion
**** CAREFUL!!! This may overwrite an explosion!!!!!
=================
*/
static explosion_t *CL_AllocExplosion (void)
{
	int	i, idx, freeSlot;
	float	time;

	idx = 0;
	freeSlot = false;

	for (i = 0; i < MAX_EXPLOSIONS; i++)
	{
		if (!cl_explosions[i].model)
		{
			idx = i;
			freeSlot = true;
			break;
		}
	}

// find the oldest explosion
	time = cl.time;

	if (!freeSlot)
	{
		for (i = 0; i < MAX_EXPLOSIONS; i++)
		{
			if (cl_explosions[i].startTime < time)
			{
				time = cl_explosions[i].startTime;
				idx = i;
			}
		}
	}

	//zero out velocity and acceleration, funcs
	memset (&cl_explosions[idx], 0, sizeof(explosion_t));

	return &cl_explosions[idx];
}

/*
=================
CL_ParseBeam
=================
*/
static void CL_ParseBeam (model_t *m)
{
	int	i, ent;
	vec3_t	start, end;
	beam_t	*b;

	ent = MSG_ReadShort ();

	start[0] = MSG_ReadCoord ();
	start[1] = MSG_ReadCoord ();
	start[2] = MSG_ReadCoord ();

	end[0] = MSG_ReadCoord ();
	end[1] = MSG_ReadCoord ();
	end[2] = MSG_ReadCoord ();

	if (!m)
	{
		return;
	}

// override any beam with the same entity
	for (i = 0, b = cl_beams; i < MAX_BEAMS; i++, b++)
	{
		if (b->entity == ent)
		{
			b->entity = ent;
			b->model = m;
			b->endtime = cl.time + 0.2;
			VectorCopy (start, b->start);
			VectorCopy (end, b->end);
			return;
		}
	}

// find a free beam
	for (i = 0, b = cl_beams; i < MAX_BEAMS; i++, b++)
	{
		if (!b->model || b->endtime < cl.time)
		{
			b->entity = ent;
			b->model = m;
			b->endtime = cl.time + 0.2;
			VectorCopy (start, b->start);
			VectorCopy (end, b->end);
			return;
		}
	}
	Con_Printf ("beam list overflow!\n");
}

entity_state_t *FindState(int EntNum)
{
	packet_entities_t		*pack;
	static entity_state_t	pretend_player;
	int		pnum;

	if (EntNum >= 1 && EntNum <= MAX_CLIENTS)
	{
		EntNum--;

		if (EntNum == cl.playernum)
		{
			VectorCopy(cl.simorg, pretend_player.origin);
		}
		else
		{
			VectorCopy(cl.frames[cls.netchan.incoming_sequence&UPDATE_MASK].playerstate[EntNum].origin, pretend_player.origin);
		}

		return &pretend_player;
	}

	pack = &cl.frames[cls.netchan.incoming_sequence&UPDATE_MASK].packet_entities;
	for (pnum = 0; pnum < pack->num_entities; pnum++)
	{
		if (pack->entities[pnum].number == EntNum)
		{
			return &pack->entities[pnum];
		}
	}

	return NULL;
}

//==========================================================================
//
// CreateStream--for use mainly external to cl_tent (i.e. cl_effect)
//
// generally pass in 0 for skin
//
//==========================================================================

void CreateStream(int type, int ent, int flags, int tag, float duration, int skin, vec3_t source, vec3_t dest)
{
	stream_t	*stream;
	model_t		*models[4];
	entity_state_t	*state;

	models[1] = models[2] = models[3] = NULL;
	switch (type)
	{
	case TE_STREAM_CHAIN:
		models[0] = Mod_ForName("models/stchain.mdl", true);
		break;
	case TE_STREAM_SUNSTAFF1:
		models[0] = Mod_ForName("models/stsunsf1.mdl", true);
		models[1] = Mod_ForName("models/stsunsf2.mdl", true);
		models[2] = Mod_ForName("models/stsunsf3.mdl", true);
		models[3] = Mod_ForName("models/stsunsf4.mdl", true);
		break;
	case TE_STREAM_SUNSTAFF2:
		models[0] = Mod_ForName("models/stsunsf5.mdl", true);
		models[2] = Mod_ForName("models/stsunsf3.mdl", true);
		models[3] = Mod_ForName("models/stsunsf4.mdl", true);
		break;
	case TE_STREAM_LIGHTNING:
		models[0] = Mod_ForName("models/stlghtng.mdl", true);
		break;
	case TE_STREAM_LIGHTNING_SMALL:
		models[0] = Mod_ForName("models/stltng2.mdl", true);
		break;
	case TE_STREAM_FAMINE:
		models[0] = Mod_ForName("models/fambeam.mdl", true);
		break;
	case TE_STREAM_COLORBEAM:
		models[0] = Mod_ForName("models/stclrbm.mdl", true);
		break;
	case TE_STREAM_ICECHUNKS:
		models[0] = Mod_ForName("models/stice.mdl", true);
		break;
	case TE_STREAM_GAZE:
		models[0] = Mod_ForName("models/stmedgaz.mdl", true);
		break;
	default:
		models[0] = NULL;
		break;
	}
	if (models[0] == NULL)
		Sys_Error("%s: bad type", __thisfunc__);

	if ((stream = NewStream(ent, tag)) == NULL)
	{
		Con_Printf("stream list overflow\n");
		return;
	}
	stream->type = type;
	stream->tag = tag;
	stream->flags = flags;
	stream->entity = ent;
	stream->skin = skin;
	stream->models[0] = models[0];
	stream->models[1] = models[1];
	stream->models[2] = models[2];
	stream->models[3] = models[3];
	stream->endTime = cl.time + duration;
	stream->lastTrailTime = 0;
	VectorCopy(source, stream->source);
	VectorCopy(dest, stream->dest);
	if (flags & STREAM_ATTACHED)
	{
		VectorClear(stream->offset);

		state = FindState(ent);
		if (state)
		{	// rjr - potential problem if this doesn't ever get set - origin might have to be set properly in script code?
			VectorSubtract(source, state->origin, stream->offset);
		}
	}
}

void CLTENT_SpawnDeathBubble(vec3_t pos)
{
	explosion_t	*ex;

	//generic spinny impact image
	ex = CL_AllocExplosion();
	VectorCopy(pos,ex->origin);
	VectorSet(ex->velocity,0,0,17);
	ex->data = cl.time;
	ex->scale = 128;
	ex->frameFunc = BubbleThink;
	ex->startTime = cl.time;
	ex->endTime = cl.time + 15;
	ex->model = Mod_ForName ("models/s_bubble.spr", true);
	ex->flags = DRF_TRANSLUCENT | MLS_ABSLIGHT;
	ex->abslight = 175;
}

void CLTENT_XbowImpact(vec3_t pos, vec3_t vel, int chType, int damage, int arrowType)//arrowType is total # of arrows in effect
{
	explosion_t	*ex;
	float	cnt;
	int	i;

	//generic spinny impact image
	ex = CL_AllocExplosion();
	ex->origin[0] = pos[0] - vel[0];
	ex->origin[1] = pos[1] - vel[1];
	ex->origin[2] = pos[2] - vel[2];
	vectoangles(vel,ex->angles);
	ex->avel[2] = (rand() % 500) + 200;
	ex->scale = 10;
	ex->frameFunc = MissileFlashThink;
	ex->startTime = cl.time;
	ex->endTime = cl.time + 0.3;
	ex->model = Mod_ForName ("models/arrowhit.mdl", true);
	ex->exflags = EXFLAG_ROTATE;
	ex->flags = DRF_TRANSLUCENT | MLS_ABSLIGHT;
	ex->abslight = 175;

	//white smoke if invulnerable impact
	if (!damage)
	{
		ex = CL_AllocExplosion();
		ex->origin[0] = pos[0] - vel[0]*2;
		ex->origin[1] = pos[1] - vel[1]*2;
		ex->origin[2] = pos[2] - vel[2]*2;
		ex->velocity[0] = 0.0;
		ex->velocity[1] = 0.0;
		ex->velocity[2] = 80.0;
		vectoangles(vel,ex->angles);
		ex->startTime = cl.time;
		ex->endTime = cl.time + 0.35;
		ex->model = Mod_ForName ("models/whtsmk1.spr", true);
		ex->flags = DRF_TRANSLUCENT;

		if (arrowType == 3)	// little arrows go away
		{
			if (rand() & 3)	// chunky go
			{
				cnt	= (rand() % 2) + 1;

				for (i = 0; i < cnt; i++)
				{
					float final;

					ex = CL_AllocExplosion();
					ex->frameFunc = ChunkThink;

					VectorSubtract(pos,vel,ex->origin);
					// temp modify them...
					ex->velocity[0] = (rand() % 140) - 70;
					ex->velocity[1] = (rand() % 140) - 70;
					ex->velocity[2] = (rand() % 140) - 70;

					// are these in degrees or radians?
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;
					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = (rand() % 850) - 425;
					ex->avel[1] = (rand() % 850) - 425;
					ex->avel[2] = (rand() % 850) - 425;

					ex->scale = 30 + 100 * (cnt / 40.0) + (rand() % 40);

					ex->data = THINGTYPE_WOOD;

					final = (rand() % 100) * .01;

					if (final < 0.25)
						ex->model = Mod_ForName ("models/splnter1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/splnter2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/splnter3.mdl", true);
					else 
						ex->model = Mod_ForName ("models/splnter4.mdl", true);

					ex->startTime = cl.time;
					ex->endTime = ex->startTime + 4.0;
				}
			}
			else if (rand() & 1)	// whole go
			{
					ex = CL_AllocExplosion();
					ex->frameFunc = ChunkThink;

					VectorSubtract(pos,vel,ex->origin);
					// temp modify them...
					ex->velocity[0] = (rand() % 140) - 70;
					ex->velocity[1] = (rand() % 140) - 70;
					ex->velocity[2] = (rand() % 140) - 70;

					// are these in degrees or radians?
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;
					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = (rand() % 850) - 425;
					ex->avel[1] = (rand() % 850) - 425;
					ex->avel[2] = (rand() % 850) - 425;

					ex->scale = 128;

					ex->data = THINGTYPE_WOOD;

					ex->model = Mod_ForName ("models/arrow.mdl", true);

					ex->startTime = cl.time;
					ex->endTime = ex->startTime + 4.0;
			}
		}
	}
}

//==========================================================================
//
// ParseStream
//
//==========================================================================

static void ParseStream(int type)
{
	int	ent, tag, flags, skin;
	vec3_t		source, dest;
	stream_t		*stream;
	float			duration;
	model_t			*models[4];
	entity_state_t	*state;

	ent = MSG_ReadShort();
	flags = MSG_ReadByte();
	tag = flags&15;
	duration = (float)MSG_ReadByte()*0.05;
	skin = 0;

	if (type == TE_STREAM_COLORBEAM)
	{
		skin = MSG_ReadByte();
	}

	source[0] = MSG_ReadCoord();
	source[1] = MSG_ReadCoord();
	source[2] = MSG_ReadCoord();
	dest[0] = MSG_ReadCoord();
	dest[1] = MSG_ReadCoord();
	dest[2] = MSG_ReadCoord();

	models[1] = models[2] = models[3] = NULL;
	switch (type)
	{
	case TE_STREAM_CHAIN:
		models[0] = Mod_ForName("models/stchain.mdl", true);
		break;
	case TE_STREAM_SUNSTAFF1:
		models[0] = Mod_ForName("models/stsunsf1.mdl", true);
		models[1] = Mod_ForName("models/stsunsf2.mdl", true);
		models[2] = Mod_ForName("models/stsunsf3.mdl", true);
		models[3] = Mod_ForName("models/stsunsf4.mdl", true);
		break;
	case TE_STREAM_SUNSTAFF2:
		models[0] = Mod_ForName("models/stsunsf5.mdl", true);
		models[2] = Mod_ForName("models/stsunsf3.mdl", true);
		models[3] = Mod_ForName("models/stsunsf4.mdl", true);
		break;
	case TE_STREAM_LIGHTNING:
		models[0] = Mod_ForName("models/stlghtng.mdl", true);
		break;
	case TE_STREAM_LIGHTNING_SMALL:
		models[0] = Mod_ForName("models/stltng2.mdl", true);
		break;
	case TE_STREAM_FAMINE:
		models[0] = Mod_ForName("models/fambeam.mdl", true);
		break;
	case TE_STREAM_COLORBEAM:
		models[0] = Mod_ForName("models/stclrbm.mdl", true);
		break;
	case TE_STREAM_ICECHUNKS:
		models[0] = Mod_ForName("models/stice.mdl", true);
		break;
	case TE_STREAM_GAZE:
		models[0] = Mod_ForName("models/stmedgaz.mdl", true);
		break;
	default:
		models[0] = NULL;
		break;
	}
	if (models[0] == NULL)
		Sys_Error("%s: bad type", __thisfunc__);

	if ((stream = NewStream(ent, tag)) == NULL)
	{
		Con_Printf("stream list overflow\n");
		return;
	}
	stream->type = type;
	stream->tag = tag;
	stream->flags = flags;
	stream->entity = ent;
	stream->skin = skin;
	stream->models[0] = models[0];
	stream->models[1] = models[1];
	stream->models[2] = models[2];
	stream->models[3] = models[3];
	stream->endTime = cl.time + duration;
	stream->lastTrailTime = 0;
	VectorCopy(source, stream->source);
	VectorCopy(dest, stream->dest);

	if (flags & STREAM_ATTACHED)
	{
		VectorClear(stream->offset);

		state = FindState(ent);
		if (state)
		{	// rjr - potential problem if this doesn't ever get set - origin might have to be set properly in script code?
			VectorSubtract(source, state->origin, stream->offset);
		}
	}
}

//==========================================================================
//
// NewStream
//
//==========================================================================

static stream_t *NewStream(int ent, int tag)
{
	int		i;
	stream_t	*stream;

	// Search for a stream with matching entity and tag
	for (i = 0, stream = cl_Streams; i < MAX_STREAMS; i++, stream++)
	{
		if (stream->entity == ent && stream->tag == tag)
		{
			return stream;
		}
	}
	// Search for a free stream
	for (i = 0, stream = cl_Streams; i < MAX_STREAMS; i++, stream++)
	{
		if (!stream->models[0] || stream->endTime < cl.time)
		{
			return stream;
		}
	}
	return NULL;
}

/*
=================
CL_ParseTEnt
=================
*/
void CL_ParseTEnt (void)
{
	int		cnt, cnt2, i, rnd;
	int		type, damage, chType;
	float		scale = 1.0;	// init to 1, make compiler happy
	float		dir, cosval, sinval, volume;
	dlight_t	*dl;
	explosion_t	*ex;
	vec3_t		pos, vel, movedir, offset;

	type = MSG_ReadByte ();
	switch (type)
	{
		case TE_WIZSPIKE:	// spike hitting wall
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 20, 30);
		//	S_StartSound (-1, 0, cl_sfx_wizhit, pos, 1, 1);
			break;

		case TE_KNIGHTSPIKE:	// spike hitting wall
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 226, 20);
		//	S_StartSound (-1, 0, cl_sfx_knighthit, pos, 1, 1);
			break;

		case TE_SPIKE:		// spike hitting wall
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 0, 10);

			if (rand() % 5)
			{
				S_StartSound (TempSoundChannel(), 0, cl_sfx_tink1, pos, 1, 1);
			}
			else
			{
				rnd = rand() & 3;
				if (rnd == 1)
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric1, pos, 1, 1);
				else if (rnd == 2)
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric2, pos, 1, 1);
				else
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric3, pos, 1, 1);
			}
			break;

		case TE_SUPERSPIKE:	// super spike hitting wall
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 0, 20);

			if (rand() % 5)
			{
				S_StartSound (TempSoundChannel(), 0, cl_sfx_tink1, pos, 1, 1);
			}
			else
			{
				rnd = rand() & 3;
				if (rnd == 1)
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric1, pos, 1, 1);
				else if (rnd == 2)
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric2, pos, 1, 1);
				else
					S_StartSound (TempSoundChannel(), 0, cl_sfx_ric3, pos, 1, 1);
			}
			break;

		case TE_DRILLA_EXPLODE:
		// particles
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			ex = CL_AllocExplosion();
			VectorCopy(pos,ex->origin);

			ex->model = Mod_ForName("models/gen_expl.spr", true);

			ex->startTime = cl.time;
			ex->endTime = ex->startTime + ex->model->numframes * 0.1;
		// sound
			S_StartSound (TempSoundChannel(), 0, cl_sfx_explode, pos, 1, 1);
			break;

		case TE_EXPLOSION:	// rocket explosion
		// particles
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_ParticleExplosion (pos);
		// light
			dl = CL_AllocDlight (0);
			VectorCopy (pos, dl->origin);
			dl->radius = 350;
			dl->die = cl.time + 0.5;
			dl->decay = 300;
			dl->color[0] = 0.2;
			dl->color[1] = 0.1;
			dl->color[2] = 0.05;
			dl->color[3] = 0.7;
		// sound
			S_StartSound (TempSoundChannel(), 0, cl_sfx_r_exp3, pos, 1, 1);
			break;

		case TE_TAREXPLOSION:	// tarbaby explosion
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_BlobExplosion (pos);

			S_StartSound (TempSoundChannel(), 0, cl_sfx_r_exp3, pos, 1, 1);
			break;

		case TE_LIGHTNING1:	// lightning bolts
			CL_ParseBeam (NULL);
			break;

		case TE_LIGHTNING2:	// lightning bolts
			CL_ParseBeam (NULL);
			break;

		case TE_LIGHTNING3:	// lightning bolts
			CL_ParseBeam (NULL);
			break;

		case TE_STREAM_CHAIN:
		case TE_STREAM_SUNSTAFF1:
		case TE_STREAM_SUNSTAFF2:
		case TE_STREAM_LIGHTNING:
		case TE_STREAM_LIGHTNING_SMALL:
		case TE_STREAM_COLORBEAM:
		case TE_STREAM_ICECHUNKS:
		case TE_STREAM_GAZE:
		case TE_STREAM_FAMINE:
			ParseStream(type);
			break;

		case TE_LAVASPLASH:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_LavaSplash (pos);
			break;

		case TE_TELEPORT:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_TeleportSplash (pos);
			break;

		case TE_GUNSHOT:	// bullet hitting wall
			cnt = MSG_ReadByte ();
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 0, 20*cnt);
			break;

		case TE_BLOOD:		// bullets hitting body
			cnt = MSG_ReadByte ();
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 73, 20*cnt);
			break;

		case TE_LIGHTNINGBLOOD:	// lightning hitting body
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos, vec3_origin, 225, 50);
			break;

		case TE_BIGGRENADE:	// effect for big grenade
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			R_RunParticleEffect (pos,pos,225,1024);
			ex = CL_AllocExplosion();
			VectorCopy(pos,ex->origin);
			ex->frameFunc = MultiGrenadeThink;

			ex->data = 250;

			ex->model = Mod_ForName("models/sm_expld.spr", true);

			ex->startTime = cl.time;
			ex->endTime = ex->startTime + ex->model->numframes * 0.1;
			break;

		case TE_CHUNK:		//directed chunks
		case TE_CHUNK2:		//volume based chunks
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();
			vel[0] = MSG_ReadCoord();	//vel for CHUNK, volume for CHUNK2
			vel[1] = MSG_ReadCoord();
			vel[2] = MSG_ReadCoord();
			chType = MSG_ReadByte();

			if (type == TE_CHUNK)
			{
				cnt	= MSG_ReadByte();
			}
			else
			{
				volume = vel[0] * vel[1] * vel[2];
				cnt = volume / 8192;
				if (volume < 5000)
				{
					scale = .20;
					cnt *= 3;	// Because so few pieces come out of a small object
				}
				else if (volume < 50000)
				{
					scale = .45;
					cnt *= 3;	// Because so few pieces come out of a small object
				}
				else if (volume < 500000)
				{
					scale = .50;
				}
				else if (volume < 1000000)
				{
					scale = .75;
				}
				else
				{
					scale = 1;
				}
				if (cnt > 30)
				{
					cnt = 30;
				}
			}

			for (i = 0; i < cnt; i++)
			{
				float final;

				ex = CL_AllocExplosion();
				ex->frameFunc = ChunkThink;

				if (type == TE_CHUNK)
				{
					VectorCopy(pos,ex->origin);
					VectorCopy(vel, ex->velocity);
					VectorScale(ex->velocity, .80 + ((rand() % 4) / 10.0), ex->velocity);
					// temp modify them...
					ex->velocity[0] += (rand() % 140) - 70;
					ex->velocity[1] += (rand() % 140) - 70;
					ex->velocity[2] += (rand() % 140) - 70;

					// are these in degrees or radians?
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;
					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = (rand() % 850) - 425;
					ex->avel[1] = (rand() % 850) - 425;
					ex->avel[2] = (rand() % 850) - 425;

					ex->scale = 30 + 100 * (cnt / 40.0) + (rand() % 40);
				}
				else
				{
					// set origin (origin is really absmin here)
					VectorCopy(pos, ex->origin);
					ex->origin[0] += FRANDOM() * vel[0];
					ex->origin[1] += FRANDOM() * vel[1];
					ex->origin[2] += FRANDOM() * vel[2];
					// set velocity
					ex->velocity[0] = -210 + FRANDOM() * 420;
					ex->velocity[1] = -210 + FRANDOM() * 420;
					ex->velocity[2] = -210 + FRANDOM() * 490;
					// set scale
					ex->scale = scale*100;
					// set angles, avel
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;

					ex->avel[0] = rand() % 1200;
					ex->avel[1] = rand() % 1200;
					ex->avel[2] = rand() % 1200;
				}
				ex->data = chType;

				final = (rand() % 100) * .01;
				if ((chType == THINGTYPE_GLASS) || (chType == THINGTYPE_REDGLASS) || 
						(chType == THINGTYPE_CLEARGLASS) || (chType == THINGTYPE_WEBS))
				{
					if (final < 0.20)
						ex->model = Mod_ForName ("models/shard1.mdl", true);
					else if (final < 0.40)
						ex->model = Mod_ForName ("models/shard2.mdl", true);
					else if (final < 0.60)
						ex->model = Mod_ForName ("models/shard3.mdl", true);
					else if (final < 0.80)
						ex->model = Mod_ForName ("models/shard4.mdl", true);
					else
						ex->model = Mod_ForName ("models/shard5.mdl", true);

					if (chType == THINGTYPE_CLEARGLASS)
					{
						ex->skin = 1;
						ex->flags |= DRF_TRANSLUCENT;
					}
					else if (chType == THINGTYPE_REDGLASS)
					{
						ex->skin = 2;
					}
					else if (chType == THINGTYPE_WEBS)
					{
						ex->skin = 3;
						ex->flags |= DRF_TRANSLUCENT;
					}
				}
				else if (chType == THINGTYPE_WOOD)
				{
					if (final < 0.25)
						ex->model = Mod_ForName ("models/splnter1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/splnter2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/splnter3.mdl", true);
					else
						ex->model = Mod_ForName ("models/splnter4.mdl", true);
				}
				else if (chType == THINGTYPE_METAL)
				{
					if (final < 0.25)
						ex->model = Mod_ForName ("models/metlchk1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/metlchk2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/metlchk3.mdl", true);
					else
						ex->model = Mod_ForName ("models/metlchk4.mdl", true);
				}
				else if (chType == THINGTYPE_FLESH)
				{
					if (final < 0.33)
						ex->model = Mod_ForName ("models/flesh1.mdl", true);
					else if (final < 0.66)
						ex->model = Mod_ForName ("models/flesh2.mdl", true);
					else
						ex->model = Mod_ForName ("models/flesh3.mdl", true);
				}
				else if (chType == THINGTYPE_BROWNSTONE || chType == THINGTYPE_DIRT)
				{
					if (final < 0.25)
						ex->model = Mod_ForName ("models/schunk1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/schunk2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/schunk3.mdl", true);
					else
						ex->model = Mod_ForName ("models/schunk4.mdl", true);
					ex->skin = 1;
				}
				else if (chType == THINGTYPE_CLAY)
				{
					if (final < 0.25)
						ex->model = Mod_ForName ("models/clshard1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/clshard2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/clshard3.mdl", true);
					else
						ex->model = Mod_ForName ("models/clshard4.mdl", true);
				}
				else if (chType == THINGTYPE_LEAVES)
				{
					if (final < 0.33)
						ex->model = Mod_ForName ("models/leafchk1.mdl", true);
					else if (final < 0.66)
						ex->model = Mod_ForName ("models/leafchk2.mdl", true);
					else
						ex->model = Mod_ForName ("models/leafchk3.mdl", true);
				}
				else if (chType == THINGTYPE_HAY)
				{
					if (final < 0.33)
						ex->model = Mod_ForName ("models/hay1.mdl", true);
					else if (final < 0.66)
						ex->model = Mod_ForName ("models/hay2.mdl", true);
					else
						ex->model = Mod_ForName ("models/hay3.mdl", true);
				}
				else if (chType == THINGTYPE_CLOTH)
				{
					if (final < 0.33)
						ex->model = Mod_ForName ("models/clthchk1.mdl", true);
					else if (final < 0.66)
						ex->model = Mod_ForName ("models/clthchk2.mdl", true);
					else
						ex->model = Mod_ForName ("models/clthchk3.mdl", true);
				}
				else if (chType == THINGTYPE_WOOD_LEAF)
				{
					if (final < 0.14)
						ex->model = Mod_ForName ("models/splnter1.mdl", true);
					else if (final < 0.28)
						ex->model = Mod_ForName ("models/leafchk1.mdl", true);
					else if (final < 0.42)
						ex->model = Mod_ForName ("models/splnter2.mdl", true);
					else if (final < 0.56)
						ex->model = Mod_ForName ("models/leafchk2.mdl", true);
					else if (final < 0.70)
						ex->model = Mod_ForName ("models/splnter3.mdl", true);
					else if (final < 0.84)
						ex->model = Mod_ForName ("models/leafchk3.mdl", true);
					else
						ex->model = Mod_ForName ("models/splnter4.mdl", true);
				}
				else if (chType == THINGTYPE_WOOD_METAL)
				{
					if (final < 0.125)
						ex->model = Mod_ForName ("models/splnter1.mdl", true);
					else if (final < 0.25)
						ex->model = Mod_ForName ("models/metlchk1.mdl", true);
					else if (final < 0.375)
						ex->model = Mod_ForName ("models/splnter2.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/metlchk2.mdl", true);
					else if (final < 0.625)
						ex->model = Mod_ForName ("models/splnter3.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/metlchk3.mdl", true);
					else if (final < 0.875)
						ex->model = Mod_ForName ("models/splnter4.mdl", true);
					else
						ex->model = Mod_ForName ("models/metlchk4.mdl", true);
				}
				else if (chType == THINGTYPE_WOOD_STONE)
				{
					if (final < 0.125)
						ex->model = Mod_ForName ("models/splnter1.mdl", true);
					else if (final < 0.25)
						ex->model = Mod_ForName ("models/schunk1.mdl", true);
					else if (final < 0.375)
						ex->model = Mod_ForName ("models/splnter2.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/schunk2.mdl", true);
					else if (final < 0.625)
						ex->model = Mod_ForName ("models/splnter3.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/schunk3.mdl", true);
					else if (final < 0.875)
						ex->model = Mod_ForName ("models/splnter4.mdl", true);
					else
						ex->model = Mod_ForName ("models/schunk4.mdl", true);
				}
				else if (chType == THINGTYPE_METAL_STONE)
				{
					if (final < 0.125)
						ex->model = Mod_ForName ("models/metlchk1.mdl", true);
					else if (final < 0.25)
						ex->model = Mod_ForName ("models/schunk1.mdl", true);
					else if (final < 0.375)
						ex->model = Mod_ForName ("models/metlchk2.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/schunk2.mdl", true);
					else if (final < 0.625)
						ex->model = Mod_ForName ("models/metlchk3.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/schunk3.mdl", true);
					else if (final < 0.875)
						ex->model = Mod_ForName ("models/metlchk4.mdl", true);
					else
						ex->model = Mod_ForName ("models/schunk4.mdl", true);
				}
				else if (chType == THINGTYPE_METAL_CLOTH)
				{
					if (final < 0.14)
						ex->model = Mod_ForName ("models/metlchk1.mdl", true);
					else if (final < 0.28)
						ex->model = Mod_ForName ("models/clthchk1.mdl", true);
					else if (final < 0.42)
						ex->model = Mod_ForName ("models/metlchk2.mdl", true);
					else if (final < 0.56)
						ex->model = Mod_ForName ("models/clthchk2.mdl", true);
					else if (final < 0.70)
						ex->model = Mod_ForName ("models/metlchk3.mdl", true);
					else if (final < 0.84)
						ex->model = Mod_ForName ("models/clthchk3.mdl", true);
					else
						ex->model = Mod_ForName ("models/metlchk4.mdl", true);
				}
				else if (chType == THINGTYPE_ICE)
				{
					ex->model = Mod_ForName("models/shard.mdl", true);
					ex->skin = 0;
					//ent->frame = rand() % 2;
					ex->flags |= DRF_TRANSLUCENT|MLS_ABSLIGHT;
					//ent->abslight = 0.5;
				}
				else if (chType == THINGTYPE_METEOR)
				{
					ex->model = Mod_ForName("models/tempmetr.mdl", true);
					ex->skin = 0;
					//ex->scale *= .6;
					VectorScale(ex->avel, 4.0, ex->avel);
				}
				else if (chType == THINGTYPE_ACID)
				{	// no spinning if possible...
					ex->model = Mod_ForName("models/sucwp2p.mdl", true);
					ex->skin = 0;
				}
				else if (chType == THINGTYPE_GREENFLESH)
				{	// spider guts
					if (final < 0.33)
						ex->model = Mod_ForName ("models/sflesh1.mdl", true);
					else if (final < 0.66)
						ex->model = Mod_ForName ("models/sflesh2.mdl", true);
					else
						ex->model = Mod_ForName ("models/sflesh3.mdl", true);

					ex->skin = 0;
				}
				else// if (chType == THINGTYPE_GREYSTONE)
				{
					if (final < 0.25)
						ex->model = Mod_ForName ("models/schunk1.mdl", true);
					else if (final < 0.50)
						ex->model = Mod_ForName ("models/schunk2.mdl", true);
					else if (final < 0.75)
						ex->model = Mod_ForName ("models/schunk3.mdl", true);
					else
						ex->model = Mod_ForName ("models/schunk4.mdl", true);
					ex->skin = 0;
				}

				ex->startTime = cl.time;
				ex->endTime = ex->startTime + 4.0;
			}
			break;

		case TE_XBOWHIT:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();
			vel[0] = MSG_ReadCoord();
			vel[1] = MSG_ReadCoord();
			vel[2] = MSG_ReadCoord();
			chType = MSG_ReadByte();
			damage = MSG_ReadByte();

			// do a particle effect here, with the color depending on chType

			// impact sound:
			switch (chType)
			{
			case THINGTYPE_FLESH:
			//	S_StartSound (TempSoundChannel(), 0, cl_sfx_arr2flsh, pos, 1, 1);
				break;
			case THINGTYPE_WOOD:
			//	S_StartSound (TempSoundChannel(), 0, cl_sfx_arr2wood, pos, 1, 1);
				break;
			default:
			//	S_StartSound (TempSoundChannel(), 0, cl_sfx_met2stn, pos, 1, 1);
				break;
			}

			//generic spinny impact image
			ex = CL_AllocExplosion();
			ex->origin[0] = pos[0] - vel[0];
			ex->origin[1] = pos[1] - vel[1];
			ex->origin[2] = pos[2] - vel[2];
			vectoangles(vel,ex->angles);
			ex->avel[2] = (rand() % 500) + 200;
			ex->scale = 10;
			ex->startTime = cl.time;
			ex->endTime = cl.time + 0.3;
			ex->model = Mod_ForName ("models/arrowhit.mdl", true);
			ex->exflags = EXFLAG_ROTATE;
			ex->flags = DRF_TRANSLUCENT | MLS_ABSLIGHT;
			ex->abslight = 128;

			//white smoke if invulnerable impact
			if (!damage)
			{
				ex = CL_AllocExplosion();
				ex->origin[0] = pos[0] - vel[0]*2;
				ex->origin[1] = pos[1] - vel[1]*2;
				ex->origin[2] = pos[2] - vel[2]*2;
				ex->velocity[0] = 0.0;
				ex->velocity[1] = 0.0;
				ex->velocity[2] = 80.0;
				vectoangles(vel,ex->angles);
				ex->startTime = cl.time;
				ex->endTime = cl.time + 0.35;
				ex->model = Mod_ForName ("models/whtsmk1.spr", true);
				ex->flags = DRF_TRANSLUCENT;
			}
			break;

		case TE_METEORHIT:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			// always make 8 meteors
			i = (host_frametime < .07) ? 0 : 4;	// based on framerate
			for ( ; i < 8; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos,ex->origin);
				ex->frameFunc = ChunkThink;

				// temp modify them...
				ex->velocity[0] += (rand() % 400) - 200;
				ex->velocity[1] += (rand() % 400) - 200;
				ex->velocity[2] += (rand() % 200) + 150;

				// are these in degrees or radians?
				ex->angles[0] = rand() % 360;
				ex->angles[1] = rand() % 360;
				ex->angles[2] = rand() % 360;
				ex->exflags = EXFLAG_ROTATE;

				ex->avel[0] = (rand() % 850) - 425;
				ex->avel[1] = (rand() % 850) - 425;
				ex->avel[2] = (rand() % 850) - 425;

				ex->scale = 45 + (rand() % 10);
				ex->data = THINGTYPE_METEOR;

				ex->model = Mod_ForName("models/tempmetr.mdl", true);
				ex->skin = 0;
				VectorScale(ex->avel, 4.0, ex->avel);

				ex->startTime = cl.time;
				ex->endTime = ex->startTime + 4.0;
			}
			// make the actual explosion
			//for (i = 0; i < 7; i++)
			i = (host_frametime < .07) ? 0 : 8;	// based on framerate
			for ( ; i < 11; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 10) - 5;
				ex->origin[1] += (rand() % 10) - 5;
				ex->origin[2] += (rand() % 10) - 5;

				ex->velocity[0] = (ex->origin[0] - pos[0])*12;
				ex->velocity[1] = (ex->origin[1] - pos[1])*12;
				ex->velocity[2] = (ex->origin[2] - pos[2])*12;

			/*	ex->origin[0] += (rand() % 10) - 5;
				ex->origin[1] += (rand() % 10) - 5;
				ex->origin[2] += (rand() % 10) - 5;

				ex->velocity[0] = (ex->origin[0] - pos[0])*10;
				ex->velocity[1] = (ex->origin[1] - pos[1])*10;
				ex->velocity[2] = (ex->origin[2] - pos[2])*10 + 200;
			*/

				switch (rand() % 4)
				{
				case 0:
				case 1:
					ex->model = Mod_ForName("models/sm_expld.spr", true);
					break;
				case 2:
					ex->model = Mod_ForName("models/bg_expld.spr", true);
					break;
				case 3:
					ex->model = Mod_ForName("models/gen_expl.spr", true);
					break;
				}
				if (host_frametime < .07)
				{
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				}
				ex->abslight = 160 + (rand() % 64);
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.04;
			}
			S_StartSound (TempSoundChannel(), 0, cl_sfx_axeExplode, pos, 1, 1);
			break;

		case TE_HWBONEPOWER:
			cnt = MSG_ReadByte ();
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			movedir[0] = MSG_ReadCoord ();
			movedir[1] = MSG_ReadCoord ();
			movedir[2] = MSG_ReadCoord ();
			R_RunParticleEffect4 (pos, 50, 368 + (rand() % 16), pt_grav, 10);

			// particle4 (50, rand(368-384), grav, 10);
			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			VectorMA(ex->origin, -6, movedir, ex->origin);
			ex->data = 250;
			ex->model = Mod_ForName("models/sm_expld.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + ex->model->numframes * 0.1;
			for (cnt2 = 0; cnt2 < cnt; cnt2++)
			{
				offset[0] = (rand() % 40) - 20;
				offset[1] = (rand() % 40) - 20;
				offset[2] = (rand() % 40) - 20;
				ex = CL_AllocExplosion ();
				VectorAdd(pos, offset, ex->origin); 
				VectorMA(ex->origin, -8, movedir, ex->origin);
				VectorCopy(offset, ex->velocity);
				ex->velocity[2] += 30;
				ex->data = 250;
				ex->model = Mod_ForName("models/ghost.spr", true);
				ex->abslight = 128;
				ex->flags = DRF_TRANSLUCENT | MLS_ABSLIGHT;
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + ex->model->numframes * 0.1;
			}
			for (cnt2 = 0; cnt2 < 20; cnt2++)
			{
				// want faster velocity to hide the fact that these 
				// aren't in the real location
				offset[0] = (rand() % 400) + 300;
				if (rand() % 2)
					offset[0] = -offset[0];
				offset[1] = (rand() % 400) + 300;
				if (rand() % 2)
					offset[1] = -offset[1];
				offset[2] = (rand() % 400) + 300;
				if (rand() % 2)
					offset[2] = -offset[2];
				ex = CL_AllocExplosion ();
				VectorMA(pos, 1/700, offset, ex->origin); 
				VectorCopy(offset, ex->velocity);
				ex->data = 250;
				ex->model = Mod_ForName("models/boneshrd.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + ((rand() * 50) / 100);
				ex->flags |= EXFLAG_ROTATE|EXFLAG_COLLIDE;
				ex->angles[0] = rand() % 700;
				ex->angles[1] = rand() % 700;
				ex->angles[2] = rand() % 700;
				ex->avel[0] = rand() % 700;
				ex->avel[1] = rand() % 700;
				ex->avel[2] = rand() % 700;
				ex->frameFunc = CheckSpaceThink;
			}
			S_StartSound(TempSoundChannel(), 1, cl_sfx_bonephit, pos, 1, 1);
			break;

		case TE_HWBONEPOWER2:
			cnt2 = MSG_ReadByte ();		//did it hit? changes sound
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();

			// white smoke
			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + ex->model->numframes * 0.1;

			//sound
			if (cnt2)
			{
				S_StartSound(TempSoundChannel(), 1, cl_sfx_bonehit, pos, 1, 1);
			}
			else
			{
				S_StartSound(TempSoundChannel(), 1, cl_sfx_bonewal, pos, 1, 1);
			}

			R_RunParticleEffect4 (pos, 3, 368 + (rand() % 16), pt_grav, 7);
		//	particle4(self.origin, 3, random(368,384), PARTICLETYPE_GRAV, self.dmg/2);
			break;

		case TE_HWRAVENDIE:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->velocity[1] = 8;
			ex->velocity[2] = -10;
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->velocity[2] = -10;
			ex->model = Mod_ForName("models/redsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->velocity[1] = -8;
			ex->velocity[2] = -10;
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			S_StartSound(TempSoundChannel(), 1, cl_sfx_ravendie, pos, 1, 1);
			break;

		case TE_HWRAVENEXPLODE:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->velocity[2] = 8;
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->origin[2] -= 5;
			ex->velocity[2] = 8;
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->origin[2] -= 10;
			ex->velocity[2] = 8;
			ex->model = Mod_ForName("models/whtsmk1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

			S_StartSound(TempSoundChannel(), 1, cl_sfx_ravengo, pos, 1, 1);
			break;

		case TE_ICEHIT:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			cnt2 = MSG_ReadByte();	// 0 for person, 1 for wall

			if (cnt2)
			{
				i = (host_frametime < .07) ? 0 : 5;	// based on framerate
				for ( ; i < 9; i++)
				{
					ex = CL_AllocExplosion();
					VectorCopy(pos,ex->origin);
					ex->frameFunc = ChunkThink;

					ex->velocity[0] += (rand() % 1000) - 500;
					ex->velocity[1] += (rand() % 1000) - 500;
					ex->velocity[2] += (rand() % 200 ) - 50;

					// are these in degrees or radians?
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;
					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = (rand() % 850) - 425;
					ex->avel[1] = (rand() % 850) - 425;
					ex->avel[2] = (rand() % 850) - 425;

					if (cnt2 == 2)
					{
						ex->scale = 65 + (rand() % 10);
					}
					else
					{
						ex->scale = 35 + (rand() % 10);
					}
					ex->data = THINGTYPE_ICE;

					ex->model = Mod_ForName("models/shard.mdl", true);
					ex->skin = 0;
					//ent->frame = rand() % 2;
					ex->flags |= DRF_TRANSLUCENT|MLS_ABSLIGHT;
					ex->abslight = 128;

					ex->startTime = cl.time;
					ex->endTime = ex->startTime + 2.0;
					if (cnt2 == 2)
					{
						ex->endTime += 3.0;
					}
				}
			}
			else
			{
				vec3_t dmin = {-10, -10, -10};
				vec3_t dmax = {10, 10, 10};
				R_ColoredParticleExplosion(pos,14,10,10);
				R_RunParticleEffect2 (pos, dmin, dmax, 145, pt_explode, 14);
			}
			// make the actual explosion
			ex = CL_AllocExplosion();
			VectorCopy(pos, ex->origin);
			ex->model = Mod_ForName("models/icehit.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + ex->model->numframes * 0.1;

			// Add in the sound
			if (cnt2 == 1)
			{	// hit a wall
				S_StartSound (TempSoundChannel(), 0, cl_sfx_icewall, pos, 1, 1);
			}
			else if (cnt2 == 2)
			{
				S_StartSound (TempSoundChannel(), 0, cl_sfx_iceshatter, pos, 1, 1);
			}
			else
			{	// hit a person
				S_StartSound (TempSoundChannel(), 0, cl_sfx_iceflesh, pos, 1, 1);
			}
			break;

		case TE_ICESTORM:
			{
				int		ent;
				vec3_t		center;
				stream_t	*stream;
				model_t		*models[2];
				entity_state_t	*state;

				ent = MSG_ReadShort();

				state = FindState(ent);
				if (state)
				{
					VectorCopy(state->origin, center);

					playIceSound+=host_frametime;
					if (playIceSound >= .6)
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_icestorm, center, 1, 1);
						playIceSound -= .6;
					}

					for (i = 0; i < 5; i++)
					{	// make some ice beams...
						models[0] = Mod_ForName("models/stice.mdl", true);

						if ((stream = NewStream(ent, i)) == NULL)
						{
							Con_Printf("stream list overflow\n");
							return;
						}
						stream->type = TE_STREAM_ICECHUNKS;
						stream->tag = (i)&15;	// FIXME
						stream->flags = (i+STREAM_ATTACHED);
						stream->entity = ent;
						stream->skin = 0;
						stream->models[0] = models[0];
						stream->endTime = cl.time + 0.3;
						stream->lastTrailTime = 0;

						VectorCopy(center, stream->source);
						stream->source[0] += (rand() % 100) - 50;
						stream->source[1] += (rand() % 100) - 50;
						VectorCopy(stream->source, stream->dest);
						stream->dest[2] += 128;

						VectorClear(stream->offset);

						VectorSubtract(stream->source, state->origin, stream->offset);
					}
				}
			}
			break;

		case TE_HWMISSILEFLASH:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			vel[0] = MSG_ReadCoord ();	//angles
			vel[1] = MSG_ReadCoord ();
			vel[2] = rand() % 360;

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			VectorCopy(vel, ex->angles);
			ex->frameFunc = MissileFlashThink;
			ex->model = Mod_ForName("models/handfx.mdl", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + 2;
			ex->exflags = EXFLAG_ROTATE;
			ex->avel[2] = (rand() * 360) + 360;
			ex->flags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
			ex->abslight = 128;
			//ex->scale = .8 + (rand() % 100) * 0.004;  // .8 to 1.2
			ex->scale = 80 + (rand() % 40);
			break;

		case TE_SUNSTAFF_CHEAP:
			{
				int		ent;
				vec3_t		points[4];
				int		j, reflect_count;
				short int	tempVal;
				entity_state_t	*state;
				stream_t	*stream;
				model_t		*models[4];

				ent = MSG_ReadShort();
				reflect_count = MSG_ReadByte();
				state = FindState(ent);

				if (state)
				{
					// read in up to 4 points for up to 3 beams
					for (i = 0; i < 3; i++)
					{
						tempVal = MSG_ReadCoord();
						points[0][i] = tempVal;
					}
					for (i = 1; i < 2 + reflect_count; i++)
					{
						for (j = 0; j < 3; j++)
						{
							tempVal = MSG_ReadCoord();
							points[i][j] = tempVal;
						}
					}

					// actually create the sun model pieces
					for (i = 0; i < reflect_count + 1; i++)
					{
						models[0] = Mod_ForName("models/stsunsf1.mdl", true);
						models[1] = Mod_ForName("models/stsunsf2.mdl", true);
						models[2] = Mod_ForName("models/stsunsf3.mdl", true);
						models[3] = Mod_ForName("models/stsunsf4.mdl", true);

						if ((stream = NewStream(ent, i)) == NULL)
						{
							Con_Printf("stream list overflow\n");
							return;
						}
						stream->type = TE_STREAM_SUNSTAFF1;
						stream->tag = i;
						if (!i)
						{
							stream->flags = (i+STREAM_ATTACHED);
						}
						else
						{
							stream->flags = i;
						}
						stream->entity = ent;
						stream->skin = 0;
						stream->models[0] = models[0];
						stream->models[1] = models[1];
						stream->models[2] = models[2];
						stream->models[3] = models[3];
						stream->endTime = cl.time + 0.5;	// FIXME
						stream->lastTrailTime = 0;

						VectorCopy(points[i], stream->source);
						VectorCopy(points[i+1], stream->dest);

						if (!i)
						{
							VectorClear(stream->offset);
							VectorSubtract(stream->source, state->origin, stream->offset);
						}
					}
				}
				else
				{	// read in everything to keep everything in sync
					for (i = 0; i < (2 + reflect_count)*3; i++)
					{
						tempVal = MSG_ReadShort();
					}
				}
			}
			break;

		case TE_LIGHTNING_HAMMER:
			{
				int		ent;
				stream_t	*stream;
				model_t		*models[2];
				entity_state_t	*state;

				ent = MSG_ReadShort();
				state = FindState(ent);

				if (state)
				{
					if (rand() & 1)
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning1, state->origin, 1, 1);
					}
					else
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning2, state->origin, 1, 1);
					}

					for (i = 0; i < 5; i++)
					{	// make some lightning
						models[0] = Mod_ForName("models/stlghtng.mdl", true);

						if ((stream = NewStream(ent, i)) == NULL)
						{
							Con_Printf("stream list overflow\n");
							return;
						}
						//stream->type = TE_STREAM_ICECHUNKS;
						stream->type = TE_STREAM_LIGHTNING;
						stream->tag = i;
						stream->flags = i;
						stream->entity = ent;
						stream->skin = 0;
						stream->models[0] = models[0];
						stream->endTime = cl.time + 0.5;
						stream->lastTrailTime = 0;

						VectorCopy(state->origin, stream->source);
						stream->source[0] += (rand() % 30) - 15;
						stream->source[1] += (rand() % 30) - 15;
						VectorCopy(stream->source, stream->dest);
						stream->dest[0] += (rand() % 80) - 40;
						stream->dest[1] += (rand() % 80) - 40;
						stream->dest[2] += 64 + (rand() % 48);
					}
				}
			}
			break;

		case TE_HWTELEPORT:
			pos[0] = MSG_ReadCoord ();
			pos[1] = MSG_ReadCoord ();
			pos[2] = MSG_ReadCoord ();
			cnt = MSG_ReadShort();  //skin#
			S_StartSound (TempSoundChannel(), 0, cl_sfx_teleport[rand() % 5], pos, 1, 1);

			ex = CL_AllocExplosion ();
			VectorCopy(pos, ex->origin);
			ex->frameFunc = TeleportFlashThink;	
			ex->model = Mod_ForName("models/teleport.mdl", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + 2;
			ex->avel[2] = (rand() * 360) + 360;
			ex->flags = SCALE_TYPE_XYONLY | DRF_TRANSLUCENT;
			ex->skin = cnt;
			ex->scale = 100;

			for (dir = 0; dir < 360; dir += 45)
			{
				cosval = 10 * cos(dir *M_PI*2 / 360);
				sinval = 10 * sin(dir *M_PI*2 / 360);
				ex = CL_AllocExplosion ();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/telesmk2.spr", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + .5;
				ex->velocity[0] = cosval;
				ex->velocity[1] = sinval;
				ex->flags = DRF_TRANSLUCENT;

				ex = CL_AllocExplosion ();
				VectorCopy(pos, ex->origin);
				ex->origin[2] += 64;
				ex->model = Mod_ForName("models/telesmk2.spr", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + .5;
				ex->velocity[0] = cosval;
				ex->velocity[1] = sinval;
				ex->flags = DRF_TRANSLUCENT;
			}
			break;

		case TE_SWORD_EXPLOSION:
			{
				int		ent;
				stream_t	*stream;
				model_t		*models[2];
				entity_state_t	*state;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				ent = MSG_ReadShort();
				state = FindState(ent);

				if (state)
				{
					if (rand() & 1)
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning1, pos, 1, 1);
					}
					else
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning2, pos, 1, 1);
					}

					for (i = 0; i < 5; i++)
					{	// make some lightning
						models[0] = Mod_ForName("models/stlghtng.mdl", true);

						if ((stream = NewStream(ent, i)) == NULL)
						{
							Con_Printf("stream list overflow\n");
							return;
						}
						//stream->type = TE_STREAM_ICECHUNKS;
						stream->type = TE_STREAM_LIGHTNING;
						stream->tag = i;
						stream->flags = i;
						stream->entity = ent;
						stream->skin = 0;
						stream->models[0] = models[0];
						stream->endTime = cl.time + 0.5;
						stream->lastTrailTime = 0;

						VectorCopy(pos, stream->source);
						stream->source[0] += (rand() % 30) - 15;
						stream->source[1] += (rand() % 30) - 15;
						VectorCopy(stream->source, stream->dest);
						stream->dest[0] += (rand() % 80) - 40;
						stream->dest[1] += (rand() % 80) - 40;
						stream->dest[2] += 64 + (rand() % 48);
					}
				}
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/vorpshok.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + 1.0;
				ex->flags |= MLS_ABSLIGHT;
				ex->abslight = 128;
				ex->skin = 0;
				ex->scale = 100;
				ex->frameFunc = SwordFrameFunc;

				S_StartSound (TempSoundChannel(), 0, cl_sfx_swordExplode, pos, 1, 1);
			}
			break;

		case TE_AXE_BOUNCE:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			ex = CL_AllocExplosion();
			VectorCopy(pos, ex->origin);
			ex->model = Mod_ForName("models/spark.spr", true);
			ex->startTime = cl.time;
			ex->flags |= MLS_ABSLIGHT;
			ex->abslight = 128;
			ex->skin = 0;
			ex->scale = 100;
			ex->endTime = ex->startTime + ex->model->numframes * 0.05;

			S_StartSound (TempSoundChannel(), 0, cl_sfx_axeBounce, pos, 1, 1);
			break;

		case TE_AXE_EXPLODE:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			i = (host_frametime < .07) ? 0 : 3;	// based on framerate
			for ( ; i < 5; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 6) - 3;
				ex->origin[1] += (rand() % 6) - 3;
				ex->origin[2] += (rand() % 6) - 3;

				ex->velocity[0] = (ex->origin[0] - pos[0])*15;
				ex->velocity[1] = (ex->origin[1] - pos[1])*15;
				ex->velocity[2] = (ex->origin[2] - pos[2])*15;

				switch (rand() % 6)
				{
				case 0:
				case 1:
					ex->model = Mod_ForName("models/xpspblue.spr", true);
					break;
				case 2:
				case 3:
					ex->model = Mod_ForName("models/xpspblue.spr", true);
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
					break;
				case 4:
				case 5:
					ex->model = Mod_ForName("models/spark0.spr", true);
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
					break;
				}
				ex->flags |= MLS_ABSLIGHT;//|DRF_TRANSLUCENT;
				ex->abslight = 160 + (rand() % 24);
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}

			S_StartSound (TempSoundChannel(), 0, cl_sfx_axeExplode, pos, 1, 1);
			break;

		case TE_TIME_BOMB:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			i = (host_frametime < .07) ? 0 : 14;	// based on framerate
			for ( ; i < 20; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 6) - 3;
				ex->origin[1] += (rand() % 6) - 3;
				ex->origin[2] += (rand() % 6) - 3;

				ex->velocity[0] = (ex->origin[0] - pos[0])*40;
				ex->velocity[1] = (ex->origin[1] - pos[1])*40;
				ex->velocity[2] = (ex->origin[2] - pos[2])*40;

				switch (rand() % 4)
				{
				case 0:
					ex->model = Mod_ForName("models/sm_expld.spr", true);
					break;
				case 2:
					ex->model = Mod_ForName("models/bg_expld.spr", true);
					break;
				case 1:
				case 3:
					ex->model = Mod_ForName("models/gen_expl.spr", true);
					break;
				}
				ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ex->abslight = 160 + (rand() % 24);
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}

			S_StartSound (TempSoundChannel(), 0, cl_sfx_axeExplode, pos, 1, 1);
			break;

		case TE_FIREBALL:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			ex = CL_AllocExplosion();
			VectorCopy(pos, ex->origin);
			ex->model = Mod_ForName("models/blast.mdl", true);
			ex->flags |= MLS_ABSLIGHT|SCALE_TYPE_UNIFORM|SCALE_ORIGIN_CENTER;
			ex->abslight = 128;
			ex->skin = 0;
			ex->scale = 1;
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + 1.0;
			ex->frameFunc = fireBallUpdate;

			ex->exflags = EXFLAG_ROTATE;

			ex->avel[0] = 50;
			ex->avel[1] = 50;
			ex->avel[2] = 50;

			S_StartSound (TempSoundChannel(), 0, cl_sfx_fireBall, pos, 1, 1);
			break;

		case TE_SUNSTAFF_POWER:
			{
				int		ent;
				stream_t	*stream;
				model_t		*models[4];
				entity_state_t	*state;

				ent = MSG_ReadShort();

				vel[0] = MSG_ReadCoord();
				vel[1] = MSG_ReadCoord();
				vel[2] = MSG_ReadCoord();
				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();

				for (i = 0; i < 2; i++)
				{
					ex = CL_AllocExplosion();
					VectorCopy(pos, ex->origin);
					if (i)
					{
						ex->model = Mod_ForName("models/stsunsf3.mdl", true);
						ex->scale = 200;
						ex->frameFunc = sunPowerUpdate;
					}
					else
					{
						ex->model = Mod_ForName("models/blast.mdl", true);
						ex->flags |= DRF_TRANSLUCENT;
						ex->frameFunc = sunBallUpdate;
						ex->scale = 120;
					}
					ex->flags |= MLS_ABSLIGHT|SCALE_TYPE_UNIFORM|SCALE_ORIGIN_CENTER;
					ex->abslight = 128;
					ex->skin = 0;
					ex->scale = 200;
					ex->startTime = cl.time;
					ex->endTime = ex->startTime + .8;

					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = 50;
					ex->avel[1] = 50;
					ex->avel[2] = 50;
				}

				S_StartSound (TempSoundChannel(), 0, cl_sfx_fireBall, pos, 1, 1);

				state = FindState(ent);

				if (state)
				{
					S_StartSound (TempSoundChannel(), 0, cl_sfx_sunstaff, state->origin, 1, 1);

					models[0] = Mod_ForName("models/stsunsf2.mdl", true);
					models[1] = Mod_ForName("models/stsunsf1.mdl", true);
					models[2] = Mod_ForName("models/stsunsf3.mdl", true);
					models[3] = Mod_ForName("models/stsunsf4.mdl", true);

					if ((stream = NewStream(ent, 0)) == NULL)
					{
						Con_Printf("stream list overflow\n");
						return;
					}
					stream->type = TE_STREAM_SUNSTAFF2;
					stream->tag = 0;
					//stream->flags = STREAM_ATTACHED;
					stream->flags = 0;
					stream->entity = ent;
					stream->skin = 0;
					stream->models[0] = models[0];
					stream->models[1] = models[1];
					stream->models[2] = models[2];
					stream->models[3] = models[3];
					stream->endTime = cl.time + 0.8;
					stream->lastTrailTime = 0;

					VectorCopy(vel, stream->source);
					VectorCopy(pos, stream->dest);

					//VectorClear(stream->offset);
					//VectorSubtract(stream->source, vel, stream->offset);

					// make some spiffy particles to glue it all together
				}
			}
			break;

		case TE_PURIFY2_EXPLODE:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			ex = CL_AllocExplosion();
			VectorCopy(pos, ex->origin);
			ex->model = Mod_ForName("models/xplod29.spr", true);
			ex->startTime = cl.time;
			ex->flags |= MLS_ABSLIGHT;
			ex->abslight = 128;
			ex->skin = 0;
			ex->scale = 100;
			ex->endTime = ex->startTime + ex->model->numframes * 0.05;

			i = (host_frametime < .07) ? 0 : 8;	// based on framerate
			for (i = 0; i < 12; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 20) - 10;
				ex->origin[1] += (rand() % 20) - 10;
				ex->origin[2] += (rand() % 20) - 10;

				ex->velocity[0] = (ex->origin[0] - pos[0])*12;
				ex->velocity[1] = (ex->origin[1] - pos[1])*12;
				ex->velocity[2] = (ex->origin[2] - pos[2])*12;

				switch (rand() % 4)
				{
				case 0:
				case 1:
					ex->model = Mod_ForName("models/sm_expld.spr", true);
					break;
				case 2:
					ex->model = Mod_ForName("models/bg_expld.spr", true);
					break;
				case 3:
					ex->model = Mod_ForName("models/gen_expl.spr", true);
					break;
				}
				if (host_frametime < 0.07)
				{
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				}
				ex->abslight = 160 + (rand() % 64);
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.04;
			}

			S_StartSound (TempSoundChannel(), 0, cl_sfx_purify2, pos, 1, 1);

			break;

		case TE_PLAYER_DEATH:
			{
				int	angle;	// from 0 to 256
				int	pitch;	// from 0 to 256
				int	force, style;
				float	throwPower, curAng, curPitch;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();

				angle = MSG_ReadByte();
				pitch = MSG_ReadByte();
				force = MSG_ReadByte();
				style = MSG_ReadByte();

				i = (host_frametime < 0.07) ? 0 : 8;
				for ( ; i < 12; i++)
				{
					ex = CL_AllocExplosion();
					VectorCopy(pos, ex->origin);
					ex->origin[0] += (rand() % 40) - 20;
					ex->origin[1] += (rand() % 40) - 20;
					ex->origin[2] += (rand() % 40);
					ex->frameFunc = ChunkThink;

					throwPower = 3.5 + ((rand() % 100) / 100.0);
					curAng = angle*6.28/256.0 + ((rand() % 100) / 50.0) - 1.0;
					curPitch = pitch*6.28/256.0 + ((rand() % 100) / 100.0) - .5;

					ex->velocity[0] = force*throwPower * cos(curAng) * cos(curPitch);
					ex->velocity[1] = force*throwPower * sin(curAng) * cos(curPitch);
					ex->velocity[2] = force*throwPower * sin(curPitch);

					// are these in degrees or radians?
					ex->angles[0] = rand() % 360;
					ex->angles[1] = rand() % 360;
					ex->angles[2] = rand() % 360;
					ex->exflags = EXFLAG_ROTATE;

					ex->avel[0] = (rand() % 850) - 425;
					ex->avel[1] = (rand() % 850) - 425;
					ex->avel[2] = (rand() % 850) - 425;

					ex->scale = 80 + (rand() % 40);
					ex->data = THINGTYPE_FLESH;

					switch (rand() % 3)
					{
					case 0:
						ex->model = Mod_ForName("models/flesh1.mdl", true);
						break;
					case 1:
						ex->model = Mod_ForName("models/flesh2.mdl", true);
						break;
					case 2:
						ex->model = Mod_ForName("models/flesh3.mdl", true);
						break;
					}

					ex->skin = 0;

					ex->startTime = cl.time;
					ex->endTime = ex->startTime + 4.0;
				}

				switch (style)
				{
				case 0:
					S_StartSound (TempSoundChannel(), 0, cl_sfx_big_gib, pos, 1, 1);
					break;
				case 1:
					if (rand() % 2)
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_gib1, pos, 1, 1);
					}
					else
					{
						S_StartSound (TempSoundChannel(), 0, cl_sfx_gib2, pos, 1, 1);
					}
					break;
				case 2:
					S_StartSound (TempSoundChannel(), 0, cl_sfx_telefrag, pos, 1, 1);
					break;
				}
			}
			break;

		case TE_PURIFY1_EFFECT:
			{
				float	angle, pitch, dist;
				vec3_t	endPos;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();

				angle = MSG_ReadByte()*6.28/256.0;
				pitch = MSG_ReadByte()*6.28/256.0;
				dist = MSG_ReadShort();

				endPos[0] = pos[0] + dist * cos(angle) * cos(pitch);
				endPos[1] = pos[1] + dist * sin(angle) * cos(pitch);
				endPos[2] = pos[2] + dist * sin(pitch);

				//R_RocketTrail (pos, endPos, rt_purify);
				R_RocketTrail (pos, endPos, rt_purify);

				S_StartSound (TempSoundChannel(), 0, cl_sfx_purify1_fire, pos, 1, 1);
				S_StartSound (TempSoundChannel(), 0, cl_sfx_purify1_hit, endPos, 1, 1);

				ex = CL_AllocExplosion();
				VectorCopy(endPos, ex->origin);
				ex->model = Mod_ForName("models/fcircle.spr", true);
				ex->startTime = cl.time;
				ex->flags |= MLS_ABSLIGHT;
				ex->abslight = 128;
				ex->skin = 0;
				ex->scale = 100;
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}
			break;

		case TE_TELEPORT_LINGER:
			{
				float duration;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();

				duration = MSG_ReadCoord();

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/bspark.spr", true);
				ex->startTime = cl.time;
				ex->flags |= MLS_ABSLIGHT;
				ex->abslight = 128;
				ex->frameFunc = telEffectUpdate;
				ex->skin = 0;
				ex->scale = 0;
				ex->endTime = ex->startTime + duration;
			}
			break;

		case TE_LINE_EXPLOSION:
			{
				int	distance;
				vec3_t	endPos,midPos,curPos,distVec;
				float	ratio;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				endPos[0] = MSG_ReadCoord();
				endPos[1] = MSG_ReadCoord();
				endPos[2] = MSG_ReadCoord();

				VectorAdd(pos,endPos,midPos);
				VectorScale(midPos,0.5,midPos);

				VectorSubtract(midPos,pos,distVec);
				distance = (int)(VectorNormalize(distVec)*0.025);
				if (distance > 0)
				{
					VectorScale(distVec,40,distVec);

					VectorCopy(midPos,curPos);

					for (i = 0; i < distance; i++)
					{
						ex = CL_AllocExplosion();
						VectorCopy(curPos, ex->origin);
						switch (rand() % 3)
						{
						case 0:
							ex->model = Mod_ForName("models/gen_expl.spr", true);
							break;
						case 1:
							ex->model = Mod_ForName("models/bg_expld.spr", true);
							break;
						case 2:
							ex->model = Mod_ForName("models/sm_expld.spr", true);
							break;
						}
						ex->flags |= MLS_ABSLIGHT;
						ex->abslight = 128;
						ex->skin = 0;
						ratio = (float)i/(float)distance;
						ex->scale = 200-(int)(150.0*ratio);
						ex->startTime = cl.time + ratio*0.75;
						ex->endTime = ex->startTime + ex->model->numframes * (0.025 + FRANDOM()*0.01);

						VectorAdd(curPos,distVec,curPos);
					}

					VectorScale(distVec,-1,distVec);
					VectorCopy(midPos,curPos);

					for (i = 0; i < distance; i++)
					{
						ex = CL_AllocExplosion();
						VectorCopy(curPos, ex->origin);
						switch (rand() % 3)
						{
						case 0:
							ex->model = Mod_ForName("models/gen_expl.spr", true);
							break;
						case 1:
							ex->model = Mod_ForName("models/bg_expld.spr", true);
							break;
						case 2:
							ex->model = Mod_ForName("models/sm_expld.spr", true);
							break;
						}
						ex->flags |= MLS_ABSLIGHT;
						ex->abslight = 128;
						ex->skin = 0;
						ratio = (float)i/(float)distance;
						ex->scale = 200 - (int)(150.0*ratio);
						ex->startTime = cl.time + ratio*0.75;
						ex->endTime = ex->startTime + ex->model->numframes * (0.025+FRANDOM()*0.01);

						VectorAdd(curPos,distVec,curPos);
					}
				}
			}
			break;

		case TE_METEOR_CRUSH:
			{
				float	maxDist;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				maxDist = MSG_ReadLong();

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/null.spr", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + 0.4;
				ex->frameFunc = MeteorCrushSpawnThink;
				ex->data = maxDist;

				S_StartSound (TempSoundChannel(), 0, cl_sfx_axeExplode, pos, 1, 1);
			}
			break;

		case TE_ACIDBALL:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			i = (host_frametime < 0.07) ? 0 : 2;
			for ( ; i < 5; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 6) - 3;
				ex->origin[1] += (rand() % 6) - 3;
				ex->origin[2] += (rand() % 6) - 3;

				ex->velocity[0] = (ex->origin[0] - pos[0])*6;
				ex->velocity[1] = (ex->origin[1] - pos[1])*6;
				ex->velocity[2] = (ex->origin[2] - pos[2])*6;

				ex->model = Mod_ForName("models/axplsn_2.spr", true);
				if (host_frametime < 0.07)
				{
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				}
				ex->abslight = 160 + (rand() % 24);
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}

			S_StartSound (TempSoundChannel(), 0, cl_sfx_acidhit, pos, 1, 1);
			break;

		case TE_ACIDBLOB:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			i = (host_frametime < 0.07) ? 0 : 7;
			for ( ; i < 12; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 6) - 3;
				ex->origin[1] += (rand() % 6) - 3;
				ex->origin[2] += (rand() % 6) - 3;

				ex->velocity[0] = (ex->origin[0] - pos[0])*25;
				ex->velocity[1] = (ex->origin[1] - pos[1])*25;
				ex->velocity[2] = (ex->origin[2] - pos[2])*25;

				switch (rand() % 4)
				{
				case 0:
					ex->model = Mod_ForName("models/axplsn_2.spr", true);
					break;
				case 1:
					ex->model = Mod_ForName("models/axplsn_1.spr", true);
					break;
				case 2:
				case 3:
					ex->model = Mod_ForName("models/axplsn_5.spr", true);
					break;
				}
				if (host_frametime < 0.07)
				{
					ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				}
				ex->abslight = 1;
				ex->skin = 0;
				ex->scale = 80 + (rand() % 40);
				ex->startTime = cl.time + ((rand() % 50) / 200.0);
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}

			// always make 8 meteors
			i = (host_frametime < 0.07) ? 0 : 4;
			for ( ; i < 8; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos,ex->origin);
				ex->frameFunc = ChunkThink;

				// temp modify them...
				ex->velocity[0] = (rand() % 500) - 250;
				ex->velocity[1] = (rand() % 500) - 250;
				ex->velocity[2] = (rand() % 200) + 200;

				// are these in degrees or radians?
				ex->angles[0] = rand() % 360;
				ex->angles[1] = rand() % 360;
				ex->angles[2] = rand() % 360;
				ex->exflags = EXFLAG_ROTATE;

				ex->avel[0] = (rand() % 850) - 425;
				ex->avel[1] = (rand() % 850) - 425;
				ex->avel[2] = (rand() % 850) - 425;

				ex->scale = 45 + (rand() % 10);
				ex->data = THINGTYPE_ACID;

				ex->model = Mod_ForName("models/sucwp2p.mdl", true);
				ex->skin = 0;
				VectorScale(ex->avel, 4.0, ex->avel);

				ex->startTime = cl.time;
				ex->endTime = ex->startTime + 4.0;
			}
			S_StartSound (TempSoundChannel(), 0, cl_sfx_acidhit, pos, 1, 1);
			break;

		case TE_FIREWALL:
			{
				float	travelAng, travelPitch;
				float	fireCounts;
				dlight_t	*dlx;
				vec3_t		endPos, curPos, posAdd;
				mleaf_t		*l;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				fireCounts = MSG_ReadByte();

				dlx = CL_AllocDlight (0);
				VectorCopy (pos,  dlx->origin);
				dlx->radius = 200 + (rand() & 31);
				dlx->die = cl.time + 0.001;

				VectorCopy(pos, endPos);
				endPos[0] += cos(travelAng) * cos(travelPitch) * 450;
				endPos[1] += sin(travelAng) * cos(travelPitch) * 450;
				endPos[2] += sin(travelPitch) * 450;

				VectorCopy(pos, curPos);
				VectorSubtract(endPos, pos, posAdd);
				VectorScale(posAdd, .125, posAdd);

				for (i = 0; i < fireCounts; i++)
				{
					ex = CL_AllocExplosion();
					VectorCopy(curPos, ex->origin);
					switch (rand() % 3)
					{
					case 0:
						ex->model = Mod_ForName("models/firewal1.spr", true);
						break;
					case 1:
						ex->model = Mod_ForName("models/firewal5.spr", true);
						break;
					case 2:
						ex->model = Mod_ForName("models/firewal4.spr", true);
						break;
					}
					ex->startTime = cl.time + .3/8.0 * i;
					ex->endTime = ex->startTime + ex->model->numframes * 0.05;

					do
					{	// I dunno how expensive this is, but it kind of sucks anyway around it...
						l = Mod_PointInLeaf (ex->origin, cl.worldmodel);

						if (l->contents == CONTENTS_EMPTY)
						{
							ex->origin[2] -= 16;
						}
						else
						{
							ex->origin[2] += 16;
						}
					} while (l->contents == CONTENTS_EMPTY);

					ex->origin[0] += (rand() % 8) - 4;
					ex->origin[1] += (rand() % 8) - 4;
					ex->origin[2] += (rand() % 6) + 21;

					ex = CL_AllocExplosion();
					VectorCopy(curPos, ex->origin);
					ex->origin[0] += (rand() % 8) - 4;
					ex->origin[1] += (rand() % 8) - 4;
					ex->origin[2] += (rand() % 6) - 3;
					ex->model = Mod_ForName("models/flamestr.spr", true);
					ex->startTime = cl.time + .3/8.0 * i;
					ex->endTime = ex->startTime + ex->model->numframes * 0.05;
					ex->flags |= DRF_TRANSLUCENT;

					VectorAdd(curPos, posAdd, curPos);
				}
			}
			break;

		case TE_FIREWALL_IMPACT:
			// Add in the actual explosion
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();

			i = (host_frametime < 0.07) ? 0 : 8;
			for ( ; i < 12; i++)
			{
				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->origin[0] += (rand() % 32) - 16;
				ex->origin[1] += (rand() % 32) - 16;
				ex->origin[2] += (rand() % 32) - 16;
				ex->model = Mod_ForName("models/fboom.spr", true);
				ex->startTime = cl.time + ((rand() % 150) / 200);
				ex->endTime = ex->startTime + ex->model->numframes * 0.05;
			}

			S_StartSound (TempSoundChannel(), 0, cl_sfx_flameend, pos, 1, 1);
			break;

		case TE_HWBONERIC:
			pos[0] = MSG_ReadCoord();
			pos[1] = MSG_ReadCoord();
			pos[2] = MSG_ReadCoord();
			cnt = MSG_ReadByte ();
			R_RunParticleEffect4 (pos, 3, 368 + (rand() % 16), pt_grav, cnt);
			rnd = rand() % 100;
			if (rnd > 95)
				S_StartSound (TempSoundChannel(), 0, cl_sfx_ric1, pos, 1, 1);
			else if (rnd > 91)
				S_StartSound (TempSoundChannel(), 0, cl_sfx_ric2, pos, 1, 1);
			else if (rnd > 87)
				S_StartSound (TempSoundChannel(), 0, cl_sfx_ric3, pos, 1, 1);

			break;

		case TE_POWERFLAME:
			{
				float	travelAng, travelPitch;
				float	fireCounts;
				dlight_t	*dlx;
				vec3_t		endPos, curPos, posAdd;
				vec3_t		angles, forward, right, up;
				float	cVal, sVal, svTime;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				fireCounts = MSG_ReadByte();
				svTime = MSG_ReadLong();

				angles[0] = travelPitch*360/(2*M_PI);
				angles[1] = travelAng*360/(2*M_PI);
				angles[2] = 0;

				AngleVectors(angles, forward, right, up);

				dlx = CL_AllocDlight (0);
				VectorCopy (pos,  dlx->origin);
				dlx->radius = 200 + (rand() & 31);
				dlx->die = cl.time + 0.001;

				VectorCopy(pos, endPos);
				endPos[0] += cos(travelAng) * cos(travelPitch) * 375;
				endPos[1] += sin(travelAng) * cos(travelPitch) * 375;
				endPos[2] += sin(travelPitch) * 375;

				VectorCopy(pos, curPos);
				VectorSubtract(endPos, pos, posAdd);
				VectorScale(posAdd, .125, posAdd);

				for (i = 0; i < fireCounts; i++)
				{
					cVal = cos((svTime + (i*.3/8.0))*8)*10;
					sVal = sin((svTime + (i*.3/8.0))*8)*10;
				//	cVal = cos((svTime + (i*.3/8.0))*16)*35;
				//	sVal = sin((svTime + (i*.3/8.0))*16)*35;

					ex = CL_AllocExplosion();
					VectorCopy(curPos, ex->origin);
					VectorMA(ex->origin, cVal, right, ex->origin);
					VectorMA(ex->origin, sVal, up, ex->origin);
					ex->origin[0] += (rand() % 8) - 4;
					ex->origin[1] += (rand() % 8) - 4;
					ex->origin[2] += (rand() % 6) - 3;
					ex->model = Mod_ForName("models/flamestr.spr", true);
					ex->startTime = cl.time + .3/8.0 * i;
					ex->endTime = ex->startTime + ex->model->numframes * 0.05;
					ex->flags |= DRF_TRANSLUCENT;

					ex->velocity[0] = 0;
					ex->velocity[1] = 0;
					ex->velocity[2] = 0;
					VectorMA(ex->velocity, cVal * 4.0, right, ex->velocity);
					VectorMA(ex->velocity, sVal * 4.0, up, ex->velocity);

					ex = CL_AllocExplosion();
					VectorCopy(curPos, ex->origin);
					VectorMA(ex->origin, -cVal, right, ex->origin);
					VectorMA(ex->origin, -sVal, up, ex->origin);
					ex->origin[0] += (rand() % 8) - 4;
					ex->origin[1] += (rand() % 8) - 4;
					ex->origin[2] += (rand() % 6) - 3;
					ex->model = Mod_ForName("models/flamestr.spr", true);
					ex->startTime = cl.time + .3/8.0 * i;
					ex->endTime = ex->startTime + ex->model->numframes * 0.05;
					ex->flags |= DRF_TRANSLUCENT;

					ex->velocity[0] = 0;
					ex->velocity[1] = 0;
					ex->velocity[2] = 0;
					VectorMA(ex->velocity, -cVal * 4.0, right, ex->velocity);
					VectorMA(ex->velocity, -sVal * 4.0, up, ex->velocity);

					VectorAdd(curPos, posAdd, curPos);
				}
			}
			break;

		case TE_BLOODRAIN:
			{
				float	travelAng, travelPitch;
				float	trailLen;
				unsigned char	health;
				vec3_t	angles, forward, right, up;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte();
				health = MSG_ReadByte();

				vel[0] = cos(travelAng) * cos(travelPitch) * 800;
				vel[1] = sin(travelAng) * cos(travelPitch) * 800;
				vel[2] = sin(travelPitch) * 800;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/sucwp1p.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3/240.0;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				ex->scale = health;
				VectorCopy(vel, ex->velocity);
				ex->frameFunc = updateBloodRain;
				ex->exflags |= EXFLAG_COLLIDE;

				if (health > 90)
				{
					angles[0] = travelPitch*360/(2*M_PI);
					angles[1] = travelAng*360/(2*M_PI);
					angles[2] = 0;

					AngleVectors(angles, forward, right, up);

					ex = CL_AllocExplosion();
					VectorCopy(pos, ex->origin);
					VectorMA(ex->origin, 7, right, ex->origin);
					ex->model = Mod_ForName("models/sucwp1p.mdl", true);
					ex->startTime = cl.time;
					ex->endTime = ex->startTime + trailLen*.3/240.0;
					ex->angles[0] = travelPitch*360/6.28;
					ex->angles[1] = travelAng*360/6.28;
					ex->scale = health - 90;
					VectorCopy(vel, ex->velocity);
					ex->frameFunc = updateBloodRain;
					ex->exflags |= EXFLAG_COLLIDE;

					ex = CL_AllocExplosion();
					VectorCopy(pos, ex->origin);
					VectorMA(ex->origin, -7, right, ex->origin);
					ex->model = Mod_ForName("models/sucwp1p.mdl", true);
					ex->startTime = cl.time;
					ex->endTime = ex->startTime + trailLen*.3/240.0;
					ex->angles[0] = travelPitch*360/6.28;
					ex->angles[1] = travelAng*360/6.28;
					ex->scale = health - 90;
					VectorCopy(vel, ex->velocity);
					ex->frameFunc = updateBloodRain;
					ex->exflags |= EXFLAG_COLLIDE;
				}
			}
			break;

		case TE_AXE:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1100;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1100;
				vel[2] = sin(travelPitch) * 1100;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/axblade.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/axtail.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->exflags |= EXFLAG_STILL_FRAME;
				ex->data = 0;
				ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ex->abslight = 128;
				ex->skin = 0;
			}
			break;

		case TE_PURIFY2_MISSILE:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1000;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1000;
				vel[2] = sin(travelPitch) * 1000;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/drgnball.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updatePurify2;
				ex->scale = 150;
			}
			break;

		case TE_SWORD_SHOT:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1200;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1200;
				vel[2] = sin(travelPitch) * 1200;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/vorpshot.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateSwordShot;
				ex->scale = 100;
				ex->exflags |= EXFLAG_STILL_FRAME;
				ex->data = 16 + ((int)(cl.time * 20.0)%13);
			}
			break;

		case TE_ICESHOT:
			{
				float	travelAng, travelPitch;
				float	trailLen;
				explosion_t	*ex2;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1200;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1200;
				vel[2] = sin(travelPitch) * 1200;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/iceshot1.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateIceShot;
				ex->scale = 100;

				ex->exflags = EXFLAG_ROTATE;

				ex->avel[0] = 425;
				ex->avel[1] = 425;
				ex->avel[2] = 425;

				ex2 = ex;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/iceshot2.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				//ex->frameFunc = updateSwordShot;
				ex->scale = 200;
				ex->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ex->abslight = 128;
				ex->exflags = EXFLAG_ROTATE;

				VectorCopy(ex2->avel, ex->avel);
			}
			break;

		case TE_METEOR:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1000;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1000;
				vel[2] = sin(travelPitch) * 1000;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/tempmetr.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateMeteor;
				ex->scale = 100;

				ex->exflags = EXFLAG_ROTATE;

				ex->avel[0] = 200;
				ex->avel[1] = 200;
				ex->avel[2] = 200;
			}
			break;

		case TE_LIGHTNINGBALL:
			{
				float	travelAng, travelPitch;
				float	trailLen, speed;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				speed = MSG_ReadShort();
				trailLen = MSG_ReadByte() * .01;

				// light
				dl = CL_AllocDlight (0);
				VectorCopy (pos, dl->origin);
				dl->radius = 350;
				dl->die = cl.time + 0.5;
				dl->decay = 300;
				dl->color[0] = 0.2;
				dl->color[1] = 0.1;
				dl->color[2] = 0.05;
				dl->color[3] = 0.7;

				vel[0] = cos(travelAng) * cos(travelPitch) * speed;
				vel[1] = sin(travelAng) * cos(travelPitch) * speed;
				vel[2] = sin(travelPitch) * speed;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/lball.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.2;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				//ex->frameFunc = updateMeteor;
				//ex->scale = 230;

				//ex->exflags = EXFLAG_ROTATE;

				//ex->avel[0] = 200;
				//ex->avel[1] = 200;
				//ex->avel[2] = 200;
			}
			break;

		case TE_MEGAMETEOR:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1600;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1600;
				vel[2] = sin(travelPitch) * 1600;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/tempmetr.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateMeteor;
				ex->scale = 230;
				ex->flags |= DRF_TRANSLUCENT;

				ex->exflags = EXFLAG_ROTATE;

				ex->avel[0] = 200;
				ex->avel[1] = 200;
				ex->avel[2] = 200;
			}
			break;

		case TE_CUBEBEAM:
			{
				int	ent, ent2, tag, flags, skin;
				vec3_t	source, dest;
				float	duration;
				entity_state_t	*state;
				entity_state_t	*state2;

				type = TE_STREAM_COLORBEAM;

				ent = MSG_ReadShort();
				ent2 = MSG_ReadShort();
				flags = 0;
				tag = 0;
				duration = 0.1;
				skin = rand() % 5;
			//	source[0] = MSG_ReadCoord();
			//	source[1] = MSG_ReadCoord();
			//	source[2] = MSG_ReadCoord();
			//	dest[0] = MSG_ReadCoord();
			//	dest[1] = MSG_ReadCoord();
			//	dest[2] = MSG_ReadCoord();

				state = FindState(ent);
				state2 = FindState(ent2);

				if (state || state2)
				{
					if (state)
					{
						VectorCopy(state->origin, source);
					}
					else	//don't know where the damn cube is--prolly
					{	//won't see beam anyway then, so put it all
						//at the target
						VectorCopy(state2->origin, source);
						source[2] += 10;
					}

					if (state2)
					{
						//in case they're both valid, copy me again
						VectorCopy(state2->origin, dest);
						dest[2] += 30;
					}
					else	//don't know where the damn victim is--prolly
					{	//won't see beam anyway then, so put it all
						//at the cube
						VectorCopy(source, dest);
						dest[2] += 10;
					}

					S_StartSound (TempSoundChannel(), 0, cl_sfx_sunstaff, source, 1, 1);
					S_StartSound (TempSoundChannel(), 0, cl_sfx_sunhit, dest, 1, 1);
					R_SunStaffTrail(dest, source);
					CreateStream(TE_STREAM_COLORBEAM, ent, flags, tag, duration, skin, source, dest);
				}
			}
			break;

		case TE_LIGHTNINGEXPLODE:
			{
				int		ent;
				stream_t	*stream;
				model_t		*models[2];
				entity_state_t	*state;
				float	tempAng, tempPitch;

				ent = MSG_ReadShort();

				state = FindState(ent);
				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();

				if (rand() & 1)
				{
					S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning1, pos, 1, 1);
				}
				else
				{
					S_StartSound (TempSoundChannel(), 0, cl_sfx_lightning2, pos, 1, 1);
				}

				for (i = 0; i < 10; i++)
				{	// make some lightning
					models[0] = Mod_ForName("models/stlghtng.mdl", true);

					if ((stream = NewStream(ent, i)) == NULL)
					{
						Con_Printf("stream list overflow\n");
						return;
					}
					stream->type = TE_STREAM_LIGHTNING;
					stream->tag = i;
					stream->flags = i;
					stream->entity = ent;
					stream->skin = 0;
					stream->models[0] = models[0];
					stream->endTime = cl.time + 0.5;
					stream->lastTrailTime = 0;

					tempAng = (rand() % 628) / 100.0;
					tempPitch = (rand() % 628) / 100.0;

					VectorCopy(pos, stream->source);
					VectorCopy(stream->source, stream->dest);
					stream->dest[0] += 75.0 * cos(tempAng) * cos(tempPitch);
					stream->dest[1] += 75.0 * sin(tempAng) * cos(tempPitch);
					stream->dest[2] += 75.0 * sin(tempPitch);
				}
			}
			break;

		case TE_ACID_BALL_FLY:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 850;
				vel[1] = sin(travelAng) * cos(travelPitch) * 850;
				vel[2] = sin(travelPitch) * 850;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/sucwp2p.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateAcidBall;
			}
			break;

		case TE_ACID_BLOB_FLY:
			{
				float	travelAng, travelPitch;
				float	trailLen;

				pos[0] = MSG_ReadCoord();
				pos[1] = MSG_ReadCoord();
				pos[2] = MSG_ReadCoord();
				travelAng = MSG_ReadByte()*6.28/256.0;
				travelPitch = MSG_ReadByte()*6.28/256.0;
				trailLen = MSG_ReadByte() * .01;

				vel[0] = cos(travelAng) * cos(travelPitch) * 1000;
				vel[1] = sin(travelAng) * cos(travelPitch) * 1000;
				vel[2] = sin(travelPitch) * 1000;

				ex = CL_AllocExplosion();
				VectorCopy(pos, ex->origin);
				ex->model = Mod_ForName("models/sucwp2p.mdl", true);
				ex->startTime = cl.time;
				ex->endTime = ex->startTime + trailLen*.3;
				ex->angles[0] = travelPitch*360/6.28;
				ex->angles[1] = travelAng*360/6.28;
				VectorCopy(vel, ex->velocity);
				ex->exflags |= EXFLAG_COLLIDE;
				ex->frameFunc = updateAcidBlob;
				ex->scale = 230;

				//ex->exflags = EXFLAG_ROTATE;
				//ex->avel[0] = 200;
				//ex->avel[1] = 200;
				//ex->avel[2] = 200;
			}
			break;

		case TE_CHAINLIGHTNING:
			{
				vec3_t		points[12];
				int		numTargs = 0;
				int		ent, oldNum, temp;
				stream_t	*stream;
				model_t		*models[2];

				ent = MSG_ReadShort();

				do
				{
					points[numTargs][0] = MSG_ReadCoord();
					points[numTargs][1] = MSG_ReadCoord();
					points[numTargs][2] = MSG_ReadCoord();

					oldNum = numTargs;

					if (points[numTargs][0] || points[numTargs][1] || points[numTargs][2])
					{
						if (numTargs < 9)
						{
							numTargs++;
						}
					}
				} while (points[oldNum][0] || points[oldNum][1] || points[oldNum][2]);

				if (numTargs == 0)
				{
					break;
				}

				for (temp = 0; temp < numTargs - 1; temp++)
				{
					// make the connecting lightning...
					models[0] = Mod_ForName("models/stlghtng.mdl", true);

					if ((stream = NewStream(ent, temp)) == NULL)
					{
						Con_Printf("stream list overflow\n");
						return;
					}
					stream->type = TE_STREAM_LIGHTNING;
					stream->tag = temp;
					stream->flags = temp;
					stream->entity = ent;
					stream->skin = 0;
					stream->models[0] = models[0];
					stream->endTime = cl.time + 0.3;
					stream->lastTrailTime = 0;

					VectorCopy(points[temp], stream->source);
					VectorCopy(points[temp + 1], stream->dest);

					ex = CL_AllocExplosion();
					VectorCopy(points[temp+1], ex->origin);
					ex->model = Mod_ForName("models/vorpshok.mdl", true);
					ex->startTime = cl.time;
					ex->endTime = ex->startTime + .3;
					ex->flags |= MLS_ABSLIGHT;//|DRF_TRANSLUCENT;
					//ex->abslight = 128;
					ex->abslight = 224;
					ex->skin = rand() & 1;
					ex->scale = 150;
					ex->frameFunc = zapFrameFunc;
					//ex->frameFunc = SwordFrameFunc;
					//ex->flags = DRF_TRANSLUCENT;// | MLS_ABSLIGHT;
					//ex->angles[0] = travelPitch*360/6.28;
					//ex->angles[1] = travelAng*360/6.28;
				}
			}
			break;

		default:
			Sys_Error ("%s: bad type", __thisfunc__);
	}
}


/*
=================
CL_NewTempEntity
=================
*/
entity_t *CL_NewTempEntity (void)
{
	entity_t	*ent;

	if (cl_numvisedicts == MAX_VISEDICTS)
		return NULL;

	ent = &cl_visedicts[cl_numvisedicts];
	cl_numvisedicts++;
	ent->keynum = 0;

	memset (ent, 0, sizeof(*ent));

	ent->colormap = vid.colormap;
	return ent;
}


/*
=================
CL_UpdateBeams
=================
*/
static void CL_UpdateBeams (void)
{
	int		i;
	float		d, yaw, pitch, forward;
	beam_t		*b;
	vec3_t		dist, org;
	entity_t	*ent;

	// update lightning
	for (i = 0, b = cl_beams; i < MAX_BEAMS; i++, b++)
	{
		if (!b->model || b->endtime < cl.time)
			continue;

	// if coming from the player, update the start position
		if (b->entity == cl.playernum+1)	// entity 0 is the world
		{
			VectorCopy (cl.simorg, b->start);
			b->start[2] -= 22;	// adjust for view height
		}

	// calculate pitch and yaw
		VectorSubtract (b->end, b->start, dist);

		if (dist[1] == 0 && dist[0] == 0)
		{
			yaw = 0;
			if (dist[2] > 0)
				pitch = 90;
			else
				pitch = 270;
		}
		else
		{
			yaw = (int) (atan2(dist[1], dist[0]) * 180 / M_PI);
			if (yaw < 0)
				yaw += 360;

			forward = sqrt (dist[0]*dist[0] + dist[1]*dist[1]);
			pitch = (int) (atan2(dist[2], forward) * 180 / M_PI);
			if (pitch < 0)
				pitch += 360;
		}

	// add new entities for the lightning
		VectorCopy (b->start, org);
		d = VectorNormalize(dist);
		while (d > 0)
		{
			ent = CL_NewTempEntity ();
			if (!ent)
				return;
			VectorCopy (org, ent->origin);
			ent->model = b->model;
			ent->angles[0] = pitch;
			ent->angles[1] = yaw;
			ent->angles[2] = rand() % 360;

			for (i = 0; i < 3; i++)
				org[i] += dist[i]*30;
			d -= 30;
		}
	}
}

/*
=================
CL_UpdateExplosions
=================
*/
static void CL_UpdateExplosions (void)
{
	int		i, f;
	explosion_t	*ex;
	entity_t	*ent;
	mleaf_t		*l;

	for (i = 0, ex = cl_explosions; i < MAX_EXPLOSIONS; i++, ex++)
	{
		if (!ex->model)
			continue;

		if (ex->exflags & EXFLAG_COLLIDE)
		{
			l = Mod_PointInLeaf (ex->origin, cl.worldmodel);
			if (l->contents != CONTENTS_EMPTY)
			{
				if (ex->removeFunc)
				{
					ex->removeFunc(ex);
				}
				ex->model = NULL;
				continue;
			}
		}

		// if we hit endTime, get rid of explosion
		// (i assume endTime is greater than startTime, etc)
		if (ex->endTime <= cl.time)
		{
			if (ex->removeFunc)
			{
				ex->removeFunc(ex);
			}
			ex->model = NULL;
			continue;
		}

		VectorCopy(ex->origin, ex->oldorg);

		// set the current frame so i finish anim at endTime
		if (ex->exflags & EXFLAG_STILL_FRAME)
		{	// if it's a still frame, use the data field
			f = (int)ex->data;
		}
		else
		{
			f = (ex->model->numframes-1) * (cl.time - ex->startTime) / (ex->endTime - ex->startTime);
		}

		// apply velocity
		ex->origin[0] += host_frametime * ex->velocity[0];
		ex->origin[1] += host_frametime * ex->velocity[1];
		ex->origin[2] += host_frametime * ex->velocity[2];

		// apply acceleration
		ex->velocity[0] += host_frametime * ex->accel[0];
		ex->velocity[1] += host_frametime * ex->accel[1];
		ex->velocity[2] += host_frametime * ex->accel[2];

		// add in angular velocity
		if (ex->exflags & EXFLAG_ROTATE)
		{
			VectorMA(ex->angles, host_frametime, ex->avel, ex->angles);
		}
		// you can set startTime to some point in the future
		// to delay the explosion showing up or thinking;
		// it'll still move, though
		if (ex->startTime > cl.time)
			continue;

		if (ex->frameFunc)
		{
			ex->frameFunc(ex);
		}

		// allow for the possibility for the frame func to reset startTime
		if (ex->startTime > cl.time)
			continue;

		// just incase the frameFunc eliminates the thingy here.
		if (ex->model == NULL)
			continue;

		ent = CL_NewTempEntity ();
		if (!ent)
			continue;
		VectorCopy (ex->origin, ent->origin);
		VectorCopy (ex->angles, ent->angles);
		ent->model = ex->model;
		ent->frame = f;
		ent->skinnum = ex->skin;
		ent->drawflags = ex->flags;

		if (ex->flags & MLS_ABSLIGHT)
		{
			ent->abslight = ex->abslight;
		}
		if (ex->scale)
		{
			ent->scale = ex->scale;
		}
	}
}

static void CL_UpdateStreams(void)
{
	int		i, j, offset;
	stream_t	*stream;
	vec3_t		dist, org, discard, right, up;
	float		cosTime = 0.0, sinTime = 0.0;	// init to 0, make compiler happy
	float		cos2Time = 0.0, sin2Time = 0.0, lifeTime = 0.0;	// ditto
	float		d, yaw, pitch, forward;
	entity_t	*ent;
	entity_state_t	*state;

	// Update streams
	for (i = 0, stream = cl_Streams; i < MAX_STREAMS; i++, stream++)
	{
		if (!stream->models[0])// || stream->endTime < cl.time)
		{ // Inactive
			continue;
		}

		if (stream->endTime < cl.time)
		{ // Inactive
			if (stream->type != TE_STREAM_LIGHTNING && stream->type != TE_STREAM_LIGHTNING_SMALL)
				continue;
			else if (stream->endTime + 0.25 < cl.time)
				continue;
		}

		if (stream->flags & STREAM_ATTACHED && stream->endTime >= cl.time)
		{ // Attach the start position to owner
			state = FindState(stream->entity);
			if (state)
			{
				VectorAdd(state->origin, stream->offset, stream->source);
			}
		}

		VectorSubtract(stream->dest, stream->source, dist);
		if (dist[1] == 0 && dist[0] == 0)
		{
			yaw = 0;
			if (dist[2] > 0)
			{
				pitch = 90;
			}
			else
			{
				pitch = 270;
			}
		}
		else
		{
			yaw = (int)(atan2(dist[1], dist[0])*180/M_PI);
			if (yaw < 0)
			{
				yaw += 360;
			}
			forward = sqrt(dist[0]*dist[0]+dist[1]*dist[1]);
			pitch = (int)(atan2(dist[2], forward)*180/M_PI);
			if (pitch < 0)
			{
				pitch += 360;
			}
		}

		VectorCopy(stream->source, org);
		d = VectorNormalize(dist);

		if (stream->type == TE_STREAM_SUNSTAFF2)
		{
			discard[YAW] = yaw;
			discard[PITCH] = pitch;
			discard[ROLL] = 0;
			AngleVectors(discard, discard, right, up);

			lifeTime = ((stream->endTime - cl.time)/.8);
			cosTime = cos(cl.time*5);
			sinTime = sin(cl.time*5);
			cos2Time = cos(cl.time*5 + 3.14);
			sin2Time = sin(cl.time*5 + 3.14);
		}

		if (stream->type == TE_STREAM_ICECHUNKS)
		{
			offset = (int)(cl.time*40)%30;
			for (j = 0; j < 3; j++)
			{
				org[j] += dist[j]*offset;
			}
		}

		while (d > 0)
		{
			ent = CL_NewTempEntity();
			if (!ent)
			{
				return;
			}
			VectorCopy(org, ent->origin);
			ent->model = stream->models[0];
			ent->angles[0] = pitch;
			ent->angles[1] = yaw;
			switch (stream->type)
			{
			case TE_STREAM_CHAIN:
				ent->angles[2] = 0;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				break;
			case TE_STREAM_SUNSTAFF1:
				ent->angles[2] = (int)(cl.time*10)%360;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				ent->scale = 50 + 100 * ((stream->endTime - cl.time)/.3);
				//ent->frame = (int)(cl.time*20)%20;

				ent = CL_NewTempEntity();
				if (!ent)
				{
					return;
				}
				VectorCopy(org, ent->origin);
				ent->model = stream->models[1];
				ent->angles[0] = pitch;
				ent->angles[1] = yaw;
				ent->angles[2] = (int)(cl.time*50)%360;
				ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ent->abslight = 128;
				ent->scale = 50 + 100 * ((stream->endTime - cl.time)/.5);
				//stream->endTime = cl.time + 0.3;	// FIXME
				break;
			case TE_STREAM_SUNSTAFF2:
				ent->angles[2] = (int)(cl.time*100)%360;
				ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ent->abslight = 128;
				ent->scale =  100 + 150 * lifeTime;
				VectorMA(ent->origin, cosTime * (40 * lifeTime), right,  ent->origin);
				VectorMA(ent->origin, sinTime * (40 * lifeTime), up,  ent->origin);

				ent = CL_NewTempEntity();
				if (!ent)
				{
					return;
				}
				VectorCopy(org, ent->origin);
				ent->model = stream->models[0];
				ent->angles[0] = pitch;
				ent->angles[1] = yaw;
				ent->angles[2] = (int)(cl.time*100)%360;
				ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
				ent->abslight = 128;
				ent->scale =  100 + 150 * lifeTime;
				VectorMA(ent->origin, cos2Time * (40 * lifeTime), right,  ent->origin);
				VectorMA(ent->origin, sin2Time * (40 * lifeTime), up,  ent->origin);

				for (j = 0; j < 2; j++)
				{
					ent = CL_NewTempEntity();
					if (!ent)
					{
						return;
					}
					VectorCopy(org, ent->origin);
					if (j)
					{
						VectorMA(ent->origin, cos2Time * (40 * lifeTime), right,  ent->origin);
						VectorMA(ent->origin, sin2Time * (40 * lifeTime), up,  ent->origin);
					}
					else
					{
						VectorMA(ent->origin, cosTime * (40 * lifeTime), right,  ent->origin);
						VectorMA(ent->origin, sinTime * (40 * lifeTime), up,  ent->origin);
					}
					ent->model = stream->models[1];
					ent->angles[0] = pitch;
					ent->angles[1] = yaw;
					ent->angles[2] = (int)(cl.time*20)%360;
					ent->drawflags = MLS_ABSLIGHT;
					ent->abslight = 128;
					ent->scale =  100 + 150 * lifeTime;
				}
				break;
			case TE_STREAM_LIGHTNING:
				if (stream->endTime < cl.time)
				{//fixme: keep last non-translucent frame and angle
					ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
					ent->abslight = 128 + (stream->endTime - cl.time)*192;
				}
				else
				{
					ent->angles[2] = rand() % 360;
					ent->drawflags = MLS_ABSLIGHT;
					ent->abslight = 128;
					ent->frame = rand() % 6;
				}
				break;
			case TE_STREAM_LIGHTNING_SMALL:
				if (stream->endTime < cl.time)
				{
					ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
					ent->abslight = 128 + (stream->endTime - cl.time)*192;
				}
				else
				{
					ent->angles[2] = rand() % 360;
					ent->frame = rand() % 6;
					ent->drawflags = MLS_ABSLIGHT;
					ent->abslight = 128;
				}
				break;
			case TE_STREAM_FAMINE:
				ent->angles[2] = rand() % 360;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				ent->frame = 0;
				break;
			case TE_STREAM_COLORBEAM:
				ent->angles[2] = 0;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				ent->skinnum = stream->skin;
				break;
			case TE_STREAM_GAZE:
				ent->angles[2] = 0;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				ent->frame = (int)(cl.time*40)%36;
				break;
			case TE_STREAM_ICECHUNKS:
				ent->angles[2] = rand() % 360;
				ent->drawflags = MLS_ABSLIGHT;
				ent->abslight = 128;
				ent->frame = rand() % 5;
				break;
			default:
				ent->angles[2] = 0;
			}

			for (j = 0; j < 3; j++)
			{
				org[j] += dist[j]*30;
			}
			d -= 30;
		}

		if (stream->type == TE_STREAM_SUNSTAFF1)
		{
			if (stream->lastTrailTime+0.2 < cl.time)
			{
				stream->lastTrailTime = cl.time;
				R_SunStaffTrail(stream->source, stream->dest);
			}

			ent = CL_NewTempEntity();
			if (ent == NULL)
			{
				return;
			}
			VectorCopy(stream->dest, ent->origin);
			ent->model = stream->models[2];
			ent->drawflags = MLS_ABSLIGHT;
			ent->abslight = 128;
			ent->scale = 80 + (rand() & 15);
			//ent->frame = (int)(cl.time*20)%20;

			ent = CL_NewTempEntity();
			if (ent == NULL)
			{
				return;
			}
			VectorCopy(stream->dest, ent->origin);
			ent->model = stream->models[3];
			ent->drawflags = MLS_ABSLIGHT|DRF_TRANSLUCENT;
			ent->abslight = 128;
			ent->scale = 150 + (rand() & 15);
		}
	}
}


/*
=================
CL_UpdateTEnts
=================
*/
void CL_UpdateTEnts (void)
{
	CL_UpdateBeams ();
	CL_UpdateExplosions ();
	CL_UpdateStreams();
	CL_UpdateTargetBall();
}

static void MultiGrenadeExplodeSound (explosion_t *ex)
{
	//plug up all of -1's channels w/ grenade sounds
	if ( !(rand() & 7) )
	{
		if (MultiGrenadeCurrentChannel >= MAX_DYNAMIC_CHANNELS || MultiGrenadeCurrentChannel < 0)
		{
			MultiGrenadeCurrentChannel = 0;
		}

		S_StartSound (TempSoundChannel(), MultiGrenadeCurrentChannel++, cl_sfx_explode, ex->origin, 1, 1);
	}

	ex->frameFunc=NULL;
}


static void MultiGrenadeThink (explosion_t *ex)
{//FIXME: too messy
	explosion_t *missile;
	int	attack_counter, number_explosions;
	float	ftemp;

	VectorSet(ex->velocity,0,0,0);
	VectorSet(ex->accel,0,0,0);

	ex->frameFunc = MultiGrenadeExplodeSound;

	attack_counter = 0;
	number_explosions = (rand() & 2) + 6;

	while (attack_counter < number_explosions)
	{
		attack_counter += 1;
		missile = CL_AllocExplosion();

		missile->frameFunc = MultiGrenadePieceThink;

		VectorCopy(ex->origin,missile->origin);

		if (rand() & 1)
			missile->model = Mod_ForName("models/gen_expl.spr", true);
		else
			missile->model = Mod_ForName("models/bg_expld.spr", true);

		switch (attack_counter % 3)
		{
		case 2:
			missile->frameFunc = MultiGrenadePieceThink;
			missile->velocity[0] = (rand() % 600) - 300;
			missile->velocity[1] = (rand() % 600) - 300;
			missile->velocity[2] = 0;	//(rand() % 100) + 50;

			ftemp = ( rand() / RAND_MAX * (0.5) );
			missile->startTime = cl.time;// + 0.1 + ftemp - (ex->startTime - cl.time);
			ftemp = ( rand() / RAND_MAX * (0.3) ) - 0.15;
			missile->endTime = missile->startTime + missile->model->numframes * 0.1 + ftemp;
			break;
		case 1:
			missile->frameFunc = MultiGrenadePiece2Think;
			missile->velocity[0] = (rand() % 80 ) - 40;
			missile->velocity[1] = (rand() % 80 ) - 40;
			missile->velocity[2] = (rand() % 150) + 150;

			ftemp = ( rand() / RAND_MAX  * (0.5) );
			missile->startTime = cl.time;	// + 0.1 + ftemp - (ex->startTime - cl.time);
			ftemp = ( rand() / RAND_MAX  * (0.3) ) - 0.15;
			missile->endTime = missile->startTime + missile->model->numframes * 0.1 + ftemp;
			break;
		default://some extra explosions for at first
			missile->frameFunc = NULL;
			missile->origin[0] += (rand() % 50) - 25;
			missile->origin[1] += (rand() % 50) - 25;
			missile->origin[2] += (rand() % 50) - 25;

			ftemp = ( rand() / RAND_MAX * (0.2) );
			missile->startTime = cl.time + ftemp;
			ftemp = ( rand() / RAND_MAX * (0.2) ) - 0.1;
			missile->endTime = missile->startTime + missile->model->numframes * 0.1 + ftemp;
			break;
		}

		ftemp = ( rand() / RAND_MAX * (0.2) );

		missile->data = ex->data * (0.7  +  ftemp);
	}
}

static void MultiGrenadePieceThink (explosion_t *ex)
{//FIXME: too messy
	explosion_t *missile;
	int	attack_counter, number_explosions;
	float	ftemp;

	VectorSet(ex->velocity,0,0,0);
	VectorSet(ex->accel,0,0,0);

	ex->frameFunc = MultiGrenadeExplodeSound;

	if (ex->data < 70)
		ex->data = 70;

	ftemp = ( rand() / RAND_MAX * (0.2) ) - 0.1;
	ex->startTime = cl.time + ((1-(ex->data-69)/180.0)+ftemp-0.3) * 1.25;
	if (ex->startTime < cl.time)
	{
		ex->startTime = cl.time;
	}
	ftemp = ( rand() / RAND_MAX * (0.4) ) - 0.4;
	ex->endTime = ex->startTime + ex->model->numframes * 0.1 + ftemp;

	if (ex->model->numframes > 14)
	{
		ex->startTime -= 0.4;
		ex->endTime -= 0.4;
	}

	if (ex->data <= 71)
		return;

	attack_counter = 0;
	number_explosions = (rand() & 3) + 2;

	while (attack_counter < number_explosions)
	{
		attack_counter += 1;
		missile = CL_AllocExplosion();

		missile->frameFunc = MultiGrenadePieceThink;

		VectorCopy(ex->origin,missile->origin);

		missile->origin[0] += (rand() % 100) - 50;
		missile->origin[1] += (rand() % 100) - 50;
		missile->origin[2] += (rand() % 10 ) - 4;

		ftemp = ( rand() / RAND_MAX * (0.2) );

		missile->data = ex->data * (0.7 + ftemp);

		if (rand() & 7)
			missile->model = Mod_ForName("models/bg_expld.spr", true);
		else
			missile->model = Mod_ForName("models/fl_expld.spr", true);

		ftemp = ( rand() / RAND_MAX * (0.5) );

		missile->startTime = cl.time + 0.01;
		missile->endTime = missile->startTime + missile->model->numframes * 0.1;
	}
}

static void MultiGrenadePiece2Think (explosion_t *ex)
{//FIXME: too messy
	explosion_t *missile;
	int	attack_counter, number_explosions;
	float	ftemp;

	VectorSet(ex->velocity,0,0,0);
	VectorSet(ex->accel,0,0,0);

	ex->frameFunc = MultiGrenadeExplodeSound;

	if (ex->data < 70)
	{
		ex->data = 70;
	}

	ftemp = 0;	//( rand() / RAND_MAX * (0.2) ) - 0.1;
	ex->startTime = cl.time + (((1 - (ex->data-69)/200.0)+ftemp)*1.5) - 0.2;
	ftemp = ( rand() / RAND_MAX * (0.4) ) - 0.2;
	ex->endTime = ex->startTime + ex->model->numframes * 0.1 + ftemp;

	if (ex->data <= 71)
		return;

	attack_counter = 0;
	number_explosions = (rand() % 3) + 2;

	while (attack_counter < number_explosions)
	{
		attack_counter += 1;
		missile = CL_AllocExplosion();

		missile->frameFunc = MultiGrenadePiece2Think;

		VectorCopy(ex->origin,missile->origin);

		missile->origin[0] += (rand() % 30) - 15;
		missile->origin[1] += (rand() % 30) - 15;

		ftemp = rand() / RAND_MAX;

		missile->origin[2] += (ftemp*7) + 30;
		missile->data = ex->data - ftemp * 10 - 20;

		if (rand() & 1)
			missile->model = Mod_ForName("models/gen_expl.spr", true);
		else
			missile->model = Mod_ForName("models/bg_expld.spr", true);

		ftemp = ( rand() / RAND_MAX * (0.5) );

		missile->startTime = cl.time + 0.01;
		missile->endTime = missile->startTime + missile->model->numframes * 0.1;
	}
}

static void ChunkThink(explosion_t *ex)
{
	vec3_t	oldorg;
	mleaf_t		*l;
	int	moving = 1;

	l = Mod_PointInLeaf (ex->origin, cl.worldmodel);
	if (l->contents != CONTENTS_EMPTY) // || in_solid == true
	{	//collided with world
		VectorCopy(ex->oldorg, ex->origin);

		if ((int)ex->data == THINGTYPE_FLESH)
		{
			if (VectorNormalize(ex->velocity) > 100.0)
			{	// hit, now make a splash of blood
				vec3_t	dmin = {-40, -40, 10};
				vec3_t	dmax = {40, 40, 40};
				//R_RunParticleEffect4 (ex->origin, 300.0, 136 + (rand() % 5), pt_darken, 25);
				//R_RunParticleEffect2 (ex->origin, dmin, dmax, 136 + (rand() % 5), pt_fastgrav, 12);
				R_RunParticleEffect2 (ex->origin, dmin, dmax, 136 + (rand() % 5), pt_darken, 20);
			}
		}
		else if ((int)ex->data == THINGTYPE_ACID)
		{
			if (VectorNormalize(ex->velocity) > 100.0)
			{	// hit, now make a splash of acid
			//	vec3_t	dmin = {-40, -40, 10};
			//	vec3_t	dmax = {40, 40, 40};

				//R_RunParticleEffect2 (ex->origin, dmin, dmax, 136 + (rand() % 5), pt_darken, 20);	// FIXME - These should be green
				if ( !(rand() % 3) )
				{
					S_StartSound (TempSoundChannel(), 0, cl_sfx_dropfizzle, ex->origin, 1, 1);
				}
			}
		}

		ex->velocity[0] = 0;
		ex->velocity[1] = 0;
		ex->velocity[2] = 0;
		ex->avel[0] = 0;
		ex->avel[1] = 0;
		ex->avel[2] = 0;

		moving = 0;
	}

	if (cl.time + host_frametime * 5 > ex->endTime)
	{	// chunk leaves in 5 frames about
		switch ((int)ex->data)
		{
		case THINGTYPE_METEOR:
			if (cl.time + host_frametime * 4 < ex->endTime)
			{	// just crossed the threshold
				ex->abslight = 200;
			}
			else
			{
				ex->abslight -= 35;
			}
			ex->flags |= DRF_TRANSLUCENT|MLS_ABSLIGHT;
			ex->scale *= 1.4;
			ex->angles[0] += 20;
			break;
		default:
			ex->scale *= .8;
			break;
		}
	}

	ex->velocity[2] -= host_frametime * movevars.gravity; // this is gravity

	switch ((int)ex->data)
	{
	case THINGTYPE_GREYSTONE:
		break;
	case THINGTYPE_WOOD:
		break;
	case THINGTYPE_METAL:
		break;
	case THINGTYPE_FLESH:
		if (moving)
			R_RocketTrail (ex->oldorg, ex->origin, rt_blood);
		break;
	case THINGTYPE_FIRE:
		break;
	case THINGTYPE_CLAY:
		break;
	case THINGTYPE_LEAVES:
		break;
	case THINGTYPE_HAY:
		break;
	case THINGTYPE_BROWNSTONE:
	case THINGTYPE_DIRT:
		break;
	case THINGTYPE_CLOTH:
		break;
	case THINGTYPE_WOOD_LEAF:
		break;
	case THINGTYPE_WOOD_METAL:
		break;
	case THINGTYPE_WOOD_STONE:
		break;
	case THINGTYPE_METAL_STONE:
		break;
	case THINGTYPE_METAL_CLOTH:
		break;
	case THINGTYPE_WEBS:
		break;
	case THINGTYPE_GLASS:
		break;
	case THINGTYPE_ICE:
		ex->velocity[2] += host_frametime * movevars.gravity * 0.5; // lower gravity for ice chunks
		if (moving)
			R_RocketTrail (ex->oldorg, ex->origin, rt_ice);
		break;
	case THINGTYPE_CLEARGLASS:
		break;
	case THINGTYPE_REDGLASS:
		break;
	case THINGTYPE_ACID:
		if (moving)
			R_RocketTrail (ex->oldorg, ex->origin, 16);
		break;
	case THINGTYPE_METEOR:
		VectorCopy(ex->oldorg, oldorg);
		if (!moving)
		{	// resting meteors still give off smoke
			oldorg[0] += (rand() % 7) - 3;
			oldorg[1] += (rand() % 7) - 3;
			oldorg[2] += 16;
		}
		R_RocketTrail (oldorg, ex->origin, 1);
		break;
	case THINGTYPE_GREENFLESH:
		if (moving)
			R_RocketTrail (ex->oldorg, ex->origin, 16);
		break;
	}
}

static void BubbleThink(explosion_t *ex)
{
	mleaf_t		*l;

	l = Mod_PointInLeaf (ex->origin, cl.worldmodel);
	if (l->contents == CONTENTS_WATER) 
	{	//still in water
		if (ex->data < cl.time)//change course
		{
			ex->velocity[0] += (rand() % 20) - 10;
			ex->velocity[1] += (rand() % 20) - 10;
			ex->velocity[2] += (rand() % 10) + 10;

			if (ex->velocity[0] > 10)
				ex->velocity[0] = 5;
			if (ex->velocity[0] < -10)
				ex->velocity[0] = -5;

			if (ex->velocity[1] > 10)
				ex->velocity[1] = 5;
			if (ex->velocity[1] < -10)
				ex->velocity[1] = -5;

			if (ex->velocity[2] < 10)
				ex->velocity[2] = 15;
			if (ex->velocity[2] > 30)
				ex->velocity[2] = 25;

			ex->data += 0.5;
		}
	}
	else
	{
		ex->endTime= cl.time;
	}
}

static void MissileFlashThink(explosion_t *ex)
{
	ex->abslight-=(0.05*256);
	ex->scale+=5;
	if (ex->abslight < (0.05*256))
		ex->endTime = ex->startTime;	//remove
}


static void TeleportFlashThink(explosion_t *ex)
{
	ex->scale -= 15;
	if (ex->scale < 10)
		ex->endTime = ex->startTime;
}

// remove tent if not in open air
static void CheckSpaceThink(explosion_t *ex)
{
	mleaf_t		*l;

	l = Mod_PointInLeaf (ex->origin, cl.worldmodel);
	if (l->contents != CONTENTS_EMPTY) 
	{
		ex->endTime = ex->startTime;
	}
}

// functions to create tempents from client effect calls

void CreateRavenExplosions(vec3_t pos)
{
	explosion_t	*ex;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->velocity[2] = 8;
	ex->model = Mod_ForName("models/whtsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->origin[2] -= 5;
	ex->velocity[2] = 8;
	ex->model = Mod_ForName("models/whtsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->origin[2] -= 10;
	ex->velocity[2] = 8;
	ex->model = Mod_ForName("models/whtsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;
}

void CreateRavenDeath(vec3_t pos)
{
	explosion_t	*ex;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->velocity[1] = 8;
	ex->velocity[2] = -10;
	ex->model = Mod_ForName("models/whtsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->velocity[2] = -10;
	ex->model = Mod_ForName("models/redsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->velocity[1] = -8;
	ex->velocity[2] = -10;
	ex->model = Mod_ForName("models/whtsmk1.spr", true);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;
	
	S_StartSound(TempSoundChannel(), 1, cl_sfx_ravendie, pos, 1, 1);
}

void CreateExplosionWithSound(vec3_t pos)
{
	explosion_t	*ex;

	ex = CL_AllocExplosion ();
	VectorCopy(pos, ex->origin);
	ex->startTime = cl.time;
	ex->endTime = ex->startTime + HX_FRAME_TIME * 10;
	ex->model = Mod_ForName("models/sm_expld.spr", true);

	S_StartSound (TempSoundChannel(), 1, cl_sfx_explode, pos, 1, 1);
}

static void SwordFrameFunc(explosion_t *ex)
{
	ex->scale = (ex->endTime - cl.time)*150 + 1;
	if ( ((int)(cl.time * 20.0)) % 2 )
	{
		ex->skin = 0;
	}
	else
	{
		ex->skin = 1;
	}
}

static void zapFrameFunc(explosion_t *ex)
{
	ex->scale = (ex->endTime - cl.time)*(150/.3) + 1;
	//ex->abslight = (224/.3) * (ex->endTime - cl.time) + 1;
	if ( ((int)(cl.time * 20.0)) % 2 )
	{
		ex->skin = 0;
	}
	else
	{
		ex->skin = 1;
	}
}

static void fireBallUpdate(explosion_t *ex)
{
	ex->scale = (int)(((cl.time - ex->startTime) / 1.0) * 250) + 1;
}

static void sunBallUpdate(explosion_t *ex)
{
	ex->scale = 121 - (int)(((cl.time - ex->startTime) / .8) * 120);
}

static void sunPowerUpdate(explosion_t *ex)
{
}

#if 0	// not used
static void purify1Update(explosion_t *ex)
{
	R_RocketTrail (ex->oldorg, ex->origin, rt_purify);
	//R_RocketTrail (ex->oldorg, ex->origin, rt_setstaff);
}
#endif

void MeteorBlastThink(explosion_t *ex)
{
	int		i, maxI;
	mleaf_t		*l;
	explosion_t	*ex2;
	vec3_t		tempVect, oldPos;
	int		hitWall = 0;

	R_RocketTrail (ex->oldorg, ex->origin, rt_fireball);

	ex->data -= 1600 * host_frametime; // decrease distance, roughly...

	if (ex->data <= 0)
	{	// ran out of juice
		VectorCopy(ex->origin, oldPos);
		hitWall = 1;
	}
	else
	{
		VectorCopy(ex->oldorg, tempVect);

		for (i = 0; (i < 10) && (!hitWall); i++)
		{
			VectorCopy(tempVect, oldPos);
			VectorScale(ex->origin, .1 * (i+1), tempVect);
			VectorMA(tempVect, 1.0 - (.1 * (i+1)), ex->oldorg, tempVect);
			l = Mod_PointInLeaf (tempVect, cl.worldmodel);
			if (l->contents != CONTENTS_EMPTY)
			{
				hitWall = 1;
			}
		}
	}

	if (hitWall)
	{	//collided with world
		VectorCopy(oldPos, ex->origin);

		maxI = (host_frametime <= 0.05) ? 12:5;
		for (i = 0; i < maxI; i++)
		{
			ex2 = CL_AllocExplosion();
			VectorCopy(ex->origin, ex2->origin);
			ex2->origin[0] += (rand() % 10) - 5;
			ex2->origin[1] += (rand() % 10) - 5;
			ex2->origin[2] += (rand() % 10);

			ex2->velocity[0] = (ex2->origin[0] - ex->origin[0])*12;
			ex2->velocity[1] = (ex2->origin[1] - ex->origin[1])*12;
			ex2->velocity[2] = (ex2->origin[2] - ex->origin[2])*12;

			switch (rand() % 4)
			{
			case 0:
			case 1:
				ex2->model = Mod_ForName("models/sm_expld.spr", true);
				break;
			case 2:
				ex2->model = Mod_ForName("models/bg_expld.spr", true);
				break;
			case 3:
				ex2->model = Mod_ForName("models/gen_expl.spr", true);
				break;
			}
			ex2->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
			ex2->abslight = 160 + (rand() % 64);
			ex2->skin = 0;
			ex2->scale = 80 + (rand() % 40);
			ex2->startTime = cl.time + ((rand() % 30) / 200.0);
			ex2->endTime = ex2->startTime + ex2->model->numframes * 0.03;
		}
		if (rand() & 1)
		{
			S_StartSound (TempSoundChannel(), 0, cl_sfx_axeExplode, ex->origin, 1, 1);
		}

		ex->model = NULL;
		ex->endTime = cl.time;
	}
}

static void MeteorCrushSpawnThink(explosion_t *ex)
{
	float chance;
	explosion_t *ex2;

	if (host_frametime <= 0.05)
	{
		chance = (host_frametime / .4 * 16);
	}
	else
	{
		chance = (host_frametime / .4 * 8);
	}

	while (chance > 0)
	{
		if (chance < 1.0)
		{	// take care of fractional numbers of meteors...
			if (rand() % 100 > chance * 100)
			{
				return;
			}
		}

		ex2 = CL_AllocExplosion();
		VectorCopy(ex->origin, ex2->origin);
		ex2->origin[0] += (rand() % 160) - 80;
		ex2->origin[1] += (rand() % 160) - 80;
		ex2->model = Mod_ForName("models/tempmetr.mdl", true);
		ex2->startTime = cl.time;
		ex2->endTime = ex2->startTime + 2.0;
		ex2->frameFunc = MeteorBlastThink;

		ex2->exflags = EXFLAG_ROTATE;

		ex2->avel[0] = 800;
		ex2->avel[1] = 800;
		ex2->avel[2] = 800;

//		ex2->velocity[0] = (rand() % 1200) - 600;
//		ex2->velocity[1] = (rand() % 1200) - 600;
		ex2->velocity[0] = (rand() % 180) - 90;
		ex2->velocity[1] = (rand() % 180) - 90;
		ex2->velocity[2] = -1600 - (rand() % 200);
		ex2->data = ex->data;	// stores how far the thingy can travel max

		ex2->scale = 200 + (rand() % 120);

		chance -= 1.0;
	}
}

static void updateBloodRain(explosion_t *ex)
{
	R_RocketTrail (ex->oldorg, ex->origin, rt_blood);

	ex->scale -= host_frametime / .3 * 60;
	if (ex->scale <= 0)
	{
		ex->endTime = cl.time - 1;
	}
}

static void updatePurify2(explosion_t *ex)
{
	explosion_t	*ex2;
	int	numSprites;

	R_RocketTrail (ex->oldorg, ex->origin, rt_purify);

	if (host_frametime <= 0.05)
	{
		numSprites = 20;
	}
	else
	{
		numSprites = 8;
	}

	if ((rand() % 100) / 100.0 < numSprites * host_frametime)
	{
		ex2 = CL_AllocExplosion();
		VectorCopy(ex->origin, ex2->origin);
		ex2->model = Mod_ForName("models/ring.mdl", true);
		ex2->startTime = cl.time;
		ex2->endTime = ex2->startTime + 1.2;

		ex2->scale = 150;

		VectorCopy(ex->angles, ex2->angles);
		ex2->angles[2] += 90;
		ex2->exflags |= EXFLAG_STILL_FRAME;
		ex2->data = 0;
		ex2->skin = 0;
		ex2->frameFunc = SmokeRingFrameFunc;

		ex2->velocity[2] = 15.0;

		ex2->flags |= DRF_TRANSLUCENT | SCALE_ORIGIN_CENTER;
	}
}

static void updateSwordShot(explosion_t *ex)
{
	int testVal;

	R_RocketTrail (ex->oldorg, ex->origin, rt_vorpal);

	ex->data = 16 + ((int)(cl.time * 20.0)%13);

	ex->flags |= MLS_ABSLIGHT;
	ex->abslight = 128;

	testVal = (int)(cl.time * 20.0);

	if (testVal % 2)
	{
		ex->skin = 0;
	}
	else
	{
		ex->skin = 1;
	}
}

static void updateIceShot(explosion_t *ex)
{
	R_RocketTrail (ex->oldorg, ex->origin, rt_ice);
}

static void updateMeteor(explosion_t *ex)
{
	R_RocketTrail (ex->oldorg, ex->origin, rt_smoke);
}

static void updateAcidBlob(explosion_t *ex)
{
	explosion_t	*ex2;
	int testVal, testVal2;

	R_RocketTrail (ex->oldorg, ex->origin, rt_acidball);

	testVal = (int)(cl.time * 10.0);
	testVal2 = (int)((cl.time - host_frametime)*10.0);

	if (testVal != testVal2)
	{
		if ( !(testVal%2) )
		{
			ex2 = CL_AllocExplosion();
			VectorCopy(ex->origin, ex2->origin);
			ex2->model = Mod_ForName("models/muzzle1.spr", true);
			ex2->startTime = cl.time;
			ex2->endTime = ex2->startTime + .4;

			VectorCopy(ex->angles, ex2->angles);
			ex2->angles[2] += 90;
			//ex->exflags |= EXFLAG_STILL_FRAME;
			//ex->data = 0;
			ex2->skin = 0;

			ex2->velocity[0] = 0;
			ex2->velocity[1] = 0;
			ex2->velocity[2] = 0;

			ex2->flags |= DRF_TRANSLUCENT | SCALE_ORIGIN_CENTER;
		}
	}
}

static void updateAcidBall(explosion_t *ex)
{
	R_RocketTrail (ex->oldorg, ex->origin, rt_acidball);
}

//*****************************************************************************
//
//	FLAG UPDATE FUNCTIONS
//
//*****************************************************************************

void CL_UpdatePoisonGas(entity_t *ent, int edict_num)
{
	explosion_t	*ex;
	float		smokeCount;

	if (host_frametime <= 0.05)
	{
		smokeCount = 32 * host_frametime;
	}
	else
	{
		smokeCount = 16 * host_frametime;
	}

	while (smokeCount > 0)
	{
		if (smokeCount < 1.0)
		{
			if ((rand() % 100) / 100 > smokeCount)
			{	// account for fractional chance of more smoke...
				smokeCount = 0;
				continue;
			}
		}

		ex = CL_AllocExplosion();
		VectorCopy(ent->origin, ex->origin);
		ex->model = Mod_ForName("models/grnsmk1.spr", true);
		ex->startTime = cl.time;
		ex->endTime = ex->startTime + .7 + (rand() % 200)*.001;

		ex->scale = 100;

		VectorCopy(ent->angles, ex->angles);
		ex->angles[2] += 90;
		//ex->exflags |= EXFLAG_STILL_FRAME;
		//ex->data = 0;
		ex->skin = 0;

		ex->velocity[0] = (rand() % 100) - 50;
		ex->velocity[1] = (rand() % 100) - 50;
		ex->velocity[2] = 150.0;

		ex->flags |= DRF_TRANSLUCENT | SCALE_ORIGIN_CENTER;

		smokeCount -= 1.0;
	}
}

void CL_UpdateAcidBlob(entity_t *ent, int edict_num)
{
	explosion_t	*ex;
	int testVal, testVal2;

	testVal = (int)(cl.time * 10.0);
	testVal2 = (int)((cl.time - host_frametime)*10.0);

	if (testVal != testVal2)
	{
		if ( !(testVal%2) )
		{
			ex = CL_AllocExplosion();
			VectorCopy(ent->origin, ex->origin);
			ex->model = Mod_ForName("models/muzzle1.spr", true);
			ex->startTime = cl.time;
			ex->endTime = ex->startTime + .4;

			ex->scale = 100;

			VectorCopy(ent->angles, ex->angles);
			ex->angles[2] += 90;
			//ex->exflags |= EXFLAG_STILL_FRAME;
			//ex->data = 0;
			ex->skin = 0;

			ex->velocity[0] = 0;
			ex->velocity[1] = 0;
			ex->velocity[2] = 0;

			ex->flags |= DRF_TRANSLUCENT | SCALE_ORIGIN_CENTER;
		}
	}
}

void CL_UpdateOnFire(entity_t *ent, int edict_num)
{
	explosion_t *ex;

	if ((rand() % 100) / 100.0 < 5.0 * host_frametime)
	{
		ex = CL_AllocExplosion();
		VectorCopy(ent->origin, ex->origin);

		//raise and randomize origin some
		//ex->origin[0] += (rand() % ent->maxs[0]) - ent->maxs[0]/2;
		//ex->origin[1] += (rand() % ent->maxs[1]) - ent->maxs[1]/2;
		//ex->origin[2] += ent->maxs[2]/2;
		ex->origin[0] += (rand() % 10) - 5;
		ex->origin[1] += (rand() % 10) - 5;
		ex->origin[2] += (rand() % 20) + 10;//at least 10 up from origin, sprite's origin is in center!

		switch (rand() % 3)
		{
		case 0:
			ex->model = Mod_ForName("models/firewal1.spr", true);
			break;
		case 1:
			ex->model = Mod_ForName("models/firewal2.spr", true);
			break;
		case 2:
			ex->model = Mod_ForName("models/firewal3.spr", true);
			break;
		}

		ex->startTime = cl.time;
		ex->endTime = ex->startTime + ex->model->numframes * 0.05;

		ex->scale = 100;

		VectorCopy(ent->angles, ex->angles);
		ex->angles[2] += 90;

		ex->velocity[0] = (rand() % 40) - 20;
		ex->velocity[1] = (rand() % 40) - 20;
		ex->velocity[2] = 50 + (rand() % 100);

		if (rand() % 5)	//translucent 80% of the time
			ex->flags |= DRF_TRANSLUCENT;
	}
}

static void PowerFlameBurnRemove(explosion_t *ex)
{
	explosion_t *ex2;

	ex2 = CL_AllocExplosion();
	VectorCopy(ex->origin, ex2->origin);
	switch (rand() % 3)
	{
	case 0:
		ex2->model = Mod_ForName("models/sm_expld.spr", true);
		break;
	case 1:
		ex2->model = Mod_ForName("models/fboom.spr", true);
		break;
	case 2:
		ex2->model = Mod_ForName("models/pow.spr", true);
		break;
	}
	ex2->startTime = cl.time;
	ex2->endTime = ex2->startTime + ex2->model->numframes * 0.05;

	ex2->scale = 100;

	ex2->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
	ex2->abslight = 128;

	if (rand() & 1)
		S_StartSound(TempSoundChannel(), 1, cl_sfx_flameend, ex2->origin, 1, 1);
}

void CL_UpdatePowerFlameBurn(entity_t *ent, int edict_num)
{
	explosion_t *ex, *ex2;
	vec3_t		srcVec;

	if ((rand() % 100) / 100.0 < host_frametime * 10)
	{
		ex = CL_AllocExplosion();
		VectorCopy(ent->origin, ex->origin);
		ex->origin[0] += (rand() % 120) - 60;
		ex->origin[1] += (rand() % 120) - 60;
		ex->origin[2] += (rand() % 120) - 60 + 120;
		ex->model = Mod_ForName("models/sucwp1p.mdl", true);
		ex->startTime = cl.time;
		ex->endTime = ex->startTime + .25;
		ex->removeFunc = PowerFlameBurnRemove;

		ex->scale = 100;

		VectorSubtract(ent->origin, ex->origin, srcVec);
		VectorCopy(srcVec, ex->velocity);
		ex->velocity[2] += 24;
		VectorScale(ex->velocity, 1.0 / .25, ex->velocity);
		VectorNormalize(srcVec);
		vectoangles(srcVec, ex->angles);

		ex->flags |= MLS_ABSLIGHT;//|DRF_TRANSLUCENT;
		ex->abslight = 128;

		// I'm not seeing this right now... (?)
		ex2 = CL_AllocExplosion();
		VectorCopy(ex->origin, ex2->origin);
		ex2->model = Mod_ForName("models/flamestr.spr", true);
		ex2->startTime = cl.time;
		ex2->endTime = ex2->startTime + ex2->model->numframes * 0.05;
		ex2->flags |= DRF_TRANSLUCENT;
	}
}

void CL_UpdateHammer(entity_t *ent, int edict_num)
{
	int testVal, testVal2;

	// do this every .3 seconds
	testVal = (int)(cl.time * 10.0);
	testVal2 = (int)((cl.time - host_frametime)*10.0);

	if (testVal != testVal2)
	{
		if ( !(testVal%3) )
		{
			//S_StartSound(TempSoundChannel(), 1, cl_sfx_hammersound, ent->origin, 1, 1);
			S_StartSound(edict_num, 2, cl_sfx_hammersound, ent->origin, 1, 1);
		}
	}
}

void CL_UpdateBug(entity_t *ent)
{
	int testVal, testVal2;

	testVal = (int)(cl.time * 10.0);
	testVal2 = (int)((cl.time - host_frametime)*10.0);

	if (testVal != testVal2)
	{
	// do this every .1 seconds
//		if ( !(testVal%3) )
//		{
			S_StartSound(TempSoundChannel(), 1, cl_sfx_buzzbee, ent->origin, 1, 1);
//		}
	}
}

void CL_UpdateIceStorm(entity_t *ent, int edict_num)
{
	vec3_t		center, side1;
	vec3_t		side2 = {160, 160, 128};
	entity_state_t	*state;

	state = FindState(edict_num);
	if (state)
	{
		VectorCopy(state->origin, center);

		// handle the particles
		VectorCopy(center, side1);
		side1[0] -= 80;
		side1[1] -= 80;
		side1[2] += 104;
		R_RainEffect2(side1, side2, (rand() % 400) - 200, (rand() % 400) - 200, (rand() % 15) + 9*16, (int)(30*20*host_frametime));

		playIceSound+=host_frametime;
		if (playIceSound >= .6)
		{
			S_StartSound (TempSoundChannel(), 0, cl_sfx_icestorm, center, 1, 1);
			playIceSound -= .6;
		}
	}

	// toss little ice chunks
	if (rand() % 100 < host_frametime * 100.0 * 3)
	{
		explosion_t *ex;

		ex = CL_AllocExplosion();
		VectorCopy(ent->origin,ex->origin);
		ex->origin[0] += (rand() % 32) - 16;
		ex->origin[1] += (rand() % 32) - 16;
		ex->origin[2] += 48 + (rand() % 32);
		ex->frameFunc = ChunkThink;

		ex->velocity[0] += (rand() % 300) - 150;
		ex->velocity[1] += (rand() % 300) - 150;
		ex->velocity[2] += (rand() % 200) - 50;

		// are these in degrees or radians?
		ex->angles[0] = (rand() % 360);
		ex->angles[1] = (rand() % 360);
		ex->angles[2] = (rand() % 360);
		ex->exflags = EXFLAG_ROTATE;

		ex->avel[0] = (rand() % 850) - 425;
		ex->avel[1] = (rand() % 850) - 425;
		ex->avel[2] = (rand() % 850) - 425;

		ex->scale = 65 + (rand() % 10);

		ex->data = THINGTYPE_ICE;

		ex->model = Mod_ForName("models/shard.mdl", true);
		ex->skin = 0;
		//ent->frame = rand() % 2;
		ex->flags |= DRF_TRANSLUCENT|MLS_ABSLIGHT;
		ex->abslight = 128;

		ex->startTime = cl.time;
		ex->endTime = ex->startTime + 2.0;
	}
}

static void telPuffMove (explosion_t *ex)
{
	vec3_t	tvec, tvec2;

	VectorSubtract(ex->angles, ex->origin, tvec);
	VectorCopy(tvec,tvec2);
	VectorNormalize(tvec);
	VectorScale(tvec,320,tvec);

	ex->velocity[0] = tvec[1];
	ex->velocity[1] = -tvec[0];
	ex->velocity[2] += FRANDOM();

	if (ex->velocity[2] > 40)
	{
		ex->velocity[2] = 30;
	}

	//keep it from getting too spread out:
	ex->velocity[0] += tvec2[0];
	ex->velocity[1] += tvec2[1];

	R_RocketTrail (ex->oldorg, ex->origin, rt_magicmissile);

//	ex->accel[0] = ex->velocity[1]*5;
//	ex->accel[1] = -ex->velocity[0]*5;
//	ex->accel[2] += FRANDOM()*3.0;
}

static void telEffectUpdate (explosion_t *ex)
{
	explosion_t	*ex2;
	float	angle;
	int	testVal, testVal2;
	vec3_t	tvec;

	if (ex->endTime - cl.time <= 1.2)
		ex->frameFunc = NULL;

	testVal = (int)(cl.time * 10.0);
	testVal2 = (int)((cl.time - host_frametime)*10.0);

	if (testVal != testVal2)
	{
		if ( !(testVal%3) )
		{
			ex2 = CL_AllocExplosion();
			angle = FRANDOM() * 3.14159;

			VectorCopy(ex->origin,ex2->origin);
			VectorCopy(ex->origin,ex2->angles);
			ex2->origin[0] += cos(angle)*10;
			ex2->origin[1] += sin(angle)*10;

			VectorSubtract(ex->origin, ex2->origin, tvec);
			VectorScale(tvec,20,tvec);
			ex2->model = Mod_ForName("models/sm_blue.spr", true);
			ex2->startTime = cl.time;
			ex2->endTime = ex2->startTime + 3.2;

			ex2->scale = 100;

			ex2->data = 0;
			ex2->skin = 0;
			ex2->frameFunc = telPuffMove;

			ex2->velocity[0] = tvec[1];
			ex2->velocity[1] = -tvec[0];
			ex2->velocity[2] = 20.0;

			ex2->flags |= MLS_ABSLIGHT;
			ex2->abslight = 128;
		}
	}

	if (ex->endTime > cl.time + 0.01)
	{
		ex->startTime = cl.time + 0.01;
	}
}

static void CL_UpdateTargetBall(void)
{
	int	i;
	explosion_t *ex1 = NULL;
	explosion_t *ex2 = NULL;
	model_t		*iceMod;
	vec3_t		newOrg;
	float		newScale;

	if (v_targDist < 24)
	{	// either there is no ball, or it's too close to be needed...
		return;
	}

	// search for the two thingies.  If they
	// don't exist, make new ones and set v_oldTargOrg

	iceMod = Mod_ForName("models/iceshot2.mdl", true);

	for (i = 0; i < MAX_EXPLOSIONS; i++)
	{
		if (cl_explosions[i].endTime > cl.time)
		{	// make certain it's an active one
			if (cl_explosions[i].model == iceMod)
			{
				if (cl_explosions[i].flags & DRF_TRANSLUCENT)
				{
					ex1 = &cl_explosions[i];
				}
				else
				{
					ex2 = &cl_explosions[i];
				}
			}
		}
	}

	VectorCopy(cl.simorg, newOrg);
	newOrg[0] += cos(v_targAngle*M_PI*2/256.0) * 50 * cos(v_targPitch*M_PI*2/256.0);
	newOrg[1] += sin(v_targAngle*M_PI*2/256.0) * 50 * cos(v_targPitch*M_PI*2/256.0);
	newOrg[2] += 44 + sin(v_targPitch*M_PI*2/256.0) * 50 + cos(cl.time*2)*5;

	if (v_targDist < 60)
	{	// make it scale back down up close...
		newScale = 172 - (172 * (1.0 - (v_targDist - 24.0)/36.0));
	}
	else
	{
		newScale = 80 + (120 * ((256.0 - v_targDist)/256.0));
	}

	if (ex1 == NULL)
	{
		ex1 = CL_AllocExplosion();
		ex1->model = iceMod;
		ex1->exflags |= EXFLAG_STILL_FRAME;
		ex1->data = 0;

		ex1->flags |= MLS_ABSLIGHT|DRF_TRANSLUCENT;
		ex1->skin = 0;
		VectorCopy(newOrg, ex1->origin);
		ex1->scale = newScale;
	}

	VectorScale(ex1->origin, (.75 - host_frametime * 1.5), ex1->origin);	// FIXME this should be affected by frametime...
	VectorMA(ex1->origin, (.25 + host_frametime * 1.5), newOrg, ex1->origin);
	ex1->startTime = cl.time;
	ex1->endTime = ex1->startTime + host_frametime + 0.2;
	ex1->scale = (ex1->scale * (.75 - host_frametime * 1.5) + newScale * (.25 + host_frametime * 1.5));
	ex1->angles[0] = v_targPitch*360/256.0;
	ex1->angles[1] = v_targAngle*360/256.0;
	ex1->angles[2] = cl.time * 240;
	ex1->abslight = 96 + (32 * cos(cl.time*6.5)) + (64 * ((256.0 - v_targDist)/256.0));

	if (v_targDist < 60)
	{	// make it scale back down up close...
		newScale = 76 - (76 * (1.0 - (v_targDist - 24.0)/36.0));
	}
	else
	{
		newScale = 30 + (60 * ((256.0 - v_targDist)/256.0));
	}

	if (ex2 == NULL)
	{
		ex2 = CL_AllocExplosion();
		ex2->model = iceMod;
		ex2->exflags |= EXFLAG_STILL_FRAME;
		ex2->data = 0;

		ex2->flags |= MLS_ABSLIGHT;
		ex2->skin = 0;
		ex2->scale = newScale;
	}
	VectorCopy(ex1->origin, ex2->origin);
	ex2->startTime = cl.time;
	ex2->endTime = ex2->startTime + host_frametime + 0.2;
	ex2->scale = (ex2->scale * (.75 - host_frametime * 1.5) + newScale * (.25 + host_frametime * 1.5));
	ex2->angles[0] = ex1->angles[0];
	ex2->angles[1] = ex1->angles[1];
	ex2->angles[2] = cl.time * -360;
	ex2->abslight = 96 + (128 * cos(cl.time*4.5));

	R_TargetBallEffect (ex1->origin);
}

static void SmokeRingFrameFunc(explosion_t *ex)
{
	if (cl.time - ex->startTime < .3)
	{
		ex->skin = 0;
	}
	else if (cl.time - ex->startTime < .6)
	{
		ex->skin = 1;
	}
	else if (cl.time - ex->startTime < .9)
	{
		ex->skin = 2;
	}
	else
	{
		ex->skin = 3;
	}
}