scriptname = 'Strategy Wager and Profit created date [28/10/2023]'
---------------------------------------------------------------------
mode      = 3               -- set 0=profit 1=wager 3=reset mode
tpreset   = 50              -- set target profit for reset mode
target    = balance*2       -- set target profit for stop
stoplose  = balance*0       -- set stoplose
divbal    = 15              -- set divider balance
minbet    = 1.7e-4          -- set minimal bet
div       = 1e3             -- set divider basebet
prebet    = 0.000000001               -- set 0 for stake/pd or minbet for other
limitseed = 10000           -- set limit resetseed
minch     = 1               -- set min chance
maxch     = 98              -- set max chance
------------------------- do not touch ------------------------------
initbal   = balance/divbal
base      = balance/div
nextbet   = base
chance    = maxch
roll      = 0 roll1 = 0
limitpro  = 5 cprofit = 0
limitroll = 100 rollbet = 0
resetmode = false preroll = false
bethigh   = false burn = false sbet = 0
alt_recov = false winch = 0 rolle = 0
status    = ''  burnpro = 0 rtdiv = 1
startbal  = balance
resetpartialprofit() resetseed()

function dobet()
    log("--- Status \t"..status.." ")
    cprofit = cprofit + currentprofit
    if balance > target then stop() end
    if burn and (mode == 1) then
        burnpro = burnpro + currentprofit
        if partialprofit > 0 then resetpartialprofit() end
        status = 'Burning Profit on Progress...'
        if win then
            if burnpro >= 0 then
                chance = maxch nextbet = base burnpro = 0
            else
                nextbet = (burnpro*-1)/((99/chance)-1)
            end
        else
            altrecov()
        end
        if nextbet > cprofit then
            resetpartialprofit() burn = false cprofit = 0
            preroll = true nextbet = prebet mode = 3 burnpro = 0
        end
    else
        if preroll then
            status  = 'Preroll ...'
            rollbet = rollbet + 1 rolle = 0
            chance  = math.floor(math.random(minch,maxch))
            nextbet = prebet
            if rollbet > limitroll then
                preroll = false rollbet = 0
                chance  = maxch nextbet = base
        		if alt_recov then alt_recov = false else alt_recov = true end
            end
        else
            if partialprofit >= 0 then
                status = 'Wager Run C98 on Progress...'
                resetpartialprofit() rolle = 0
                if (currentstreak == 1) then
                    if alt_recov then alt_recov = false else alt_recov = true end
                    bethigh = !bethigh
                end
                if chance < 10 then winch = chance end startbal = balance
                if (resetmode == false) and (mode == 3) and profit >= startbal*(tpreset/100) then resetmode = true end
                if resetmode then
                    if (profit/(balance-profit))*100 > 20 then
                        burn = true cprofit = profit/2 chance = maxch
                        initbal = (balance-profit)/divbal base = profit/(div/5)
                        nextbet = base mode = 1
                    else
                        initbal = profit/divbal base = profit/(div/5)
                    end
                else
                    initbal = balance/divbal base = balance/div
                end
                if (rtdiv == 1) then rtdiv = 100 else rtdiv = 1 end
                if chance >= 33 and chance < maxch then
                    if previousbet > (initbal*0.2) and lastBet.nonce  > limitseed then resetseed() end
                    preroll = true nextbet = prebet
                else
                    chance  = math.random(maxch*100, math.floor((maxch+1))*100)/100
                    nextbet = base roll = 0 roll1 = 0
                end
            else
                if alt_recov then
                    status = 'Alternatif Recov Lose on Progress...'
                    rolle = rolle + 1
                    if (rolle == 1) then nextbet = (partialprofit*-1)/((99/chance)-1) end
                    altrecov()
                else
                    status = 'Recov Lose on Progress...'
                    if win then
                        chance  = math.random(50*rtdiv,66*rtdiv)/rtdiv roll = 0 roll1 = 0
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    else
                        if (currentstreak == -1) then
                            bethigh = !bethigh
                            if winch > 10 or (winch == 0) then
                                chance  = math.random(minch, 10)
                            else
                                chance = winch
                            end
                            nextbet = (partialprofit*-1)/((99/chance)-1)
                        else
                            if partialprofit < -initbal*0.05 and partialprofit > -initbal*0.25 then
                                roll = roll + 1
                                if (roll == 1) then
                                    chance  = math.random(33*rtdiv,35*rtdiv)/rtdiv --bethigh = !bethigh
                                    nextbet = (partialprofit*-1)/((99/chance)-1)
                                else
                                    if (roll == 3) then
                                        chance  = math.random(45*rtdiv,66*rtdiv)/rtdiv --bethigh = !bethigh
                                        nextbet = (partialprofit*-1)/((99/chance)-1)
                                    else
                                        nextbet = previousbet*(1+(chance/50))
                                    end
                                end
                                nextbet = (partialprofit*-1)/((99/chance)-1)
                            elseif partialprofit < -initbal*0.25 and partialprofit > -initbal*0.5 then
                                roll1 = roll1 + 1
                                if (roll1 == 1) then
                                    chance  = math.random(10*rtdiv,20*rtdiv)/rtdiv bethigh = !bethigh
                                    nextbet = (partialprofit*-1)/((99/chance)-1)
                                else
                                    chance  = chance + (math.random(10,50)/100)
                                    nextbet = previousbet*(1+(chance/50))
                                end
                            elseif partialprofit < -initbal*0.5 then
                                chance    = math.random(1*rtdiv,10*rtdiv)/rtdiv
                                nextbet   = (partialprofit*-1)/((99/chance)-1)
                                alt_recov = true
                            else
                                chance  = chance + math.random(10,100)/100
                                nextbet = previousbet*(1+(chance/50))
                                sbet    = (partialprofit*-1)/((99/chance)-1)
                                if nextbet < sbet then nextbet = sbet end
                            end
                        end
                    end
                end
            end
        end
    end
    if (mode == 3) and resetmode and partialprofit < -startbal*(tpreset/100) or (mode == 1) and resetmode and partialprofit < -startbal*(tpreset/100) then
        preroll = true resetpartialprofit() cprofit = 0
        initbal = balance/divbal base = balance/div
        chance  = minch nextbet = prebet
    end
    if (preroll == false) and nextbet < minbet then nextbet = minbet end
end
altctwin = 0 altctlose = 0
altroll1 = 0 altroll2 = 0 altroll3 = 0 altroll4 = 0
function altrecov()
    if win then
        altctwin = altctwin + 1 altctlose = 0
        altroll1 = 0 altroll2 = 0 altroll3 = 0 altroll4 = 0
        if (currentstreak == 1) then bethigh =!bethigh end
        chance = math.random(50*rtdiv,60*rtdiv)/rtdiv
        if partialprofit >= 0 then
            if alt_recov then alt_recov = false else altrecov = true end
            if previousbet > initbal*0.1 then
                preroll = true nextbet = prebet chance = maxch
            else
                chance = maxch nextbet = base
            end
            resetpartialprofit()
        else
            if partialprofit < -initbal then
                nextbet = (partialprofit*-0.5)/((99/chance)-1)
            else
                nextbet = (partialprofit*-1)/((99/chance)-1)
            end
        end
    else
        altctlose = altctlose + 1 altctwin = 0
        if (currentstreak == -1) then
            if lastBet.roll < 50 and bethigh then bethigh = false end
            if lastBet.roll > 50 and (bethigh == false) then bethigh = true end
            if chance > 30 and partialprofit < -initbal*0.3 then
                if math.random(3,7) == 5 then bethigh = !bethigh end
            end
            if lastBet.roll < 1 or lastBet.roll > 99 then
                chance = math.random(1,10)/10
            else
                chance = math.random(2,10)
            end
            if partialprofit < -initbal then
                nextbet = (partialprofit*-0.5)/((99/chance)-1)
            else
                nextbet = (partialprofit*-1)/((99/chance)-1)
            end
        else
            if lastBet.roll < 10 or lastBet.roll > 90 then
                altroll1 = altroll1 + 1
                if lastBet.roll < 1 or lastBet.roll > 99 then
                    chance = math.random(1,10)/10
                else
                    chance = math.random(2*rtdiv,10*rtdiv)/rtdiv
                end
                if (altroll1 == 1) then
                    if partialprofit < -initbal then
                        nextbet = (partialprofit*-0.5)/((99/chance)-1)
                    else
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    end
                else
                    nextbet = previousbet+(previousbet*(35/100))
                end
            elseif lastBet.roll > 10 and lastBet.roll < 30 then
                altroll2 = altroll2 + 1
                chance   = math.random(10*rtdiv,20*rtdiv)/rtdiv
                if (altroll2 == 1) then
                    if partialprofit < -initbal then
                        nextbet = (partialprofit*-0.5)/((99/chance)-1)
                    else
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    end
                else
                    nextbet = previousbet+(previousbet*(35/100))
                end
            elseif lastBet.roll > 30 and lastBet.roll < 50 then
                altroll3 = altroll3 + 1
                chance   = math.random(20*rtdiv,30*rtdiv)/rtdiv
                if (altroll3 == 1) then
                    if partialprofit < -initbal then
                        nextbet = (partialprofit*-0.5)/((99/chance)-1)
                    else
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    end
                else
                    nextbet = previousbet+(previousbet*(35/100))
                end
            else
                altroll4 = altroll4 + 1
                chance   = math.random(30*rtdiv,40*rtdiv)/rtdiv
                if (altroll4 == 1) then
                    if partialprofit < -initbal then
                        nextbet = (partialprofit*-0.5)/((99/chance)-1)
                    else
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    end
                else
                    nextbet = previousbet+(previousbet*(35/100))
                end
            end
        end
    end
end