101 lines
2 KiB
C++
101 lines
2 KiB
C++
|
/*
|
||
|
|
* $Header: /HexenWorld/HCode/glyph.hc 1 2/04/98 1:59p Rjohnson $
|
||
|
|
*/
|
||
|
|
|
||
|
|
void (float explodetype) BecomeExplosion ;
|
||
|
|
|
||
|
|
void () TouchGlyph =
|
||
|
|
{
|
||
|
|
local float damg;
|
||
|
|
|
||
|
|
WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
|
||
|
|
WriteByte (MSG_BROADCAST, TE_EXPLOSION);
|
||
|
|
WriteCoord (MSG_BROADCAST, self.origin_x);
|
||
|
|
WriteCoord (MSG_BROADCAST, self.origin_y);
|
||
|
|
WriteCoord (MSG_BROADCAST, self.origin_z);
|
||
|
|
|
||
|
|
BecomeExplosion (FALSE);
|
||
|
|
|
||
|
|
damg = GLYPH_BASE_DAMAGE + random(GLYPH_ADD_DAMAGE);
|
||
|
|
|
||
|
|
self.owner = self;
|
||
|
|
|
||
|
|
if (other.health)
|
||
|
|
T_Damage (other, self, self.owner, damg );
|
||
|
|
|
||
|
|
// don't do radius damage to the other, because all the damage
|
||
|
|
// was done in the impact
|
||
|
|
T_RadiusDamage (self, self.owner, damg, other);
|
||
|
|
T_RadiusManaDamage (self, self.owner, damg, other);
|
||
|
|
|
||
|
|
remove(self);
|
||
|
|
};
|
||
|
|
|
||
|
|
void () DecrementGlyph =
|
||
|
|
{
|
||
|
|
|
||
|
|
if (self.lifetime > time)
|
||
|
|
{
|
||
|
|
self.nextthink = time + 1;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
TouchGlyph ();
|
||
|
|
|
||
|
|
};
|
||
|
|
|
||
|
|
void () Use_Glyph =
|
||
|
|
{
|
||
|
|
local entity glyph;
|
||
|
|
|
||
|
|
glyph = spawn();
|
||
|
|
|
||
|
|
glyph.owner = self;
|
||
|
|
|
||
|
|
// precache_model("models/glyph.mdl");
|
||
|
|
CreateEntityNew(self,ENT_GLYPH,"models/glyph.mdl",SUB_Null);
|
||
|
|
|
||
|
|
glyph.touch = TouchGlyph;
|
||
|
|
glyph.classname = "running_glyph";
|
||
|
|
|
||
|
|
setorigin (glyph, self.origin);
|
||
|
|
|
||
|
|
glyph.think = DecrementGlyph;
|
||
|
|
glyph.nextthink = time + 1;
|
||
|
|
glyph.lifetime = time + 10;
|
||
|
|
|
||
|
|
};
|
||
|
|
|
||
|
|
/*
|
||
|
|
* $Log: /HexenWorld/HCode/glyph.hc $
|
||
|
|
*
|
||
|
|
* 1 2/04/98 1:59p Rjohnson
|
||
|
|
*
|
||
|
|
* 11 6/21/97 10:09a Rlove
|
||
|
|
*
|
||
|
|
* 10 6/18/97 6:36p Mgummelt
|
||
|
|
*
|
||
|
|
* 9 6/04/97 8:16p Mgummelt
|
||
|
|
*
|
||
|
|
* 8 5/28/97 8:13p Mgummelt
|
||
|
|
*
|
||
|
|
* 7 5/28/97 10:45a Rlove
|
||
|
|
* Moved sprite effects to client side - smoke, explosions, and flashes.
|
||
|
|
*
|
||
|
|
* 6 4/30/97 5:03p Mgummelt
|
||
|
|
*
|
||
|
|
* 5 3/27/97 11:26a Rlove
|
||
|
|
* More precache model clean up
|
||
|
|
*
|
||
|
|
* 4 3/19/97 5:56p Jweier
|
||
|
|
* added CreateEntity (was backed up!)
|
||
|
|
*
|
||
|
|
* 3 1/06/97 3:28p Rlove
|
||
|
|
* Now blows up when someone comes in contact with it.
|
||
|
|
*
|
||
|
|
* 2 12/31/96 8:39a Rlove
|
||
|
|
* Glyph of the Ancients is working
|
||
|
|
*
|
||
|
|
* 1 12/30/96 10:27a Rlove
|
||
|
|
*/
|