【进阶实战】好友满员扩容：最久未互动的自动腾位封装

local function findIdlest(actor)
    actor = getplayerbyname(actor)
    local list = getplayvar(actor, "HUMAN", "FriendList") or ""
    local idlest, idleGap = "", -1
    local now = os.time()
    for name in string.gmatch(list, "[^|]+") do
        local last = tonumber(getplayvar(actor, "HUMAN", "Touch_" .. name) or "") or now
        if now - last > idleGap then
            idlest, idleGap = name, now - last
        end
    end
    return idlest, idleGap
end
local function proposeSwap(actor, newName)
    actor = getplayerbyname(actor)
    local idlest, idleGap = findIdlest(actor)
    if idlest == "" then
        sendmsg(actor, 1, "好友列表为空，可直接添加。")
        return
    end
    sendmsg(actor, 1, "最久未互动：" .. idlest ..
        "（" .. math.floor(idleGap / 86400) .. " 天），确认后腾位给 " .. newName)
end

local function confirmSwap(actor, oldName, newName)
    actor = getplayerbyname(actor)
    local list = getplayvar(actor, "HUMAN", "FriendList") or ""
    local kept = {}
    for name in string.gmatch(list, "[^|]+") do
        if name ~= oldName then
            kept[#kept + 1] = name
        end
    end
    kept[#kept + 1] = newName
    setplayvar(actor, "HUMAN", "FriendList", table.concat(kept, "|"), 1)
    setplayvar(actor, "HUMAN", "Touch_" .. newName, os.time(), 1)
    sendmsg(actor, 1, "腾位完成：" .. oldName .. " 移出，" .. newName .. " 已加为好友。")
end