scriptname = 'Strategy Wager and Profit V.5 updated date [01/11/2023]'
---------------------------------------------------------------------
mode      = 3               -- set 0=profit 1=wager 3=reset mode
tpreset   = 25              -- 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.5             -- set mininice mal bet
div       = 1e3             -- set divider basebet
prebet    = 0               -- set 0 for stake/pd or minbet for other
limitseed = 10000           -- set limit resetseed
minch     = 1               -- set min chance
maxch     = 98              -- set max chance
------------------------- Recov chance ------------------------------
A1 = 1  A2 = 10 A3 = 20 A4 = 30 A5 = 40
B1 = 50 B2 = 60 B3 = 66
C1 = 30 C2 = 33 C3 = 35 C4 = 45
------------------------- do not touch ------------------------------
initbal   = balance/divbal base = balance/div
nextbet   = base chance = maxch startbal = balance
roll      = 0 roll1 = 0 limitpro = 5 cprofit = 0
limitroll = 50 rollbet = 0 winch = 0 rolle = 0
resetmode = false preroll = false burnrecov = false
bethigh   = false burn = false sbet = 0 rtdiv = 0
alt_recov = false burnpro = 0 rollburn = 0 inc = 35
status = '' 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
        if win then
            status = 'Burning Profit on Progress...'
            if burnpro >= 0 then
                if previousbet > initbal*0.01 and chance < maxch then rollburn = 0 end
                rollburn = rollburn + 1  burnpro = 0
                if rollburn > 10 then
                    chance = maxch nextbet = base
                else
                    chance = maxch nextbet = base/10
                end
                if (currentstreak == 1) then
                    if (rtdiv == 1) then rtdiv = 100 else rtdiv = 1 end
                end
            else
                chance  = math.random(B1*rtdiv,B2*rtdiv)/rtdiv
                nextbet = (burnpro*-1)/((99/chance)-1)
            end
        else
            if (currentstreak == -1) then
                if burnrecov then burnrecov = false else burnrecov = true end
                if partialprofit > -initbal*0.1 then
                    if lastBet.roll < 1 or lastBet.roll > 99 then
                        chance = math.random(A1,A2)/10
                    else
                        chance = math.random(A1,A2)
                    end
                else
                    chance = math.random(B1*rtdiv,B2*rtdiv)/rtdiv
                end
                nextbet = (partialprofit*-1)/((99/chance)-1)
            end
            if burnrecov then
                altrecov()
                status = 'Alternatif Recov Lose on Burn Profit...'
            else
                primerecov()
                status = 'Recov Lose on Burn Profit...'
            end
        end
        if nextbet > cprofit then
            resetpartialprofit()
            burn = false cprofit = 0 rollburn = 0 burnpro = 0
            preroll = true nextbet = prebet mode = 3
        end
    else
        if preroll then
            status  = 'Preroll ...'
            rollbet = rollbet + 1 rolle = 0
            chance  = math.floor(math.random(minch,maxch))
            nextbet = prebet
            if rollbet > limitroll and win then
                preroll = false rollbet = 0 resetvar()
                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/2) base = profit/div
                        nextbet = base mode = 1 rollbet = 0
                    else
                        initbal = profit/(divbal/2) base = profit/div
                    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
                        if partialprofit > -initbal*0.1 then
                            if partialprofit < -initbal then
                                chance = math.random(A2,A3)
                            else
                                if lastBet.roll < 1 or lastBet.roll > 99 then
                                    chance = math.random(A1,A2)/10
                                else
                                    chance = math.random(A1,A2)
                                end
                            end
                        else
                            chance = math.random(B1*rtdiv,B2*rtdiv)/rtdiv
                        end
                        nextbet = (partialprofit*-1)/((99/chance)-1)
                    end
                    altrecov()
                else
                    primerecov()
                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
    if prebet > 0 then
        if chance < minch then chance = minch end
        if chance > maxch then chance = maxch end
    end
end

function primerecov()
    status = 'Recov Lose on Progress...'
    if win then
        chance  = math.random(B1*rtdiv,B3*rtdiv)/rtdiv roll = 0 roll1 = 0
        nextbet = (partialprofit*-1)/((99/chance)-1)
    else
        if (currentstreak == -1) then
            if partialprofit > -initbal then bethigh = !bethigh end
            if partialprofit < -initbal then
                chance = math.random(A2,A3)
            else
                if winch > A2 or (winch == 0) then
                    chance  = math.random(minch, A2)
                else
                    chance = winch
                end
            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(C2*rtdiv,C3*rtdiv)/rtdiv --bethigh = !bethigh
                    nextbet = (partialprofit*-1)/((99/chance)-1)
                else
                    if (roll == 3) then
                        chance  = math.random(C4*rtdiv,B3*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(A2*rtdiv,A3*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(A1*rtdiv,A2*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
altctwin = 0 altctlose = 0 altroll5 = 0
altroll1 = 0 altroll2 = 0 altroll3 = 0 altroll4 = 0
function altrecov()
    if win then
        if partialprofit < -startbal*0.1 then inc = 25 else inc = 35 end
        altctwin = altctwin + 1 altctlose = 0 altroll5 = 0
        altroll1 = 0 altroll2 = 0 altroll3 = 0 altroll4 = 0
        if (currentstreak == 1) then bethigh =!bethigh end
        chance = math.random(B1*rtdiv,B2*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 > C1 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(A1,A2)/10
            else
                chance = math.random(A1,A2)
            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(A1,A2)/10
                else
                    chance = math.random(A1*rtdiv,A2*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*(inc/100))
                end
            elseif lastBet.roll > 10 and lastBet.roll < 30 then
                altroll2 = altroll2 + 1
                chance   = math.random(A2*rtdiv,A3*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*(inc/100))
                end
            elseif lastBet.roll > 30 and lastBet.roll < 50 then
                altroll3 = altroll3 + 1
                chance   = math.random(A3*rtdiv,A4*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*(inc/100))
                end
            else
                altroll4 = altroll4 + 1
                chance   = math.random(A4*rtdiv,A5*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*(inc/100))
                end
                if altroll4 > 3 then
                    chance   = math.random(B1*rtdiv,B2*rtdiv)/rtdiv
                    if (altroll4 == 4) then
                        if partialprofit < -initbal then
                            nextbet = (partialprofit*-0.5)/((99/chance)-1)
                        else
                            nextbet = (partialprofit*-1)/((99/chance)-1)
                        end
                    else
                        nextbet = previousbet+(previousbet*(inc/100))
                    end
                end
            end
            if partialprofit < -startbal*0.3 then
                altroll5 = altroll5 + 1
                chance = math.random(B1*rtdiv,B2*rtdiv)/rtdiv
                if (altroll4 == 5) then
                    nextbet = (partialprofit*-1)/((99/chance)-1)
                else
                    nextbet = (partialprofit*-0.5)/((99/chance)-1)
                end
            end
        end
    end
end
function resetvar()
altctwin = 0 altctlose = 0 altroll5 = 0
altroll1 = 0 altroll2 = 0 altroll3 = 0 altroll4 = 0
end