【进阶实战】行会内鬼检测：仓库异常领用的行为分析封装

local function scoreMember(member)
    local actor = getplayerbyname(member)
    local joinDays = tonumber(getplayvar(actor, "HUMAN", "JoinDays")) or 0
    local contribute = tonumber(getplayvar(actor, "HUMAN", "Contribute")) or 0
    local tookValue = tonumber(getplayvar(actor, "HUMAN", "WeekTakeValue")) or 0
    local score = 0
    if joinDays < 7 then
        score = score + 2
    end
    if contribute < 100 then
        score = score + 2
    end
    if tookValue > 100000 then
        score = score + 3
    end
    return score
end
local function onTakeFromVault(member, itemValue)
    local take = tonumber(getplayvar(getplayerbyname(member), "HUMAN", "WeekTakeValue")) or 0
    setplayvar(getplayerbyname(member), "HUMAN", "WeekTakeValue", take + itemValue, 1)
    local score = scoreMember(member)
    if score >= 5 then
        sendmsg(nil, 1, "[仓库审查] " .. member .. " 领用行为评分 " .. score .. "，进入复核。")
        return false
    end
    return true
end

local function weeklyReset(member)
    setplayvar(getplayerbyname(member), "HUMAN", "WeekTakeValue", 0, 1)
end