【框架设计】行会擂台：擂台挑战与守擂奖励的框架设计

function acceptArena(actor)
    local holder = getsysvar("ARENA_HOLDER") or ""
    if holder == class(actor):GetName() then
        sendmsg(actor, 0, "您就是现任擂主，无需挑战")
        return
    end
    if not checkitemw(actor, "挑战书", 1) then
        sendmsg(actor, 0, "攻擂需要一张挑战书")
        return
    end
    takeitem(actor, "挑战书", 1)
    setplayvar(actor, "HUMAN", "DUEL_PT", 0, 1)
    mapmove(actor, "arena", 10, 10)
    setontimer(actor, 193, 90)
end

function attackdamage(actor, target)
    local pt = tonumber(getplayvar(actor, "HUMAN", "DUEL_PT") or "0")
    if pt == 0 then return end
    setplayvar(actor, "HUMAN", "DUEL_PT", pt + 1, 1)
end
function ontimer193(actor)
    local pt = tonumber(getplayvar(actor, "HUMAN", "DUEL_PT") or "0")
    local holder = getsysvar("ARENA_HOLDER") or ""
    if pt >= 200 then
        setsysvar("ARENA_HOLDER", class(actor):GetName())
        giveitem(actor, "守擂锦囊", 1)
        sendcentermsg(class(actor):GetName() .. " 攻擂成功，成为新任擂主")
    else
        local p = getplayerbyname(holder)
        if p then giveitem(p, "守擂锦囊", 1) end
        sendmsg(actor, 0, "攻擂失败，守擂者获得锦囊奖励")
    end
end