三消连爆：差一对的焦灼与快感

fx-match3

local Match3 = {}
local KEY = { COLS = 9, ROWS = 6 }

local function FindMatches(board)
    local hits = {}
    -- 横向三连
    for r = 1, KEY.ROWS do
        for c = 1, KEY.COLS - 2 do
            local k = board[r][c]
            if k > 0 and k == board[r][c + 1] and k == board[r][c + 2] then
                hits[#hits + 1] = { r = r, c = c }
                hits[#hits + 1] = { r = r, c = c + 1 }
                hits[#hits + 1] = { r = r, c = c + 2 }
            end
        end
    end
    -- 纵向三连
    for c = 1, KEY.COLS do
        for r = 1, KEY.ROWS - 2 do
            local k = board[r][c]
            if k > 0 and k == board[r + 1][c] and k == board[r + 2][c] then
                hits[#hits + 1] = { r = r, c = c }
                hits[#hits + 1] = { r = r + 1, c = c }
                hits[#hits + 1] = { r = r + 2, c = c }
            end
        end
    end
    return hits
end

function Match3.TrySwap(a, b)
    board[a.r][a.c], board[b.r][b.c] = board[b.r][b.c], board[a.r][a.c]
    local hits = FindMatches(board)
    if #hits == 0 then
        -- 无效交换: 换回去并提示
        board[a.r][a.c], board[b.r][b.c] = board[b.r][b.c], board[a.r][a.c]
        SL:ShowSystemTips("换不出三连")
        return false
    end
    SL:SetValue("score", SL:GetValue("score") + #hits * 10)
    SL:PlayBurstAt(hits, "gem_shatter")
    Match3.Collapse()
    return true
end

function Match3.Collapse()
    -- 按列压实: 空位由上方补齐, 顶部刷新新宝石
    for c = 1, KEY.COLS do
        local col, k = {}, KEY.ROWS
        for r = KEY.ROWS, 1, -1 do
            if board[r][c] > 0 then col[k] = board[r][c]; k = k - 1 end
        end
        for r = KEY.ROWS, 1, -1 do
            board[r][c] = col[r] or math.random(6)
        end
    end
    -- 连锁: 坠落后若有新三连, 自动再消
    if #FindMatches(board) > 0 then
        SL:ScheduleOnce(function()
            local hits = FindMatches(board)
            SL:SetValue("score", SL:GetValue("score") + #hits * 10)
            SL:PlayBurstAt(hits, "gem_shatter")
            Match3.Collapse()
        end, 0.26)
    end
end

return Match3