5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
217 lines
8.1 KiB
Plaintext
217 lines
8.1 KiB
Plaintext
/*:://////////////////////////////////////////////
|
||
//:: Spell Name Chill Metal
|
||
//:: Spell FileName PHS_S_ChillMetal
|
||
//:://////////////////////////////////////////////
|
||
//:: In Game Spell desctiption
|
||
//:://////////////////////////////////////////////
|
||
Transmutation [Cold]
|
||
Level: Drd 2
|
||
Components: V, S, DF
|
||
Casting Time: 1 standard action
|
||
Range: Close (8M)
|
||
Target: Metal equipment of one enemy creature per two
|
||
levels, within a 10-M. radius.
|
||
Duration: 7 rounds
|
||
Saving Throw: Will negates
|
||
Spell Resistance: Yes
|
||
|
||
Chill metal makes metal extremely cold, damaging the holding creature.
|
||
|
||
A creature takes cold damage if its equipment is chilled. It takes full
|
||
damage if it is holding a metal weapon, using a shield and wearing metal
|
||
armor. It takes half damage if it is only carrying a shield and metal weapon,
|
||
or armor with no shield or metal weapon, or take 1/4 damage if it is holding
|
||
just a metal weapon or just a metal shield. The creature takes minimum damage
|
||
(1 point or 2 points; see the table) even if it isn't wearing anything metal.
|
||
|
||
On the first round of the spell, the metal becomes chilly and uncomfortable
|
||
to touch but deals no damage. The same effect also occurs on the last round
|
||
of the spell’s duration. During the second (and also the next-to-last) round,
|
||
icy coldness causes pain and damage. In the third, fourth, and fifth rounds,
|
||
the metal is freezing cold, causing more damage, as shown on the table below.
|
||
|
||
Round Metal Temperature Damage
|
||
1 Cold None
|
||
2 Icy 1d4 points
|
||
3-5 Freezing 2d4 points
|
||
6 Icy 1d4 points
|
||
7 Cold None
|
||
|
||
Chill metal counters and dispels heat metal.
|
||
//:://////////////////////////////////////////////
|
||
//:: Spell Effects Applied / Notes
|
||
//:://////////////////////////////////////////////
|
||
Ok, ok, ok...affects enemies only
|
||
|
||
Easy enough, it does this:
|
||
|
||
- May target allies if they have Heat Metal on them, because it will dispel it.
|
||
- If it is an enemy, it will chill only if they are not already being chilled.
|
||
- Will apply a duration effect, and do a heartbeat effect lasting 7 rounds.
|
||
|
||
Like ACid arrow. Damage:
|
||
|
||
- Full: Using a metal weapon, a shield, and metal armor
|
||
- Half: Just armor, or a shield and a metal weapon (or two metal weapons, duh!)
|
||
- Quarter: Just a metal weapon or just a shield
|
||
- Minimum: No metal weapon, shield or armor on.
|
||
//:://////////////////////////////////////////////
|
||
//:: Created By: Jasperre
|
||
//::////////////////////////////////////////////*/
|
||
|
||
#include "PHS_INC_SPELLS"
|
||
|
||
// Put in 1 to start. Works from nRound goes to 7.
|
||
// Does damage each round based on equipment.
|
||
void DoChillEffect(int nRound, object oTarget, object oCaster, int nMetaMagic);
|
||
|
||
void main()
|
||
{
|
||
// Spell Hook Check.
|
||
if(!PHS_SpellHookCheck()) return;
|
||
|
||
// Declare major variables
|
||
object oCaster = OBJECT_SELF;
|
||
object oTarget;
|
||
location lTarget = GetSpellTargetLocation();
|
||
int nSpellSaveDC = PHS_GetSpellSaveDC();
|
||
int nMetaMagic = PHS_GetMetaMagicFeat();
|
||
float fDelay;
|
||
|
||
// Duration is 7 rounds always
|
||
float fDuration = RoundsToSeconds(7);
|
||
|
||
// Declare Effects
|
||
effect eVis = EffectVisualEffect(VFX_IMP_FROST_S);
|
||
effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
|
||
effect eDispel = EffectVisualEffect(VFX_IMP_DISPEL);
|
||
|
||
// Apply AOE visual
|
||
effect eImpact = EffectVisualEffect(PHS_VFX_FNF_CHILL_METAL);
|
||
PHS_ApplyLocationVFX(lTarget, eImpact);
|
||
|
||
// Get all targets in a sphere, 10M radius.
|
||
oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 10.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
||
// Loop targets
|
||
while(GetIsObjectValid(oTarget))
|
||
{
|
||
// Get the distance between the explosion and the target to calculate delay
|
||
fDelay = GetDistanceBetweenLocations(lTarget, GetLocation(oTarget))/20;
|
||
|
||
// Check if an ally
|
||
if(GetIsFriend(oTarget))
|
||
{
|
||
// Dispels heat metal
|
||
if(PHS_RemoveSpellEffectsFromTarget(PHS_SPELL_HEAT_METAL, oTarget, fDelay))
|
||
{
|
||
// Fire cast spell at event for the specified target
|
||
PHS_SignalSpellCastAt(oTarget, PHS_SPELL_CHILL_METAL, FALSE);
|
||
|
||
// Dispel VFX
|
||
DelayCommand(fDelay, PHS_ApplyVFX(oTarget, eDispel));
|
||
}
|
||
}
|
||
// PvP Check
|
||
else if(!GetIsReactionTypeFriendly(oTarget, oCaster) &&
|
||
// Make sure they are not immune to spells
|
||
!PHS_TotalSpellImmunity(oTarget) &&
|
||
// Not got the spell effect too
|
||
!GetHasSpellEffect(PHS_SPELL_CHILL_METAL, oTarget))
|
||
{
|
||
// Fire cast spell at event for the specified target
|
||
PHS_SignalSpellCastAt(oTarget, PHS_SPELL_CHILL_METAL);
|
||
|
||
// Spell resistance And immunity checking.
|
||
if(!PHS_SpellResistanceCheck(oCaster, oTarget, fDelay))
|
||
{
|
||
// Will save negates
|
||
if(!PHS_SavingThrow(SAVING_THROW_WILL, oTarget, nSpellSaveDC, SAVING_THROW_TYPE_COLD, oCaster, fDelay))
|
||
{
|
||
DelayCommand(fDelay, PHS_ApplyDurationAndVFX(oTarget, eVis, eDur, fDuration));
|
||
// We start on round 2, so put in 1
|
||
DelayCommand(fDelay + 6.0, DoChillEffect(1, oTarget, oCaster, nMetaMagic));
|
||
}
|
||
}
|
||
}
|
||
// Get Next Target
|
||
oTarget = GetNextObjectInShape(SHAPE_SPHERE, 10.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
||
}
|
||
}
|
||
|
||
// Put in 1 to start. Works from nRound goes to 7.
|
||
// Does damage each round based on equipment.
|
||
void DoChillEffect(int nRound, object oTarget, object oCaster, int nMetaMagic)
|
||
{
|
||
if(GetIsObjectValid(oTarget) && GetIsObjectValid(oCaster) &&
|
||
GetHasSpellEffect(PHS_SPELL_CHILL_METAL, oTarget))
|
||
{
|
||
// Will only do damage on rounds 2 to 6.
|
||
int nCurrentRound = nRound + 1;
|
||
|
||
// Get rounds
|
||
if(nCurrentRound > 2)
|
||
{
|
||
// Get percent of damage to take. Could be 1 or 2, or all of it.
|
||
|
||
// We get 25% less per weapon slot, or 50% less per armor.
|
||
float fPercent = 0.0;
|
||
object oItem = GetItemInSlot(INVENTORY_SLOT_CHEST, oTarget);
|
||
// 4 or more is metal armor - chain shirt is meta, studded leather is not.
|
||
if(PHS_GetArmorType(oItem) >= 4)
|
||
{
|
||
fPercent += 0.5;
|
||
}
|
||
int nCnt;
|
||
//int INVENTORY_SLOT_RIGHTHAND = 4;
|
||
//int INVENTORY_SLOT_LEFTHAND = 5;
|
||
for(nCnt = INVENTORY_SLOT_RIGHTHAND; nCnt <= INVENTORY_SLOT_LEFTHAND; nCnt++)
|
||
{
|
||
// Check hand weapons
|
||
oItem = GetItemInSlot(nCnt, oTarget);
|
||
// Need a shield (any) or it to be a metal weapon.
|
||
if(PHS_GetIsMetalWeapon(oItem) ||
|
||
PHS_GetIsShield(oItem))
|
||
{
|
||
fPercent += 0.25;
|
||
}
|
||
}
|
||
// We time damage by fPercent, noting that if fPercent is 0, we
|
||
// just do minimum damage
|
||
|
||
int nDam, nDice;
|
||
// Get possible damage.
|
||
if(nCurrentRound == 2 || nCurrentRound == 6)
|
||
{
|
||
nDice = 1;
|
||
}
|
||
else
|
||
{
|
||
nDice = 2;
|
||
}
|
||
// Check percent of damage
|
||
if(fPercent != 0.0)
|
||
{
|
||
nDam = FloatToInt(IntToFloat(PHS_MaximizeOrEmpower(4, 1, nMetaMagic)) * fPercent);
|
||
}
|
||
else
|
||
{
|
||
nDam = nDice;
|
||
}
|
||
// Do damage, if any
|
||
if(nDam <= nDice)// Should never be true
|
||
{
|
||
nDam = nDice;
|
||
}
|
||
|
||
// Do damage and VFX
|
||
effect eVis = EffectVisualEffect(VFX_IMP_FROST_S);
|
||
PHS_ApplyDamageVFXToObject(oTarget, eVis, nDam, DAMAGE_TYPE_COLD);
|
||
}
|
||
// If we are at 5 or less (if we are at 6, when it next fires, it'll be round 7!)
|
||
if(nCurrentRound <= 5)
|
||
{
|
||
DelayCommand(6.0, DoChillEffect(nCurrentRound, oTarget, oCaster, nMetaMagic));
|
||
}
|
||
}
|
||
}
|