怪物仇恨：仇恨列表与脱离规则

local hateList = {}
local function addHate(monster, name, amount)
    hateList[monster] = hateList[monster] or {}
    local list = hateList[monster]
    list[name] = (list[name] or 0) + amount
end
local function pickTarget(monster)
    local list = hateList[monster]
    if list == nil then return nil end
    local best, bestHate = nil, 0
    for name, hate in pairs(list) do
        local p = getplayerbyname(name)
        if p and not isdeath(p) and hate > bestHate then
            best, bestHate = name, hate
        end
    end
    return best
end

local DECAY = 20
local function decayHate(monster)
    local list = hateList[monster]
    if list == nil then return end
    for name, hate in pairs(list) do
        hate = hate - DECAY
        if hate <= 0 or getplayerbyname(name) == nil then
            list[name] = nil
        else
            list[name] = hate
        end
    end
end
local function clearHate(monster)
    hateList[monster] = nil
end