【玩法策划】红名监狱：红名惩罚与洗红名任务

-- QF触发: killmon 累计 PK 值并入狱
function onPkKill(actor, victimName)
    local player = class(actor)
    local pk = tonumber(getplayvar(player, "HUMAN", "PkValue") or 0) + 100
    setplayvar(player, "HUMAN", "PkValue", pk, true)
    if pk >= 200 then
        setplayvar(player, "HUMAN", "JailFrozen", 1, true)
        beginteleport(player, 33, 45)
        sendcentermsg(player, 255, 0, "杀人者 " .. actor:GetName() .. " 已投入红名监狱！", 0, 8)
    else
        sendmsg(player, 1, 0, "PK 值 " .. pk .. "/200，红名风险上升。")
    end
end

-- 狱中讨伐：击杀狱卒减 PK 值
local player = class(actor)
local function onJailKill(actor, monName)
    if monName ~= "狱卒头目" then return end
    local prisoner = class(actor)
    local pk = tonumber(getplayvar(prisoner, "HUMAN", "PkValue") or 0)
    pk = math.max(0, pk - 10)
    setplayvar(prisoner, "HUMAN", "PkValue", pk, true)
    if pk == 0 then
        setplayvar(prisoner, "HUMAN", "JailFrozen", 0, true)
        beginteleport(prisoner, 288, 620)
        sendmsg(prisoner, 1, 0, "已洗白红名，重获自由，好自为之。")
    else
        sendmsg(prisoner, 1, 0, "还差 " .. math.ceil(pk / 10) .. " 只狱卒头目出狱。")
    end
end