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

[Quest API] Add GetAverageLevel() to Perl/Lua. (#2524)

Browse Source 
# Perl
- Add `$group->GetAverageLevel()` to Perl.

# Lua
- Add `group:GetAverageLevel()` to Lua.
- Convert `group:GetHighestLevel()` from `int` to `uint32` in Lua.
- Convert `group:GetLowestLevel()` from `int` to `uint32` in Lua.
This commit is contained in:
Kinglykrab
2022-11-14 14:04:14 -05:00
committed by GitHub
parent fca99bb274
commit 3cb13969ff
3 changed files with 19 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/perl_groups.cpp
+6
View File
@@ -126,6 +126,11 @@ uint32_t Perl_Group_GetLowestLevel(Group* self) // @categories Script Utility, G
return self->GetLowestLevel();
}
uint32_t Perl_Group_GetAverageLevel(Group* self) // @categories Script Utility, Group
{
return self->GetAvgLevel();
}
void perl_register_group()
{
perl::interpreter perl(PERL_GET_THX);
@@ -135,6 +140,7 @@ void perl_register_group()
package.add("DisbandGroup", &Perl_Group_DisbandGroup);
package.add("DoesAnyMemberHaveExpeditionLockout", (bool(*)(Group*, std::string, std::string))&Perl_Group_DoesAnyMemberHaveExpeditionLockout);
package.add("DoesAnyMemberHaveExpeditionLockout", (bool(*)(Group*, std::string, std::string, int))&Perl_Group_DoesAnyMemberHaveExpeditionLockout);
package.add("GetAverageLevel", &Perl_Group_GetAverageLevel);
package.add("GetHighestLevel", &Perl_Group_GetHighestLevel);
package.add("GetID", &Perl_Group_GetID);
package.add("GetLeader", &Perl_Group_GetLeader);