帮会渔火：渔火灯会的夜间庆典

local function lightLantern(actor, slot)
    if (getsysvar("lantern_" .. slot) or 0) == 1 then
        sendmsg(actor, 1, "该灯位已被点亮")
        return
    end
    setsysvarex("lantern_" .. slot, 1)
    local n = 0
    for s = 1, 30 do
        n = n + (getsysvar("lantern_" .. s) or 0)
    end
    sendmsg(actor, 1, "渔火 " .. n .. "/30 盏")
    if n >= 30 then
        sendcentermsg(0, "渔火灯会点亮，全帮礼盒已发放")
    end
end

local function douseLanterns()
    for s = 1, 30 do
        setsysvarex("lantern_" .. s, 0)
    end
    sendcentermsg(0, "渔火灯会收摊，明晚再聚")
end