//::///////////////////////////////////////////////
//:: Montino (Still Air)
//:: montino.nss
//:: Copyright (c) 2025 WizardryEE Project
//:://////////////////////////////////////////////
/*
    Attempts to silence a monster group, making it
    impossible for them to cast spells.
    Level 2 Priest spell.
    
    In Wizardry: Proving Grounds of the Mad Overlord,
    this is a Level 2 Priest disable spell that targets
    a monster group.
*/
//:://////////////////////////////////////////////
//:: Created By: WizardryEE Project
//:: Created On: April 26, 2025
//:://////////////////////////////////////////////

void main()
{
    // Spell implementation for WizardryEE
    // Core functionality: Silence a group of monsters
    
    // 1. Get caster information
    object oCaster = OBJECT_SELF;
    
    // 2. Calculate duration and save DC (based on caster level)
    int nCasterLevel = GetLevelByClass(CLASS_TYPE_CLERIC, oCaster);
    if (nCasterLevel < 1) nCasterLevel = 2; // Minimum level 2 for this spell
    float fDuration = RoundsToSeconds(nCasterLevel); // Lasts for rounds equal to caster level
    int nDC = 10 + nCasterLevel;
    
    // 3. Create the silence effect
    effect eSilence = EffectSilence();
    effect eVis = EffectVisualEffect(56); // Generic silence visual effect
    effect eLink = EffectLinkEffects(eSilence, EffectVisualEffect(78)); // Silence duration visual
    
    // 4. Get the target monster group
    object oTarget = GetSpellTargetObject();
    if (!GetIsObjectValid(oTarget))
    {
        // If no specific target, get the nearest enemy
        oTarget = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, oCaster, 1, CREATURE_TYPE_PERCEPTION, PERCEPTION_SEEN, CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_ENEMY);
    }
    
    // 5. Apply to all monsters in the group
    if (GetIsObjectValid(oTarget))
    {
        // Get the faction/group of the target
        object oFaction = GetFactionLeader(oTarget);
        
        // Apply to all members of the faction/group
        object oMember = GetFirstFactionMember(oFaction);
        while (GetIsObjectValid(oMember))
        {
            // Only affect enemies
            if (GetIsEnemy(oMember, oCaster))
            {
                // Signal spell cast at event
                SignalEvent(oMember, EventSpellCastAt(oCaster, 85)); // Silence spell ID
                
                // Allow saving throw to resist
                if (!WillSave(oMember, nDC, 1)) // 1 = Spell saving throw type
                {
                    // Apply silence effect
                    ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oMember);
                    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oMember, fDuration);
                    
                    // Notify success
                    FloatingTextStringOnCreature(GetName(oMember) + " is silenced!", oCaster, TRUE);
                }
                else
                {
                    // Notify resistance
                    FloatingTextStringOnCreature(GetName(oMember) + " resisted silence!", oCaster, TRUE);
                }
            }
            
            // Get next faction member
            oMember = GetNextFactionMember(oFaction);
        }
    }
}