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

baseBet = 0
minPayout = 1.3
maxPayout = 4.5
incPayout = 1.5
currBet = baseBet
currPayout = minPayout
chance = 99/currPayout
maxLoss = 1000
startingBalance = balance
rolls = 0
resetstats()
resetseed()
function roundBal(num)
  return (10 ^ math.floor((math.log(num))/(math.log(10))))
end
if (baseBet == 0) then
	baseBet = roundBal(balance/100000)
	currBet = baseBet
end
nextbet = currBet
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