友好切磋：切磋规则与禁用清单

-- 错误：邀请即开打，无确认无禁用
function onSparAsk(p, target)
    startFight(p, target)
end

local function startSpar(a, b)
    if getplayvar(b, "sparAsk") ~= a then
        sendmsg(a, 1, "对方尚未接受切磋")
        return
    end
    setplayvar(a, "sparWith", b)
    setplayvar(b, "sparWith", a)
    setplayvar(a, "sparBan", "drug,scroll")
    setplayvar(b, "sparBan", "drug,scroll")
    sendcentermsg(0, "切磋开始")
end
local function onSparDead(loser, winner)
    restoreHp(loser)
    setplayvar(loser, "sparWith", nil)
    setplayvar(winner, "sparWith", nil)
    sendmsg(loser, 1, "切磋落败，无掉落无惩罚")
end