赛马竞速：押中头马双倍归还

fx-horserace

local HorseRace = {}
local KEY = { BASE = 95, BURST = 130 }

local race = { running = false, bet = -1, finish = {} }

function Race.PlaceBet(horseId)
    if race.running then
        SL:ShowSystemTips("开赛了, 不能改注")
        return
    end
    race.bet = horseId
    SL:ShowTipAbove("horse" .. horseId, "押")
end

function Race.Start()
    if race.running or race.bet < 0 then
        SL:ShowSystemTips("先押一匹马")
        return
    end
    race.running = true
    race.finish = {}
    -- 每匹马独立推进
    SL:Schedule(function(dt)
        local allDone = true
        for id = 0, 3 do
            if not race.finish[id + 1] then
                allDone = false
                local burst = 0
                if math.random() < dt * 0.9 then burst = 0.5 + math.random() * 0.7 end
                local spd = KEY.BASE + burst * KEY.BURST
                SL:MoveActorX("horse" .. id, spd * dt)
                SL:PlayDust("horse" .. id, id % 2 == 0)
                local x = SL:GetValue("actorX", "horse" .. id)
                if x >= 600 and not race.finish[id + 1] then
                    race.finish[#race.finish + 1] = id
                    if #race.finish == 1 then Race.Settle(id) end
                end
            end
        end
        if allDone then SL:UnSchedule("horseRun") end
    end, 0.016, "horseRun")
end

function Race.Settle(champion)
    if champion == race.bet then
        SL:PlayFxAt("gold_rain", 600, SL:GetValue("laneY", champion))
        SL:SetValue("payout", SL:GetValue("payout") * 2)
        SL:ShowSystemTips("押中了! 双倍彩金")
    else
        SL:ShowSystemTips(NAMES and "没押中" or "下次再来")
    end
    -- 押注快照清空, 下一局重新押
    race.bet = -1
end

return HorseRace