Skins: |

NWN SCRIPTS

- Jump to comments -

Title

Keen Edge and Greater Magic Weapon for CEP Weapons

Author

Fire_Wraith

Submitted / Updated

05-06-2005 / 11-22-2006

Category

Spells

Expansions

Requires HotU & CEP

View Code

#include "nw_i0_spells"
#include "x2_i0_spells"

#include "x2_inc_spellhook"


void  AddKeenEffectToWeapon(object oMyWeapon, float fDuration)
{
   IPSafeAddItemProperty(oMyWeapon,ItemPropertyKeen(), fDuration, X2_IP_ADDPROP_POLICY_KEEP_EXISTING ,TRUE,TRUE);
   return;
}


void main()
{

    /*
      Spellcast Hook Code
      Added 2003-07-07 by Georg Zoeller
      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
    effect eVis = EffectVisualEffect(VFX_IMP_SUPER_HEROISM);
    effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
    int nDuration = 10 * GetCasterLevel(OBJECT_SELF);
    int nMetaMagic = GetMetaMagicFeat();
    int IsSlashingWeap = 0;
    int iBaseType;
    object oTarget = GetSpellTargetObject();
    object oMyWeapon = OBJECT_INVALID;
    if((GetIsPC(oTarget) || (GetIsPlayableRacialType(oTarget)) || GetIsDM(oTarget)))
      {
      oMyWeapon = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oTarget);
      iBaseType = GetBaseItemType(oMyWeapon);
      }
    else
      {
      iBaseType = GetBaseItemType(oTarget);
      if(IPGetIsMeleeWeapon(oTarget) || (!(iBaseType < 300 || iBaseType > 323)))
      oMyWeapon = oTarget;
      }
//    Above code replaces the below, to include CEP weapons.
//    object oMyWeapon   =  IPGetTargetedOrEquippedMeleeWeapon();

    if (nMetaMagic == METAMAGIC_EXTEND)
    {
        nDuration = nDuration * 2; //Duration is +100%
    }

    if(GetIsObjectValid(oMyWeapon))
    {
        SignalEvent(oMyWeapon, EventSpellCastAt(OBJECT_SELF, GetSpellId(), FALSE));
        switch(iBaseType)
          {
          case 305: IsSlashingWeap =1; break;
          case 313: IsSlashingWeap =1; break;
          case 316: IsSlashingWeap =1; break;
          case 319: IsSlashingWeap =1; break;
          case 320: IsSlashingWeap =1; break;
          case 321: IsSlashingWeap =1; break;
          case 324: IsSlashingWeap =1; break;
          default: break;
          }
        if ((GetSlashingWeapon(oMyWeapon)) || (IsSlashingWeap == 1))
        {
            if (nDuration>0)
            {
                ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, GetItemPossessor(oMyWeapon));
                ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eDur, GetItemPossessor(oMyWeapon), TurnsToSeconds(nDuration));
                AddKeenEffectToWeapon(oMyWeapon, TurnsToSeconds(nDuration));
            }
            return;
        }
        else
        {
          FloatingTextStrRefOnCreature(83621, OBJECT_SELF); // not a slashing weapon
          return;
        }
     }
     else

     {
          FloatingTextStrRefOnCreature(83615, OBJECT_SELF);
          return;
    }



}




#include "nw_i0_spells"
#include "x2_i0_spells"

#include "x2_inc_spellhook"

void  AddGreaterEnhancementEffectToWeapon(object oMyWeapon, float fDuration, int nBonus)
{
   IPSafeAddItemProperty(oMyWeapon,ItemPropertyEnhancementBonus(nBonus), fDuration, X2_IP_ADDPROP_POLICY_REPLACE_EXISTING,FALSE,TRUE);
   return;
}

void main()
{

    /*
      Spellcast Hook Code
      Added 2003-07-07 by Georg Zoeller
      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
    effect eVis = EffectVisualEffect(VFX_IMP_SUPER_HEROISM);
    effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
    int nDuration = GetCasterLevel(OBJECT_SELF);
    int nCasterLvl = nDuration / 3;
    int nMetaMagic = GetMetaMagicFeat();
    int iBaseType;
    object oTarget = GetSpellTargetObject();
    object oMyWeapon = OBJECT_INVALID;

    //Limit nCasterLvl to 5, so it max out at +5 enhancement to the weapon.
    if(nCasterLvl > 5)
    {
        nCasterLvl = 5;
    }
    if((GetIsPC(oTarget) || (GetIsPlayableRacialType(oTarget)) || GetIsDM(oTarget)))
      {
      oMyWeapon = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oTarget);
      iBaseType = GetBaseItemType(oMyWeapon);
      }
    else
      {
      iBaseType = GetBaseItemType(oTarget);
      if(IPGetIsMeleeWeapon(oTarget) || (!(iBaseType < 300 || iBaseType > 323)))
      oMyWeapon = oTarget;
      }
//    Above code replaces the below, to include CEP weapons.
//     object oMyWeapon   =  IPGetTargetedOrEquippedMeleeWeapon();

    if (nMetaMagic == METAMAGIC_EXTEND)
    {
        nDuration = nDuration * 2; //Duration is +100%
    }

    if(GetIsObjectValid(oMyWeapon) )
    {
        SignalEvent(GetItemPossessor(oMyWeapon), EventSpellCastAt(OBJECT_SELF, GetSpellId(), FALSE));

        if (nDuration>0)
        {
            ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, GetItemPossessor(oMyWeapon));
            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eDur, GetItemPossessor(oMyWeapon), HoursToSeconds(nDuration));
            AddGreaterEnhancementEffectToWeapon(oMyWeapon, (HoursToSeconds(nDuration)), nCasterLvl);

        }
        return;
    }
        else
    {
           FloatingTextStrRefOnCreature(83615, OBJECT_SELF);
           return;
    }
}

Select All Text | View Code in separate window

Format

Code Only

Type

Type - Spell effects

Includes

BioWare Standard

Description

The CEP adds a number of new weapon types. Unfortunately, the item enhancing spells in Hordes of the Underdark don't work on any of these new weapons, because the scripts for these HotU spells doesn't recognize them as valid weapons. Contained here are two of these spells modified to work on the CEP weapons. All others can be modified in the same way as these two have been - Greater Magic Weapon is the example for that. Keen Edge is also included, as it requires a specific check to tell whether a weapon is slashing or not.

Files

Name	Type	Size	Downloads
NO FILES

SCORE OUT OF 10

10
3 votes
View Stats
Cast Your Vote!

PORTFOLIO

Add this entry to your portfolio so you can track it

Manage your existing portfolios or create a new one.

SCREENS

CEP Falchion with HotU Enchantment spells.

You Must Be Logged In to Participate.

Comments (8):

Posted by Magirot at 2005-12-21 15:26:51 Voted 10.00 on 12/21/05

Thanks!

Posted by Firyanis ( 81.240.xxx.xxx ) at 2005-07-26 11:23:59

Me too ^^
Thank you anyway for this :)

Posted by Griev at 2005-05-28 09:59:33 Voted 10.00 on 05/28/05

Works great. Thanks.

Posted by silvercloud at 2005-05-25 08:18:07

I'd like to see that complete scriptset if you would make it.

Posted by Bloody_Misclicks at 2005-05-22 08:14:20 Voted 10.00 on 05/22/05

I love this script :)

works wonders for the clerics and mages on our server

Posted by Anonymous ( 212.48.xxx.xxx ) at 2005-05-12 03:28:26

Èáî íè÷¸ íå ïîéìó âñ¸ ïî English! îäíàêî

Posted by Fire_Wraith at 2005-05-11 02:19:00

Yes, I did. However, the server that these were written for uses a number of customized include files, so I decided it might cause problems for a number of people if I just exported these directly. I could make one, if anyone out there desired it, though.

The way to modify the rest of the HotU weapons-altering spells is pretty simple, though. Just replace the following line:

object oMyWeapon = IPGetTargetedOrEquippedMeleeWeapon();

with the following lines:

int iBaseType;
object oTarget = GetSpellTargetObject();
object oMyWeapon = OBJECT_INVALID;
if((GetIsPC(oTarget) || (GetIsPlayableRacialType(oTarget)) || GetIsDM(oTarget)))
{
oMyWeapon = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oTarget);
iBaseType = GetBaseItemType(oMyWeapon);
}
else
{
iBaseType = GetBaseItemType(oTarget);
if(IPGetIsMeleeWeapon(oTarget) || (!(iBaseType < 300 || iBaseType > 323)))
oMyWeapon = oTarget;
}
// Above code replaces the below, to include CEP weapons.
// object oMyWeapon = IPGetTargetedOrEquippedMeleeWeapon();

Posted by Khauna at 2005-05-08 18:55:12

Thanks.. Actually, you did this script for all weapons changing spell in hotu?

You must be Logged In to post comments in this section.