//::///////////////////////////////////////////////
//:: Mighty Rage
//:: X2_S2_MghtyRage
//:: Copyright (c) 2001 Bioware Corp.
//:://////////////////////////////////////////////
/*
    The Str and Con of the Barbarian increases,
    Will Save are +2, AC -2.
    Greater Rage starts at level 15.
*/
//:://////////////////////////////////////////////
//:: Created By: Andrew Nobbs
//:: Created On: May 16, 2003
//:://////////////////////////////////////////////

// *** Conplete redesign of the feat by Tarashon for the Alangara PW *** //

// *** It now gives ConBonus*2 regeneration, ConBonus Magical Damage and the +4 saves. Duration ConBonus +10 *** //


//#include "x2_i0_spells" #include "prc_inc_spells"
void main()
{
    if(!GetHasFeatEffect(FEAT_BARBARIAN_RAGE))
    {
        //Declare major variables
        int nLevel = GetLevelByClass(CLASS_TYPE_BARBARIAN);
        PlayVoiceChat(VOICE_CHAT_BATTLECRY1);
        //Determine the duration by getting the con modifier after being modified

        int nCon = 4 + GetAbilityModifier(ABILITY_CONSTITUTION) + 8;

        // *** Tarashon Defines how much damage bonus will be *** //

        int nCon2 = GetAbilityModifier(ABILITY_CONSTITUTION)+2;

        // *** Tarashon Define how much regeneration will be *** //

        int nCon3 = (GetAbilityModifier(ABILITY_CONSTITUTION)+2)*2;

        // *** Tarashon modify normal stats bonusses ( from +8 ) *** //

        effect eStr = EffectAbilityIncrease(ABILITY_CONSTITUTION, 4);
        effect eCon = EffectAbilityIncrease(ABILITY_STRENGTH, 4);

        // *** Tarashon Defines the new powers *** //

        effect eReg;
        eReg = EffectRegenerate(nCon3, 6.0);

        int nDamage1 = IPGetDamageBonusConstantFromNumber(nCon2);

        effect eDam;
        eDam = EffectDamageIncrease(nDamage1, DAMAGE_TYPE_MAGICAL);

        // *** Tarashon's Definitions done *** //

        effect eSave = EffectSavingThrowIncrease(SAVING_THROW_WILL, 4);
        effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);

        // *** Tarashon adding modified eStr and eCon to the new eReg and eDam *** //

        effect eLink = EffectLinkEffects(eReg, eDam);
        eLink = EffectLinkEffects(eLink, eStr);
        eLink = EffectLinkEffects(eLink, eCon);

        // *** Tarashon done modifying *** //

        eLink = EffectLinkEffects(eLink, eSave);
        eLink = EffectLinkEffects(eLink, eDur);
        SignalEvent(OBJECT_SELF, EventSpellCastAt(OBJECT_SELF, GetSpellId(), FALSE));
        //Make effect extraordinary
        eLink = ExtraordinaryEffect(eLink);
        effect eVis = EffectVisualEffect(VFX_IMP_IMPROVE_ABILITY_SCORE); //Change to the Rage VFX

        if (nCon > 0)
        {
            //Apply the VFX impact and effects
            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, OBJECT_SELF, RoundsToSeconds(nCon));
            ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, OBJECT_SELF) ;


                    // 2003-07-08, Georg: Rage Epic Feat Handling
                CheckAndApplyEpicRageFeats(nCon);
        }
    }
}