[Quest API] Add SetLDoNPoints() to Perl/Lua (#3496)

# Perl
- Add `$client->SetLDoNPoints(theme_id, points)`.

# Lua
- Add `client:SetLDoNPoints(theme_id, points)`.

# Notes
- Allows operators to directly set LDoN Points.
This commit is contained in:
Alex King
2023-07-15 22:46:49 -04:00
committed by GitHub
parent 70ce81fb0a
commit ee45a28efe
4 changed files with 21 additions and 1 deletions
+7 -1
View File
@@ -1558,7 +1558,13 @@ void Client::SetLDoNPoints(uint32 theme_id, uint32 points)
}
}
m_pp.ldon_points_available += points;
m_pp.ldon_points_available = (
m_pp.ldon_points_guk +
m_pp.ldon_points_mir +
m_pp.ldon_points_mmc +
m_pp.ldon_points_ruj +
m_pp.ldon_points_tak
);
auto outapp = new EQApplicationPacket(OP_AdventurePointsUpdate, sizeof(AdventurePoints_Update_Struct));