28 lines
1022 B
Plaintext
28 lines
1022 B
Plaintext
///////////////////////////////////////////////////////////////////////////////
|
|
// Real Time Strategy - NWN - Vamp Birth Placeable
|
|
//=============================================================================
|
|
// By Deva Bryson Winblood. 03/05/2003
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
void fnCreateVamp()
|
|
{ // make a vampire
|
|
location lLoc=GetLocation(OBJECT_SELF);
|
|
effect eVFX=EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD);
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT,eVFX,lLoc,1.0);
|
|
object oNew=CreateObject(OBJECT_TYPE_CREATURE,"und1",lLoc,TRUE);
|
|
DelayCommand(3.0,SetLocalInt(oNew,"nMState",4)); // protect
|
|
DelayCommand(3.0,SetLocalObject(oNew,"oDestWP",GetNearestObjectByTag("und25",oNew)));
|
|
} // fnCreateVamp()
|
|
|
|
|
|
void main()
|
|
{
|
|
int nSet=GetLocalInt(OBJECT_SELF,"nSet");
|
|
if (nSet!=TRUE)
|
|
{ // activate
|
|
DelayCommand(10.0,fnCreateVamp());
|
|
DelayCommand(30.0,DestroyObject(OBJECT_SELF));
|
|
SetLocalInt(OBJECT_SELF,"nSet",TRUE);
|
|
} // activate
|
|
}
|