【进阶实战】备注检索：按好友备注名查找定位封装

local function searchByRemark(actor, keyword)
    actor = getplayerbyname(actor)
    local list = getplayvar(actor, "HUMAN", "FriendList") or ""
    local hits = {}
    for entry in string.gmatch(list, "[^|]+") do
        local name, remark = string.match(entry, "([^:]+):(.*)")
        if remark and string.find(remark, keyword, 1, true) then
            hits[#hits + 1] = name
        end
    end
    if #hits == 0 then
        sendmsg(actor, 1, "没有备注含「" .. keyword .. "」的好友。")
        return hits
    end
    sendmsg(actor, 1, "找到 " .. #hits .. " 位好友：")
    for _, name in ipairs(hits) do
        sendmsg(actor, 1, "  " .. name)
    end
    return hits
end

local function setRemark(actor, friendName, remark)
    actor = getplayerbyname(actor)
    local list = getplayvar(actor, "HUMAN", "FriendList") or ""
    local updated = {}
    local found = false
    for entry in string.gmatch(list, "[^|]+") do
        local name = string.match(entry, "([^:]+)")
        if name == friendName then
            updated[#updated + 1] = friendName .. ":" .. remark
            found = true
        else
            updated[#updated + 1] = entry
        end
    end
    if not found then
        sendmsg(actor, 1, "好友列表中无此人。")
        return
    end
    setplayvar(actor, "HUMAN", "FriendList", table.concat(updated, "|"), 1)
    sendmsg(actor, 1, "已更新 " .. friendName .. " 的备注。")
end