醉纹赌刀：一刀一掷，三十点看天

 fx-drunkroll

-- @file DrunkRoll.lua
-- 醉纹 —— 一刀一掷，三十点看天

local DrunkRoll = {}

local CONST = {
    DRUNK_LIFE    = 10.0,
    DRUNK_CD      = 6.0,
    ROLL_MIN      = 1,
    ROLL_MAX      = 30,
    BASE_HIT      = 10,

    COLOR_DRUNK   = "#b89040",
    COLOR_DEEP    = "#4e3810",
    COLOR_GHOST   = "#f4e0b0",

    ZORDER_DRUNK  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1085000,
}

local _drunkT    = 0
local _rollN     = 0
local _rollSum   = 0
local _cdLeft    = 0
local _drunkFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "DKR",
        CONST.AUTOINC_BASE + _autoInc)
end

local function GetActorPos(id)
    if not id then return nil end
    local x = SL:GetValue("ACTOR_POSITION_X", id)
    local y = SL:GetValue("ACTOR_POSITION_Y", id)
    if not x or not y then return nil end
    return { x = x, y = y }
end

local function SafeRemove(node)
    if node and not GUI:Widget_IsNull(node) then
        GUI:removeFromParent(node)
    end
end

local function ShowTip(msg)
    if msg and msg ~= "" then SL:ShowSystemTips(msg) end
end

local function RollDice()
    return math.random(CONST.ROLL_MIN, CONST.ROLL_MAX)
end

-- 掷点结算：醉纹期的每一刀先过骰子
SL:RegisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "DKR_Roll", function()
    if _drunkT <= 0 then return 0 end
    local roll = RollDice()
    _rollN = _rollN + 1
    _rollSum = _rollSum + roll
    return roll - CONST.BASE_HIT
end)

function DrunkRoll.RollInfo()
    if _rollN == 0 then return "未掷" end
    return string.format("掷%d刀 均%d点", _rollN,
        math.floor(_rollSum / _rollN))
end

function DrunkRoll.Cast()
    if _cdLeft > 0 or _drunkT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.DRUNK_CD
    _drunkT = CONST.DRUNK_LIFE
    _rollN = 0
    _rollSum = 0
    SafeRemove(_drunkFx)
    _drunkFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Drunk"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_drunkFx, CONST.ZORDER_DRUNK)
    SL:PlayDrunkUpFx(myID)
    SL:TipAboveMe("醉纹！")
    ShowTip("醉纹上身——每一刀一到三十，赌大小")
end

-- 定时器：醉纹倒计时与纹环跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _drunkT > 0 then
            _drunkT = _drunkT - dt
            local myID = SL:GetValue("USER_ID")
            local mp = GetActorPos(myID)
            if _drunkFx and mp then
                GUI:setPosition(_drunkFx,
                    mp.x, mp.y - 62)
            end
            if _drunkT <= 0 then
                SafeRemove(_drunkFx)
                ShowTip("酒醒了——" .. DrunkRoll.RollInfo()
                    .. "，回到十点的平常刀")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("醉纹", function()
        DrunkRoll.Cast()
    end)
    ShowTip("技能已加载: 醉纹 (调试按钮触发)")
end, 1.0)

function DrunkRoll.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SafeRemove(_drunkFx)
    _drunkT = 0
end

return DrunkRoll