Skins: |

NWN2 SCRIPTS

- Jump to comments -

Name

POVES

Author

Product of void

Submitted / Updated

12-05-2007 / 12-07-2007

Category

Scripting routines

Type

Type - Rewards

Format

Module Only

ShowCode

// POV crafting for enchanting items... more of Enchanting then crafting..huh. 

#include "x2_inc_itemprop" //for adding properties 

#include "nw_i0_plot" //for has item 



void Enchantitnow(object oEnchantthis, int iThisway, int iThisstong); 





void main() 

{ 

object oEnchantit =GetItemActivatedTarget(); 

object oRecipe = GetItemActivated(); 

object oCrafter =GetItemActivator(); 


//requires scrolls to have tag of "pov_enchanting" or it quits.
if(GetTag(oRecipe) !="pov_enchanting") return; 



//requires being in an area with the tag of "pov_gEnchant" or it does not work.
if (GetTag(GetArea(oCrafter)) != "pov_gEnchant") 

{ 

SendMessageToPC(oCrafter, "This area does not have enough magical energy to surport such a thing"); 
Return; 

} 

object oCraftbench=GetNearestObjectByTag("pov_gnCbench"); 


//the Reserf of the item is what sets what enchantment is done and what items are required.

//example would be 100gncr
//which would end up like sFirstitem =cr, sSeconditem = gn and sEnchantmen =100  
string sEnchantmen=GetStringLeft(GetResRef(oRecipe), 5); 

string sFirstitem =GetStringRight(GetResRef(oRecipe), 2); 

string sSeconditem= GetStringRight(sEnchantmen, 2); 

sEnchantmen=GetStringLeft(sEnchantmen, 3); 

//here I would put a second function that would re-assign the strings to actual tags of items IG like gold necklaces.
//make it run twice to assign both items.


int iCaster =GetSkillRank(SKILL_SPELLCRAFT,oCrafter); 


//requires atleast 10 skill points in spell craft to work.  
if(iCaster <10) { 

SendMessageToPC(oCrafter, "you are not skilled enough to work this craft."); 

return; 

} 


//checks bench for items and quits if not there.
if (!HasItem(oCraftbench, sFirstitem) &&!HasItem(oCraftbench, sSeconditem)) 

{ 

SendMessageToPC(oCrafter, "you are missing some ingredants"); 

return; 

} 


//locks bench so no cheating
SetLocked(oCraftbench, TRUE); 




//run the part that enchants it all. 
Enchantitnow(oEnchantit,StringToInt(sEnchantmen) ,iCaster); 


//destroys all items in bench
object oEmpty =GetFirstItemInInventory(oCraftbench); 


while(GetIsObjectValid(oEmpty)) 

{ 

DestroyObject(oEmpty); 

oEmpty=GetNextItemInInventory(oCraftbench); 

} 





DestroyObject(oRecipe); 

SetLocked(oCraftbench, FALSE); 

}//end of function. 


//******************************end of main start of enchantment function.


//actual enchanting thingie 


void Enchantitnow(object oEnchantthis, int iThisway, int iThisstong) 

{ 

itemproperty nProp; 

//called from skills.2da 





if (iThisway >100 && iThisway <200) 

{ 

iThisway = iThisway -100; 

iThisstong = (iThisstong/5)*3; 

if (iThisstong >18) iThisstong -18; 

nProp =ItemPropertySkillBonus(iThisway, iThisstong); 

} 



if (iThisway >200 && iThisway <206) 

{ 

iThisway = iThisway -200; 

iThisstong = iThisstong/10; 

nProp =ItemPropertyAbilityBonus(iThisway,iThisstong); 

} 



//adds ac 

if (iThisway ==207) 

{ 

iThisstong = iThisstong/10; 

nProp =ItemPropertyACBonus(iThisstong); 

} 



//adds to attack bonus 

if (iThisway ==208) 

{ 

iThisstong = iThisstong/7; 

nProp =ItemPropertyAttackBonus(iThisstong); 

} 





//adds feats from feat.2da 

if (iThisway >209 && iThisway < 310) 

{ 

iThisway = iThisway -200; 

nProp=ItemPropertyBonusFeat(iThisway); 

} 



/*do damage reduction soak 

if (iThisway >312 && iThisway < 340) 

{ 

<a target="_blank" href="http://nwn1.nwn2lexicon.com/compiled/function.ItemPropertyDamageReduction.html">Link</a> 



nProp = ItemPropertyDamageReduction(iThisway,iThisstong ); 



} 

*/ 



//http://nwn1.nwn2lexicon.com/compiled/function.ItemPropertyDamageBonus.html 



//damage bonus 

//damage type iprp_damagetype.2da iprp_dmgtypes.2da 

//damage amount iprp_damagecost.2da 1d4 

if (iThisway >341 && iThisway < 360) 

{ 

iThisstong = iThisstong/7; 



if(iThisstong ==1)iThisstong = IP_CONST_DAMAGEBONUS_1d4; 

if(iThisstong ==2)iThisstong =IP_CONST_DAMAGEBONUS_1d6; 

if(iThisstong ==3)iThisstong =IP_CONST_DAMAGEBONUS_1d8; 

if(iThisstong ==4)iThisstong =IP_CONST_DAMAGEBONUS_2d4; 

switch 

iThisway=IP_CONST_DAMAGETYPE_ACID; 



nProp =ItemPropertyDamageBonus(iThisway,iThisstong); 

} 



//http://nwn1.nwn2lexicon.com/compiled/
function.ItemPropertyDamageResistance.html 

//damge resistance 12 types. 



if (iThisway >361 && iThisway < 370) 

{ 





nProp =ItemPropertyDamageResistance(iThisway,iThisstong); 

} 



//adds spells ability to it. 

if (iThisway >700) 

{ 

//has to figure out what spell though..hmmm. 

iThisway = iThisway -400; 



nProp =ItemPropertyCastSpell(iThisway,IP_CONST_CASTSPELL_NUMUSES_1_CHARGE_PER_USE); 



SetItemCharges(oEnchantthis, 20); 



} 



//AddItemProperty(DURATION_TYPE_PERMANENT, 



IPSafeAddItemProperty(oEnchantthis,nProp, 0.0,X2_IP_ADDPROP_POLICY_REPLACE_EXISTING); 

} 


//what it does that is intresting is go off the 2da numbers and assigns what enchantment it will add.

Select All Text | View Code in separate window

Patch

1.00

NWN2Game

All

Description

I call it POVES. Product of Voids enchantment system.

The idea is to make dropable items that on use will enchant an existing item. Few changes need to be done and testing but here is idea.

So instead of crafting you just level up to increase skill Spell craft and aquire by either a drop or buying a scroll use it on an item and it gains a bonus.

any bugs found would be nice to know. Hopefully someone finds it useful.

revised it a little to have more comments to make more sense. here is what is going on.

requires an area with a tag "pov_enchanting"
Requires an object with the tag "pov_gEnchant"
you put the items required in the object (made a note of what should be added to script there).
(I would add another function that re-assigns the string to an Tag of actual IG loot. Gold necklaces etc).
then use the scroll on something to enchant.
How strong of an enchantment depends on the level of spell craft skill you have.
goes through a hurdle of ifs to see what number is there for enchanting.
it uses the numbers from the games 2da files to assign what feats, skills, etc are assigned.
Everything is destroyed in the workbench.
Scroll is destroyed

Files

Name	Type	Size	Downloads
NO FILES

SCORE OUT OF 10

N/A
Cast Your Vote!
Voting FAQ

PORTFOLIO

Add this entry to your portfolio so you can track it

Manage your existing portfolios or create a new one.

SCREENS

No Images

You Must Be Logged In to Participate.

Comments (2):

Posted by Product of void at 2007-12-07 16:18:57

requires being in an area with the tag (pov_gEnchant) and requires an item in the are with tag (pov_gnCbench). The reserf of the scroll has numbers and letters. four letters and three numbers. checks the bench for items set in the four letters. (was going to create a secondary function that would switch the string. example "gn" would become the tag for a gold necklace). removes the items in workbench.
checks spell craft of user which limits how strong the enchantment is.
destroys the scroll.

make sense?
_________________________
I blame god for everything right in my life. -ME.

Posted by MokahTGS at 2007-12-06 14:24:41

Ok, so this works by enchantment scrolls? Can you give a clearer description of what this does or how it works? It sounds interesting, but I'm a little confused as to the functionality.
_________________________
Mokah - The Grumpy Strumpet
|| Dear Strumpet Letters || Jabberwocky Development Blog || Vertex I - The State of the Union ||

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

NWN2 Voting Standards

10 - A Masterpiece, Genuinely Groundbreaking
9 - Outstanding, a Must Have
8 - Excellent, Recommended to Anyone
7 - Very Good, Deserves a Look
6 - Good, Qualified Recommendation
5 - Fair, Solid yet Unremarkable
4 - Some Merit, Requires Improvements
3 - Poor Execution, Potential Unrealized
2 - Very Little Appeal
1 - Not Recommended to Anyone