【Lua实战】城内通缉与悬赏：红名追缉名单的查询实现

local function buildWanted()
    local list = {}
    for _, name in ipairs(rednameList()) do
        local a = getplayerbyname(name)
        if a ~= nil and isplayer(a) then
            local pk = tonumber(getplayvar(a, 2, "PKVAL") or "0")
            if pk >= 200 then
                list[#list + 1] = { name = name, pk = pk }
            end
        end
    end
    table.sort(list, function(a, b) return a.pk > b.pk end)
    return list
end
local function bountyOf(pk)
    return math.min(50000, pk * 100)
end

function onWantedKill(actor, victimName)
    local player = class(actor)
    for _, w in ipairs(buildWanted()) do
        if w.name == victimName then
            local gold = bountyOf(w.pk)
            giveitem(actor, "金币", gold)
            sendcentermsg(player:GetName() .. " 完成通缉，领取赏金" .. gold .. "金币！")
            return
        end
    end
end