对色入孔：红纹入红孔，错色一场空

flowchart TD
A[点镶一枚] --> B[取队首纹章]
B --> C[飞向孔位]
C --> D{有同色空孔}
D -- 有 --> E[入孔点亮]
D -- 没有弹回队尾
E --> F{三孔全亮}
F -- 否 --> A
F -- 是 --> G[套光罩身 大加成到账]
H[错色灰闪喊话] --> A

 fx-crest-socket

-- @file CrestSocket.lua
-- 对色入孔 —— 红纹入红孔 错色一场空

local CrestSocket = {}

local CONST = {
    HOLE_N        = 3,
    PER_HOLE      = 7,
    SET_BONUS     = 10,
    DMG_BASE      = 12,

    AUTOINC_BASE  = 1199400,
}

-- 孔色固定: 1红 2绿 3蓝; 纹章队随机洗
local _holes    = { 1, 2, 3 }
local _filled   = { false, false, false }
local _deck     = { 3, 4, 1, 4, 2, 3 }
local _deckI    = 0
local _ok       = 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

local COLOR_NAME = { "红", "绿", "蓝", "黄" }

function CrestSocket.OkCount() return _ok end
function CrestSocket.Dmg()
    local d = CONST.DMG_BASE + _ok * CONST.PER_HOLE
    if _ok >= CONST.HOLE_N then d = d + CONST.SET_BONUS end
    return d
end

-- 镶入：判色 点亮或弹回
function CrestSocket.Embed()
    if _ok >= CONST.HOLE_N then
        ShowTip("三孔全亮——套光进行中")
        return
    end
    _deckI = _deckI + 1
    local col = _deck[_deckI]
    for i = 1, CONST.HOLE_N do
        if not _filled[i] and _holes[i] == col then
            _filled[i] = true
            _ok = _ok + 1
            ShowTip("色对上了——" .. CrestSocket.Dmg())
            if _ok >= CONST.HOLE_N then
                ShowTip("三孔全亮——套光罩身!")
            end
            return
        end
    end
    table.insert(_deck, col)
    ShowTip("色错——" .. COLOR_NAME[col] .. "纹弹回队尾")
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("镶一枚", function()
        CrestSocket.Embed()
    end)
    ShowTip("技能已加载: 对色入孔")
end, 1.0)

function CrestSocket.Unload()
    _filled = { false, false, false }
    _deckI = 0
    _ok = 0
end

return CrestSocket