-- CREDITS --
-- Original was made by DSetzer for BustaBit. --
-- https://gist.github.com/dsetzer/fb2a925098135c7a1ff95002b11ccc3e --

-- Definición de funciones --
function roundBal(num)
  return (10 ^ math.floor((math.log(num))/(math.log(10))))
end

-- Parámetros de estrategia --
minPayout = 1.3
maxPayout = 4.5
incPayout = 1.5
maxLoss = 1000

-- Inicialización de variables --
baseBet = roundBal(balance/100000)
currBet = baseBet
currPayout = minPayout
chance = 99/currPayout
startingBalance = balance
rolls = 0

-- Función principal --
function dobet()
	rolls = rolls + 1
	if (win) then
		currBet = baseBet
		currPayout = minPayout
		if(bethigh)then
			bethigh = false
		else
			bethigh = true
		end
	else
		currPayout = currPayout + incPayout
		if (currPayout > maxPayout) then
			currBet = currBet * (maxPayout / (minPayout - 1))
			currPayout = minPayout
		end
	end

	if (balance - startingBalance <= maxLoss * -1) then
		print("Max Loss Reached. Stopping")
		stop()
	end

	if (balance - startingBalance >= maxLoss) then
		startingBalance = balance
		resetseed()
		currBet = baseBet
		currPayout = minPayout
	end

	if (rolls % 10 == 0) then
		print("Starting Balance: " .. startingBalance .. " | Profit: " .. balance-startingBalance)
	end
	nextbet = currBet
	chance = 99/currPayout
end