冰雕大赛：限时雕刻的综合评分

local function submitIce(actor, guild, work)
    if #work > 80 then
        sendmsg(actor, 1, "作品数据限 80 字符")
        return
    end
    if (getplayvar(actor, "iceDone") or 0) == 1 then
        sendmsg(actor, 1, "本届已提交过作品")
        return
    end
    setplayvar(actor, "iceDone", 1)
    local n = (getsysvar("iceN_" .. guild) or 0) + 1
    setsysvarex("iceN_" .. guild, n)
    setsysvarex("ice_" .. n .. "_" .. guild,
        getplayvar(actor, "NAME") .. "|" .. work)
    sendmsg(actor, 1, "已入展馆第 " .. n .. " 号位")
end

local function iceScore(votes, judge)
    return math.floor(votes * 0.7 + judge * 0.3)
end
local p = getplayerbyname("ice01")
sendmsg(p, 1, "综合分 " .. iceScore(200, 90) .. " 分")