162 lines
6.0 KiB
Plaintext
162 lines
6.0 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Elemental Shape
|
|
//:: NW_S2_ElemShape
|
|
//:: Copyright (c) 2001 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Allows the Druid to change into elemental forms.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Preston Watamaniuk
|
|
//:: Created On: Jan 22, 2002
|
|
//:://////////////////////////////////////////////
|
|
//:: Modified By: Deva Winblood
|
|
//:: Modified Date: January 15th-16th, 2008
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Modified to insure no shapeshifting spells are castable upon
|
|
mounted targets. This prevents problems that can occur due
|
|
to dismounting after shape shifting, or other issues that can
|
|
occur due to preserved appearances getting out of synch.
|
|
|
|
This can additional check can be disabled by setting the variable
|
|
X3_NO_SHAPESHIFT_SPELL_CHECK to 1 on the module object. If this
|
|
variable is set then this script will function as it did prior to
|
|
this modification.
|
|
|
|
Patch 1.70, fix by Shadooow
|
|
|
|
- cured from horse include while retaining the shapeshifting horse check
|
|
- fixed dying when unpolymorphed as an result of sudden constitution bonus drop
|
|
which also could result to the server crash
|
|
*/
|
|
|
|
#include "x2_inc_itemprop"
|
|
#include "70_inc_itemprop"
|
|
|
|
void main()
|
|
{
|
|
//Declare major variables
|
|
int nSpell = GetSpellId();
|
|
object oTarget = GetSpellTargetObject();
|
|
effect eVis = EffectVisualEffect(VFX_IMP_POLYMORPH);
|
|
effect ePoly;
|
|
int nPoly;
|
|
int nDuration = GetLevelByClass(CLASS_TYPE_DRUID); //GetCasterLevel(OBJECT_SELF);
|
|
int bElder = FALSE;
|
|
if (!GetLocalInt(GetModule(),"X3_NO_SHAPESHIFT_SPELL_CHECK"))
|
|
{ // check to see if abort due to being mounted
|
|
switch(GetPhenoType(oTarget))
|
|
{// shape shifting not allowed while mounted
|
|
case 3:
|
|
case 5:
|
|
case 6:
|
|
case 8:
|
|
if(GetIsPC(oTarget))
|
|
{
|
|
FloatingTextStrRefOnCreature(111982,oTarget,FALSE);
|
|
}
|
|
// shape shifting not allowed while mounted
|
|
return;
|
|
}
|
|
} // check to see if abort due to being mounted
|
|
if(GetLevelByClass(CLASS_TYPE_DRUID) >= 20)
|
|
{
|
|
bElder = TRUE;
|
|
}
|
|
//Determine Polymorph subradial type
|
|
if(bElder == FALSE)
|
|
{
|
|
nPoly = POLYMORPH_TYPE_HUGE_FIRE_ELEMENTAL;
|
|
}
|
|
else
|
|
{
|
|
nPoly = POLYMORPH_TYPE_ELDER_FIRE_ELEMENTAL;
|
|
}
|
|
//Fire cast spell at event for the specified target
|
|
SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELLABILITY_ELEMENTAL_SHAPE, FALSE));
|
|
|
|
int bWeapon = StringToInt(Get2DAString("polymorph","MergeW",nPoly)) == 1;
|
|
int bArmor = StringToInt(Get2DAString("polymorph","MergeA",nPoly)) == 1;
|
|
int bItems = StringToInt(Get2DAString("polymorph","MergeI",nPoly)) == 1;
|
|
|
|
object oWeaponOld = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND,OBJECT_SELF);
|
|
object oArmorOld = GetItemInSlot(INVENTORY_SLOT_CHEST,OBJECT_SELF);
|
|
object oRing1Old = GetItemInSlot(INVENTORY_SLOT_LEFTRING,OBJECT_SELF);
|
|
object oRing2Old = GetItemInSlot(INVENTORY_SLOT_RIGHTRING,OBJECT_SELF);
|
|
object oAmuletOld = GetItemInSlot(INVENTORY_SLOT_NECK,OBJECT_SELF);
|
|
object oCloakOld = GetItemInSlot(INVENTORY_SLOT_CLOAK,OBJECT_SELF);
|
|
object oBootsOld = GetItemInSlot(INVENTORY_SLOT_BOOTS,OBJECT_SELF);
|
|
object oBeltOld = GetItemInSlot(INVENTORY_SLOT_BELT,OBJECT_SELF);
|
|
object oHelmetOld = GetItemInSlot(INVENTORY_SLOT_HEAD,OBJECT_SELF);
|
|
object oShield = GetItemInSlot(INVENTORY_SLOT_LEFTHAND,OBJECT_SELF);
|
|
if (GetIsObjectValid(oShield))
|
|
{
|
|
if (GetBaseItemType(oShield) !=BASE_ITEM_LARGESHIELD &&
|
|
GetBaseItemType(oShield) !=BASE_ITEM_SMALLSHIELD &&
|
|
GetBaseItemType(oShield) !=BASE_ITEM_TOWERSHIELD)
|
|
{
|
|
oShield = OBJECT_INVALID;
|
|
}
|
|
}
|
|
|
|
int nConBonus;
|
|
if (bWeapon)
|
|
{
|
|
nConBonus = IPGetBestConBonus(nConBonus,oWeaponOld);
|
|
}
|
|
if (bArmor)
|
|
{
|
|
nConBonus = IPGetBestConBonus(nConBonus,oArmorOld);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oHelmetOld);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oShield);
|
|
}
|
|
if (bItems)
|
|
{
|
|
nConBonus = IPGetBestConBonus(nConBonus,oRing1Old);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oRing2Old);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oAmuletOld);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oCloakOld);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oBeltOld);
|
|
nConBonus = IPGetBestConBonus(nConBonus,oBootsOld);
|
|
}
|
|
|
|
//Apply the VFX impact and effects
|
|
ePoly = EffectPolymorph(nPoly);
|
|
if(nConBonus > 0)
|
|
{//1.70 patch fix by Shadooow: this fixes dying when unpolymorphed issue as well as server crash related to this
|
|
ePoly = EffectLinkEffects(ePoly,EffectAbilityIncrease(ABILITY_CONSTITUTION,nConBonus));
|
|
}
|
|
ePoly = ExtraordinaryEffect(ePoly);
|
|
ClearAllActions(); // prevents an exploit
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, OBJECT_SELF);
|
|
ApplyEffectToObject(DURATION_TYPE_PERMANENT, ePoly, OBJECT_SELF);
|
|
SetLocalInt(OBJECT_SELF, "X2_L_STOPCASTING", 10);
|
|
SetLocalInt(OBJECT_SELF, "POLYMORPHED", 1);
|
|
|
|
object oWeaponNew = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND,OBJECT_SELF);
|
|
object oArmorNew = GetItemInSlot(INVENTORY_SLOT_CARMOUR,OBJECT_SELF);
|
|
|
|
if (bWeapon)
|
|
{
|
|
IPWildShapeCopyItemProperties(oWeaponOld,oWeaponNew, TRUE);
|
|
}
|
|
if (bArmor)
|
|
{
|
|
IPWildShapeCopyItemProperties(oHelmetOld,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oArmorOld,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oShield,oArmorNew);
|
|
}
|
|
if (bItems)
|
|
{
|
|
IPWildShapeCopyItemProperties(oRing1Old,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oRing2Old,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oAmuletOld,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oCloakOld,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oBootsOld,oArmorNew);
|
|
IPWildShapeCopyItemProperties(oBeltOld,oArmorNew);
|
|
}
|
|
|
|
|
|
}
|