协战：灵兽和你同拍出手，同拍那一击翻倍

 fx-cofight

--------------------------------------------------------------------------------
-- @file        CoFight.lua
-- @brief       协战 —— 灵兽和你同拍出手，同拍那一击翻倍
--              客户端表现模块：配置表 / 灵兽构件 / 合击判定 / 定时器
--------------------------------------------------------------------------------

local CoFight = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    SYNC_WINDOW   = 0.5,        -- 半秒合击窗
    CALL_CD       = 6.0,        -- 号令冷却
    MY_GAP        = 1.5,        -- 你一点五一刀
    PET_GAP       = 1.5,        -- 灵兽一点五一爪
    MY_DMG        = 12,         -- 你单打十二
    PET_DMG       = 10,         -- 灵兽单打十
    SYNC_DMG      = 24,         -- 合击二十四

    -- 颜色
    COLOR_SYNC    = "#7ec8a0",  -- 协战青
    COLOR_DEEP    = "#1f5a3a",  -- 深青
    COLOR_GHOST   = "#e2f5e8",  -- 协白

    ZORDER_GROUND = 118,
    ZORDER_PET    = 130,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 963000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _myLast     = -9             -- 我上一刀的时间戳
local _petLast    = -9             -- 灵兽上一爪的时间戳
local _petAtkT    = 0              -- 灵兽出手计时
local _callCd     = 0              -- 号令冷却
local _sysT       = 0              -- 模块时钟
local _scheduler  = nil
local _autoInc    = 0

local m_cos = math.cos
local m_sin = math.sin

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "CFH", CONST.AUTOINC_BASE + _autoInc)
end

local function GetActorPos(actorID)
    if not actorID then return nil end
    local x = SL:GetValue("ACTOR_POSITION_X", actorID)
    local y = SL:GetValue("ACTOR_POSITION_Y", actorID)
    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 IsSync(lastA, lastB, now)
    if lastA < 0 or lastB < 0 then return false end
    return math.abs(lastA - lastB) <= CONST.SYNC_WINDOW
end

--------------------------------------------------------------------------------
-- 双方的出手结算
--------------------------------------------------------------------------------
local function My_Strike(tid)
    local sync = IsSync(_myLast, _petLast, _sysT)
    local dmg = sync and CONST.SYNC_DMG or CONST.MY_DMG
    SL:ActorHurt(tid, dmg)
    SL:TipAbove(tid, "-" .. dmg .. (sync and " 合击" or ""))
    if sync then
        SL:PlayComboFx()
        SL:ScreenShake(2.6, 0.12)
    end
end

local function Pet_Strike(tid)
    local sync = IsSync(_petLast, _myLast, _sysT)
    local dmg = sync and CONST.SYNC_DMG or CONST.PET_DMG
    SL:ActorHurt(tid, dmg)
    SL:TipAbove(tid, "-" .. dmg .. (sync and " 合击" or ""))
end

--------------------------------------------------------------------------------
-- 号令：节拍对齐
--------------------------------------------------------------------------------
function CoFight.Call()
    if _callCd > 0 then return end
    _callCd = CONST.CALL_CD
    _petAtkT = CONST.MY_GAP          -- 追玩家的拍
    ShowTip("号令下了——灵兽会追你的拍，同拍那下翻倍")
end

--------------------------------------------------------------------------------
-- 定时器：双拍推进
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _sysT = _sysT + dt
        _callCd = math.max(0, _callCd - dt)
        _petAtkT = _petAtkT - dt
        if _petAtkT <= 0 then
            _petAtkT = CONST.PET_GAP
            _petLast = _sysT
            local tid = SL:GetValue("MARK_TARGET_ID")
            if tid then Pet_Strike(tid) end
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_LOCAL_HIT, "CFH_Hit", function()
    _myLast = _sysT
    local tid = SL:GetValue("MARK_TARGET_ID")
    if tid then My_Strike(tid) end
end)

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

return CoFight