Spell & Ability Upgrade

Reorganized hak files & removed duplicates. Added @rafhot's PRC spell & ability level scaling expansion. Further script integration. Full compile.
2023-08-19 21:08:35 -04:00
parent a911002fe6
commit 7dd83ad168
1466 changed files with 4010 additions and 21168 deletions
--- a/_haks/poa_exp_spells/sp_rain_ember.nss
+++ b/_haks/poa_exp_spells/sp_rain_ember.nss
@@ -0,0 +1,135 @@
+//::///////////////////////////////////////////////
+//:: Name      Rain of Embers
+//:: FileName  sp_rain_ember.nss
+//:://////////////////////////////////////////////
+/**@file Rain of Embers
+Evocation [Fire, Good] 
+Level: Sanctified 7 
+Components: V, S, Sacrifice 
+Casting Time: 1 standard action 
+Range: Medium (100 ft. + 10 ft./level) 
+Area: Cylinder (40-ft. radius, 120 ft. high)
+Duration: 1 round/level (D) 
+Saving Throw: Reflex half; see text 
+Spell Resistance: Yes
+
+This spell causes orange, star-like embers to rain 
+steadily from above. Each round, the falling embers
+deal 10d6 points of damage to evil creatures within
+the spell's area. Half of the damage is fire damage,
+but the other half results directly from divine 
+power and is therefore not subject to being reduced
+by resistance to fire-based attacks, such as that 
+granted by protection from energy (fire), 
+fire shield (chill shield), and similar magic. 
+Creatures may leave the area to avoid taking 
+additional damage, but a new saving throw is required
+each round a creature is caught in the Fiery downpour.
+
+A shield provides a cover bonus on the Reflex save,
+depending on its size small +2, large +4, tower +7.
+A shield spell oriented upward provides a +4 cover 
+bonus on the Reflex save. A creature using its 
+shield (or shield spell) to block the rain of embers
+cannot use it for defense in combat.
+
+Sacrifice: 1d2 points of Strength drain.
+
+Author:    Tenjac
+Created:   6/21/06
+*/
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+
+void EmberLoop(int nCounter, int nCasterLvl, int nMetaMagic, object oPC, location lLoc);
+
+#include "prc_inc_spells"
+#include "prc_add_spell_dc"
+void main()
+{
+	if(!X2PreSpellCastCode()) return;
+	
+	PRCSetSchool(SPELL_SCHOOL_EVOCATION);
+	
+	object oPC = OBJECT_SELF;
+	location lLoc = PRCGetSpellTargetLocation();
+	int nCasterLvl = PRCGetCasterLevel(oPC);
+	float fDur = RoundsToSeconds(nCasterLvl);
+	int nCounter = FloatToInt(fDur/6);
+	int nMetaMagic = PRCGetMetaMagicFeat();
+	
+	if(nMetaMagic & METAMAGIC_EXTEND)
+	{
+		fDur += fDur;
+	}
+	
+	//VFX
+	ApplyEffectAtLocation(DURATION_TYPE_TEMPORARY, EffectVisualEffect(VFX_FNF_FIRESTORM), lLoc, fDur);
+	
+	EmberLoop(nCounter, nCasterLvl, nMetaMagic, oPC, lLoc);
+	
+	DoCorruptionCost(oPC, ABILITY_STRENGTH, d2(), 1);
+	
+	//Sanctified spells get mandatory 10 pt good adjustment, regardless of switch
+	AdjustAlignment(oPC, ALIGNMENT_GOOD, 10, FALSE);
+	
+	PRCSetSchool();
+	//SPGoodShift(oPC);
+}
+	
+void EmberLoop(int nCounter, int nCasterLvl, int nMetaMagic, object oPC, location lLoc)
+{
+	object oTarget = MyFirstObjectInShape(SHAPE_SPHERE, 12.19f, lLoc, FALSE, OBJECT_TYPE_CREATURE);
+	int nDam;
+	int nDam2;
+		
+	while(GetIsObjectValid(oTarget))
+	{
+		if(GetAlignmentGoodEvil(oTarget) == ALIGNMENT_EVIL)
+		{
+			//Spell Resist
+			if(!PRCDoResistSpell(OBJECT_SELF, oTarget, nCasterLvl + SPGetPenetr()))
+			{
+				int nDC = PRCGetSaveDC(oTarget, oPC);
+				//Save
+				
+				nDam = d6(10+nCasterLvl);
+				
+				if(nMetaMagic & METAMAGIC_MAXIMIZE)
+				{
+					nDam = 6*(10+nCasterLvl);
+				}
+				
+				if(nMetaMagic & METAMAGIC_EMPOWER)
+				{
+					nDam += (nDam/2);
+				}
+				
+				if (PRCMySavingThrow(SAVING_THROW_REFLEX, oTarget, nDC, SAVING_THROW_TYPE_GOOD))
+				{
+					nDam = (nDam/2);
+				}
+				
+				nDam2 = (nDam/2);
+				nDam = (nDam - nDam2);
+				
+				SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam, DAMAGE_TYPE_FIRE), oTarget);
+				SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam2, DAMAGE_TYPE_DIVINE), oTarget);
+			}
+		}
+		oTarget = MyNextObjectInShape(SHAPE_SPHERE, 12.19f, lLoc, FALSE, OBJECT_TYPE_CREATURE);
+	}	
+	nCounter--;
+	
+	if(nCounter > 0)
+	{
+		DelayCommand(6.0f, EmberLoop(nCounter, nCasterLvl, nMetaMagic, oPC, lLoc));
+	}
+}
+		
+		
+		
+		
+		
+	
+