Jaysyn/PoA_PRC8
Jaysyn/PoA_PRC8
1
1
Fork 0
Code Issues 1 Pull Requests Packages Projects Releases 1 Wiki Activity

Removed depreciated location saving functions.

Browse Source 
Removed depreciated location saving functions.  Removed duplicate `prc_combatmove.nss` from top hak.  Full compile.  Updated release archive.
This commit is contained in:
Jaysyn904 2024-11-07 07:42:00 -05:00
parent 6aa1491726
commit 3891e0173a
24 changed files with 72 additions and 133 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
_haks/poa_top/prc_combatmove.ncs
View File

Binary file not shown.

66
_haks/poa_top/prc_combatmove.nss
View File

@ -1,66 +0,0 @@
//::///////////////////////////////////////////////
//:: Combat Maneuver calling script:
//:: prc_combatmove
//::///////////////////////////////////////////////
/** @file
Relies on prc_inc_combmove to do various things
This is only for the basic maneuvers, special
versions of these things should be called from
their own scripts.
Things:
Trip
Bullrush
Charge
Overrun
Disarm
Shield Bash
@author Stratovarius
@date Created - 2018.9.18
*/
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
#include "prc_inc_combmove"
void main()
{
object oPC = OBJECT_SELF;
object oTarget = PRCGetSpellTargetObject();
location lTarget = PRCGetSpellTargetLocation();
int nMoveType = PRCGetSpellId();
if (oTarget == oPC) return; // No hitting yourself
if (GetLocalInt(oPC, "CombatLoopProtection")) return; // Stop the damn loop
//FloatingTextStringOnCreature("MoveID: "+IntToString(nMoveType), oPC, FALSE);
if (nMoveType == COMBAT_CHARGE)
DoCharge(oPC, oTarget);
else if (nMoveType == COMBAT_CHARGE_BULL_RUSH)
DoCharge(oPC, oTarget, FALSE, TRUE, 0, -1, TRUE);
else if (nMoveType == COMBAT_BULL_RUSH)
DoBullRush(oPC, oTarget, 0);
else if (nMoveType == COMBAT_TRIP)
DoTrip(oPC, oTarget, 0);
else if (nMoveType == COMBAT_OVERRUN)
DoOverrun(oPC, oTarget, lTarget);
else if (nMoveType == COMBAT_DISARM)
DoDisarm(oPC, oTarget);
else if (nMoveType == COMBAT_SHIELD_BASH)
DoShieldBash(oPC, oTarget);
else if (nMoveType == COMBAT_SHIELD_CHARGE)
DoShieldCharge(oPC, oTarget);
else if (nMoveType == COMBAT_SHIELD_SLAM)
{
// If we're far enough away, charge, else, slam
if (MetersToFeet(GetDistanceBetweenLocations(GetLocation(oPC), GetLocation(oTarget))) >= 10.0)
DoShieldCharge(oPC, oTarget, TRUE);
else
DoShieldBash(oPC, oTarget, 0, 0, 0, FALSE, FALSE, TRUE);
}
SetLocalInt(oPC, "CombatLoopProtection", TRUE);
DelayCommand(4.0, DeleteLocalInt(oPC, "CombatLoopProtection"));
}

2
_module/are/labyrinth_undead.are.json
View File

@ -44197,7 +44197,7 @@
},
"Version": {
"type": "dword",
"value": 32
"value": 33
},
"Width": {
"type": "int",

2
_module/are/townofascension.are.json
View File

@ -6357,7 +6357,7 @@
},
"Version": {
"type": "dword",
"value": 512
"value": 513
},
"Width": {
"type": "int",

43
_module/itp/creaturepalcus.itp.json
View File

@ -3891,6 +3891,30 @@
"type": "byte",
"value": 49
},
"LIST": {
"type": "list",
"value": [
{
"__struct_id": 0,
"CR": {
"type": "float",
"value": 52.0
},
"FACTION": {
"type": "cexostring",
"value": "Hostile"
},
"NAME": {
"type": "cexostring",
"value": "Pwnz3r Rat"
},
"RESREF": {
"type": "resref",
"value": "pwnz3rat"
}
}
]
},
"STRREF": {
"type": "dword",
"value": 63246
@ -31310,25 +31334,6 @@
"value": 12722
}
},
{
"__struct_id": 0,
"CR": {
"type": "float",
"value": 52.0
},
"FACTION": {
"type": "cexostring",
"value": "Hostile"
},
"NAME": {
"type": "cexostring",
"value": "Pwnz3r Rat"
},
"RESREF": {
"type": "resref",
"value": "pwnz3rat"
}
},
{
"__struct_id": 0,
"CR": {

BIN
_module/ncs/airlessaura1.ncs
View File

Binary file not shown.

BIN
_module/ncs/altardeath2.ncs
View File

Binary file not shown.

BIN
_module/ncs/onpclevelup.ncs
View File

Binary file not shown.

BIN
_module/ncs/onplayerlevelup.ncs
View File

Binary file not shown.

BIN
_module/ncs/onplayerrest.ncs
View File

Binary file not shown.

BIN
_module/ncs/savecharacters.ncs
View File

Binary file not shown.

BIN
_module/ncs/savecharacters2.ncs
View File

Binary file not shown.

BIN
_module/ncs/savepcinfo.ncs
View File

Binary file not shown.

BIN
_module/ncs/spawnb_cc_dactiv.ncs
View File

Binary file not shown.

BIN
_module/ncs/voyageskip.ncs
View File

Binary file not shown.

4
_module/nss/onpclevelup.nss
View File

@ -47,7 +47,7 @@ if (!GetIsPC(oPC)) return;
//If in the guild only!
//If they are in the guild...
if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID) <- location handled by PRC8 now
{
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
{
@ -59,7 +59,7 @@ if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
//Tell the PC thier location was saved..
SendMessageToPC(oPC, "Location Saved.");
}
}
} */
////////////AUTOMATIC CHARACTER SAVING ON LEVEL UP OPTION///////////////////
//Delete the // on the next 2 lines below to activate Automatic Character Saving.
if(IsShifterMorphed(oPC)!=1)

4
_module/nss/onplayerlevelup.nss
View File

@ -59,7 +59,7 @@ void main()
//If in the guild only!
//If they are in the guild...
if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
{
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
{
@ -71,7 +71,7 @@ void main()
//Tell the PC thier location was saved..
SendMessageToPC(oPC, "Location Saved.");
}
}
} */
// (DO NOT TOUCH THIS LINE!) */

20
_module/nss/onplayerrest.nss
View File

@ -101,19 +101,19 @@ int nHD = GetHitDice(oPC);
//For the guild only!
//If they are in the guild...
if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
{
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
{
object oGuild = GetItemPossessedBy(oPC, "guildstone");
if(GetArea(GetAreaFromLocation(lSaved))!= OBJECT_INVALID)
{
object oGuild = GetItemPossessedBy(oPC, "guildstone");
//Store the PC's location, so they can come back here after relogging
SetCampaignLocation("LOCATIONS", GetName(oGuild), lSaved, oPC);
//Store the PC's location, so they can come back here after relogging
SetCampaignLocation("LOCATIONS", GetName(oGuild), lSaved, oPC);
//Tell the PC their location was saved..
SendMessageToPC(oPP, "Location Saved!");
}
}
//Tell the PC their location was saved..
SendMessageToPC(oPP, "Location Saved!");
}
} */
//************CLEAR THE PC'S REPUTATION WITH ALL NPCS*****************
if(GetIsPC(oPlayer))

10
_module/nss/savecharacters.nss
View File

@ -35,9 +35,9 @@ string sName = GetStringLeft(GetName(oPP), 20);
location lSaved = GetLocation(oPP);
int MULTI_PLAYER = GetLocalInt(GetModule(), "multi");
while(GetIsObjectValid(oPP))
/*while(GetIsObjectValid(oPP))
{
//If they are in the guild...
//If they are in the guild...
if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
{
//Let's make sure their area is valid!
@ -55,8 +55,8 @@ if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
else
{
SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your location.");
}
}
}
}*/
//If the PC is not polymorphed save their character as well!
if(IsShifterMorphed(oPP)==FALSE)
@ -75,7 +75,7 @@ SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your
}
oPP = GetNextPC();
}
//}
SendMessageToPC(GetPCLevellingUp(), "All characters on the server are saved when any character levels up.");
string oDM = (GetPCPlayerName(GetPCLevellingUp())+" has leveled. All characters saved.");

6
_module/nss/savecharacters2.nss
View File

@ -36,7 +36,7 @@ int MULTI_PLAYER = GetLocalInt(GetModule(), "multi");
while(GetIsObjectValid(oPP))
{
//If they are in the guild...
if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
/* if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID) <- Location handled by PRC8 now
{
//Let's make sure their area is valid!
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
@ -54,7 +54,7 @@ if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
else
{
SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your location.");
}
} */
}
//If the PC is not polymorphed save their character as well!
@ -74,7 +74,7 @@ else
}
oPP = GetNextPC();
}
//}
SendMessageToPC(GetPCSpeaker(), "All characters on the server have been saved.");
SendMessageToAllDMs("All characters saved at Rowan Tree.");

6
_module/nss/savepcinfo.nss
View File

@ -51,7 +51,7 @@ void main()
lSaved = GetLocation(oPC);
//If they are in the guild...
if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID) <- Handled by PRC8 now
{
//Let's make sure their area is valid!
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
@ -69,7 +69,7 @@ void main()
else
{
SendMessageToPC(oPC, "Your location was NOT saved, you need to rest to save your location.");
}
} */
}
//Make their death log empty again if they aren't dead..
@ -94,4 +94,4 @@ void main()
}
//End Script
}
//}

40
_module/nss/voyageskip.nss
View File

@ -69,7 +69,7 @@ while (GetIsObjectValid(oItem))
}
// */
//We should delay this to allow them to logg on first!
//We should delay this to allow them to log on first!
DelayCommand(0.2, DoJump(oPC));
@ -93,15 +93,15 @@ object oGuild = GetItemPossessedBy(oPC, "guildstone");
location lSaved;
//Store the PC's location, so they can come back here after relogging
if(oGuild != OBJECT_INVALID)
//Store the PC's location, so they can come back here after relogging <- Handled by PRC8
/* if(oGuild != OBJECT_INVALID)
{
lSaved = GetCampaignLocation("LOCATIONS", GetName(oGuild), oPC);
}
else
{
lSaved = GetLocation(GetWaypointByTag("guildway"));
}
} */
//If it's a DM
@ -123,25 +123,25 @@ if(GetIsDM(oPC))
///////////////////////////////////////////////////////////////////////
//If they are in the guild...
else if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
//If they are in the guild... <- Not restricted to guild anymore
/* else if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
{
//Only guild can return to where their location was saved..
//This reduces lagg and keeps the database smaller...
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
{
DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(lSaved)));
}
//Only guild can return to where their location was saved..
//This reduces lagg and keeps the database smaller...
if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
{
DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(lSaved)));
}
//Otherwise jump the pc to town - Just In Case!
else
{
DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(guild)));
}
//Otherwise jump the pc to town - Just In Case!
else
{
DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(guild)));
}
}
} */
////////////////////////////////////////////////////////////////////////////
else

2
_module/utc/pwnz3rat.utc.json
View File

@ -573,7 +573,7 @@
},
"PaletteID": {
"type": "byte",
"value": 4
"value": 49
},
"PerceptionRange": {
"type": "byte",

BIN
_release/Path of Ascension [PRC8-CEP3].7z
View File

Binary file not shown.