49 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			49 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
//::///////////////////////////////////////////////
 | 
						|
//:: Bolt: Charisma Drain
 | 
						|
//:: NW_S1_BltChrDr
 | 
						|
//:: Copyright (c) 2001 Bioware Corp.
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
/*
 | 
						|
    Creature must make a ranged touch attack to hit
 | 
						|
    the intended target.  Fortitude  save is
 | 
						|
    needed to avoid effect.
 | 
						|
*/
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
//:: Created By: Preston Watamaniuk
 | 
						|
//:: Created On: May 11 , 2001
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
#include "NW_I0_SPELLS"
 | 
						|
#include "prc_inc_spells"
 | 
						|
//#include "wm_include"
 | 
						|
 | 
						|
void main()
 | 
						|
{
 | 
						|
    //if (WildMagicOverride()) { return; }
 | 
						|
	
 | 
						|
//:: Declare major variables
 | 
						|
	object oNPC		= OBJECT_SELF;
 | 
						|
	object oTarget 	= PRCGetSpellTargetObject();
 | 
						|
	
 | 
						|
    int nHD 		= GetHitDice(oNPC);
 | 
						|
	int nCHAMod		= GetAbilityModifier(ABILITY_CHARISMA, oNPC);
 | 
						|
    int nDC			= 10 +nCHAMod+ (nHD/2);
 | 
						|
	int nCount 		= nHD / 3;
 | 
						|
    if (nCount == 0) { nCount = 1; }
 | 
						|
	int nDamage 	= d6(nCount);
 | 
						|
	
 | 
						|
    effect eVis = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
 | 
						|
    effect eBolt;
 | 
						|
 | 
						|
    //Fire cast spell at event for the specified target
 | 
						|
    SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELLABILITY_BOLT_ABILITY_DRAIN_CHARISMA));
 | 
						|
    //Make a saving throw check
 | 
						|
    if (!/*Fort Save*/ PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_NEGATIVE) && TouchAttackRanged(oTarget))
 | 
						|
    {
 | 
						|
        eBolt = EffectAbilityDecrease(ABILITY_CHARISMA, nCount);
 | 
						|
        eBolt = SupernaturalEffect(eBolt);
 | 
						|
        //Apply the VFX impact and effects
 | 
						|
        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eBolt, oTarget, RoundsToSeconds(nHD));
 | 
						|
        ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
 | 
						|
    }
 | 
						|
}
 |