双人竞技：双人组队的竞技积分赛

local function teamSettle(win, m1, m2)
    local pts = win and 24 or -16
    for _, name in ipairs({m1, m2}) do
        local p = getplayerbyname(name)
        if p ~= nil then
            setplayvar(p, "ladder",
                (getplayvar(p, "ladder") or 1000) + pts)
            sendmsg(p, 1, "积分变动 " .. pts)
        end
    end
end

local function leavePenalty(name)
    local p = getplayerbyname(name)
    local s = getplayvar(p, "ladder") or 1000
    setplayvar(p, "ladder", s - math.floor(s * 0.02))
    sendmsg(p, 1, "中途离场，积分扣 2%")
end