Bet Some

--------------------------------------------
--@ Start User Vars
initbalance=balance
div = 1000000
base = (balance/div)
lossStartMult = 7
bethigh = false
randomHighLow = true
useDebugInfo = false
--@ End User Vars

--@ Start Script Vars
stopnow = false
lossCount = 0
maxLosses = lossStartMult + 5
chance = 60
curbet = base
nextbet = base
--@ End Script Vars

--@ Start Debug Vars
biggestLossStreak = 0
biggestBet = 0
--@ End Debug Vars
betcount = 100
-- set profit target here
profittarget = balance+50
stoploss     = balance-66

function dobet()

if betcount == 100 then
  betcount=0
  resetseed();
else
  betcount=betcount+1
end

    -- Check Balance
if balance-nextbet >= profittarget then
    stop()
    ching()
    resetseed()
  print(balance)
  print("TARGET ACHIEVED!!!")
  print("You Won")
  print("Profit: " .. string.format("%9.8f", profit) )
  print("for this Session")
end

if balance-nextbet <= stoploss then
    stop()
    ching()
    resetseed()
  print(balance)
  print("ALARM!!!")
  print("You Lose")
  print("Profit: " .. string.format("%9.8f", profit) )
  print("for this Session")
end

if (stoponwin == true and lastBet.Profit > 0) then
    stop()
    end

 if (lossCount == 7) then
    -- set lossStartMult to X
    lossStartMult = 6 -- or 8, or whatever
  end

  if (lossStartMult > 20) then
    print("\nVariable \"lossStartMult\" must be less than 20\n")
    stop()
  end

  if (randomHighLow) then
    if (math.random() < .1) then bethigh = !bethigh end
  end

  if (stopnow and win) then
    debugInfo()
    stop()
  end



  if (!win) then
    lossCount += 1
  else
    lossCount = 0
  end

  if (lossCount < lossStartMult) then
    chance = 60
    curbet = (balance/div)
    nextbet = curbet
  end

  if (lossCount == lossStartMult) then
    curbet = base * 100
    chance = 50
    nextbet = curbet
  end

  if (lossCount > lossStartMult and lossCount < maxLosses) then
    curbet = curbet * 2.1
    chance = 50
    nextbet = curbet
  end

  if (lossCount == maxLosses) then
    chance = 55
    curbet = curbet * 2.5
    nextbet = curbet
  end

  if (lossCount > maxLosses) then
    curbet = curbet * 2.5
    nextbet = curbet
  end

  if (lossCount > biggestLossStreak) then
    biggestLossStreak = lossCount
  end

  if (nextbet > biggestBet) then
    biggestBet = nextbet
  end

end
-------------------------------------------