Skins: |

NWN SCRIPTS

- Jump to comments -

Title

RiffRaff's Fury Weapons

Author

RiffRaff

Submitted / Updated

07-21-2006 / 11-22-2006

Category

Scripting routines

Expansions

HOTU-1.67

View Code

#include "x2_inc_switches"

// How long until fury starts to wear off?
const int FURY_TIME = 6; // seconds

void Fury();
int IncreaseFury(int i = 1);
void ApplyFuryEffects();
int GetTimeStamp();

// iDamageType = DAMAGE_TYPE_*
// iDamage     = How much damage to inflict
void FuryDamage(int iDamageType = DAMAGE_TYPE_MAGICAL, int iDamage = 1);

// Apply a visual effect to your target
// iFire = VFX_IMP_*
void FuryFire(int iFire = VFX_IMP_FLAME_M);

void main()
{
  Fury();
}

void Fury()
{
  switch(GetUserDefinedItemEventNumber())
  {
  case X2_ITEM_EVENT_ONHITCAST:
    ApplyFuryEffects();
    break;
  case X2_ITEM_EVENT_EQUIP:
    SetLocalInt(GetPCItemLastEquippedBy(), "Fury", 0);
    SetLocalInt(GetPCItemLastEquippedBy(), "LastHit", GetTimeStamp());
    break;
  case X2_ITEM_EVENT_UNEQUIP:
    DeleteLocalInt(GetPCItemLastUnequippedBy(), "Fury");
  }
}

int IncreaseFury(int i = 1)
{
  int iFury = i + GetLocalInt(OBJECT_SELF, "Fury");
  int iLastHit = GetLocalInt(OBJECT_SELF, "LastHit");
  int iTimeLoss = GetTimeStamp() - iLastHit;
  iFury -= (iTimeLoss / FURY_TIME) * 2;
  if (iFury < 0) iFury = 0;
  if (iFury > 20) iFury = 20;
  SetLocalInt(OBJECT_SELF, "LastHit", GetTimeStamp());
  SetLocalInt(OBJECT_SELF, "Fury", iFury);
  return iFury;
}

void ApplyFuryEffects()
{
  switch(IncreaseFury())
  {
  case 20:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 19:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 18:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 17:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 16:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 15:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(2));
  case 14:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(5));
  case 13:
    FuryDamage(DAMAGE_TYPE_FIRE, d100());
    FuryFire();
  case 12:
    FuryDamage(DAMAGE_TYPE_FIRE, d20(3));
  case 11:
    FuryDamage(DAMAGE_TYPE_PIERCING, d20(2));
  case 10:
    FuryDamage(DAMAGE_TYPE_SLASHING, d10(2));
  case 9:
    FuryDamage(DAMAGE_TYPE_BLUDGEONING, d20());
  case 8:
    FuryDamage(DAMAGE_TYPE_MAGICAL, d6(2));
  case 7:
    FuryDamage(DAMAGE_TYPE_PIERCING, d12());
  case 6:
    FuryDamage(DAMAGE_TYPE_SLASHING, d10());
  case 5:
    FuryDamage(DAMAGE_TYPE_BLUDGEONING, d4(2));
  case 4:
    FuryDamage(DAMAGE_TYPE_MAGICAL, d8());
  case 3:
    FuryDamage(DAMAGE_TYPE_PIERCING, d6());
  case 2:
    FuryDamage(DAMAGE_TYPE_SLASHING, d4());
  case 1:
    FuryDamage(DAMAGE_TYPE_BLUDGEONING);
  }
}

void FuryDamage(int iDamageType = DAMAGE_TYPE_MAGICAL, int iDamage = 1)
{
  ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(iDamage, iDamageType), GetSpellTargetObject());
}

void FuryFire(int iFire = VFX_IMP_FLAME_M)
{
  ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(iFire), GetSpellTargetObject());
}

int GetTimeStamp()
{
  int iMil = (GetTimeMillisecond());
  int iSec = (GetTimeSecond());
  int iMin = (GetTimeMinute());
  int iHour = (GetTimeHour());
  int iDay = (GetCalendarDay());
  int iMon = (GetCalendarMonth());

  return
    (iMon  * 100000000) +
    (iDay  * 1000000) +
    (iHour * 10000) +
    (iMin  * 100) +
    iSec;
}

Select All Text | View Code in separate window

Format

Code Only

Type

Type - Other

Includes

None

Description

Imagine a weapon that knows your rage and becomes more dangerous as your bloodlust increases... The fury weapons increase their rage level everytime you hit an opponent, but if you don't hit an opponent for a certain period of time (which is customizable), the rage level goes down.

** Installation
1) Import the rr_fury script
2) Make sure the weapon has the "onhit:castspell:uniquepower" property
3) Change the tag of your weapon to "rr_fury"

** Notes
This system is compatible with some of my other systems. If you remove the "void main" part, then you can use the rr_fury file as an include file. With custom unlimited ammo v2, it would look something like this:

#include "rr_fury"
#include "rr_reloader"

void main()
{
Reload();
Fury();
ExtraAttacks(5);
SpeedIncrease(150);
Concealment(55);
MegaDamage(DAMAGE_TYPE_ACID, 2);
MegaDamage(DAMAGE_TYPE_COLD, 7);
}

This would create an unlimited ammunition (Arrow/Axe/etc) that also has the fury property on top of any other item properties you add.

Files

Name	Type	Size	Downloads
rr_fury.erfrr_fury.erf Submitted: 07-21-2006 / Last Updated: 07-21-2006	erf	5.73Kb	143
Just the tag based script needed to make a weapon "Fury". Change the tag of the weapon to "rr_fury" to use.
rr_fury_blvl.erfrr_fury_blvl.erf Submitted: 07-21-2006 / Last Updated: 07-24-2006	erf	6.29Kb	98
This version of rr_fury does not allow fury to be used until you have 20 barbarian levels.
rr_fury_bupto.erfrr_fury_bupto.erf Submitted: 07-21-2006 / Last Updated: 07-24-2006	erf	6.1Kb	97
This version of rr_fury only allows you attain a level of rage equal to your barabarian levels. Ex. A 3rd level barbarian would only be able to use fury up to rage level 3. There are 20 rage levels total.
Fury_Weapon.modFury_Weapon.mod Submitted: 07-21-2006 / Last Updated: 07-21-2006	mod	42.72Kb	125
A module with a fury daggar implemented.

SCORE OUT OF 10

9.83
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

You do NOT want to mess with this angry halfling!

You Must Be Logged In to Participate.

Comments (12):

Posted by ScorpioChess at 2007-03-18 19:53:40 Voted 9.50 on 03/18/07

This sounds like what warriors do in WoW. ;D

Posted by hympyke at 2006-07-31 04:43:42 Voted 10.00 on 07/22/06

I saw, and vote :)

Posted by riffraff at 2006-07-30 09:36:26

hympyke:
Just submitted the scourge whip in the prefabs section. Lemme know if you like it.
_________________________
My Submissions

Posted by hympyke at 2006-07-29 22:28:49 Voted 10.00 on 07/22/06

Scourge of Fangs

© Judy*bleep*
This whip is the famous archetypal weapon of the Drow priestesses. It has a handle of adamantine, and up to five serpentine constructs as lashes. The snakes are extensions of the will of the priestess, hissing and writhing in response to her thoughts, and emotions. At the wielder�s mental command, the snakes will attack. Each snake attacks as a separate creature and the priestess can choose how many of the serpentine heads take part in each attack. If a good hearted is foolish enough to pick up one of these whips, the snake heads will turn on them. If a snake head is destroyed, it falls off the whip. The remaining heads continue to function normally until all are destroyed
The snake constructs ~ HD 2d10; hp 11; Init +3; Spd 0 ft.; AC 17 (touch 14, flatfooted 14); Atk +5 melee (1d2�2 and pain, bite); SA Pain; SQ Construct; AL NE; SV Fort +0, Ref +3, Will +0; Str 6, Dex 17, Con �, Int �, Wis 11, Cha 1. Feat: Weapon Finesse bite).
Pain (Su): The venom of the serpent�s bite causes wracking pains, imposing a �4 penalty on the victim�s attack rolls, skill checks, and ability checks for 2d4 rounds. A successful Fortitude save (DC 19) reduces the penalty to �2.
Caster Level: 5th; Spells animate objects, bestow curse
Market Price: 30,000 gp; Weight: 5 lb.

Its over complicated, i mean... Maybe with some simplify...

Posted by riffraff at 2006-07-29 12:59:56

How does it work?
_________________________
My Submissions

Posted by hympyke at 2006-07-28 23:49:45 Voted 10.00 on 07/22/06

i'm choosed the L20 barb version, with some modify, made few cases, and put in my PW ;) Riffraff, you don't want make a whip of drow priestess ? ;) I'm think on the drows "snake whip" :P

Posted by hympyke at 2006-07-24 07:27:48 Voted 10.00 on 07/22/06

:P Thx riffraff!

Posted by riffraff at 2006-07-24 04:56:54

hympyke:

There are two new downloads now. One does not allow you to use the rage powers until barbarian level 20 and the other one restricts the rage level to how many barbarian levels you have. I hope one of them works for you!
_________________________
My Submissions

Posted by hympyke at 2006-07-23 22:52:56 Voted 10.00 on 07/22/06

I1m need a little help, the script is great. I'm want to ask a little modification. How can i do this:
The weapon's ability works only if the wielder character contains least L20 barbarian level?

Posted by +scarface+ at 2006-07-23 03:42:09 Voted 10.00 on 07/23/06

Ok I tried it and it worked really well, although I will be adding a few extra bits of eye candy.

Whent he PC goes into fury mode I will be adding a voive chat command (i.e. battlecry) and a visual effect, great work RiffRaff.
_________________________
§çà®Fãçë�

NWN1 Submissions:
[Persistent Banking] - [Character Appearance Modifier]
[XP/GP Distribution] - [Item Crafting] - [Socketed Items]

NWN2 Submissions:
[Persistent Banking]

Posted by hympyke at 2006-07-22 22:04:18 Voted 10.00 on 07/22/06

Excellent work :)

Posted by +scarface+ at 2006-07-22 17:03:27 Voted 10.00 on 07/23/06

First to download :p

I really like this idea, I can't try it out til later though so I won;t vote quite yet, but RiffRaffs work is usually good stuff.
_________________________
§çà®Fãçë�

NWN1 Submissions:
[Persistent Banking] - [Character Appearance Modifier]
[XP/GP Distribution] - [Item Crafting] - [Socketed Items]

NWN2 Submissions:
[Persistent Banking]

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