Further file organization
Further file organization
This commit is contained in:
Jaysyn904
249
nwn/nwnprc/trunk/include/pnp_shft_poly.nss
Normal file
249
nwn/nwnprc/trunk/include/pnp_shft_poly.nss
Normal file
@@ -0,0 +1,249 @@
|
||||
// Used to polymorph characters to lycanthrope shapes
|
||||
// Merges Weapons, Armors, Items if told to by 2da.
|
||||
// - object oPC: Player to Polymorph
|
||||
// - int nPoly: POLYMORPH_TYPE_* Constant
|
||||
void LycanthropePoly(object oPC, int nPoly);
|
||||
|
||||
void DoDisguise(int nRace, object oTarget = OBJECT_SELF);
|
||||
void ShifterCheck(object oPC);
|
||||
|
||||
#include "pnp_shft_main"
|
||||
#include "prc_inc_shifting"
|
||||
|
||||
const string PRC_PNP_SHIFTING = "PRC_Shift";
|
||||
|
||||
////////////////Begin Werewolf//////////////////
|
||||
|
||||
void LycanthropePoly(object oPC, int nPoly)
|
||||
{
|
||||
effect eVis = EffectVisualEffect(VFX_IMP_POLYMORPH);
|
||||
effect ePoly;
|
||||
|
||||
ePoly = EffectPolymorph(nPoly);
|
||||
ePoly = SupernaturalEffect(ePoly);
|
||||
|
||||
int bWeapon = StringToInt(Get2DACache("polymorph","MergeW",nPoly)) == 1;
|
||||
int bArmor = StringToInt(Get2DACache("polymorph","MergeA",nPoly)) == 1;
|
||||
int bItems = StringToInt(Get2DACache("polymorph","MergeI",nPoly)) == 1;
|
||||
|
||||
object oWeaponOld = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oPC);
|
||||
object oArmorOld = GetItemInSlot(INVENTORY_SLOT_CHEST,oPC);
|
||||
object oRing1Old = GetItemInSlot(INVENTORY_SLOT_LEFTRING,oPC);
|
||||
object oRing2Old = GetItemInSlot(INVENTORY_SLOT_RIGHTRING,oPC);
|
||||
object oAmuletOld = GetItemInSlot(INVENTORY_SLOT_NECK,oPC);
|
||||
object oCloakOld = GetItemInSlot(INVENTORY_SLOT_CLOAK,oPC);
|
||||
object oBootsOld = GetItemInSlot(INVENTORY_SLOT_BOOTS,oPC);
|
||||
object oBeltOld = GetItemInSlot(INVENTORY_SLOT_BELT,oPC);
|
||||
object oHelmetOld = GetItemInSlot(INVENTORY_SLOT_HEAD,oPC);
|
||||
object oShield = GetItemInSlot(INVENTORY_SLOT_LEFTHAND,oPC);
|
||||
if (GetIsObjectValid(oShield))
|
||||
{
|
||||
if (GetBaseItemType(oShield) !=BASE_ITEM_LARGESHIELD &&
|
||||
GetBaseItemType(oShield) !=BASE_ITEM_SMALLSHIELD &&
|
||||
GetBaseItemType(oShield) !=BASE_ITEM_TOWERSHIELD)
|
||||
{
|
||||
oShield = OBJECT_INVALID;
|
||||
}
|
||||
}
|
||||
|
||||
//check if a shifter and if shifted then unshift
|
||||
ShifterCheck(oPC);
|
||||
|
||||
ClearAllActions(); // prevents an exploit
|
||||
|
||||
//Apply the VFX impact and effects
|
||||
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oPC);
|
||||
ApplyEffectToObject(DURATION_TYPE_PERMANENT, ePoly, oPC);
|
||||
|
||||
object oWeaponNewRight = GetItemInSlot(INVENTORY_SLOT_CWEAPON_R,oPC);
|
||||
object oWeaponNewLeft = GetItemInSlot(INVENTORY_SLOT_CWEAPON_L,oPC);
|
||||
object oWeaponNewBite = GetItemInSlot(INVENTORY_SLOT_CWEAPON_B,oPC);
|
||||
object oArmorNew = GetItemInSlot(INVENTORY_SLOT_CARMOUR,oPC);
|
||||
|
||||
if (bWeapon)
|
||||
{
|
||||
IPWildShapeCopyItemProperties(oWeaponOld,oWeaponNewLeft, TRUE);
|
||||
IPWildShapeCopyItemProperties(oWeaponOld,oWeaponNewRight, TRUE);
|
||||
IPWildShapeCopyItemProperties(oWeaponOld,oWeaponNewBite, TRUE);
|
||||
}
|
||||
if (bArmor)
|
||||
{
|
||||
IPWildShapeCopyItemProperties(oShield,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oHelmetOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oArmorOld,oArmorNew);
|
||||
}
|
||||
if (bItems)
|
||||
{
|
||||
IPWildShapeCopyItemProperties(oRing1Old,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oRing2Old,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oAmuletOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oCloakOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oBootsOld,oArmorNew);
|
||||
IPWildShapeCopyItemProperties(oBeltOld,oArmorNew);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
////////////////End Werewolf//////////////////
|
||||
|
||||
void ShifterCheck(object oPC)
|
||||
{
|
||||
if (!GetIsPC(oPC))
|
||||
return;
|
||||
//int iShifterLevels = GetLevelByClass(CLASS_TYPE_PNP_SHIFTER,oPC);
|
||||
//if (iShifterLevels>0)
|
||||
//{
|
||||
int iTemp = GetPersistantLocalInt(oPC,"nPCShifted");
|
||||
|
||||
if (iTemp)
|
||||
{
|
||||
DoDebug("ShifterCheck(): calling UnShift()");
|
||||
//SetShiftTrueForm(oPC);
|
||||
UnShift(oPC, TRUE);
|
||||
}
|
||||
//}
|
||||
}
|
||||
|
||||
|
||||
//changes portrait, head, and appearance
|
||||
//based on the target race with a degree of randomization.
|
||||
void DoDisguise(int nRace, object oTarget = OBJECT_SELF)
|
||||
{
|
||||
//store current appearance to be safe
|
||||
StoreAppearance(oTarget);
|
||||
int nAppearance; //appearance to change into
|
||||
int nHeadMax; //max head ID, changed to random 1-max
|
||||
int nGender = GetGender(oTarget);
|
||||
int nPortraitMin;//minimum row in portraits.2da
|
||||
int nPortraitMax;//maximum row in portraits.2da
|
||||
switch(nRace)
|
||||
{
|
||||
case RACIAL_TYPE_DWARF:
|
||||
nAppearance = APPEARANCE_TYPE_DWARF;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 10; nPortraitMin = 9; nPortraitMax = 17; }
|
||||
else
|
||||
{ nHeadMax = 12; nPortraitMin = 1; nPortraitMax = 8; }
|
||||
break;
|
||||
case RACIAL_TYPE_ELF:
|
||||
nAppearance = APPEARANCE_TYPE_ELF;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 10; nPortraitMin = 31; nPortraitMax = 40; }
|
||||
else
|
||||
{ nHeadMax = 16; nPortraitMin = 18; nPortraitMax = 30; }
|
||||
break;
|
||||
case RACIAL_TYPE_HALFELF:
|
||||
nAppearance = APPEARANCE_TYPE_HALF_ELF;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 18; nPortraitMin = 93; nPortraitMax = 112; }
|
||||
else
|
||||
{ nHeadMax = 15; nPortraitMin = 67; nPortraitMax = 92; }
|
||||
break;
|
||||
case RACIAL_TYPE_HALFORC:
|
||||
nAppearance = APPEARANCE_TYPE_HALF_ORC;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 11; nPortraitMin = 134; nPortraitMax = 139; }
|
||||
else
|
||||
{ nHeadMax = 1; nPortraitMin = 130; nPortraitMax = 133; }
|
||||
break;
|
||||
case RACIAL_TYPE_HUMAN:
|
||||
nAppearance = APPEARANCE_TYPE_HUMAN;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 18; nPortraitMin = 93; nPortraitMax = 112; }
|
||||
else
|
||||
{ nHeadMax = 15; nPortraitMin = 67; nPortraitMax = 92; }
|
||||
break;
|
||||
case RACIAL_TYPE_HALFLING:
|
||||
nAppearance = APPEARANCE_TYPE_HALFLING;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 8; nPortraitMin = 61; nPortraitMax = 66; }
|
||||
else
|
||||
{ nHeadMax = 11; nPortraitMin = 54; nPortraitMax = 59; }
|
||||
break;
|
||||
case RACIAL_TYPE_GNOME:
|
||||
nAppearance = APPEARANCE_TYPE_GNOME;
|
||||
if(nGender == GENDER_MALE)
|
||||
{ nHeadMax = 11; nPortraitMin = 47; nPortraitMax = 53; }
|
||||
else
|
||||
{ nHeadMax = 9; nPortraitMin = 41; nPortraitMax = 46; }
|
||||
break;
|
||||
default: //not a normal race, abort
|
||||
return;
|
||||
}
|
||||
//change the appearance
|
||||
SetCreatureAppearanceType(oTarget, nAppearance);
|
||||
|
||||
//need to be delayed a bit otherwise you get "supergnome" and "exploded elf" effects
|
||||
DelayCommand(1.1, SetCreatureBodyPart(CREATURE_PART_RIGHT_SHIN, d2(), oTarget));
|
||||
DelayCommand(1.2, SetCreatureBodyPart(CREATURE_PART_LEFT_SHIN, d2(), oTarget));
|
||||
DelayCommand(1.3, SetCreatureBodyPart(CREATURE_PART_RIGHT_THIGH, d2(), oTarget));
|
||||
DelayCommand(1.4, SetCreatureBodyPart(CREATURE_PART_LEFT_THIGH, d2(), oTarget));
|
||||
DelayCommand(1.5, SetCreatureBodyPart(CREATURE_PART_TORSO, d2(), oTarget));
|
||||
DelayCommand(1.6, SetCreatureBodyPart(CREATURE_PART_RIGHT_FOREARM, d2(), oTarget));
|
||||
DelayCommand(1.7, SetCreatureBodyPart(CREATURE_PART_LEFT_FOREARM, d2(), oTarget));
|
||||
DelayCommand(1.8, SetCreatureBodyPart(CREATURE_PART_RIGHT_BICEP, d2(), oTarget));
|
||||
DelayCommand(1.9, SetCreatureBodyPart(CREATURE_PART_LEFT_BICEP, d2(), oTarget));
|
||||
|
||||
//dont do these body parts, they dont have tattoos and weird things could happen
|
||||
//SetCreatureBodyPart(CREATURE_PART_BELT, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_NECK, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_RIGHT_SHOULDER, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_LEFT_SHOULDER, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_RIGHT_HAND, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_LEFT_HAND, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_PELVIS, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_RIGHT_FOOT, d2(), oTarget);
|
||||
//SetCreatureBodyPart(CREATURE_PART_LEFT_FOOT, d2(), oTarget);
|
||||
//randomise the head
|
||||
DelayCommand(2.0, SetCreatureBodyPart(CREATURE_PART_HEAD, Random(nHeadMax)+1, oTarget));
|
||||
|
||||
//remove any wings/tails
|
||||
SetCreatureWingType(CREATURE_WING_TYPE_NONE, oTarget);
|
||||
SetCreatureTailType(CREATURE_TAIL_TYPE_NONE, oTarget);
|
||||
|
||||
int nPortraitID = Random(nPortraitMax-nPortraitMin+1)+nPortraitMin;
|
||||
string sPortraitResRef = Get2DACache("portraits", "BaseResRef", nPortraitID);
|
||||
sPortraitResRef = GetStringLeft(sPortraitResRef, GetStringLength(sPortraitResRef)-1); //trim the trailing _
|
||||
SetPortraitResRef(oTarget, sPortraitResRef);
|
||||
SetPortraitId(oTarget, nPortraitID);
|
||||
}
|
||||
|
||||
//utility functions to make sure characters that gain wings/tails permanently
|
||||
//interact with the polymorph system by overwriting the default form
|
||||
|
||||
|
||||
void DoWings(object oPC, int nWingType)
|
||||
{
|
||||
//wing invalid, abort
|
||||
if(nWingType <= 0)
|
||||
return;
|
||||
//already has wings, keep them
|
||||
if(GetCreatureWingType(oPC) != CREATURE_WING_TYPE_NONE)
|
||||
return;
|
||||
//already has a default wings, keep them
|
||||
if(GetPersistantLocalInt(oPC, "AppearanceStoredWing"))
|
||||
return;
|
||||
//if polymorphed or shifted, dont do the real change
|
||||
if(!GetIsPolyMorphedOrShifted(oPC))
|
||||
SetCreatureWingType(nWingType, oPC);
|
||||
//override any stored default appearance
|
||||
SetPersistantLocalInt(oPC, "AppearanceStoredWing", nWingType);
|
||||
}
|
||||
|
||||
void DoTail(object oPC, int nTailType)
|
||||
{
|
||||
//tail invalid, use current
|
||||
if(nTailType == -1)
|
||||
return;
|
||||
//already has tail, keep it
|
||||
if(GetCreatureTailType(oPC))
|
||||
return;
|
||||
//already has a default tail, keep it
|
||||
if(GetPersistantLocalInt(oPC, "AppearanceStoredTail"))
|
||||
return;
|
||||
//if polymorphed or shifted, dont do the real change
|
||||
if(!GetIsPolyMorphedOrShifted(oPC))
|
||||
SetCreatureTailType(nTailType, oPC);
|
||||
//override any stored default appearance
|
||||
SetPersistantLocalInt(oPC, "AppearanceStoredTail", nTailType);
|
||||
}
|
||||
Reference in New Issue
Block a user