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

Merge pull request #1024 from KinglyKrab/getskillname

Browse Source 
Add getskillname(skill_id) to Perl/Lua.
This commit is contained in:
Chris Miles
2020-04-06 01:57:12 -05:00
committed by GitHub
parent aa6264266e 358bd60716
commit 0461fc1789
4 changed files with 35 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/embparser_api.cpp
+17
View File
@@ -838,6 +838,22 @@ XS(XS__getspellname) {
XSRETURN(1);
}
XS(XS__getskillname);
XS(XS__getskillname) {
dXSARGS;
if (items != 1)
Perl_croak(aTHX_ "Usage: quest::getskillname(int skill_id)");
dXSTARG;
int skill_id = (int) SvIV(ST(0));
std::string skill_name = quest_manager.getskillname(skill_id);
sv_setpv(TARG, skill_name.c_str());
XSprePUSH;
PUSHTARG;
XSRETURN(1);
}
XS(XS__safemove);
XS(XS__safemove) {
dXSARGS;
@@ -4152,6 +4168,7 @@ EXTERN_C XS(boot_quest) {
newXS(strcpy(buf, "getgroupidbycharid"), XS__getgroupidbycharid, file);
newXS(strcpy(buf, "getraididbycharid"), XS__getraididbycharid, file);
newXS(strcpy(buf, "getspellname"), XS__getspellname, file);
newXS(strcpy(buf, "getskillname"), XS__getskillname, file);
newXS(strcpy(buf, "getlevel"), XS__getlevel, file);
newXS(strcpy(buf, "getplayerburiedcorpsecount"), XS__getplayerburiedcorpsecount, file);
newXS(strcpy(buf, "getplayercorpsecount"), XS__getplayercorpsecount, file);