【框架设计】回收商店：旧装备回收价的重铸体系

-- 回收商店：估值定价
local player = class(actor)
local function recyclePrice(itemName, enhanceLv)
    local base = tonumber(getsysvar("RecycleBase_" .. itemName) or 500)
    local enhance = base * 0.1 * (enhanceLv or 0)
    local flow = tonumber(getsysvar("RecycleFlow_" .. itemName) or 0)
    local factor = math.max(0.5, 1 - math.floor(flow / 1000) * 0.1)
    local price = math.floor((base + enhance) * factor)
    return price, factor
end

-- 回收结算：积分入账与熔断
local player = class(actor)
local function doRecycle(player, itemName, enhanceLv)
    local price = recyclePrice(itemName, enhanceLv)
    local today = tonumber(getplayvar(player, "HUMAN", "RecyclePts") or 0)
    if today + price > 50000 then
        sendmsg(player, 1, 0, "今日回收积分已达上限 50000，明天再来。")
        return
    end
    setplayvar(player, "HUMAN", "RecyclePts", today + price, true)
    local total = tonumber(getsysvar("RecycleFlow_" .. itemName) or 0) + 1
    setsysvarex("RecycleFlow_" .. itemName, total, true)
    if total % 5000 == 0 then
        sendcentermsg(player, 255, 0, itemName .. " 回收价已下调，请关注最新价格。", 0, 6)
    end
    sendmsg(player, 1, 0, "回收成功，获得积分 " .. price .. "。")
end