九连环：解一环看前一环

 fx-ringpuzzle

local RingPuzzle = {}
local KEY = { RINGS = 9 }

local rings = {}

function RP.Init()
    rings = {}
    for i = 1, KEY.RINGS do
        rings[i] = { off = false, on = (i == 1) }
    end
end

function RP.TrySolve(idx)
    if anim then return end
    -- 规则: 一号随手解, 其余要前一环在柄上
    local ok = idx == 1 or rings[idx - 1].on
    SL:PlayFlyFx("ring" .. idx, SL:GetValue("ringX", idx),
                 SL:GetValue("ringY", idx),
                 SL:GetValue("ringX", idx),
                 SL:GetValue("ringY", idx) + 40,
                 1.6, nil, function()
        if ok then
            rings[idx].off = true
            SL:SetValue("solved", SL:GetValue("solved") + 1)
            SL:PlaySfx("ring_off")
            SL:ShowSystemTips("已解 " .. SL:GetValue("solved") .. "/9")
        else
            SL:PlayBurst(SL:GetValue("ringX", idx),
                         SL:GetValue("ringY", idx), "ring_bounce", 3)
            SL:PlaySfx("ring_blocked")
        end
        RP.CheckAll()
    end)
end

function RP.CheckAll()
    local any = false
    for _, r in ipairs(rings) do
        if not r.off then any = true; break end
    end
    if not any then
        SL:PlayFxAt("all_solved")
        SL:ShowSystemTips("九环全解!")
        SL:ScheduleOnce(function()
            RP.Init()
        end, 1.4)
    end
end

return RP