pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2025-12-13 02:11:30 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Add SetHideMe() to Perl/Lua. (#1388)

Browse Source 
- Add $client->SetHideMe(hide_me_state) to Perl.
- Add client:SetHideMe(hide_me_state) to Lua.
This commit is contained in:
Alex 2021-06-12 12:34:55 -04:00 committed by GitHub
parent 88526eac21
commit a0063997e1
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
zone/lua_client.cpp
View File

@ -2093,6 +2093,11 @@ void Lua_Client::AddLDoNWin(uint32 theme_id) {
self->AddLDoNWin(theme_id);
}
void Lua_Client::SetHideMe(bool hide_me_state) {
Lua_Safe_Call_Void();
self->SetHideMe(hide_me_state);
}
luabind::scope lua_register_client() {
return luabind::class_<Lua_Client, Lua_Mob>("Client")
.def(luabind::constructor<>())
@ -2447,7 +2452,8 @@ luabind::scope lua_register_client() {
.def("SetAAEXPModifier", (void(Lua_Client::*)(uint32,double))&Lua_Client::SetAAEXPModifier)
.def("SetEXPModifier", (void(Lua_Client::*)(uint32,double))&Lua_Client::SetEXPModifier)
.def("AddLDoNLoss", (void(Lua_Client::*)(uint32))&Lua_Client::AddLDoNLoss)
.def("AddLDoNWin", (void(Lua_Client::*)(uint32))&Lua_Client::AddLDoNWin);
.def("AddLDoNWin", (void(Lua_Client::*)(uint32))&Lua_Client::AddLDoNWin)
.def("SetHideMe", (void(Lua_Client::*)(bool))&Lua_Client::SetHideMe);
}
luabind::scope lua_register_inventory_where() {

1
zone/lua_client.h
View File

@ -357,6 +357,7 @@ public:
void DisableAreaEndRegen();
void EnableAreaRegens(int value);
void DisableAreaRegens();
void SetHideMe(bool hide_me_state);
void SetPrimaryWeaponOrnamentation(uint32 model_id);
void SetSecondaryWeaponOrnamentation(uint32 model_id);

15
zone/perl_client.cpp
View File

@ -5318,6 +5318,20 @@ XS(XS_Client_AddLDoNWin) {
XSRETURN_EMPTY;
}
XS(XS_Client_SetHideMe);
XS(XS_Client_SetHideMe) {
dXSARGS;
if (items != 2)
Perl_croak(aTHX_ "Usage: Client::SetHideMe(THIS, bool hide_me_state)");
{
Client* THIS;
bool hide_me_state = (bool) SvTRUE(ST(1));
VALIDATE_THIS_IS_CLIENT;
THIS->SetHideMe(hide_me_state);
}
XSRETURN_EMPTY;
}
#ifdef __cplusplus
extern "C"
#endif
@ -5579,6 +5593,7 @@ XS(boot_Client) {
newXSproto(strcpy(buf, "SetFactionLevel2"), XS_Client_SetFactionLevel2, file, "$$$$$$$");
newXSproto(strcpy(buf, "SetFeigned"), XS_Client_SetFeigned, file, "$$");
newXSproto(strcpy(buf, "SetGM"), XS_Client_SetGM, file, "$$");
newXSproto(strcpy(buf, "SetHideMe"), XS_Client_SetHideMe, file, "$$");
newXSproto(strcpy(buf, "SetHorseId"), XS_Client_SetHorseId, file, "$$");
newXSproto(strcpy(buf, "SetHunger"), XS_Client_SetHunger, file, "$$");
newXSproto(strcpy(buf, "SetLanguageSkill"), XS_Client_SetLanguageSkill, file, "$$$");