【进阶实战】结婚请柬：请柬发放与观礼席位封装

local INVITE_CAP, SEAT_CAP = 30, 40
local function grantInvites(actorName)
    local actor = getplayerbyname(actorName)
    local granted = tonumber(getplayvar(actor, "HUMAN", "InviteCount")) or 0
    local canGive = INVITE_CAP - granted
    if canGive <= 0 then
        sendmsg(actor, 1, "请柬已发满 30 张。")
        return
    end
    giveitem(actor, "结婚请柬", canGive, 1, "婚礼观礼凭证")
    setplayvar(actor, "HUMAN", "InviteCount", INVITE_CAP, 1)
    sendmsg(actor, 1, "已发放 " .. canGive .. " 张绑定请柬，宾客持柬入场。")
end
local function enterCeremony(actor)
    actor = getplayerbyname(actor)
    local seats = tonumber(getsysvar("WedSeatUsed")) or 0
    if seats >= SEAT_CAP then
        sendmsg(actor, 1, "观礼席位已满 40，可在场外观礼。")
        return false
    end
    if not takeitem(actor, "结婚请柬", 1, 0, "观礼核销") then
        sendmsg(actor, 1, "入场需要结婚请柬。")
        return false
    end
    setsysvarex("WedSeatUsed", seats + 1, 1)
    beginteleport(actor, 328, 320)
    sendmsg(actor, 1, "欢迎观礼，席位号 " .. (seats + 1) .. "。")
    return true
end

local function ceremonyEnd()
    setsysvarex("WedSeatUsed", 0, 1)
    sendmsg(nil, 1, "礼成！观礼宾客均已获赠喜糖。")
end