pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-09-01 07:26:36 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Add Item Link Methods to Perl/Lua (#4359)

Browse Source
This commit is contained in:
Alex King
2024-06-01 17:10:05 -04:00
committed by GitHub
parent eae05167f8
commit dda0e410ff
7 changed files with 50 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/perl_questitem.cpp
+10
View File
@@ -288,6 +288,15 @@ perl::array Perl_QuestItem_GetAugmentIDs(EQ::ItemInstance* self)
return result;
}
std::string Perl_QuestItem_GetItemLink(EQ::ItemInstance* self)
{
EQ::SayLinkEngine linker;
linker.SetLinkType(EQ::saylink::SayLinkItemInst);
linker.SetItemInst(self);
return linker.GenerateLink();
}
void perl_register_questitem()
{
@@ -313,6 +322,7 @@ void perl_register_questitem()
package.add("GetItem", (EQ::ItemData*(*)(EQ::ItemInstance*))&Perl_QuestItem_GetItem);
package.add("GetItem", (EQ::ItemInstance*(*)(EQ::ItemInstance*, uint8))&Perl_QuestItem_GetItem);
package.add("GetItemID", &Perl_QuestItem_GetItemID);
package.add("GetItemLink", &Perl_QuestItem_GetItemLink);
package.add("GetItemScriptID", &Perl_QuestItem_GetItemScriptID);
package.add("GetKillsNeeded", &Perl_QuestItem_GetKillsNeeded);
package.add("GetMaxEvolveLevel", &Perl_QuestItem_GetMaxEvolveLevel);