pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-05-19 17:38:26 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Commands] Add #clearxtargets Command (#3833)

Browse Source 
# Perl
- Add `$client->ClearXTargets()`.

# Lua
- Add `client:ClearXTargets()`.

# Notes
- Add `#clearxtargets` command for players.
- Allows operators/players to clear their XTargets if something get stuck on it.
This commit is contained in:
Alex King
2024-01-06 23:18:21 -05:00
committed by GitHub
parent 122fe398b4
commit 99d2e3a8b1
10 changed files with 95 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/perl_client.cpp
+6
View File
@@ -3063,6 +3063,11 @@ bool Perl_Client_HasItemOnCorpse(Client* self, uint32 item_id)
return self->HasItemOnCorpse(item_id);
}
void Perl_Client_ClearXTargets(Client* self)
{
self->ClearXTargets();
}
void perl_register_client()
{
perl::interpreter perl(PERL_GET_THX);
@@ -3137,6 +3142,7 @@ void perl_register_client()
package.add("ClearCompassMark", &Perl_Client_ClearCompassMark);
package.add("ClearAccountFlag", &Perl_Client_ClearAccountFlag);
package.add("ClearPEQZoneFlag", &Perl_Client_ClearPEQZoneFlag);
package.add("ClearXTargets", &Perl_Client_ClearXTargets);
package.add("ClearZoneFlag", &Perl_Client_ClearZoneFlag);
package.add("Connected", &Perl_Client_Connected);
package.add("CountAugmentEquippedByID", &Perl_Client_CountAugmentEquippedByID);