5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
147 lines
4.7 KiB
Plaintext
147 lines
4.7 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Name mh_spell_at_ins
|
|
//:: FileNameCast a spell to any instrument
|
|
//:: Copyright (c) 2001 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
This script is run when a player is in
|
|
Cast Spell at Instrument mod
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Age
|
|
//:: Created On: February 2004
|
|
//:://////////////////////////////////////////////
|
|
|
|
|
|
//Modified by WodahsEht -- Item Properties were being removed even if a new property wasn't applied.
|
|
|
|
#include "prc_inc_clsfunc"
|
|
#include "x2_inc_spellhook"
|
|
|
|
void finish(object oTarget,int iDesactive = FALSE)
|
|
{
|
|
string sScript = GetLocalString(OBJECT_SELF,"temp_spell_at_inst");
|
|
if (sScript != "")
|
|
{
|
|
ExecuteScript(sScript,OBJECT_SELF);
|
|
}
|
|
if(iDesactive)
|
|
{
|
|
UnactiveModeCIMM(oTarget);
|
|
}
|
|
|
|
}
|
|
|
|
void main()
|
|
{
|
|
//define variable
|
|
object oItem = PRCGetSpellTargetObject();
|
|
object oCaster = GetLastSpellCaster();
|
|
|
|
//if the target is not a instrument or spell cast from item or the caster is not
|
|
//the creator of the item, or if the caster is not in add spell mod
|
|
//cast the spell normaly and exit the add spell mod
|
|
|
|
if( (GetObjectType(oItem) != OBJECT_TYPE_ITEM) ||
|
|
( GetTag(oItem) != "MH_IT_LUTH" &&
|
|
GetTag(oItem) != "MH_IT_HARP" &&
|
|
GetTag(oItem) != "MH_IT_FLUTE" &&
|
|
GetTag(oItem) != "MH_IT_COR" ) ||
|
|
//GetObjectType(GetSpellCastItem()) != OBJECT_TYPE_INVALID ||
|
|
oCaster != GetLocalObject(oItem, "mh_createur")
|
|
|
|
)
|
|
{
|
|
|
|
finish(oCaster,GetLocalInt(oCaster,"use_CIMM"));
|
|
return;
|
|
}
|
|
|
|
int iID = GetSpellId();
|
|
|
|
int iIPConst = IPGetIPConstCastSpellFromSpellID(iID);
|
|
|
|
if (iID == 0 && iIPConst != 0)
|
|
{
|
|
//FloatingTextStrRefOnCreature(84544,oCaster);
|
|
finish(oCaster);
|
|
return;
|
|
}
|
|
itemproperty ipC ;
|
|
itemproperty ipPropertySave;
|
|
float fCharge1 = 0.0f;
|
|
float fCharge2;
|
|
int iRemoveProperty = 0;
|
|
int iCost;
|
|
int iNewCost;
|
|
|
|
if(GetItemHasItemProperty(oItem, ITEM_PROPERTY_CAST_SPELL))
|
|
{
|
|
//detect if the targe has the spell property
|
|
itemproperty ipTest = GetFirstItemProperty(oItem);
|
|
while(GetIsItemPropertyValid(ipTest) && (iIPConst != GetItemPropertySubType(ipTest)))
|
|
{
|
|
ipTest = GetNextItemProperty(oItem);
|
|
}
|
|
|
|
if (iIPConst == GetItemPropertySubType(ipTest) )
|
|
{
|
|
iCost = GetItemPropertyCostTableValue(ipTest);
|
|
if(iCost == IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY)
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_2_USES_PER_DAY;
|
|
if(iCost == IP_CONST_CASTSPELL_NUMUSES_2_USES_PER_DAY)
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_3_USES_PER_DAY;
|
|
if(iCost == IP_CONST_CASTSPELL_NUMUSES_3_USES_PER_DAY)
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_4_USES_PER_DAY;
|
|
if(iCost == IP_CONST_CASTSPELL_NUMUSES_4_USES_PER_DAY)
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_5_USES_PER_DAY;
|
|
if(iCost == IP_CONST_CASTSPELL_NUMUSES_5_USES_PER_DAY)
|
|
{
|
|
//if the item has max return
|
|
FloatingTextStrRefOnCreature(16825242,oCaster);
|
|
finish(oCaster);
|
|
PRCSetUserSpecificSpellScriptFinished();
|
|
return;
|
|
}
|
|
iRemoveProperty = TRUE; // tell it to remove the item charges later.
|
|
ipPropertySave = ipTest; // gotta rember which property to remove.
|
|
ipC = ItemPropertyCastSpell(iIPConst,iNewCost);
|
|
}
|
|
else
|
|
{
|
|
iCost = 0;
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY;
|
|
ipC = ItemPropertyCastSpell(iIPConst,IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
iCost = 0;
|
|
iNewCost = IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY;
|
|
ipC = ItemPropertyCastSpell(iIPConst,IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY);
|
|
}
|
|
|
|
|
|
//get the cost of the property
|
|
|
|
if(iCost > 0)
|
|
fCharge1 = StringToFloat(Get2DACache("iprp_chargecost","Cost",iCost));
|
|
|
|
fCharge2 = StringToFloat(Get2DACache("iprp_chargecost","Cost",iNewCost));
|
|
|
|
int iTotalCost = FloatToInt( (fCharge2 - fCharge1) * StringToFloat(Get2DACache("iprp_spells","Cost",iIPConst)) );
|
|
int iCostMax = GetLocalInt(oItem,"cout_instrument");
|
|
// if the cost is too hight return
|
|
if(iCostMax < iTotalCost)
|
|
{
|
|
FloatingTextStrRefOnCreature(16825243,oCaster);
|
|
finish(oCaster);
|
|
PRCSetUserSpecificSpellScriptFinished();
|
|
return;
|
|
}
|
|
if (iRemoveProperty) RemoveItemProperty(oItem,ipPropertySave); // Prevent charges from stacking.
|
|
AddItemProperty(DURATION_TYPE_PERMANENT,ipC, oItem);
|
|
SetLocalInt(oItem,"cout_instrument",iCostMax - iTotalCost);
|
|
PRCSetUserSpecificSpellScriptFinished();
|
|
}
|