pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-02-23 07:22:28 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Add IsBerserk() to Perl/Lua (#2997)

Browse Source 
* [Quest API] Add IsBerserk() to Perl/Lua

# Perl
- Add `$client->IsBerserk()`.

# Lua
- Add `client:IsBerserk()`.
- Remove `mob:IsBerserk()` to move to client.

# Notes
- Allows operators to check if a client is berserk.

* Move to Mob.

* Update lua_client.cpp
This commit is contained in:
Alex King 2023-02-28 20:31:20 -05:00 committed by GitHub
parent 2f0dbc5d15
commit 69c6a7b89a
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
zone/lua_client.cpp
View File

@ -3049,7 +3049,6 @@ bool Lua_Client::IsAutoFireEnabled()
{
Lua_Safe_Call_Bool();
return self->AutoFireEnabled();
}
luabind::scope lua_register_client() {

6
zone/perl_mob.cpp
View File

@ -2786,6 +2786,11 @@ Bot* Perl_Mob_GetHateRandomBot(Mob* self) // @categories Hate and Aggro
return self->GetHateRandomBot();
}
bool Perl_Mob_IsBerserk(Mob* self) // @categories Script Utility
{
return self->IsBerserk();
}
float Perl_Mob_GetDefaultRaceSize(Mob* self) // @categories Script Utility
{
return self->GetDefaultRaceSize();
@ -3118,6 +3123,7 @@ void perl_register_mob()
package.add("IsAttackAllowed", (bool(*)(Mob*, Mob*, bool))&Perl_Mob_IsAttackAllowed);
package.add("IsBeacon", &Perl_Mob_IsBeacon);
package.add("IsBeneficialAllowed", &Perl_Mob_IsBeneficialAllowed);
package.add("IsBerserk", &Perl_Mob_IsBerserk);
package.add("IsBlind", &Perl_Mob_IsBlind);
package.add("IsBot", &Perl_Mob_IsBot);
package.add("IsCasting", &Perl_Mob_IsCasting);