迷沙：扬一把沙糊它眼，它举着刀也够不着你

 fx-sandblind

-- @file SandBlind.lua
-- 迷沙 —— 扬一把沙糊它眼，它举着刀也够不着你

local SandBlind = {}

local CONST = {
    BLIND_LIFE    = 4.0,
    BLIND_CD      = 6.0,
    RANGE_MULT    = 0.5,
    MISS_PENALTY  = 2,

    COLOR_SAND    = "#c8a060",
    COLOR_DEEP    = "#584420",
    COLOR_GHOST   = "#f0dcb8",

    ZORDER_CLOUD  = 132,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 997000,
}

local _blindT    = 0
local _blindID   = 0
local _cdLeft    = 0
local _baseRange = 0
local _cloudFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SBY",
        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 CreateCloudFx(id)
    local tp = GetActorPos(id)
    if not tp then return nil end
    local node = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Cloud"), tp.x, tp.y - 70, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_CLOUD)
    return node
end

function SandBlind.Cast()
    if _cdLeft > 0 or _blindT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    _cdLeft = CONST.BLIND_CD
    _blindT = CONST.BLIND_LIFE
    _blindID = tid
    _baseRange = SL:GetValue("ACTOR_RANGE", tid) or 200
    SL:SetActorRange(tid, math.floor(_baseRange * CONST.RANGE_MULT))
    _cloudFx = CreateCloudFx(tid)
    SL:PlaySandFx(tid)
    SL:TipAbove(tid, "沙目！")
    ShowTip("沙糊眼了——四秒里射程减半，它得凑上来")
end

-- 够不着演出：射程外的开弓全部落空
SL:RegisterLUAEvent(LUA_EVENT_SHOT_FIRED, "SBY_Miss", function(tid, dist)
    if _blindT > 0 and tid == _blindID then
        local rng = math.floor(_baseRange * CONST.RANGE_MULT)
        if dist > rng then
            SL:PlayDropArrowFx(tid)
            SL:TipAbove(tid, "够不着")
            ShowTip("它够不着——沙眼里量错了距离")
            return false
        end
    end
    return true
end)

-- 定时器：沙目倒计时与射程回收
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _blindT > 0 then
            _blindT = _blindT - dt
            local tp = GetActorPos(_blindID)
            if _cloudFx and tp then
                GUI:setPosition(_cloudFx, tp.x, tp.y - 70)
            end
            if _blindT <= 0 or not tp
                or SL:GetValue("ACTOR_DEAD", _blindID) then
                _blindT = 0
                SL:SetActorRange(_blindID, _baseRange)
                SafeRemove(_cloudFx)
                ShowTip("沙落了——它揉揉眼又缩回老位置")
            end
        end
    end, 0.02)
end

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

function SandBlind.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_SHOT_FIRED, "SBY_Miss")
    if _blindT > 0 then
        SL:SetActorRange(_blindID, _baseRange)
    end
    SafeRemove(_cloudFx)
end

return SandBlind