【安全加密】租号风险：账号出租的行为特征识别

-- 租号识别：特征打分
local player = class(actor)
local function scoreRentRisk(player)
    local score = 0
    local opCnt = tonumber(getplayvar(player, "HUMAN", "TodayOps") or 0)
    local avgOps = tonumber(getplayvar(player, "HUMAN", "AvgOps30") or 0)
    if avgOps > 0 and opCnt > avgOps * 2 then
        score = score + 40
    end
    local outflow = tonumber(getplayvar(player, "HUMAN", "GearOutflow") or 0)
    if outflow >= 5 then
        score = score + 30
    end
    local nightRate = tonumber(getplayvar(player, "HUMAN", "NightLoginRate") or 0)
    if nightRate > 60 then
        score = score + 30
    end
    setplayvar(player, "HUMAN", "RentScore", score, true)
    return score
end

-- 分级处置：限制与核实
local player = class(actor)
local function applyRentPolicy(player)
    local score = tonumber(getplayvar(player, "HUMAN", "RentScore") or 0)
    if score >= 70 then
        setplayvar(player, "HUMAN", "TradeLimit", 1, true)
        sendmail("#" .. (getbaseinfo(player, 3) or ""), 7961, "账号行为核实邀请",
            "检测到异常使用行为，交易已临时限制。若账号曾出借他人，请立即收回并修改密码。", "")
    end
end