//::///////////////////////////////////////////////
//:: Badial (More Hurt)
//:: badial.nss
//:: Copyright (c) 2025 WizardryEE Project
//:://////////////////////////////////////////////
/*
    Causes 2d8 (2-16) points of damage to a monster.
    Level 4 Priest spell.
    
    In Wizardry: Proving Grounds of the Mad Overlord,
    this is a Level 4 Priest attack spell that targets
    one monster.
*/
//:://////////////////////////////////////////////
//:: Created By: WizardryEE Project
//:: Created On: April 26, 2025
//:://////////////////////////////////////////////

void main()
{
    // Spell implementation for WizardryEE
    // Core functionality: Deal 2d8 damage to a monster
    
    // 1. Get caster information
    object oCaster = OBJECT_SELF;
    
    // 2. Get the target
    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);
    }
    
    // 3. Check if target is valid and is an enemy
    if (GetIsObjectValid(oTarget) && GetIsEnemy(oTarget, oCaster))
    {
        // 4. Calculate damage
        int nDamage = d8(2); // 2d8 damage
        
        // 5. Create the damage effect
        effect eDamage = EffectDamage(nDamage, DAMAGE_TYPE_NEGATIVE);
        effect eVis = EffectVisualEffect(40); // Negative energy visual effect
        
        // 6. Apply the effects
        // Signal spell cast at event
        SignalEvent(oTarget, EventSpellCastAt(oCaster, 25)); // Inflict Moderate Wounds spell ID
        
        // Apply the visual and damage effects
        ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
        ApplyEffectToObject(DURATION_TYPE_INSTANT, eDamage, oTarget);
        
        // 7. Notify the caster
        FloatingTextStringOnCreature("BADIAL: Dealt " + IntToString(nDamage) + " damage to " + GetName(oTarget), oCaster, TRUE);
    }
    else
    {
        // Notify if no valid target
        FloatingTextStringOnCreature("BADIAL: No valid target found", oCaster, TRUE);
    }
}