【Lua实战】函数柯里化：奖励发放的参数预设

local function grant(item, cnt)
    if cnt <= 0 then cnt = 1 end
    return function(actor)
        giveitem(actor, item, cnt)
        sendmsg(actor, 0, "获得 " .. item .. " x" .. cnt)
    end
end
local GIFT_ANNIV = { grant("金币礼券", 20000), grant("强化石", 2) }
local function grantAll(actor, pack)
    for _, fn in ipairs(pack) do
        fn(actor)
    end
end

local PACKS = {
    anniversary = { grant("金币礼券", 20000), grant("祝福油", 1) },
    comeback = { grant("金币礼券", 10000), grant("金创药", 5) },
}
function grantPack(actor, name)
    local pack = PACKS[name]
    if pack == nil then
        sendmsg(actor, 0, "没有这个奖励包：" .. name)
        return
    end
    grantAll(actor, pack)
end