投喂：喂它三口素的，它就温驯了

 fx-tamefeed

-- @file TameFeed.lua
-- 投喂 —— 喂它三口素的，它就温驯了

local TameFeed = {}

local CONST = {
    FEED_CAP      = 3,
    FEED_CD       = 2.5,
    DOCILE_LIFE   = 5.0,
    CALM_MULT     = 0.5,

    COLOR_FEED    = "#9ab86a",
    COLOR_DEEP    = "#3e4a18",
    COLOR_GHOST   = "#e0f0c0",

    ZORDER_PIPS   = 132,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1016000,
}

local _fed       = 0
local _docileT   = 0
local _cdLeft    = 0
local _pipsFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "TFD",
        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 ThrowFood()
    local myID = SL:GetValue("USER_ID")
    SL:PlayTossArc(myID, SL:GetValue("MARK_TARGET_ID"),
        function()
            _fed = _fed + 1
            SL:PlayEatFx(SL:GetValue("MARK_TARGET_ID"))
            if _fed >= CONST.FEED_CAP then EnterDocile() end
        end)
end

function TameFeed.Feed()
    if _cdLeft > 0 then
        ShowTip("手上没粮——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    if _docileT > 0 then
        ShowTip("它温驯着——还剩" .. string.format("%.1f", _docileT) .. "秒")
        return
    end
    if _fed >= CONST.FEED_CAP then return end
    _cdLeft = CONST.FEED_CD
    ThrowFood()
    ShowTip("扔出去一口——看它接不接")
end

-- 温驯入口
function EnterDocile()
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    _docileT = CONST.DOCILE_LIFE
    SL:SetActorRate(tid, "move", CONST.CALM_MULT)
    SL:SetActorRate(tid, "atk", CONST.CALM_MULT)
    SL:PlayDocileFx(tid)
    SL:TipAbove(tid, "温驯！")
    ShowTip("三口喂饱——它温驯了，五秒里刀砍半价")
end

-- 温驯出口：它的刀砍半价
SL:RegisterLUAEvent(LUA_EVENT_MONSTER_STRIKE, "TFD_Calm", function(tid, dmg)
    if _docileT > 0 and tid == SL:GetValue("MARK_TARGET_ID") then
        return math.floor(dmg * CONST.CALM_MULT)
    end
    return dmg
end)

-- 定时器：温驯倒计时与绿点跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _docileT > 0 then
            _docileT = _docileT - dt
            local tid = SL:GetValue("MARK_TARGET_ID")
            if _docileT <= 0 or not tid
                or SL:GetValue("ACTOR_DEAD", tid) then
                _docileT = 0
                _fed = 0
                SL:SetActorRate(SL:GetValue("MARK_TARGET_ID"),
                    "move", 1.0)
                ShowTip("温驯过了——它翻脸了，重新喂")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("投喂", function()
        TameFeed.Feed()
    end)
    ShowTip("技能已加载: 投喂 (调试按钮触发)")
end, 1.0)

function TameFeed.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MONSTER_STRIKE, "TFD_Calm")
    SafeRemove(_pipsFx)
end

return TameFeed