【进阶实战】贡献权重：组队经验的分配权重设计

local function allocateExp(actor, teamData, baseExp)
    actor = getplayerbyname(actor)
    local totalDmg = 0
    for _, m in ipairs(teamData) do
        totalDmg = totalDmg + m.dmg
    end
    local pool = baseExp * 1.6 * 0.7
    local equalPool = baseExp * 1.6 * 0.3
    for _, m in ipairs(teamData) do
        local share = math.floor(pool * m.dmg / totalDmg + equalPool / #teamData)
        giveitem(getplayerbyname(m.name), "经验丹", math.max(1, math.floor(share / 1000)))
    end
    sendmsg(actor, 1, "组队经验已按贡献加权分配。")
end

local function capContribution(teamData)
    local totalExp = 0
    for _, m in ipairs(teamData) do
        totalExp = totalExp + m.share
    end
    for _, m in ipairs(teamData) do
        if m.share > totalExp * 0.4 then
            local overflow = m.share - totalExp * 0.4
            m.share = totalExp * 0.4
            for _, other in ipairs(teamData) do
                if other ~= m then
                    other.share = other.share + overflow / (#teamData - 1)
                end
            end
        end
    end
end