【玩法策划】行会演出：节日晚会的节目征集与评选设计

-- 行会演出：节目征集
local player = class(actor)
local SHOW_TYPES = {music = "演奏", fashion = "时装", talk = "才艺"}
local function submitShow(player, showType, showName, clipId)
    local typeName = SHOW_TYPES[showType]
    if typeName == nil then
        sendmsg(player, 1, 0, "节目类型不支持。")
        return
    end
    local submitted = tonumber(getplayvar(player, "HUMAN", "ShowSubmitted") or 0)
    if submitted >= 1 then
        sendmsg(player, 1, 0, "每人限提交一个节目。")
        return
    end
    setplayvar(player, "HUMAN", "ShowSubmitted", 1, true)
    setsysvarex("ShowList_" .. showType,
        (getsysvar("ShowList_" .. showType) or "") .. getbaseinfo(player, 3) .. "|" .. showName .. ";", true)
    sendmsg(player, 1, 0, "「" .. showName .. "」已报名" .. typeName .. "类，等待初筛。")
end

-- 演出评选：投票与巡演
local player = class(actor)
local function voteShow(player, showId)
    local voted = getplayvar(player, "HUMAN", "ShowVote") or ""
    if string.find(voted, showId, 1, true) then
        sendmsg(player, 1, 0, "该节目已投过票。")
        return
    end
    setplayvar(player, "HUMAN", "ShowVote", voted .. showId .. ";", true)
    setsysvarex("ShowVotes_" .. showId, tonumber(getsysvar("ShowVotes_" .. showId) or 0) + 1, true)
    sendmsg(player, 1, 0, "投票成功，除夕夜看谁能登台巡演。")
end