void main()
{
    location lLocation= GetLocation(OBJECT_SELF);
    effect eShk = EffectVisualEffect(VFX_COM_BLOOD_SPARK_LARGE);
    object oPartyMember = GetFirstObjectInShape(SHAPE_SPHERE, 80.0f, lLocation, FALSE, OBJECT_TYPE_CREATURE);

    while (GetIsObjectValid(oPartyMember) == TRUE)
    {
    AssignCommand(oPartyMember, ActionPlayAnimation(ANIMATION_LOOPING_SPASM, 1.0, 2.0));
    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(100, DAMAGE_TYPE_BLUDGEONING), oPartyMember, 0.0f);

    DelayCommand(1.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, eShk, oPartyMember));

    DelayCommand(2.0, AssignCommand(oPartyMember, PlayVoiceChat(VOICE_CHAT_PAIN3)));

    oPartyMember = GetNextObjectInShape(SHAPE_CUBE, 80.0f, lLocation, TRUE, OBJECT_TYPE_CREATURE);
    }
}