水镜式：挨的刀存进镜里，连本带利还回去

 fx-watermirror

--------------------------------------------------------------------------------
-- @file        WaterMirror.lua
-- @brief       水镜式 —— 挨的刀存进镜里，连本带利还回去
--              客户端表现模块：配置表 / 水镜构件 / 存储读数 / 定时器
--------------------------------------------------------------------------------

local WaterMirror = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    MIRROR_LIFE   = 6.0,        -- 镜开六秒
    MIRROR_CD     = 10.0,       -- 冷却十秒
    NOW_CUT       = 0.3,        -- 当场三成
    STORE_CAP     = 120,        -- 存储封顶一百二
    RELEASE_MIN   = 20,         -- 二十起还
    RELEASE_RATE  = 1.5,        -- 还镜乘一点五

    -- 颜色
    COLOR_WATER   = "#5ab8d8",  -- 水青
    COLOR_DEEP    = "#1a4a5e",  -- 深青
    COLOR_GHOST   = "#c5ecf5",  -- 水白

    ZORDER_GROUND = 118,
    ZORDER_MIRROR = 134,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 940000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _mirrorT   = 0              -- 镜的余时
local _stored    = 0              -- 存储读数
local _cdLeft    = 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 "WTM", 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 CreateMirrorNode()
    local mp = GetActorPos(SL:GetValue("USER_ID"))
    if not mp then return end
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Mir"),
        mp.x, mp.y - 46, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_MIRROR)
    for i = 1, 26 do
        local a1 = (i - 1) / 26 * 6.28
        local a2 = i / 26 * 6.28
        GUI:DrawLine_Create(node, string.format("m_%d", i), 0, 0, 2,
            m_cos(a1) * 26, m_sin(a1) * 46, m_cos(a2) * 26, m_sin(a2) * 46,
            CONST.COLOR_WATER, 190)
    end
    return node
end

--------------------------------------------------------------------------------
-- 拆账入口：七成存三成疼
--------------------------------------------------------------------------------
local function Hurt_Split(raw)
    local store = math.round(raw * 0.7)
    local now = raw - store
    _stored = math.min(CONST.STORE_CAP, _stored + store)
    SL:PlayerHurt(now)
    SL:TipAboveMe("存" .. store)
end

--------------------------------------------------------------------------------
-- 还镜清算
--------------------------------------------------------------------------------
local function Mirror_Release(targetID)
    if _stored < CONST.RELEASE_MIN then
        ShowTip("镜里才" .. _stored .. "点——二十起还")
        return
    end
    local vd = math.round(_stored * CONST.RELEASE_RATE)
    _stored = 0
    SL:WaterBlast(targetID, vd)
    SL:TipAbove(targetID, "-" .. vd)
    _mirrorT = math.min(_mirrorT, 0.5)
end

--------------------------------------------------------------------------------
-- 画镜与到期
--------------------------------------------------------------------------------
function WaterMirror.Cast()
    if _cdLeft > 0 or _mirrorT > 0 then return end
    _cdLeft = CONST.MIRROR_CD
    _mirrorT = CONST.MIRROR_LIFE
    _stored = 0
    CreateMirrorNode()
    ShowTip("镜开了——六秒里挨的刀七成存镜")
end

--------------------------------------------------------------------------------
-- 定时器：镜寿、拆账与自动清算
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _mirrorT <= 0 then return end
        _mirrorT = _mirrorT - dt
        if _mirrorT <= 0 then
            local tid = SL:GetValue("MARK_TARGET_ID")
            if tid and _stored >= CONST.RELEASE_MIN then
                Mirror_Release(tid)
                ShowTip("镜到时自动还了")
            else
                ShowTip("镜散了——存得太少，白开")
            end
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_LOCAL_HURT, "WTM_Hurt", function(data)
    if data and data.raw and _mirrorT > 0 then
        Hurt_Split(data.raw)
    end
end)

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

return WaterMirror