[Quest API] Add IsNPCSpawned(npc_ids) and CountSpawnedNPCs(npc_ids) to Perl/Lua. (#1570)

- Add quest::isnpcspawned(npc_ids) to Perl.
- Add quest::countspawnednpcs(npc_ids) to Perl.
- Add eq.is_npc_spawned(npc_ids) to Lua.
- Add eq.count_spawned_npcs(npc_ids) to Lua.
This commit is contained in:
Kinglykrab 2021-10-02 12:01:39 -04:00 committed by GitHub
parent 5560b198ca
commit 8c5f26ca5e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 131 additions and 0 deletions

View File

@ -7623,6 +7623,43 @@ XS(XS__worldwideaddldonwin) {
XSRETURN_EMPTY;
}
XS(XS__isnpcspawned);
XS(XS__isnpcspawned) {
dXSARGS;
if (items < 1)
Perl_croak(aTHX_ "Usage: quest::isnpcspawned(npc_id_one, npc_id_two, npc_idthree, npc_id_four, npc_id_five...[no limit])");
{
std::vector<uint32> npc_ids;
bool is_spawned = false;
for (int index = 0; index < items; index++) {
npc_ids.push_back((uint32)SvUV(ST(index)));
}
is_spawned = entity_list.IsNPCSpawned(npc_ids);
ST(0) = boolSV(is_spawned);
sv_2mortal(ST(0));
XSRETURN(1);
}
}
XS(XS__countspawnednpcs);
XS(XS__countspawnednpcs) {
dXSARGS;
if (items < 1)
Perl_croak(aTHX_ "Usage: quest::countspawnednpcs(npc_id_one, npc_id_two, npc_idthree, npc_id_four, npc_id_five...[no limit])");
{
dXSTARG;
std::vector<uint32> npc_ids;
uint32 npc_count = 0;
for (int index = 0; index < items; index++) {
npc_ids.push_back((uint32)SvUV(ST(index)));
}
npc_count = entity_list.CountSpawnedNPCs(npc_ids);
XSprePUSH;
PUSHu((UV)npc_count);
XSRETURN(1);
}
}
/*
This is the callback perl will look for to setup the
quest package's XSUBs
@ -7718,6 +7755,7 @@ EXTERN_C XS(boot_quest) {
newXS(strcpy(buf, "collectitems"), XS__collectitems, file);
newXS(strcpy(buf, "completedtasksinset"), XS__completedtasksinset, file);
newXS(strcpy(buf, "countitem"), XS__countitem, file);
newXS(strcpy(buf, "countspawnednpcs"), XS__countspawnednpcs, file);
newXS(strcpy(buf, "createdoor"), XS__CreateDoor, file);
newXS(strcpy(buf, "creategroundobject"), XS__CreateGroundObject, file);
newXS(strcpy(buf, "creategroundobjectfrommodel"), XS__CreateGroundObjectFromModel, file);
@ -7926,6 +7964,7 @@ EXTERN_C XS(boot_quest) {
newXS(strcpy(buf, "incstat"), XS__incstat, file);
newXS(strcpy(buf, "isdisctome"), XS__isdisctome, file);
newXS(strcpy(buf, "isdooropen"), XS__isdooropen, file);
newXS(strcpy(buf, "isnpcspawned"), XS__isnpcspawned, file);
newXS(strcpy(buf, "istaskactive"), XS__istaskactive, file);
newXS(strcpy(buf, "istaskactivityactive"), XS__istaskactivityactive, file);
newXS(strcpy(buf, "istaskappropriate"), XS__istaskappropriate, file);

View File

@ -1201,6 +1201,34 @@ bool EntityList::IsMobSpawnedByNpcTypeID(uint32 get_id)
return false;
}
bool EntityList::IsNPCSpawned(std::vector<uint32> npc_ids)
{
return CountSpawnedNPCs(npc_ids) != 0;
}
uint32 EntityList::CountSpawnedNPCs(std::vector<uint32> npc_ids)
{
uint32 npc_count = 0;
if (npc_list.empty() || npc_ids.empty()) {
return npc_count;
}
for (auto current_npc : npc_list) {
if (
std::find(
npc_ids.begin(),
npc_ids.end(),
current_npc.second->GetNPCTypeID()
) != npc_ids.end() &&
current_npc.second->GetID() != 0
) {
npc_count++;
}
}
return npc_count;
}
Object *EntityList::GetObjectByDBID(uint32 id)
{
if (id == 0 || object_list.empty())

View File

@ -158,6 +158,8 @@ public:
Mob *GetMob(const char* name);
Mob *GetMobByNpcTypeID(uint32 get_id);
bool IsMobSpawnedByNpcTypeID(uint32 get_id);
bool IsNPCSpawned(std::vector<uint32> npc_ids);
uint32 CountSpawnedNPCs(std::vector<uint32> npc_ids);
Mob *GetTargetForVirus(Mob* spreader, int range);
inline NPC *GetNPCByID(uint16 id)
{

View File

@ -3121,6 +3121,66 @@ void lua_world_wide_update_activity(uint32 task_id, int activity_id, int activit
quest_manager.WorldWideTaskUpdate(update_type, task_id, activity_id, activity_count, enforce_level_requirement, min_status, max_status);
}
bool lua_is_npc_spawned(luabind::adl::object table) {
if(luabind::type(table) != LUA_TTABLE) {
return false;
}
std::vector<uint32> npc_ids;
int index = 1;
while (luabind::type(table[index]) != LUA_TNIL) {
auto current_id = table[index];
uint32 npc_id = 0;
if(luabind::type(current_id) != LUA_TNIL) {
try {
npc_id = luabind::object_cast<int>(current_id);
} catch(luabind::cast_failed &) {
}
} else {
break;
}
npc_ids.push_back(npc_id);
++index;
}
if (npc_ids.empty()) {
return false;
}
return entity_list.IsNPCSpawned(npc_ids);
}
uint32 lua_count_spawned_npcs(luabind::adl::object table) {
if(luabind::type(table) != LUA_TTABLE) {
return 0;
}
std::vector<uint32> npc_ids;
int index = 1;
while (luabind::type(table[index]) != LUA_TNIL) {
auto current_id = table[index];
uint32 npc_id = 0;
if(luabind::type(current_id) != LUA_TNIL) {
try {
npc_id = luabind::object_cast<int>(current_id);
} catch(luabind::cast_failed &) {
}
} else {
break;
}
npc_ids.push_back(npc_id);
++index;
}
if (npc_ids.empty()) {
return 0;
}
return entity_list.CountSpawnedNPCs(npc_ids);
}
#define LuaCreateNPCParse(name, c_type, default_value) do { \
cur = table[#name]; \
if(luabind::type(cur) != LUA_TNIL) { \
@ -3560,6 +3620,8 @@ luabind::scope lua_register_general() {
luabind::def("get_item_stat", &lua_get_item_stat),
luabind::def("get_spell_stat", (int(*)(uint32,std::string))&lua_get_spell_stat),
luabind::def("get_spell_stat", (int(*)(uint32,std::string,uint8))&lua_get_spell_stat),
luabind::def("is_npc_spawned", &lua_is_npc_spawned),
luabind::def("count_spawned_npcs", &lua_count_spawned_npcs),
/*
Cross Zone