Added NWN Dark Sun module contents
Added NWN Dark Sun module contents.
This commit is contained in:
Jaysyn904
271
nwnds_module/tgsofgc_inc.nss
Normal file
271
nwnds_module/tgsofgc_inc.nss
Normal file
@@ -0,0 +1,271 @@
|
||||
int CountEffectsOnObject(object oTarget)
|
||||
//Again this is a standard counting effect, it simply deletes the local int
|
||||
//Also because you can't SetLocalEffect, this has questionable utility
|
||||
{
|
||||
effect eTarget = GetFirstEffect(oTarget);
|
||||
DeleteLocalInt(oTarget, "count_e");
|
||||
do{
|
||||
int iNum = GetLocalInt(oTarget, "count_e");
|
||||
SetLocalInt(oTarget, "count_e", iNum+1);
|
||||
}while(GetIsEffectValid(eTarget = GetNextEffect(oTarget)) != FALSE);
|
||||
int iLocal = GetLocalInt(oTarget, "count_e");
|
||||
DeleteLocalInt(oTarget, "count_e");
|
||||
return iLocal;
|
||||
|
||||
}
|
||||
int CountObjectTypeInArea(object oArea, int iObjectType)
|
||||
//The int uses the same objecttype phrasing as GetObjectType
|
||||
{
|
||||
object oThing = GetFirstObjectInArea(oArea);
|
||||
DeleteLocalInt(oArea, "count_ota");
|
||||
do{
|
||||
int iType = GetObjectType(oThing);
|
||||
if(iType == iObjectType){
|
||||
int iCount = GetLocalInt(oArea, "count_ota");
|
||||
SetLocalInt(oArea, "count_ota", iCount+1);
|
||||
int iNum = GetLocalInt(oArea, "count_ota");
|
||||
string sNum = IntToString(iNum);
|
||||
SetLocalObject(oArea, sNum, oThing);
|
||||
}
|
||||
else{}
|
||||
}while((oThing = GetNextObjectInArea(oArea)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oArea, "count_ota");
|
||||
DeleteLocalInt(oArea, "count_ota");
|
||||
return iLocal;
|
||||
}
|
||||
int CountEnemyTowardsInArea(object oArea, object oTarget)
|
||||
//This is a counting function to return number of creatures hostile towards the target in the area
|
||||
{
|
||||
object oThing = GetFirstObjectInArea(oArea);
|
||||
DeleteLocalInt(oArea, "count_ett");
|
||||
do{
|
||||
int iType = GetObjectType(oThing);
|
||||
if(iType == OBJECT_TYPE_CREATURE){
|
||||
int iEnemy = GetIsEnemy(oThing, oTarget);
|
||||
if(iEnemy == TRUE){
|
||||
int iCount = GetLocalInt(oArea, "count_ett");
|
||||
SetLocalInt(oArea, "count_ett", iCount+1);
|
||||
int iNum = GetLocalInt(oArea, "count_ett");
|
||||
string sNum = IntToString(iNum);
|
||||
SetLocalObject(oArea, sNum, oThing);
|
||||
}
|
||||
else{}
|
||||
}
|
||||
else{}
|
||||
}while((oThing = GetNextObjectInArea(oArea)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oArea, "count_ett");
|
||||
DeleteLocalInt(oArea, "count_ett");
|
||||
return iLocal;
|
||||
}
|
||||
int CountMembersOfFaction(object oMemberOfFaction, int iPcOnly=TRUE)
|
||||
//the inputs are the same as per the getfirstfactionmember function
|
||||
//Stores all variables on the faction member used for the input
|
||||
{
|
||||
object oMember = GetFirstFactionMember(oMemberOfFaction, iPcOnly);
|
||||
do{
|
||||
int iCount = GetLocalInt(oMemberOfFaction, "count_mfm");
|
||||
SetLocalInt(oMemberOfFaction, "count_mfm", iCount+1);
|
||||
int iNum = GetLocalInt(oMemberOfFaction, "count_mfm");
|
||||
string sNum = IntToString(iNum);
|
||||
SetLocalObject(oMemberOfFaction, sNum, oMember);
|
||||
}while((oMember = GetNextFactionMember(oMemberOfFaction, iPcOnly)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oMemberOfFaction, "count_mfm");
|
||||
DeleteLocalInt(oMemberOfFaction, "count_mfm");
|
||||
return iLocal;
|
||||
}
|
||||
int CountPlayersInModule()
|
||||
{
|
||||
object oPlayer = GetFirstPC();
|
||||
object oModule = GetModule();
|
||||
DeleteLocalInt(oModule, "count_mp");
|
||||
do{
|
||||
int iCount = GetLocalInt(oModule, "count_mp");
|
||||
SetLocalInt(oModule, "count_mp", iCount+1);
|
||||
int iNum = GetLocalInt(oModule, "count_mp");
|
||||
string sNum = IntToString(iNum);
|
||||
SetLocalObject(oModule, sNum, oPlayer);
|
||||
}while((oPlayer = GetNextPC()) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oModule, "count_mp");
|
||||
DeleteLocalInt(oModule, "count_mp");
|
||||
return iLocal;
|
||||
}
|
||||
int CountPlayersInArea(object oArea)
|
||||
{
|
||||
object oThing = GetFirstObjectInArea(oArea);
|
||||
DeleteLocalInt(oArea, "count_ap");
|
||||
do{
|
||||
int iPc = GetIsPC(oThing);
|
||||
if(iPc == TRUE){
|
||||
int iCount = GetLocalInt(oArea, "count_ap");
|
||||
SetLocalInt(oArea, "count_ap", iCount+1);
|
||||
int iNum = GetLocalInt(oArea, "count_ap");
|
||||
string sNum = IntToString(iNum);
|
||||
SetLocalObject(oArea, sNum, oThing);
|
||||
}
|
||||
else{}
|
||||
}while((oThing = GetNextObjectInArea(oArea)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oArea, "count_ap");
|
||||
DeleteLocalInt(oArea, "count_ap");
|
||||
return iLocal;
|
||||
}
|
||||
int CountItemsInInventory(object oChest)
|
||||
//Counting functions output a int of the count as well as saving
|
||||
//a number of local variables making GetRandom scripting possible
|
||||
{
|
||||
object oItem = GetFirstItemInInventory(oChest);
|
||||
DeleteLocalInt(oChest, "count_i");
|
||||
do{
|
||||
int iCount = GetLocalInt(oChest, "count_i");
|
||||
SetLocalInt(oChest, "count_i", iCount+1);
|
||||
int iNum = GetLocalInt(oChest, "count_i");
|
||||
string sNum = IntToString(iNum);
|
||||
string sResref = GetResRef(oItem);
|
||||
SetLocalString(oChest, sNum, sResref);
|
||||
SetLocalObject(oChest, sNum, oItem);
|
||||
}while((oItem = GetNextItemInInventory(oChest)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oChest, "count_i");
|
||||
DeleteLocalInt(oChest, "count_i");
|
||||
return iLocal;
|
||||
}
|
||||
float RandomFloat(float fInput)
|
||||
{
|
||||
float fOutput = IntToFloat(Random(FloatToInt(fInput)));
|
||||
return fOutput;
|
||||
}
|
||||
location GetLocationInArcOfObject(object oTarget, float fArcAngle, float fArcAngleLength, int iMinDistance, int iMaxDistance)
|
||||
//This is ideal for say getting a location behind something
|
||||
//The arcangle is the counterclockwise variation from the object's facing, ie 0 = objects facing, and 180 = objects rear
|
||||
//arcangle length is the angle of the arc, a quarter circle is 90
|
||||
//The min distance is the minimium distance the location will be from the target
|
||||
//maximium distance is maximium distance of the location from target
|
||||
//out put location's fOrient is always facing the object used to create it
|
||||
{
|
||||
float fFacing = GetFacing(oTarget)+fArcAngle;
|
||||
float fHalfArc = (fArcAngleLength/2.0);
|
||||
float fMax = fFacing+fHalfArc;
|
||||
float fMin = fFacing+fHalfArc;
|
||||
float fArcSpread = fMax-fMin;
|
||||
float fAngle = RandomFloat(fArcSpread+1.0)+fMin;
|
||||
int iDistSpread = iMaxDistance-iMinDistance;
|
||||
float fDist = IntToFloat(Random(iDistSpread)+iMinDistance);
|
||||
float fX1 = cos(fAngle);
|
||||
float fY1 = sin(fAngle);
|
||||
float fX = (fX1*fDist);
|
||||
float fY = (fY1*fDist);
|
||||
vector vPos = Vector(fX, fY, 0.0);
|
||||
object oArea = GetArea(oTarget);
|
||||
float fOrient = fAngle+180.0;
|
||||
location lOutput = Location(oArea, vPos, fOrient);
|
||||
return lOutput;
|
||||
}
|
||||
location GetLocationNear(int iMinDistance, int iMaxDistance, location lTarget)
|
||||
//This returns a location near the target location such that it is at least min dist away and isn't more than max dist away
|
||||
{
|
||||
int iSpread = iMaxDistance-iMinDistance;
|
||||
int iDist = Random(iSpread+1)+iMinDistance;
|
||||
int iX = Random(iDist+1);
|
||||
int iY = iDist-iX;
|
||||
float fX = IntToFloat(iX);
|
||||
float fY = IntToFloat(iY);
|
||||
vector vAdd = Vector(fX, fY, 0.0);
|
||||
vector vCurrent = GetPositionFromLocation(lTarget);
|
||||
object oArea = GetAreaFromLocation(lTarget);
|
||||
float fOrient = GetFacingFromLocation(lTarget);
|
||||
vector vNew = vCurrent+vAdd;
|
||||
location lOutput = Location(oArea, vNew, fOrient);
|
||||
return lOutput;
|
||||
}
|
||||
location GetRandomLocation(object oArea, int iXTiles, int iYTiles, float fOrient)
|
||||
{
|
||||
int iX = Random(iXTiles*10); //Random # between 0- 10* number of tiles (each tile is 10 in each direction)
|
||||
int iY = Random(iYTiles*10); //Same as above
|
||||
float fX = IntToFloat(iX); //Convert int to float, because floats are necessary for distance and creating vectors
|
||||
float fY = IntToFloat(iY);
|
||||
vector vPos = Vector(fX, fY, 0.0);//Create a vector from your random coordinates of above
|
||||
location lTarget = Location(oArea, vPos, fOrient);//Create a location from the position above and input data
|
||||
return lTarget; //output the target location
|
||||
}
|
||||
int GetTotalHitDiceOfArea(object oArea)
|
||||
//this returns the total hit dice of every creature currently in the area
|
||||
//This is less like other counting functions in that it isn't met for prepatory work
|
||||
//This function erases all its local ints
|
||||
{
|
||||
object oCritter = GetFirstObjectInArea(oArea);
|
||||
DeleteLocalInt(oArea, "hitdice");
|
||||
do{
|
||||
int iType = GetObjectType(oCritter);
|
||||
if(iType == OBJECT_TYPE_CREATURE){
|
||||
int iHitDice = GetHitDice(oCritter);
|
||||
int iNum = GetLocalInt(oArea, "hitdice");
|
||||
SetLocalInt(oArea, "hitdice", iNum+iHitDice);
|
||||
}
|
||||
else{}
|
||||
}while((oCritter = GetNextObjectInArea(oArea)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oArea, "hitdice");
|
||||
DeleteLocalInt(oArea, "hitdice");
|
||||
return iLocal;
|
||||
|
||||
}
|
||||
int GetTotalHitDiceOfPlayersInArea(object oArea)
|
||||
//this returns the total hit dice of every creature currently in the area
|
||||
//This is less like other counting functions in that it isn't met for prepatory work
|
||||
//This function erases all its local ints
|
||||
{
|
||||
object oCritter = GetFirstObjectInArea(oArea);
|
||||
DeleteLocalInt(oArea, "hitdice");
|
||||
do{
|
||||
int iType = GetIsPC(oCritter);
|
||||
if(iType == TRUE){
|
||||
int iHitDice = GetHitDice(oCritter);
|
||||
int iNum = GetLocalInt(oArea, "hitdice");
|
||||
SetLocalInt(oArea, "hitdice", iNum+iHitDice);
|
||||
}
|
||||
else{}
|
||||
}while((oCritter = GetNextObjectInArea(oArea)) != OBJECT_INVALID);
|
||||
int iLocal = GetLocalInt(oArea, "hitdice");
|
||||
DeleteLocalInt(oArea, "hitdice");
|
||||
return iLocal;
|
||||
|
||||
}
|
||||
int GetAverageCreatureHitDice(object oArea)
|
||||
//this returns the average hitdice count for all the creatures in an area
|
||||
//This doesn't count players
|
||||
{
|
||||
int iCount = CountObjectTypeInArea(oArea, OBJECT_TYPE_CREATURE);
|
||||
int iCountPlayers = CountPlayersInArea(oArea);
|
||||
int iHDTotal = GetTotalHitDiceOfArea(oArea);
|
||||
int iHDPlayers = GetTotalHitDiceOfPlayersInArea(oArea);
|
||||
int iHD = iHDTotal-iHDPlayers;
|
||||
int iDiv = iCount-iCountPlayers;
|
||||
int iReturn = (iHD/iDiv);
|
||||
return iReturn;
|
||||
}
|
||||
object GetRandomItemIn(object oTarget)
|
||||
//This calls the Inventory Counting function as part of it
|
||||
//Note these are local objects, so it actually retrieves that object, not a copy of it
|
||||
{
|
||||
int iNum = CountItemsInInventory(oTarget);
|
||||
int iPick = Random(iNum)+1;
|
||||
string sNum = IntToString(iPick);
|
||||
object oReturn = GetLocalObject(oTarget, sNum);
|
||||
return oReturn;
|
||||
}
|
||||
object GetRandomObjectInArea(object oArea, int iObjectType)
|
||||
//This returns the actual object froma getlocal object after running the counting function
|
||||
{
|
||||
int iNum = CountObjectTypeInArea(oArea, iObjectType);
|
||||
int iPick = Random(iNum)+1;
|
||||
string sNum = IntToString(iPick);
|
||||
object oReturn = GetLocalObject(oArea, sNum);
|
||||
return oReturn;
|
||||
}
|
||||
void EmptyInventory(object oTarget)
|
||||
//this destroys all items in a target object's inventory
|
||||
//Including plot items...
|
||||
{
|
||||
object oItem = GetFirstItemInInventory(oTarget);
|
||||
do{
|
||||
SetPlotFlag(oItem, FALSE);
|
||||
DestroyObject(oItem, 0.0);
|
||||
}while((oItem = GetNextItemInInventory(oTarget)) != OBJECT_INVALID);
|
||||
}
|
||||
Reference in New Issue
Block a user