33 lines
730 B
Plaintext
33 lines
730 B
Plaintext
|
//::///////////////////////////////////////////////
|
||
|
|
//:: Turns player into a wolf
|
||
|
|
//:: prc_wwformwolf
|
||
|
|
//:: Copyright (c) 2004 Shepherd Soft
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
/*
|
||
|
|
|
||
|
|
*/
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
//:: Created By: Russell S. Ahlstrom
|
||
|
|
//:: Created On: May 11, 2004
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
|
||
|
|
//Modified for use with Hound Archon
|
||
|
|
|
||
|
|
#include "pnp_shft_poly"
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
object oPC = OBJECT_SELF;
|
||
|
|
|
||
|
|
if(!GetLocalInt(oPC, "WWWolf"))
|
||
|
|
{
|
||
|
|
LycanthropePoly(oPC, POLYMORPH_TYPE_WOLF_2);
|
||
|
|
SetLocalInt(oPC, "WWWolf", TRUE);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
ExecuteScript("prc_wwunpoly", oPC);
|
||
|
|
SetLocalInt(oPC, "WWWolf", FALSE);
|
||
|
|
}
|
||
|
|
}
|