landsandboat/scripts/commands/addweaponskillpoints.lua

58 lines
1.6 KiB
Lua

-----------------------------------
-- func: addWeaponSkillPoints <slot> <points> (player)
-- desc: Adds weapon skill points to an equipped item.
-----------------------------------
---@type TCommand
local commandObj = {}
commandObj.cmdprops =
{
permission = 1,
parameters = 'iis'
}
local function error(player, msg)
player:printToPlayer(msg)
player:printToPlayer('!addweaponskillpoints <slot main=0, sub=1, ranged=2> <points> (player)')
end
commandObj.onTrigger = function(player, slot, points, target)
-- validate slot
if slot < xi.slot.MAIN or slot > xi.slot.RANGED then
error(player, 'Slot out of range.')
return
end
-- validate points
if points < 0 then
error(player, 'Cannot add negative points.')
return
end
-- validate target
if target == nil then
target = player
else
target = GetPlayerByName(target)
if target == nil then
error(player, string.format('Player named "%s" not found!', target))
return
end
end
local item = target:getStorageItem(0, 0, slot)
if item == nil then
local slotname = slot == 0 and 'main' or slot == 1 and 'sub' or slot == 2 and 'ranged'
error(player, string.format('No weapon equipped in %s slot.', slotname))
return
end
-- add weaponskill points
if target:addWeaponSkillPoints(slot, points) then
player:printToPlayer(string.format('Added %s weapon skill points to %s.', points, item:getName()))
else
player:printToPlayer(string.format('Could not add weapon skill points to %s.', item:getName()))
end
end
return commandObj