Skins: |

NWN SCRIPTS

- Jump to comments -

Title

Disarm Shield with Warhammer

Author

luckybastardo

Submitted / Updated

04-03-2008 / 04-04-2008

Category

Scripting routines

Expansions

Works on all versions

View Code

#include "NW_I0_SPELLS"
#include "x2_inc_spellhook"

void CreateObjectVoid(int nObjectType, string sTemplate, location lLoc, int bUseAppearAnimation = FALSE)
{
    CreateObject(nObjectType, sTemplate, lLoc, bUseAppearAnimation);
}

void main()
{
//the variables

object oWar = GetItemActivated ();
object oTarget = GetItemActivatedTarget();
object oPC = GetItemActivator();
object oShield = GetItemInSlot(INVENTORY_SLOT_LEFTHAND, oTarget);
string sShield = GetTag(oShield);
location lTarget = GetLocation (oTarget);
location lShield = lTarget;//change it to locate the shield far away
effect eRage = EffectVisualEffect (VFX_IMP_HEALING_X);
effect eStrg = EffectAbilityDecrease (ABILITY_STRENGTH,2);

             if(oWar == GetObjectByTag ("disarmshield"))
                {
                //check to see warhammer wielder have enought strenght.
                if(GetAbilityModifier(ABILITY_STRENGTH, oPC)>=3)
                    {
                    //check to see if the distance between the PC and the target is < 3 foot.
                    if(GetDistanceBetweenLocations(GetLocation(oPC), GetLocation(oTarget)) <= 3.0)
                        {
                        // check a succefull attack and a discipline check
                        if   (  ((!GetAC(oTarget))<= (GetBaseAttackBonus(oPC)+ d20()))
                             && ((!GetSkillRank(SKILL_DISCIPLINE,oTarget,FALSE)+ d20())<= (GetBaseAttackBonus(oPC)+ d20()+ GetAbilityModifier(ABILITY_STRENGTH,oPC))) )
                            {
                            //check if left hand is equipped with a shield
                            if  ((GetBaseItemType(oShield) == (BASE_ITEM_SMALLSHIELD)) ||
                                (GetBaseItemType(oShield) == (BASE_ITEM_LARGESHIELD)) ||
                                (GetBaseItemType(oShield) == (BASE_ITEM_TOWERSHIELD)))
                                {
                                //disarming shield and applying effects
                                ApplyEffectToObject(DURATION_TYPE_INSTANT,eRage,oPC);
                                FloatingTextStringOnCreature ("Concentrating strenght for a heavy impact", oPC,FALSE);
                                AssignCommand(oPC,SpeakString("Feel the Wraight of God!", TALKVOLUME_TALK));
                                AssignCommand(oPC,ActionAttack (oTarget));
                                DestroyObject(oShield);
                                FloatingTextStringOnCreature ("You shield has been disarm!!", oTarget,FALSE);
                                ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eStrg, oPC,RoundsToSeconds(4));
                                DelayCommand(8.0,CreateObjectVoid(OBJECT_TYPE_ITEM,sShield,lShield));;
                                object oShield2 = GetNearestObjectByTag(sShield,oShield);
                                SetIdentified(oShield2,TRUE);

                                }
                            }
                        else
                        {
                        //applying effect without disarming
                        FloatingTextStringOnCreature ("Concentrating strenght for a heavy impact", oPC,FALSE);
                        AssignCommand(oPC,ActionAttack (oTarget));
                        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eStrg,oPC,RoundsToSeconds(2));
                        }
                        }
                 else
                    {
                    FloatingTextStringOnCreature ("Too far away from target", oPC,FALSE);
                    }
                    }
          else
            {
            FloatingTextStringOnCreature ("Dont have enoght strenght", oPC,FALSE);
            }
            }
}

Select All Text | View Code in separate window

Format

Code Only

Type

Type - Combat

Includes

BioWare Standard

Description

A warhammer tag "disarmshield" with a special attack to disarm shields for a few rounds lacking strenght.

one script and one item.

Two checks for disarming a sucessful attack and a discipline check.

Future version throw shield away in fuction of type, smallshield far away than towershield.

Files

Name	Type	Size	Downloads
disarmshield.erfdisarmshield.erf Submitted: 04-03-2008 / Last Updated: 04-03-2008	erf	7.1Kb	58
version 0.1

SCORE OUT OF 10

9.5
1 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

ups!! your shield fall down
muahahaha

You Must Be Logged In to Participate.

Comments (2):

Posted by luckybastardo at 2008-04-04 02:26:58

This is a script similar to Gladiator Net, a unique power weapon, I link the effect to a warhammer tag. It only works on weapons tagged "disarmshield", so its not a powerfull script.

This code will be usefull in a feat that effect all blunt weapons, but i dont find a good tutorial on create activable feat like knockdown or disarm. This eliminate the activate animation power and be easy to use, but we must change 2ds files.

Posted by Fleshmelter at 2008-04-03 22:41:08 Voted 9.50 on 04/03/08

Wow and to think I was thinking earlier today when looking at the injury script about putting together a script that would shatter shields, but this would do.
_________________________
PW Action Server:
| Chaosgate |

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