//:///////////////////////// /////////////////////
//:: Polymorph Self
//:: NW_S0_PolySelf.nss
//:: Copyright (c) 2001 Bioware Corp.
//:///////////////////////// ////////////////////
/*
    The PC is able to changed their form to one of
    several forms.
*/
//:///////////////////////// ////////////////////
//:: Created By: Preston Watamaniuk
//:: Created On: Jan 21, 2002
//:///////////////////////// ////////////////////

#include "x2_inc_spellhook"

void main()
{

/*
  Spellcast Hook Code
  Added 2003-06-23 by GeorgZ
  If you want to make changes to all spells,
  check x2_inc_spellhook.nss to find out more

*/

    if (!X2PreSpellCastCode())
    {
    // If code within the PreSpellCastHook (i.e. UMD) reports FALSE, do not run this spell
        return;
    }

// End of Spell Cast Hook


    //Declare major variables
    int nSpell = GetSpellId();
    object oTarget = GetSpellTargetObject();
    effect eVis = EffectVisualEffect(VFX_IMP_POLYMORPH);
    effect ePoly;
    int nPoly;
    int nMetaMagic = GetMetaMagicFeat();
    int nDuration = GetCasterLevel(OBJECT_SELF);
    //Enter Metamagic conditions
    if (nMetaMagic == METAMAGIC_EXTEND)
    {
        nDuration = nDuration *2; //Duration is +100%
    }

    //Determine Polymorph subradial type
    if(nSpell == 387)
    {
        nPoly = POLYMORPH_TYPE_GIANT_SPIDER;
    }
    else if (nSpell == 388)
    {
        nPoly = POLYMORPH_TYPE_TROLL;
    }
    else if (nSpell == 389)
    {
        nPoly = POLYMORPH_TYPE_UMBER_HULK;
    }
    else if (nSpell == 390)
    {
        nPoly = POLYMORPH_TYPE_PIXIE;
    }
    else if (nSpell == 391)
    {
        nPoly = POLYMORPH_TYPE_ZOMBIE;
    }
    ePoly = EffectPolymorph(nPoly);
    //Fire cast spell at event for the specified target
    SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_POLYMORPH_SELF, FALSE));

    //Apply the VFX impact and effects
    AssignCommand(oTarget, ClearAllActions()); // prevents an exploit
    ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, ePoly, oTarget, TurnsToSeconds(nDuration));
}

807 Greater_Wild_Shape_TROLL **** ife_X2GWShp2 T P - **** 0x01 X2_S2_GWildShp **** **** **** **** **** **** 3 1500 hand **** vco_mehannatr03 **** sco_mehannatr03 vs_chant_ench_lm **** out 1000 **** **** **** **** 0 **** **** **** **** **** **** 0 **** **** **** **** **** **** 675 3 **** 0 0 83578 0 **** **** **** 0

//:///////////////////////// /////////////////////
//:: 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
//:///////////////////////// ////////////////////

#include "x2_inc_itemprop"
#include "x2_inc_shifter"


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;

    // 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(4)+658; break;
        // Greater Wildshape II
        case 675: switch(Random(5))
                  {
                    case 0: nSpell = 672; break;
                    case 1: nSpell = 678; break;
                    case 2: nSpell = 680; break;
                    case 3: nSpell = 902; break;
                    case 4: nSpell = 903;
                  }
                  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 661: nPoly = POLYMORPH_TYPE_WYRMLING_GREEN; break;


        //---------------------------- ------------------------------ -------------
        // Greater Wildshape II  - Minotaur, Gargoyle, Harpy, Troll, Umber Hulk
        //---------------------------- ------------------------------ -------------
        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;

        case 902: if (nShifter < X2_GW2_EPIC_THRESHOLD)
                    nPoly = POLYMORPH_TYPE_TROLL;
                  else
                    nPoly = 4;
                  break;


        case 903: if (nShifter < X2_GW2_EPIC_THRESHOLD)
                    nPoly = POLYMORPH_TYPE_UMBER_HULK;
                  else
                    nPoly = 5;
                  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
                }

/* warning: 2 unclosed block {} */