【引擎触发】监狱系统：红名流放地与狱中救赎的引擎实现

local PRISON_PK = 500
function QF.CheckJail(plr)
    if plr:GetPkValue() < PRISON_PK then return end
    if plr.mapId == "prison" then return end
    plr:MapMove("prison", 18, 22)
    plr:SetState("jailed", 3600 * 4)
    plr:SendMsg("因罪大恶极被投入监狱，服刑 4 小时")
    QF_Broadcast(plr.name .. " 被投入大牢反省")
end

function Prison.redeemTask(plr)
    if plr.mapId ~= "prison" then return false end
    if not plr:HasState("jailed") then return false end
    local questDone = plr:CompletePrisonQuest()
    if questDone then
        local remain = plr:GetStateRemain("jailed")
        plr:ReduceState("jailed", 1800)
        plr:SendMsg("狱中任务完成，刑期减少 30 分钟")
    end
    return true
end