【案例复盘】改名风波：批量改名导致的社交链断裂复盘

-- 改名事件：影响面统计
local player = class(actor)
local function renameImpactReport(player)
    local renamed = tonumber(getsysvar("RenamedCnt") or 0)
    local disputes = tonumber(getsysvar("RenameDisputes") or 0)
    sendmsg(player, 1, 0, "改名 " .. renamed .. " 人次，相关纠纷 " .. disputes .. " 起，占比 " ..
        string.format("%.1f", disputes / renamed * 100) .. "%。")
end

-- 修正实施：历史链与备注保护
local player = class(actor)
local function renameWithProtection(player, oldName, newName)
    local history = getplayvar(player, "HUMAN", "NameChain") or ""
    setplayvar(player, "HUMAN", "NameChain",
        history .. oldName .. "→" .. newName .. "@" .. os.date("%Y%m%d") .. ";", true)
    local remarkCnt = 0
    for friendName in string.gmatch(getplayvar(player, "HUMAN", "FriendList") or "", "[^,]+") do
        remarkCnt = remarkCnt + 1
    end
    sendmsg(player, 1, 0, "改名成功，" .. remarkCnt .. " 位好友的备注不受影响。")
end