【玩法策划】沙巴克军备库：城防捐献与军械分发设计

-- 军备库：物资捐献
local player = class(actor)
local SUPPLY_VALUE = {["箭矢"] = 10, ["维修木材"] = 20, ["战场药剂"] = 30}
local function donateSupply(player, itemName, count)
    local value = SUPPLY_VALUE[itemName]
    if value == nil then
        sendmsg(player, 1, 0, "军备库只收箭矢、木材与战场药剂。")
        return
    end
    local pts = value * count
    local stock = tonumber(getsysvar("Vault_" .. itemName) or 0)
    if stock + count > 2000 then
        sendmsg(player, 1, 0, itemName .. " 库存已满 2000，暂时无需捐献。")
        return
    end
    setsysvarex("Vault_" .. itemName, stock + count, true)
    setplayvar(player, "HUMAN", "SupplyPts", tonumber(getplayvar(player, "HUMAN", "SupplyPts") or 0) + pts, true)
    sendmsg(player, 1, 0, "捐献成功，获得军备点 " .. pts .. "。")
end

-- 战时分发：配额与审计
local player = class(actor)
local function claimSupply(player, inSiege)
    if not inSiege then
        sendmsg(player, 1, 0, "非攻城时段，军械不开放领取。")
        return
    end
    local claimed = tonumber(getplayvar(player, "HUMAN", "SiegeClaimed") or 0)
    if claimed >= 1 then
        sendmsg(player, 1, 0, "每场限领一次军械。")
        return
    end
    local arrows = tonumber(getsysvar("Vault_箭矢") or 0)
    if arrows < 5 then
        sendmsg(player, 1, 0, "箭矢库存不足，请后方加急捐献！")
        return
    end
    setsysvarex("Vault_箭矢", arrows - 5, true)
    giveitem(player, "箭矢", 5)
    setplayvar(player, "HUMAN", "SiegeClaimed", 1, true)
    sendmsg(player, 1, 0, "领取成功：箭矢 5 捆，守好城墙！")
end