【安全加密】经验丹限购时段：双时段限购的防刷校验设计

local DAILY_LIMIT = 5
local WINDOWS = { { 12, 14 }, { 20, 22 } }
local function inSaleWindow()
    local h = tonumber(os.date("%H"))
    for _, w in ipairs(WINDOWS) do
        if h >= w[1] and h < w[2] then return true end
    end
    return false
end
function buyExpPill(actor)
    local player = class(actor)
    if not inSaleWindow() then
        sendmsg(actor, 0, "经验丹仅在12-14点、20-22点限时开售")
        return
    end
    local dayKey = "EXP_BUY_" .. os.date("%Y%m%d")
    local bought = tonumber(getplayvar(actor, 2, dayKey) or "0")
    if bought >= DAILY_LIMIT then
        sendmsg(actor, 0, "今日限购" .. DAILY_LIMIT .. "颗已售罄")
        return
    end
    local player2 = class(actor)
    if player2:checkitemw("元宝", 300) == false then
        sendmsg(actor, 0, "经验丹售价300元宝，元宝不足")
        return
    end
    player2:takeitem("元宝", 300)
    setplayvar(actor, "HUMAN", dayKey, bought + 1, 1)
    giveitem(actor, "经验丹", 1)
    sendmsg(actor, 0, "购买成功，今日已购" .. bought + 1 .. "/" .. DAILY_LIMIT)
end

local function markBind(actor)
    local player = class(actor)
    setplayvar(actor, "HUMAN", "EXP_PILL_BIND", 1, 1)
    sendmsg(actor, 0, "经验丹已绑定，不可交易")
end