scriptname = 'script Wager win rate up 90% + burn'
---------------------------------------------------
initbal = balance*0.01  -- set initbal
minbet  = 1.5e-5        -- set minimal bet
chance  = 90            -- set start chance
maxch   = 98            -- set max chance
div     = 500           -- set 100=high 500=medium 1000=low
proburn = balance*0.01  -- set limit profit for burn
maxbet  = balance*0.03  -- set max bet
----------------- do not touch --------------------
burnon   = true
nextbet  = initbal/div
bethigh  = true
burn     = false
recov    = false
winbet   = 0
losebet  = 0
rtp      = 0
roll     = 0
cprofit  = 0
oldch    = chance
startbal = balance
resetseed()
resetpartialprofit()
function dobet()
    cprofit = cprofit+currentprofit
    if win then winbet = winbet+previousbet else losebet=losebet+previousbet end
    rtp = (winbet/(winbet+losebet))*100  log("-- rtp \t"..rtp.."% \t win "..winbet.."\t lose "..losebet.." ")
    if burn == false and burnon and cprofit > proburn then burn = true chance = 99.99 nextbet =  cprofit*0.25 end
    if burn then
        if cprofit < 0 or nextbet > cprofit then
            resetpartialprofit() burn = false chance = 90 nextbet = initbal/div
        end
    else
        if recov then
            if win then
                chance = math.random(25,35) oldch = chance
                if partialprofit < -initbal then
                    nextbet = (partialprofit/-(99/chance))/3
                else
                    nextbet = (partialprofit/-(99/chance))/2
                end
            else
                chance = math.random(oldch*100, (oldch+1)*100)/100
                nextbet = previousbet*(1+(chance/50))
                if currentstreak < -(99/chance)*2 or partialprofit < -balance*0.3 then
          			nextbet = previousbet*2
          			if partialprofit < -startbal*0.3 and chance < 31 then nextbet = previousbet*0.5 end
          			if chance < 31 then chance = math.random(50,60) end
                end
            end
            if partialprofit > 0 then resetpartialprofit() recov = false chance = 90 nextbet = initbal/div end
        else
            if partialprofit > 0 then
                resetpartialprofit() nextbet = initbal/div chance = math.random(9000,9100)/100 roll = 0
            else
                if roll == 1 then resetseed() bethigh = !bethigh end
                if win then
                    if chance < 90 then chance = oldch end
                    chance = chance + 1
                else
                    if chance < 70 then chance = chance + math.random(1,3) else
                    chance = chance -1 end
                end
                nextbet = previousbet*1.5
                if partialprofit < -maxbet then
                    if currentstreak%-2 == 0 then
                        if roll%10 == 0 then
                            if chance > 70 then oldch = chance end
                            chance = 50
                        else
                            chance = chance + 1
                        end
                    else
                        chance = math.random(maxch-3,maxch)
                    end
                end
                if chance > maxch then chance = maxch end
            end
            if partialprofit < -maxbet then
                if lastBet.chance < 90 and !win then
                    chance = maxch
                    nextbet = previousbet*1.5
                else
                    nextbet = maxbet roll = roll+1
                end
                if currentstreak <= -1 then recov = true nextbet = minbet chance = math.random(25,30) end
            end
        end
        if recov == false then
            if nextbet > maxbet then
              if chance < maxch then chance = maxch end
              nextbet = maxbet
            end
            if currentstreak <= -1 and nextbet > maxbet then recov = true nextbet = minbet chance = math.random(25,30) end
        end
    end
  	if chance < 50 and partialprofit < -startbal*0.3 then chance = math.random(50,60) end
    nextbet = math.max(nextbet, minbet)
end