Implement EVENT_USE_SKILL in Perl/Lua.

- Exports skill_id and skill_level in Perl/Lua whenever a skill is used (bash, kick, taunt, etc.)
This commit is contained in:
Kinglykrab
2017-06-04 19:57:21 -04:00
parent decaa1f7b6
commit d64f2e40c5
7 changed files with 27 additions and 3 deletions
+3 -1
View File
@@ -120,7 +120,8 @@ const char *LuaEvents[_LargestEventID] = {
"event_unhandled_opcode",
"event_tick",
"event_spawn_zone",
"event_death_zone"
"event_death_zone",
"event_use_skill"
};
extern Zone *zone;
@@ -202,6 +203,7 @@ LuaParser::LuaParser() {
PlayerArgumentDispatch[EVENT_LEAVE_AREA] = handle_player_area;
PlayerArgumentDispatch[EVENT_RESPAWN] = handle_player_respawn;
PlayerArgumentDispatch[EVENT_UNHANDLED_OPCODE] = handle_player_packet;
PlayerArgumentDispatch[EVENT_USE_SKILL] = handle_player_use_skill;
ItemArgumentDispatch[EVENT_ITEM_CLICK] = handle_item_click;
ItemArgumentDispatch[EVENT_ITEM_CLICK_CAST] = handle_item_click;