内讧蛊纹：它打我一爪，同伴陪疼四成

 fx-infight

-- @file Infight.lua
-- 内讧蛊纹 —— 它打我一爪，同伴陪疼四成

local Infight = {}

local CONST = {
    CREST_LIFE    = 12.0,
    CREST_CD      = 4.0,
    SHARE_RATE    = 0.4,

    COLOR_INFIGHT = "#a85848",
    COLOR_DEEP    = "#481818",
    COLOR_GHOST   = "#f0c0b0",

    ZORDER_INFIGHT = 92,
    ZORDER_FX      = 135,
    AUTOINC_BASE   = 1125000,
}

local _crestT    = 0
local _cdLeft    = 0
local _linkA     = 0
local _linkB     = 0
local _crestFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "INF",
        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

-- 陪疼换算：比率换算，再和血量上限打照面
function Infight.Share(tid, dmg)
    local share = math.floor(dmg * CONST.SHARE_RATE)
    local hpM = SL:GetValue("ACTOR_HP_MAX", tid) or 0
    return math.min(share, math.floor(hpM * 0.1))
end

-- 蛊线判定：谁对玩家出爪，谁的同伴陪疼
SL:RegisterLUAEvent(LUA_EVENT_AFTER_HURT, "INF_Share", function(tid, dmg)
    if _crestT <= 0 or not tid then return end
    local other = Infight.PartnerOf(tid)
    if not other then return end
    local share = Infight.Share(other, dmg)
    if share <= 0 then return end
    SL:ActorHurt(other, share)
    SL:TipAbove(other, "内-" .. share)
end)

function Infight.PartnerOf(tid)
    if tid == _linkA then return _linkB end
    if tid == _linkB then return _linkA end
    return nil
end

function Infight.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    local other = SL:FindNearMonster(tid, 300)
    if not other then
        ShowTip("就一只怪——蛊下给谁")
        return
    end
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _linkA = tid
    _linkB = other
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_Scene(),
        GenID("Line"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_INFIGHT)
    SL:PlayCurseUpFx(tid, other)
    ShowTip("蛊下了——它们谁打你，同伴陪疼四成")
end

-- 定时器：蛊期倒计时与蛊线跟画
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _crestT > 0 then
            _crestT = _crestT - dt
            local a = GetActorPos(_linkA)
            local b = GetActorPos(_linkB)
            if _crestFx and a and b then
                GUI:setPosition(_crestFx,
                    (a.x + b.x) / 2, (a.y + b.y) / 2 - 140)
            end
            if _crestT <= 0 then
                SafeRemove(_crestFx)
                ShowTip("蛊散了——各打各的了")
            end
        end
    end, 0.02)
end

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

function Infight.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_AFTER_HURT, "INF_Share")
    SafeRemove(_crestFx)
    _crestT = 0
    _linkA = 0
    _linkB = 0
end

return Infight