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

[Quest API] Add EVENT_AA_BUY and EVENT_AA_GAIN to Perl/Lua. (#2504)

Browse Source 
# Perl
- Add EVENT_AA_BUY to Perl.
  - Exports `$aa_cost`, `$aa_id`, `$aa_previous_id`, and `$aa_next_id`
- Add EVENT_AA_GAIN to Perl.
  - Exports `$aa_gained`
- Add quest::getaaname(aa_id) to Perl.

# Lua
- Add event_aa_buy to Lua.
  - Exports `e.aa_cost`, `e.aa_id`, `e.aa_previous_id`, and `e.aa_next_id`
- Add event_aa_gain to Lua.
  - Exports `e.aa_gained`
- Add eq.get_aa_name(aa_id) to Lua.
This commit is contained in:
Kinglykrab
2022-11-05 11:09:47 -04:00
committed by GitHub
parent a3928ec504
commit f6dbdf5db8
14 changed files with 263 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/embparser.cpp
+16
View File
@@ -161,6 +161,8 @@ const char *QuestEventSubroutines[_LargestEventID] = {
"EVENT_MERCHANT_SELL",
"EVENT_INSPECT",
"EVENT_TASK_BEFORE_UPDATE",
"EVENT_AA_BUY",
"EVENT_AA_GAIN"
};
PerlembParser::PerlembParser() : perl(nullptr)
@@ -1737,6 +1739,20 @@ void PerlembParser::ExportEventVariables(
break;
}
case EVENT_AA_BUY: {
Seperator sep(data);
ExportVar(package_name.c_str(), "aa_cost", sep.arg[0]);
ExportVar(package_name.c_str(), "aa_id", sep.arg[1]);
ExportVar(package_name.c_str(), "aa_previous_id", sep.arg[2]);
ExportVar(package_name.c_str(), "aa_next_id", sep.arg[3]);
break;
}
case EVENT_AA_GAIN: {
ExportVar(package_name.c_str(), "aa_gained", data);
break;
}
case EVENT_INSPECT: {
ExportVar(package_name.c_str(), "target_id", extradata);
break;