28 lines
1.2 KiB
Plaintext
28 lines
1.2 KiB
Plaintext
void main()
|
|
{
|
|
object oCaster = OBJECT_SELF;
|
|
float fDelay;
|
|
effect eExplode = EffectVisualEffect(VFX_FNF_GAS_EXPLOSION_MIND);
|
|
effect eVis = EffectVisualEffect(VFX_FNF_HORRID_WILTING);
|
|
effect eShk = EffectVisualEffect(VFX_FNF_SCREEN_SHAKE);
|
|
effect eDam;
|
|
location lTarget = GetLocation(OBJECT_SELF);
|
|
int bdam = d20(8) + 50;
|
|
int pdam = d10(8) + 50;
|
|
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eExplode, lTarget);
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk, lTarget);
|
|
object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_LARGE, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
|
|
while (GetIsObjectValid(oTarget))
|
|
{
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(pdam, DAMAGE_TYPE_PIERCING), oTarget, 0.0f);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(bdam, DAMAGE_TYPE_SONIC), oTarget, 0.0f);
|
|
DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget));
|
|
oTarget = GetNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_MEDIUM, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
}
|
|
CreateObject(OBJECT_TYPE_CREATURE, "purpworm", lTarget, TRUE);
|
|
ActionDoCommand(PlaySound("al_na_lavapillr1"));
|
|
DestroyObject(OBJECT_SELF);
|
|
}
|