6ec137a24e
Updated AMS marker feats. Removed arcane & divine marker feats. Updated Dread Necromancer for epic progression. Updated weapon baseitem models. Updated new weapons for crafting & npc equip. Updated prefix. Updated release archive.
91 lines
3.3 KiB
Plaintext
91 lines
3.3 KiB
Plaintext
/*:://////////////////////////////////////////////
|
|
//:: Spell Name Magic Stone
|
|
//:: Spell FileName PHS_S_MagicStone
|
|
//:://////////////////////////////////////////////
|
|
//:: In Game Spell desctiption
|
|
//:://////////////////////////////////////////////
|
|
Transmutation
|
|
Level: Clr 1, Drd 1, Earth 1
|
|
Components: V, S, DF
|
|
Casting Time: 1 standard action
|
|
Range: Touch
|
|
Targets: Up to three pebbles touched
|
|
Duration: 30 minutes or until discharged
|
|
Saving Throw: Will negates (harmless, object)
|
|
Spell Resistance: Yes (harmless, object)
|
|
|
|
You transmute as many as three nonmagical sling bullets so that they strike
|
|
with great force when slung. The spell gives them a +1 bonus on damage rolls,
|
|
and an additional 1d6 + 1 damage bonus versus undead.
|
|
//:://////////////////////////////////////////////
|
|
//:: Spell Effects Applied / Notes
|
|
//:://////////////////////////////////////////////
|
|
Adds +1 damage VS all to 3 bullets.
|
|
|
|
Also adds 1d6 + 1 damage verus undead.
|
|
|
|
Must be totally unmagical bullets targeted.
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Jasperre
|
|
//::////////////////////////////////////////////*/
|
|
|
|
#include "PHS_INC_SPELLS"
|
|
|
|
void main()
|
|
{
|
|
// Spell Hook Check.
|
|
if(!PHS_SpellHookCheck(PHS_SPELL_MAGIC_STONE)) return;
|
|
|
|
// Declare Major Variables
|
|
object oCaster = OBJECT_SELF;
|
|
object oItem = GetSpellTargetObject(); // Should be an item!
|
|
object oPossessor = GetItemPossessor(oItem);
|
|
int nCasterLevel = PHS_GetCasterLevel();
|
|
int nMetaMagic = PHS_GetMetaMagicFeat();
|
|
|
|
// Apply all of these damage bonuses
|
|
itemproperty IP_Normal = ItemPropertyDamageBonus(IP_CONST_DAMAGETYPE_PIERCING, IP_CONST_DAMAGEBONUS_1);
|
|
itemproperty IP_Undead1 = ItemPropertyDamageBonusVsRace(IP_CONST_RACIALTYPE_UNDEAD, IP_CONST_DAMAGETYPE_PIERCING, IP_CONST_DAMAGEBONUS_1);
|
|
itemproperty IP_Undead2 = ItemPropertyDamageBonusVsRace(IP_CONST_RACIALTYPE_UNDEAD, IP_CONST_DAMAGETYPE_PIERCING, IP_CONST_DAMAGEBONUS_1d6);
|
|
effect eVis = EffectVisualEffect(PHS_VFX_IMP_MAGIC_STONE);
|
|
|
|
// Duration is 30 minutes
|
|
float fDuration = PHS_GetDuration(PHS_MINUTES, 30, nMetaMagic);
|
|
|
|
if(GetIsObjectValid(oPossessor))
|
|
{
|
|
// Signal event
|
|
PHS_SignalSpellCastAt(oPossessor, PHS_SPELL_MAGIC_STONE, FALSE);
|
|
}
|
|
|
|
// Should target the projectiles to change
|
|
if(GetIsObjectValid(oItem) &&
|
|
GetBaseItemType(oItem) == BASE_ITEM_BULLET &&
|
|
!PHS_IP_GetIsEnchanted(oItem) /* && Is not enchanted*/)
|
|
{
|
|
// Divide the item up
|
|
int nStack = GetItemStackSize(oItem);
|
|
int nCreateNew = nStack - 3;
|
|
object oNew;
|
|
if(nCreateNew > 0)
|
|
{
|
|
// Split the CopyItemitems if we have over 50 in a stack
|
|
oNew = CopyItem(oItem, oPossessor, TRUE);
|
|
SetItemStackSize(oNew, nCreateNew);
|
|
// Set orignal to 3
|
|
SetItemStackSize(oItem, 3);
|
|
}
|
|
if(GetIsObjectValid(oPossessor))
|
|
{
|
|
// Apply visuals
|
|
PHS_ApplyVFX(oPossessor, eVis);
|
|
}
|
|
|
|
// Enchant item of the new 3 stack.
|
|
AddItemProperty(DURATION_TYPE_TEMPORARY, IP_Normal, oItem, fDuration);
|
|
AddItemProperty(DURATION_TYPE_TEMPORARY, IP_Undead1, oItem, fDuration);
|
|
AddItemProperty(DURATION_TYPE_TEMPORARY, IP_Undead2, oItem, fDuration);
|
|
return;
|
|
}
|
|
}
|