聚沙成纹：碎纹炼尘，十尘铸新纹

flowchart TD
A[点分解] --> B{背包有冗纹}
B -- 无 --> C[提示去打怪]
B -- 有 --> D[冗纹入炉]
D --> E[碎成四粒纹尘]
E --> F{尘满十粒}
F -- 没满 --> A
F -- 满了 --> G[点铸造]
G --> H[金光出炉]
H --> I[已铸添一 刀重添九]

 fx-crest-forge

-- @file CrestForge.lua
-- 聚沙成纹 —— 碎纹炼尘 百尘铸新纹

local CrestForge = {}

local CONST = {
    DUST_NEED     = 10,
    DUST_PER      = 4,
    SPARE_INIT    = 3,
    DMG_PER_FORGE = 9,
    DMG_BASE      = 12,

    AUTOINC_BASE  = 1199200,
}

local _dust     = 0
local _spare    = CONST.SPARE_INIT
local _forged   = 0
local _autoInc  = 0

local function ShowTip(msg)
    if msg and msg ~= "" then SL:ShowSystemTips(msg) end
end

local function GenID()
    _autoInc = _autoInc + 1
    return CONST.AUTOINC_BASE + _autoInc
end

function CrestForge.Dust() return _dust end
function CrestForge.Forged() return _forged end
function CrestForge.Dmg()
    return CONST.DMG_BASE + _forged * CONST.DMG_PER_FORGE
end

-- 分解：粗料折细账
function CrestForge.Decompose()
    if _spare <= 0 then
        ShowTip("背包没冗纹了——怪倒了会掉")
        return
    end
    _spare = _spare - 1
    _dust = _dust + CONST.DUST_PER
    ShowTip("纹尘 " .. _dust .. "/" .. CONST.DUST_NEED)
end

-- 铸造：先扣账再出货
function CrestForge.Forge()
    if _dust < CONST.DUST_NEED then
        ShowTip("纹尘不够——" .. _dust .. "/" .. CONST.DUST_NEED)
        return
    end
    _dust = _dust - CONST.DUST_NEED
    _forged = _forged + 1
    ShowTip("新纹出炉!刀重" .. CrestForge.Dmg())
end

-- 击杀掉落口子
function CrestForge.OnKill()
    _spare = _spare + 1
    ShowTip("掉了枚冗纹——够料就开炉")
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("分解冗纹", function() CrestForge.Decompose() end)
    SL:BindDebugButton("铸新纹!", function() CrestForge.Forge() end)
    ShowTip("技能已加载: 聚沙成纹")
end, 1.0)

function CrestForge.Unload()
    _dust = 0
    _spare = CONST.SPARE_INIT
    _forged = 0
end

return CrestForge