逆鳞：血见三成它红了眼，打你狠挨得更狠

 fx-scalespite

-- @file ScaleSpite.lua
-- 逆鳞 —— 血见三成它红了眼，打你狠挨得更狠

local ScaleSpite = {}

local CONST = {
    RAGE_LINE     = 0.3,
    RATE_ATK      = 0.66,
    AMP_OUT       = 1.86,
    AMP_TAKE      = 1.4,

    COLOR_RAGE    = "#d84838",
    COLOR_DEEP    = "#581208",
    COLOR_GHOST   = "#f8b0a0",

    ZORDER_AURA   = 130,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 996000,
}

local _rageID    = 0
local _raging    = false
local _auraFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SSP",
        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 ApplyRage(id)
    SL:SetActorRate(id, "atk", CONST.RATE_ATK)
    SL:SetActorRate(id, "anim", CONST.RATE_ATK)
    ShowTip("逆鳞起了——它又快又狠，可破绽也全开了")
end

local function CheckRageLine()
    if _raging then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    local hp = SL:GetValue("ACTOR_HP", tid)
    local hpM = SL:GetValue("ACTOR_MAX_HP", tid)
    if not hp or not hpM or hpM <= 0 then return end
    if hp / hpM <= CONST.RAGE_LINE then
        _raging = true
        _rageID = tid
        ApplyRage(tid)
        SL:PlayRageBurstFx(tid)
        SL:ScreenShake(3, 0.2)
        SL:TipAbove(tid, "逆鳞！")
    end
end

-- 双刃出口：红眼怪出手加倍、挨刀加成
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "SSP_Take", function(tid, dmg)
    if _raging and tid == _rageID then
        return math.floor(dmg * CONST.AMP_TAKE)
    end
    return dmg
end)

SL:RegisterLUAEvent(LUA_EVENT_MONSTER_STRIKE, "SSP_Out", function(tid, dmg)
    if _raging and tid == _rageID then
        return math.floor(dmg * CONST.AMP_OUT)
    end
    return dmg
end)

-- 定时器：红线巡检与红眼光晕跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        CheckRageLine()
        if _raging and _auraFx then
            local tp = GetActorPos(_rageID)
            if tp then
                GUI:setPosition(_auraFx, tp.x, tp.y - 55)
            else
                SafeRemove(_auraFx)
                _raging = false
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    _auraFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Aura"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_auraFx, CONST.ZORDER_AURA)
    SL:BindDebugButton("催锋", function()
        local tid = SL:GetValue("MARK_TARGET_ID")
        if tid and not _raging then
            local hp = SL:GetValue("ACTOR_HP", tid)
            SL:ActorHurt(tid, math.max(0,
                hp - math.ceil(hp * 0.95 - 60)))
        end
    end)
    ShowTip("技能已加载: 逆鳞 (调试按钮触发)")
end, 1.0)

function ScaleSpite.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_BEFORE_HURT, "SSP_Take")
    SL:UnregisterLUAEvent(LUA_EVENT_MONSTER_STRIKE, "SSP_Out")
    SafeRemove(_auraFx)
end

return ScaleSpite