【进阶实战】寄售改价：手续费补差与截止窗封装

local function listOrder(actor, itemName, price)
    actor = getplayerbyname(actor)
    if not takeitem(actor, itemName, 1) then
        sendmsg(actor, 1, "背包里没有" .. itemName .. "。")
        return
    end
    local orderId = "O" .. os.time()
    local deadline = os.time() + 86400
    setplayvar(actor, "HUMAN", "Order_" .. orderId, price .. "|" .. deadline, 1)
    setplayvar(actor, "HUMAN", "Escrow_" .. orderId, itemName, 1)
    sendmsg(actor, 1, "寄售已挂单[" .. orderId .. "]，24 小时后截拍。")
end

local function relist(actor, orderId, newPrice)
    actor = getplayerbyname(actor)
    local record = getplayvar(actor, "HUMAN", "Order_" .. orderId) or ""
    local oldPrice, deadline = string.match(record, "(%d+)|(%d+)")
    if oldPrice == nil then
        sendmsg(actor, 1, "订单不存在或已结算。")
        return
    end
    if os.time() > tonumber(deadline) - 600 then
        sendmsg(actor, 1, "距截拍不足 10 分钟，禁改价。")
        return
    end
    if newPrice >= tonumber(oldPrice) then
        sendmsg(actor, 1, "只许降价，不许回调。")
        return
    end
    local fee = math.max(5000, math.floor((tonumber(oldPrice) - newPrice) * 2 / 100))
    if not takeitem(actor, "金条", math.ceil(fee / 10000)) then
        sendmsg(actor, 1, "改价手续费需 " .. fee .. " 金币，金条不足。")
        return
    end
    setplayvar(actor, "HUMAN", "Order_" .. orderId, newPrice .. "|" .. deadline, 1)
    sendmsg(actor, 1, "改价成功：" .. oldPrice .. " => " .. newPrice .. "。")
end