forked from Jaysyn/PRC8
67 lines
1.7 KiB
Plaintext
67 lines
1.7 KiB
Plaintext
|
//::///////////////////////////////////////////////
|
||
|
|
//:: Turns player into a wolf
|
||
|
|
//:: prc_wwformwolf
|
||
|
|
//:: Copyright (c) 2004 Shepherd Soft
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
/*
|
||
|
|
|
||
|
|
*/
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
//:: Created By: Russell S. Ahlstrom
|
||
|
|
//:: Created On: May 11, 2004
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
|
||
|
|
#include "pnp_shft_poly"
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
object oPC = OBJECT_SELF;
|
||
|
|
int nPoly;
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC, "WWWolf") != TRUE)
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_0;
|
||
|
|
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_1))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_1;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_2))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_2;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_2))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_0s;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_1) && GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_2))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_1s;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_2) && GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_2))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_2s;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_3))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_0l;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_1) && GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_3))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_1l;
|
||
|
|
}
|
||
|
|
if (GetHasFeat(FEAT_PRESTIGE_WOLFCLASS_2) && GetHasFeat(FEAT_PRESTIGE_WEREWOLFCLASS_3))
|
||
|
|
{
|
||
|
|
nPoly = POLYMORPH_TYPE_WOLF_2l;
|
||
|
|
}
|
||
|
|
|
||
|
|
LycanthropePoly(oPC, nPoly);
|
||
|
|
SetLocalInt(oPC, "WWWolf", TRUE);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
ExecuteScript("prc_wwunpoly", oPC);
|
||
|
|
SetLocalInt(oPC, "WWWolf", FALSE);
|
||
|
|
}
|
||
|
|
}
|