Initial upload.
Adding base PRC 4.19a files to repository.
This commit is contained in:
Jaysyn904
399
trunk/spells/x2_s2_gwildshp.nss
Normal file
399
trunk/spells/x2_s2_gwildshp.nss
Normal file
@@ -0,0 +1,399 @@
|
||||
//::///////////////////////////////////////////////
|
||||
//:: Greater Wild Shape, Humanoid Shape
|
||||
//:: x2_s2_gwildshp
|
||||
//:: Copyright (c) 2003 Bioware Corp.
|
||||
//:://////////////////////////////////////////////
|
||||
/*
|
||||
Allows the character to shift into one of these
|
||||
forms, gaining special abilities
|
||||
|
||||
Credits must be given to mr_bumpkin from the NWN
|
||||
community who had the idea of merging item properties
|
||||
from weapon and armor to the creatures new forms.
|
||||
|
||||
*/
|
||||
//:://////////////////////////////////////////////
|
||||
//:: Created By: Georg Zoeller
|
||||
//:: Created On: 2003-07-02
|
||||
//:://////////////////////////////////////////////
|
||||
//:: Modified By: Deva Winblood
|
||||
//:: Modified Date: January 26th, 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.
|
||||
|
||||
*/
|
||||
|
||||
//#include "x2_inc_itemprop"
|
||||
#include "x2_inc_shifter"
|
||||
//#include "x3_inc_horse"
|
||||
#include "prc_alterations"
|
||||
|
||||
|
||||
#include "pnp_shft_poly"
|
||||
|
||||
void dragon_shape_shift(object oPC, int nShape)
|
||||
{
|
||||
string sResRef = Get2DACache("prc_polymorph", "ResRef", nShape);
|
||||
StoreCurrentAppearanceAsTrueAppearance(oPC, TRUE);
|
||||
ShiftIntoResRef(oPC, SHIFTER_TYPE_DRUID, sResRef, TRUE);
|
||||
}
|
||||
|
||||
void main()
|
||||
{
|
||||
//--------------------------------------------------------------------------
|
||||
// Declare major variables
|
||||
//--------------------------------------------------------------------------
|
||||
int nSpell = GetSpellId();
|
||||
object oTarget = GetSpellTargetObject();
|
||||
effect eVis = EffectVisualEffect(VFX_IMP_POLYMORPH);
|
||||
int nShifter = GetLevelByClass(CLASS_TYPE_SHIFTER);
|
||||
effect ePoly;
|
||||
int nPoly;
|
||||
|
||||
if (!GetLocalInt(GetModule(),"X3_NO_SHAPESHIFT_SPELL_CHECK"))
|
||||
{ // check to see if abort due to being mounted
|
||||
if (PRCHorseGetIsMounted(oTarget))
|
||||
{ // abort
|
||||
if (GetIsPC(oTarget)) FloatingTextStrRefOnCreature(111982,oTarget,FALSE);
|
||||
return;
|
||||
} // abort
|
||||
} // check to see if abort due to being mounted
|
||||
|
||||
//this command will make shore that polymorph plays nice with the shifter
|
||||
ShifterCheck(OBJECT_SELF);
|
||||
|
||||
int nShape = GetPersistantLocalInt(OBJECT_SELF, PRC_PNP_SHIFTING + IntToString(nSpell));
|
||||
if(nShape > 0)
|
||||
{
|
||||
dragon_shape_shift(OBJECT_SELF, nShape);
|
||||
return;
|
||||
}
|
||||
|
||||
// Feb 13, 2004, Jon: Added scripting to take care of case where it's an NPC
|
||||
// using one of the feats. It will randomly pick one of the shapes associated
|
||||
// with the feat.
|
||||
switch(nSpell)
|
||||
{
|
||||
// Greater Wildshape I
|
||||
case 646: nSpell = Random(5)+658; break;
|
||||
// Greater Wildshape II
|
||||
case 675: switch(Random(3))
|
||||
{
|
||||
case 0: nSpell = 672; break;
|
||||
case 1: nSpell = 678; break;
|
||||
case 2: nSpell = 680;
|
||||
}
|
||||
break;
|
||||
// Greater Wildshape III
|
||||
case 676: switch(Random(3))
|
||||
{
|
||||
case 0: nSpell = 670; break;
|
||||
case 1: nSpell = 673; break;
|
||||
case 2: nSpell = 674;
|
||||
}
|
||||
break;
|
||||
// Greater Wildshape IV
|
||||
case 677: switch(Random(3))
|
||||
{
|
||||
case 0: nSpell = 679; break;
|
||||
case 1: nSpell = 691; break;
|
||||
case 2: nSpell = 694;
|
||||
}
|
||||
break;
|
||||
// Humanoid Shape
|
||||
case 681: nSpell = Random(3)+682; break;
|
||||
// Undead Shape
|
||||
case 685: nSpell = Random(3)+704; break;
|
||||
// Dragon Shape
|
||||
case 725: nSpell = Random(3)+707; break;
|
||||
// Outsider Shape
|
||||
case 732: nSpell = Random(3)+733; break;
|
||||
// Construct Shape
|
||||
case 737: nSpell = Random(3)+738; break;
|
||||
}
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// Determine which form to use based on spell id, gender and level
|
||||
//--------------------------------------------------------------------------
|
||||
switch (nSpell)
|
||||
{
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Greater Wildshape I - Wyrmling Shape
|
||||
//-----------------------------------------------------------------------
|
||||
case 658: nPoly = POLYMORPH_TYPE_WYRMLING_RED; break;
|
||||
case 659: nPoly = POLYMORPH_TYPE_WYRMLING_BLUE; break;
|
||||
case 660: nPoly = POLYMORPH_TYPE_WYRMLING_BLACK; break;
|
||||
case 661: nPoly = POLYMORPH_TYPE_WYRMLING_WHITE; break;
|
||||
case 662: nPoly = POLYMORPH_TYPE_WYRMLING_GREEN; break;
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Greater Wildshape II - Minotaur, Gargoyle, Harpy
|
||||
//-----------------------------------------------------------------------
|
||||
case 672: if (nShifter < X2_GW2_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_HARPY;
|
||||
else
|
||||
nPoly = 97;
|
||||
break;
|
||||
|
||||
case 678: if (nShifter < X2_GW2_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_GARGOYLE;
|
||||
else
|
||||
nPoly = 98;
|
||||
break;
|
||||
|
||||
case 680: if (nShifter < X2_GW2_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_MINOTAUR;
|
||||
else
|
||||
nPoly = 96;
|
||||
break;
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Greater Wildshape III - Drider, Basilisk, Manticore
|
||||
//-----------------------------------------------------------------------
|
||||
case 670: if (nShifter < X2_GW3_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_BASILISK;
|
||||
else
|
||||
nPoly = 99;
|
||||
break;
|
||||
|
||||
case 673: if (nShifter < X2_GW3_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_DRIDER;
|
||||
else
|
||||
nPoly = 100;
|
||||
break;
|
||||
|
||||
case 674: if (nShifter < X2_GW3_EPIC_THRESHOLD)
|
||||
nPoly = POLYMORPH_TYPE_MANTICORE;
|
||||
else
|
||||
nPoly = 101;
|
||||
break;
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Greater Wildshape IV - Dire Tiger, Medusa, MindFlayer
|
||||
//-----------------------------------------------------------------------
|
||||
case 679: nPoly = POLYMORPH_TYPE_MEDUSA; break;
|
||||
case 691: nPoly = 68; break; // Mindflayer
|
||||
case 694: nPoly = 69; break; // DireTiger
|
||||
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Humanoid Shape - Kobold Commando, Drow, Lizard Crossbow Specialist
|
||||
//-----------------------------------------------------------------------
|
||||
case 682:
|
||||
if(nShifter< 17)
|
||||
{
|
||||
if (GetGender(OBJECT_SELF) == GENDER_MALE) //drow
|
||||
nPoly = 59;
|
||||
else
|
||||
nPoly = 70;
|
||||
}
|
||||
else
|
||||
{
|
||||
if (GetGender(OBJECT_SELF) == GENDER_MALE) //drow
|
||||
nPoly = 105;
|
||||
else
|
||||
nPoly = 106;
|
||||
}
|
||||
break;
|
||||
case 683:
|
||||
if(nShifter< 17)
|
||||
{
|
||||
nPoly = 82; break; // Lizard
|
||||
}
|
||||
else
|
||||
{
|
||||
nPoly =104; break; // Epic Lizard
|
||||
}
|
||||
case 684: if(nShifter< 17)
|
||||
{
|
||||
nPoly = 83; break; // Kobold Commando
|
||||
}
|
||||
else
|
||||
{
|
||||
nPoly = 103; break; // Kobold Commando
|
||||
}
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Undead Shape - Spectre, Risen Lord, Vampire
|
||||
//-----------------------------------------------------------------------
|
||||
case 704: nPoly = 75; break; // Risen lord
|
||||
|
||||
case 705: if (GetGender(OBJECT_SELF) == GENDER_MALE) // vampire
|
||||
nPoly = 74;
|
||||
else
|
||||
nPoly = 77;
|
||||
break;
|
||||
|
||||
case 706: nPoly = 76; break; /// spectre
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Dragon Shape - Red Blue and Green Dragons
|
||||
//-----------------------------------------------------------------------
|
||||
case 707: nPoly = 72; break; // Ancient Red Dragon
|
||||
case 708: nPoly = 71; break; // Ancient Blue Dragon
|
||||
case 709: nPoly = 73; break; // Ancient Green Dragon
|
||||
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Outsider Shape - Rakshasa, Azer Chieftain, Black Slaad
|
||||
//-----------------------------------------------------------------------
|
||||
case 733: if (GetGender(OBJECT_SELF) == GENDER_MALE) //azer
|
||||
nPoly = 85;
|
||||
else // anything else is female
|
||||
nPoly = 86;
|
||||
break;
|
||||
|
||||
case 734: if (GetGender(OBJECT_SELF) == GENDER_MALE) //rakshasa
|
||||
nPoly = 88;
|
||||
else // anything else is female
|
||||
nPoly = 89;
|
||||
break;
|
||||
|
||||
case 735: nPoly =87; break; // slaad
|
||||
|
||||
//-----------------------------------------------------------------------
|
||||
// Construct Shape - Stone Golem, Iron Golem, Demonflesh Golem
|
||||
//-----------------------------------------------------------------------
|
||||
case 738: nPoly =91; break; // stone golem
|
||||
case 739: nPoly =92; break; // demonflesh golem
|
||||
case 740: nPoly =90; break; // iron golem
|
||||
|
||||
}
|
||||
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// Determine which items get their item properties merged onto the shifters
|
||||
// new form.
|
||||
//--------------------------------------------------------------------------
|
||||
int bWeapon = ShifterMergeWeapon(nPoly);
|
||||
int bArmor = ShifterMergeArmor(nPoly);
|
||||
int bItems = ShifterMergeItems(nPoly);
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// Store the old objects so we can access them after the character has
|
||||
// changed into his new form
|
||||
//--------------------------------------------------------------------------
|
||||
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;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// Here the actual polymorphing is done
|
||||
//--------------------------------------------------------------------------
|
||||
ePoly = EffectPolymorph(nPoly);
|
||||
ePoly = ExtraordinaryEffect(ePoly);
|
||||
ClearAllActions(); // prevents an exploit
|
||||
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, OBJECT_SELF);
|
||||
ApplyEffectToObject(DURATION_TYPE_PERMANENT, ePoly, OBJECT_SELF);
|
||||
SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, GetSpellId(), FALSE));
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// This code handles the merging of item properties
|
||||
//--------------------------------------------------------------------------
|
||||
object oWeaponNew = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND,OBJECT_SELF);
|
||||
object oArmorNew = GetItemInSlot(INVENTORY_SLOT_CARMOUR,OBJECT_SELF);
|
||||
|
||||
//identify weapon
|
||||
SetIdentified(oWeaponNew, TRUE);
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// ...Weapons
|
||||
//--------------------------------------------------------------------------
|
||||
if (bWeapon)
|
||||
{
|
||||
//----------------------------------------------------------------------
|
||||
// GZ: 2003-10-20
|
||||
// Sorry, but I was forced to take that out, it was confusing people
|
||||
// and there were problems with updating the stats sheet.
|
||||
//----------------------------------------------------------------------
|
||||
/* if (!GetIsObjectValid(oWeaponOld))
|
||||
{
|
||||
//------------------------------------------------------------------
|
||||
// If we had no weapon equipped before, remove the old weapon
|
||||
// to allow monks to change into unarmed forms by not equipping any
|
||||
// weapon before polymorphing
|
||||
//------------------------------------------------------------------
|
||||
DestroyObject(oWeaponNew);
|
||||
}
|
||||
else*/
|
||||
{
|
||||
//------------------------------------------------------------------
|
||||
// Merge item properties...
|
||||
//------------------------------------------------------------------
|
||||
IPWildShapeCopyItemProperties(oWeaponOld,oWeaponNew, TRUE);
|
||||
}
|
||||
}
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// ...Armor
|
||||
//--------------------------------------------------------------------------
|
||||
if (bArmor)
|
||||
{
|
||||
//----------------------------------------------------------------------
|
||||
// Merge item properties from armor and helmet...
|
||||
//----------------------------------------------------------------------
|
||||
IPWildShapeCopyItemProperties(oArmorOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oHelmetOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oShield,oArmorNew);
|
||||
}
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// ...Magic Items
|
||||
//--------------------------------------------------------------------------
|
||||
if (bItems)
|
||||
{
|
||||
//----------------------------------------------------------------------
|
||||
// Merge item properties from from rings, amulets, cloak, boots, belt
|
||||
//----------------------------------------------------------------------
|
||||
IPWildShapeCopyItemProperties(oRing1Old,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oRing2Old,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oAmuletOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oCloakOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oBootsOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oBeltOld,oArmorNew);
|
||||
}
|
||||
|
||||
//--------------------------------------------------------------------------
|
||||
// Set artificial usage limits for special ability spells to work around
|
||||
// the engine limitation of not being able to set a number of uses for
|
||||
// spells in the polymorph radial
|
||||
//--------------------------------------------------------------------------
|
||||
ShifterSetGWildshapeSpellLimits(nSpell);
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user