[Quest API] Add EVENT_CONSIDER_CORPSE to Perl and Lua. (#1530)

- Exports $corpse_entity_id in Perl.
- Exports e.corpse_entity_id in Lua.

Allows you to perform events on corpse consider for server operators.
This commit is contained in:
Kinglykrab
2021-09-12 23:39:09 -04:00
committed by GitHub
parent 56b9b6f2c4
commit 38a86edc70
7 changed files with 21 additions and 19 deletions
+6 -1
View File
@@ -121,7 +121,8 @@ const char *QuestEventSubroutines[_LargestEventID] = {
"EVENT_COMBINE_VALIDATE",
"EVENT_BOT_COMMAND",
"EVENT_WARP",
"EVENT_TEST_BUFF"
"EVENT_TEST_BUFF",
"EVENT_CONSIDER_CORPSE"
};
PerlembParser::PerlembParser() : perl(nullptr)
@@ -1644,6 +1645,10 @@ void PerlembParser::ExportEventVariables(
ExportVar(package_name.c_str(), "from_z", sep.arg[2]);
break;
}
case EVENT_CONSIDER_CORPSE: {
ExportVar(package_name.c_str(), "corpse_entity_id", std::stoi(data));
break;
}
default: {
break;