大富翁：骰子停在哪算哪格

fx-monopoly

local Monopoly = {}
local KEY = { POS = 12 }
local st = { pos = 1, coin = 0, lap = 0, dice = 0, steps = 0, hopped = 0 }

local function SetState(name)
    st.name = name
    st.t = 0
end

function Monopoly.Roll()
    if st.name ~= "idle" then return end
    st.dice = math.random(6)
    st.steps = st.dice
    st.hopped = 0
    SetState("roll")
    -- 翻滚表现：0.5 秒内 pip 快速抖动
    SL:PlayDiceShake(0.5, function(finalDice)
        st.dice = finalDice
        st.steps = finalDice
        SetState("hop")
        SL:ShowSystemTips("掷出 " .. finalDice .. " 点")
    end)
end

function Monopoly.Update(dt)
    st.t = st.t + dt
    if st.name == "hop" then
        local per = SL:GetValue("hopInterval") or 0.14
        if st.t >= per then
            st.t = st.t - per
            st.pos = st.pos % KEY.POS + 1
            st.hopped = st.hopped + 1
            SL:PlayFxAt("tile_step", SL:GetValue("tileX", st.pos),
                                   SL:GetValue("tileY", st.pos))
            if st.hopped >= st.steps then
                SetState("settle")   -- 跳完才结算, 路过不触发
            end
        end
    elseif st.name == "settle" then
        if st.t > 0.25 then
            local kind = SL:GetValue("tileKind", st.pos)
            Monopoly.Resolve(kind)
        end
    end
end

function Monopoly.Resolve(kind)
    if kind == "gold" then
        st.coin = st.coin + 50
        SL:ShowTipAt(st.pos, "+50")
    elseif kind == "bad" then
        st.coin = math.max(0, st.coin - 30)
        SL:ShowTipAt(st.pos, "-30")
    elseif kind == "luck" then
        if math.random(3) == 3 then
            st.steps = 3
            st.hopped = 0
            SetState("hop")        -- 顺风事件续跳
            return
        end
    elseif kind == "start" then
        st.lap = st.lap + 1
        st.coin = st.coin + 100
    end
    SetState("idle")
end

return Monopoly