震魂：震魂入体叠加出招自损

 fx-soulquake

-- @file SoulQuake.lua
-- 震魂 —— 读条半途挨劲才入腑

local SoulQuake = {}

local CONST = {
    GUT_CD       = 3.0,
    MISS_DMG     = 12,
    HEX_MAX      = 3,
    HEX_LIFE     = 10.0,
    SELF_DMG     = 20,

    COLOR_GUT    = "#d4b34a",
    COLOR_DEEP   = "#6b5416",
    COLOR_GHOST  = "#f5ecc8",

    ZORDER_HEX   = 131,
    ZORDER_FX    = 135,
    AUTOINC_BASE = 979000,
}

local _hexStacks = 0
local _hexT      = 0
local _cdLeft    = 0
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SQK",
        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 CreateHexFx()
    local node = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Hex"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_HEX)
    for i = 1, 26 do
        local a1 = (i - 1) / 26 * 6.28
        local a2 = i / 26 * 6.28
        GUI:DrawLine_Create(node, string.format("h_%d", i), 0, 0, 2,
            m_cos(a1) * 30, m_sin(a1) * 50,
            m_cos(a2) * 30, m_sin(a2) * 50,
            CONST.COLOR_GUT, 200)
    end
    return node
end

-- 下劲：读条态入腑、空地普攻
function SoulQuake.Cast()
    if _cdLeft > 0 then return end
    _cdLeft = CONST.GUT_CD
    local casting = SL:IsCasting(SL:GetValue("MARK_TARGET_ID"))
    if casting then
        _hexStacks = math.min(CONST.HEX_MAX, _hexStacks + 1)
        _hexT = CONST.HEX_LIFE
        SL:TipAbove(SL:GetValue("MARK_TARGET_ID"), "震腑！")
        ShowTip("劲入腑了——十秒里它出一招自损二十
劲入腑了——十秒里它出一招自损二十。腑劲的金环也要分层——一层淡环、二层中环、三层浓环——环的浓度就是层数的视觉读数，读环如读层。")
    else
        SL:ActorHurt(SL:GetValue("MARK_TARGET_ID"), CONST.MISS_DMG)
        ShowTip("空地一劲——只算普攻十二")
    end
end

-- 招的结算出口：出招即自损
local function OnMonsterCast()
    if _hexStacks <= 0 then return end
    local selfDmg = _hexStacks * CONST.SELF_DMG
    SL:ActorHurt(SL:GetValue("MARK_TARGET_ID"), selfDmg)
    SL:TipAbove(SL:GetValue("MARK_TARGET_ID"), "腑损-" .. selfDmg)
end

-- 定时器：腑劲余时与招的周期
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _hexT > 0 then
            _hexT = _hexT - dt
            if _hexT <= 0 then
                _hexStacks = 0
                ShowTip("腑劲散了——重新找它读条的半途")
            end
        end
        local casting = SL:IsCasting(SL:GetValue("MARK_TARGET_ID"))
        if casting and not _wasCasting then
            OnMonsterCast()
        end
        _wasCasting = casting
    end, 0.02)
end

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 震魂 (调试按钮触发)")
end, 1.0)

return SoulQuake