【网络通信】行会集结令：跨地图集结消息的链路设计

local function rallyGuild(actor, x, y)
    local player = class(actor)
    local gname = getplayvar(actor, 2, "GUILD_NAME")
    local ts = os.time()
    if ts - (lastRally[gname] or 0) < 300 then
        sendmsg(actor, 0, "集结令冷却中，5分钟一次")
        return
    end
    lastRally[gname] = ts
    for _, name in ipairs(guildMembers(gname)) do
        local m = getplayerbyname(name)
        if m ~= nil and isplayer(m) then
            sendluamsg(m, 9401, x, y, 0, gname)
        end
    end
    sendmsg(actor, 0, "集结令已发至全体在线成员")
end

local CAPS = { perMin = 1, rejectCool = 600, perTargetHour = 5 }
local function allowInvite(actor, targetName)
    local player = class(actor)
    if getplayvar(actor, 2, "FRIEND_" .. targetName) == 1 then
        return true
    end
    local last = tonumber(getplayvar(actor, 2, "INV_TS") or "0")
    if os.time() - last < CAPS.perMin then
        return false
    end
    local rejKey = "REJ_" .. targetName
    local rejTs = tonumber(getplayvar(actor, 2, rejKey) or "0")
    if rejTs > 0 and os.time() - rejTs < CAPS.rejectCool then
        return false
    end
    local hourKey = "INV_H_" .. os.date("%H") .. targetName
    local cnt = tonumber(getplayvar(actor, 2, hourKey) or "0")
    if cnt >= CAPS.perTargetHour then
        return false
    end
    setplayvar(actor, "HUMAN", hourKey, cnt + 1, 1)
    setplayvar(actor, "HUMAN", "INV_TS", os.time(), 1)
    return true
end

local function onInviteRejected(actor, fromName)
    local player = class(actor)
    setplayvar(actor, "HUMAN", "REJ_" .. fromName, os.time(), 1)
end