限时限购：配额用完当期不再放行

-- 错误：只靠界面置灰，服务端来单就发
function onBuy(p, goodsId)
    giveitem(p, goodsId, 1)
end

local LIMIT = 3
local PERIOD = "202609"
local PRICE = 888
local function onBuy(p, goodsId)
    local key = "buy_" .. PERIOD .. "_" .. goodsId
    local n = getplayvar(p, key) or 0
    if n >= LIMIT then
        sendmsg(p, 1, "本期限购 " .. LIMIT .. " 个")
        return
    end
    if (getplayvar(p, "GOLD") or 0) < PRICE then
        sendmsg(p, 1, "金币不足")
        return
    end
    setplayvar(p, "GOLD", getplayvar(p, "GOLD") - PRICE)
    setplayvar(p, key, n + 1)
    giveitem(p, goodsId, 1)
end