Skins: |

NWN SCRIPTS

- Jump to comments -

Title

Custom Unlimited Ammo v2.0

Author

RiffRaff

Submitted / Updated

06-25-2006 / 11-22-2006

Category

Scripting routines

Expansions

HOTU-1.67

View Code

#include "x2_inc_switches"

// Reload ammo when out
void Reload();

// Apply MegaDamage onhit
// * Make sure you have the onhitcastspell property on the arrow
// iElement = DAMAGE_TYPE_ACID, DAMAGE_TYPE_DIVINE, DAMAGE_TYPE_ELECTRICAL, etc
// d = How many d100 rolls?
void MegaDamage(int iElement, int d);

// Do we want a more rapid rate of fire?
// You can add up to 5 extra attacks per round
void ExtraAttacks(int iAttacks);

// Do you want the PC to run faster?
// You can go up to 150%
void SpeedIncrease(int iPercent);

// Add Concealment to PC up to 100%
void Concealment(int iPercent);

// Undo whatever benefits you added with an item
void UnequipRemoveEffects();

void Reload()
{
  if (GetUserDefinedItemEventNumber() != X2_ITEM_EVENT_UNEQUIP) return;
  object oItem = GetPCItemLastUnequipped();
  if (GetItemStackSize(oItem) < 2)
  {
    object oPC = GetPCItemLastUnequippedBy();
    int iSlot = INVENTORY_SLOT_ARROWS;
    int iStack = 99;
    switch(GetBaseItemType(oItem))
    {
    case BASE_ITEM_ARROW:
      break;
    case BASE_ITEM_BULLET:
      iSlot = INVENTORY_SLOT_BULLETS;
      break;
    case BASE_ITEM_BOLT:
      iSlot = INVENTORY_SLOT_BOLTS;
      break;
    case BASE_ITEM_DART:
    case BASE_ITEM_GRENADE:
    case BASE_ITEM_SHURIKEN:
    case BASE_ITEM_THROWINGAXE:
      iSlot = INVENTORY_SLOT_RIGHTHAND;
      iStack = 50;
    }
    object oAmmo = CreateItemOnObject(GetResRef(oItem), oPC, iStack);
    AssignCommand(oPC, ClearAllActions(TRUE));
    DelayCommand(0.5f, AssignCommand(oPC, ActionEquipItem(oAmmo, iSlot)));
  }
}

void MegaDamage(int iElement, int d)
{
  if (GetUserDefinedItemEventNumber() != X2_ITEM_EVENT_ONHITCAST) return;
  ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectDamage(d100(d), iElement), GetSpellTargetObject());
}

void ExtraAttacks(int iAttacks)
{
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_EQUIP)
  {
    AssignCommand(GetPCItemLastEquipped(), ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectModifyAttacks(iAttacks), GetPCItemLastEquippedBy()));
  }
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_UNEQUIP) UnequipRemoveEffects();
}

void SpeedIncrease(int iPercent)
{
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_EQUIP)
  {
    AssignCommand(GetPCItemLastEquipped(), ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectMovementSpeedIncrease(iPercent), GetPCItemLastEquippedBy()));
  }
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_UNEQUIP) UnequipRemoveEffects();
}

void UnequipRemoveEffects()
{
  object oPC = GetPCItemLastUnequippedBy();
  object oItem = GetPCItemLastUnequipped();
  effect e = GetFirstEffect(oPC);
  while(GetIsEffectValid(e))
  {
    if (GetEffectCreator(e) == oItem) RemoveEffect(oPC, e);
    e = GetNextEffect(oPC);
  }
}

void Concealment(int iPercent)
{
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_EQUIP)
  {
    AssignCommand(GetPCItemLastEquipped(), ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectConcealment(iPercent), GetPCItemLastEquippedBy()));
  }
  if (GetUserDefinedItemEventNumber() == X2_ITEM_EVENT_UNEQUIP) UnequipRemoveEffects();
}

Select All Text | View Code in separate window

Format

Module and Code

Type

Type - Other

Includes

Custom

Description

NEW: No variables needed, much simpler! The standard Bioware unlimited arrows are restricted to 1d6 elemental damage or 5 piercing. This package shatters that limitation. You can make any arrow, bolt, bullet, throwing axe, dart, shruken, etc. UNLIMITED!
To use, just create ammo of some sort, then create a script with the same name as the tag of the item.

#include "rr_reloader"
void main() { Reload(); }

With megadamage, say 7d100 cold and 2d100 acid, 5 extra attacks per round, a 150% speed increase, and 55% concealment, it would look smething like this:

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

* When using megadamage, make sure your item has onhitcastspell:uniquepower

UPDATE: Many people wonder what the difference is between version 1 and 2.

Version 1 allows you to give a player just a bow and the scripting handles all of the unlimited ammo management for you.

Version 2 just focuses on the ammo alone and ignores the bow.

Version 1 is more complicated to use, but creates bows which are special. Version 2 is really easy to use, but only focuses on the ammo. Both versions are special in their own way *sniff* I love them both equally!

Version 1 is here:
Custom Unlimited Ammo v1.0

Files

Name	Type	Size	Downloads
rr_reloader.erfrr_reloader.erf Submitted: 06-25-2006 / Last Updated: 06-25-2006	erf	5.13Kb	308
Just the include file needed for unlimited ammo reloads.
Unlimited_Ammo_V2.modUnlimited_Ammo_V2.mod Submitted: 06-25-2006 / Last Updated: 06-25-2006	mod	58.24Kb	280
A module implementing the unlimited ammo with a dart with megadamage and an elemental arrow on the ground.

SCORE OUT OF 10

9.75
4 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

Darts reloading!!!

You Must Be Logged In to Participate.

Comments (9):

Posted by Fleshmelter at 2009-02-14 11:00:03 Voted 9.50 on 02/14/09

I make use of this script on my server, awesome script makes all my ammo unlimited throughout the server.

I don't make use of mega damage(add props manually which cuts down on amount of tag-based scripts), but my loot system is quite good for randomizing types of ammo distributed.

Since I add props manually I only need to create ammo, change tag to rr_reloader, and viola unlimited ammo. I have 35 different ammos from low damage to crazy on-hits....all unlimited and all work off the one script.

Excellent work!
_________________________
PW Action Server:
| Chaosgate |

Posted by kazi_saki at 2007-09-13 02:30:44 Voted 9.75 on 09/13/07

Hi,
I was able to make this script work the first time but when I tried it in other mods it doesn't seem to work anymore. I've followed the instructions: make the arrow then make script with same name as tag of arrow. It does not work anymore. Please help!

Posted by Brutalicus at 2007-01-13 22:24:21 Voted 9.75 on 01/13/07

This system still works well. I've used it several times even though I dislike the bio ware hand axes.I've always been a fan of returning weapons & this is the next best thing for a pw or even one shot mod. It's nice an configurable.. some things like mega damage i generally dont use since you can add standard damage to axes. regardless I'm still a fan of your script sets & use the custom bow scripts as well. :P
_________________________

Posted by shadowsilk at 2006-11-22 22:59:02

Sorry, I was wrong there--the only event you get at the end of the stack is on unequip, and the mystery last axe seems indistinguishable from a regular one (for me) I messed around using a placeable to take the axe and give the next stack, but it's not as simple as yours. I seperated it out into its own erf on my Aribeth Project page if you want to take a look.
_________________________
Link The Hall of Stormborns! Calling all shadowfolk! E-Mail me your favorite A Dance with Rogues character build at [email protected]

Posted by shadowsilk at 2006-11-19 08:27:11

I think the last axe or two you unequip at the end of the stack is an invalid object or something-I think gettag is blank, I can't remember. I am trying to recreate hangard's axe and have been poking at it for about a week now. Ticklish!
_________________________
Link The Hall of Stormborns! Calling all shadowfolk! E-Mail me your favorite A Dance with Rogues character build at [email protected]

Posted by shadowsilk at 2006-11-17 22:14:31

NWN 1. Did I stumble onto something for nwn2?
_________________________
Link The Hall of Stormborns! Calling all shadowfolk! E-Mail me your favorite A Dance with Rogues character build at [email protected]

Posted by riffraff at 2006-11-16 18:48:07

Is this in NWN1 or NWN2?
_________________________
My Submissions

Posted by shadowsilk at 2006-11-16 11:30:27

If you exhaust a stack of throwing axes and reload, you get a permanent -1 lb to your PC's weight. I would assume this is so with any weighted ammunition (i.e. darts)
Any workarounds out there?
_________________________
Link The Hall of Stormborns! Calling all shadowfolk! E-Mail me your favorite A Dance with Rogues character build at [email protected]

Posted by FunkySwerve at 2006-07-03 16:21:09 Voted 10.00 on 07/03/06

Bravo! I'm pretty picky about using other people's work, because of the added difficulty in troubleshooting, but this scriptset is both simple and elegant. Nice work!

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