Added Skullkeep's dynamic loot generation system
Added Skullkeep's PRC8 compatible dynamic loot generation system. Full compile. Updated release archive.
This commit is contained in:
Jaysyn904
224
_module/nss/sd_soc_install.nss
Normal file
224
_module/nss/sd_soc_install.nss
Normal file
@@ -0,0 +1,224 @@
|
||||
const string COLORTOKEN = " ##################$%&'()*+,-./0123456789:;;==?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[[]^_`abcdefghijklmnopqrstuvwxyz{|}~~<7E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>";
|
||||
|
||||
string ColorString(string sText, int nRed=255, int nGreen=255, int nBlue=255)
|
||||
{
|
||||
return "<c" + GetSubString(COLORTOKEN, nRed, 1) + GetSubString(COLORTOKEN, nGreen, 1) + GetSubString(COLORTOKEN, nBlue, 1) + ">" + sText + "</c>";
|
||||
}
|
||||
|
||||
|
||||
void RE_SOCKET(object oPC, object oItem)
|
||||
{
|
||||
int iLength, iStart, iVal, iAmt;
|
||||
string sSocks, sGem, i1, i2, i3, i4, i5, i6, i7, i8;
|
||||
string sName = GetName(oItem);
|
||||
|
||||
iLength = GetStringLength(sName);
|
||||
sSocks = GetSubString(sName, iLength-6, 1);
|
||||
//SendMessageToPC(oPC, sName + " has " + sSocks + " sockets");
|
||||
iVal = StringToInt(sSocks);
|
||||
SetLocalInt(oItem, "SOCKETS",iVal);
|
||||
}
|
||||
|
||||
void RE_GEM(object oPC, object oItem)
|
||||
{
|
||||
string sName, sType1;
|
||||
int rVal;
|
||||
|
||||
sName = GetName(oItem);
|
||||
|
||||
// Misc ability gems
|
||||
|
||||
if (FindSubString(sName, "Vengeful")>=0) sType1 = "HOLY_AVENGER";
|
||||
if (FindSubString(sName, "Deadly")>=0) sType1 = "KEEN";
|
||||
if (FindSubString(sName, "Unstoppable")>=0) sType1 = "FREEDOM";
|
||||
if (FindSubString(sName, "Slippery")>=0) sType1 = "IMPROVED_EVASION";
|
||||
if (FindSubString(sName, "Speedy")>=0) sType1 = "HASTE";
|
||||
if (FindSubString(sName, "Ocular")>=0) sType1 = "TRUE_SEEING";
|
||||
|
||||
|
||||
// Attack Gems
|
||||
|
||||
if (FindSubString(sName,"Enhancement")>=0){sType1 = "ENHANCEMENT_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Attack")>=0){sType1 = "ATTACK_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"AC")>=0){sType1 = "AC_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Brutal")>=0){sType1 = "MASSIVE_CRITICAL";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
|
||||
// Ability bonus gems
|
||||
|
||||
if (FindSubString(sName,"Mighty")>=0){sType1 = "STRENGTH_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Deft")>=0){sType1 = "DEXTERITY_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Wise")>=0){sType1 = "WISDOM_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Hardy")>=0){sType1 = "CONSTITUTION_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Clever")>=0){sType1 = "INTELLIGENCE_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Charming")>=0){sType1 = "CHARISMA_ABILITY_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
|
||||
|
||||
// Damage bonus gems
|
||||
|
||||
if (FindSubString(sName,"Corrosive")>=0){sType1 = "ACID_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Thumping")>=0){sType1 = "BLUDGEONING_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Ice")>=0){sType1 = "COLD_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Holy")>=0){sType1 = "DIVINE_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Zapping")>=0){sType1 = "ELECTIRCAL_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Scorching")>=0){sType1 = "FIRE_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Magical")>=0){sType1 = "MAGICAL_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Evil")>=0){sType1 = "NEGATIVE_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Impaling")>=0){sType1 = "PIERCING_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Benevolent")>=0){sType1 = "POSITIVE_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Slicing")>=0){sType1 = "SLASHING_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Booming")>=0){sType1 = "SONIC_DAMAGE_BONUS";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Regeneration")>=0){sType1 = "REGENERATION";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
if (FindSubString(sName,"Vamp Regen")>=0){sType1 = "VAMPIRIC_REGENERATION";
|
||||
rVal = StringToInt(GetSubString(sName, 7, 1));}
|
||||
|
||||
// Damage Res Gems
|
||||
|
||||
if (FindSubString(sName, "Alkaline")>=0)
|
||||
{sType1 = "ACID_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Solid")>=0)
|
||||
{sType1 = "BLUDGEONING_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Warm")>=0)
|
||||
{sType1 = "COLD_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Absolvsion")>=0)
|
||||
{sType1 = "DIVINE_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Grounding")>=0)
|
||||
{sType1 = "ELECTRICAL_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Cool")>=0)
|
||||
{sType1 = "FIRE_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Mantle")>=0)
|
||||
{sType1 = "MAGICAL_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Bright")>=0)
|
||||
{sType1 = "NEGATIVE_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Shell")>=0)
|
||||
{sType1 = "PIERCING_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Malevolent")>=0)
|
||||
{sType1 = "POSITIVE_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Mesh")>=0)
|
||||
{sType1 = "SLASHING_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
if (FindSubString(sName, "Dampening")>=0)
|
||||
{sType1 = "SONIC_DAMAGE_RESISTANCE";
|
||||
if (GetSubString(sName, 9, 1)==" ")rVal = StringToInt(GetSubString(sName, 8, 1));
|
||||
else rVal = StringToInt(GetSubString(sName, 8, 2));}
|
||||
|
||||
|
||||
SetLocalString(oItem, "GEM_TYPE", sType1);
|
||||
SetLocalInt(oItem, "AMOUNT", rVal);
|
||||
}
|
||||
|
||||
|
||||
void main()
|
||||
{
|
||||
object oPC = OBJECT_SELF;
|
||||
object oItem;
|
||||
int iLength, iStart, iVal, iAmt;
|
||||
string sSocks, sName;
|
||||
|
||||
// check item slots for socketed items
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_LEFTHAND, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_LEFTHAND, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_CHEST, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_CHEST, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_CLOAK, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_CLOAK, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_HEAD, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_HEAD, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_LEFTRING, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_LEFTRING, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_RIGHTRING, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_RIGHTRING, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_NECK, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_NECK, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_BOOTS, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_BOOTS, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_BELT, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_BELT, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_BOLTS, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_BOLTS, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_ARROWS, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_ARROWS, oPC));
|
||||
|
||||
if (GetTag(GetItemInSlot(INVENTORY_SLOT_ARMS, oPC))== "sf_socket_item")
|
||||
RE_SOCKET(oPC, GetItemInSlot(INVENTORY_SLOT_ARMS, oPC));
|
||||
|
||||
// check inventory for socketed items
|
||||
oItem = GetFirstItemInInventory(oPC);
|
||||
while (GetIsObjectValid(oItem))
|
||||
{
|
||||
if (GetTag(oItem)=="sf_socket_item")
|
||||
{
|
||||
RE_SOCKET(oPC, oItem);
|
||||
}
|
||||
if (GetResRef(oItem)=="sd_rune"||
|
||||
GetResRef(oItem)=="sd_rune2"||
|
||||
GetResRef(oItem)=="sd_rune3")
|
||||
{
|
||||
RE_GEM(oPC, oItem);
|
||||
}
|
||||
oItem = GetNextItemInInventory(oPC);
|
||||
}
|
||||
string sMess = ColorString("Socketed items system ", 255, 215, 0);
|
||||
sMess += ColorString("[loaded successfully]", 0, 255, 255);
|
||||
|
||||
SendMessageToPC(oPC, sMess);
|
||||
return;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user