Script profit

scriptname = 'base onRTP'
------------------ setting strategy ------------------------------
target    = balance*2      -- set target profit
stoplose  = balance*0      -- set stoplose
price     = 0.084          -- set price usd
houseEdge = 2              -- set houseEdge site
bb        = 1e-8           -- set minimal bet
minch     = 1              -- set minimal chance
maxch     = 98             -- set maximal chance
dropbet   = 10             -- set dropbet for divide total lose
div       = 1e6            -- set divider basebet
limitdd   = 30             -- set limit DD for stopwin
stopwin   = true           -- set true=on or false=off (stopwin)
reseed    = true           -- set true=on or false=off (resetseed)
------------------- do not touch ----------------------------------
chance   = minch
bethigh  = false
payout   = 99/chance
ctlose   = 0
ctwin    = 0
accbet   = 0
probet   = 0
rtp      = 0
taccbet  = 0
tprobet  = 0
trtp     = 0
pro      = 0
tpro     = 0
maxls    = 0
cprofit  = 0
rollin   = 0
roll     = 0
he       = 0
limitbet = 0
lastbal  = balance
recov    = false
divbal   = math.floor(balance*price)
if divbal <= 0 then divbal = 3 end
initbal    = balance/divbal
nextbet    = initbal/div
if nextbet < bb then nextbet = bb end
resetseed()
function dobet()
    init_drop()
    cprofit = cprofit + currentprofit
    if balance > target then stop() end
    if balance < stoplose then stop() end
    if cprofit > 0 then
        divbal = math.floor(balance*price)
        if divbal <= 0 then divbal = 3 end
        initbal = balance/divbal cprofit = 0
    end
    accbet  = accbet + previousbet taccbet  = taccbet + previousbet
    he      = he + (previousbet*(houseEdge/100))
    rtp     = (probet/accbet)*100 trtp = (tprobet/taccbet)*100
    if maxls > ctlose then maxls = maxls else maxls = ctlose end
    log("--- divbal \t"..divbal.."\t - initbal "..string.format("%.8f",initbal).."\t - t-RTP "..string.format("%.2f",trtp).."% ")
    log("--- LS \t"..ctlose.."\t - cprofit "..string.format("%.8f",cprofit).."\t ["..string.format("%.2f",((cprofit*-1)/balance)*100).."%] ")
    log("--- RTP \t"..string.format("%.2f",rtp).."\t - HE "..string.format("%.8f",he).."\t ["..string.format("%.2f",(he/balance)*100).."%] -Nonce "..lastBet.nonce.."\t -DD "..string.format("%.2f",dd).."% ")
    if win and cprofit >= 0 then
        if rtp < 60 and lastBet.nonce > 1000 and chance < 33 or rtp < 20 and lastBet.nonce > 250 and chance < 33 or chance > 33 then
            if chance < 33 then
                if reseed then
                    resetseed()
                else
                    if lastBet.nonce > 10000 then resetseed() end
                end
            end
            accbet  = 0 probet = 0 rtp = 0 maxls = 0
            nextbet = initbal/div
            if minch > 1 then
                chance = math.random(minch,minch+5)
            else
                chance = math.random(minch*100,(minch+5)*100)/100
            end
        else
            if rtp < 50 and chance < 33 then chance = math.random(33,66) end
        end
        if chance > 66 then chance = math.random(33,66) end
        if ctlose > payout then
            if minch < 1 then
                chance = chance + 0.1
            else
                chance = chance + 1
            end
            if chance > minch+30 and rtp > 50 then
                rollin = rollin + 1
                if rollin%10 == 0 then
                    if minch > 1 then
                        chance = math.random(minch,minch+5)
                    else
                        chance = math.random(minch*100,(minch+5)*100)/100
                    end
                else
                    chance = math.random(minch*100,(minch+5)*100)/100
                end
            end
        end
        if lastbal < balance then
            pro     = balance - lastbal
            probet  = probet + pro
            tpro    = balance - lastbal
            tprobet = tprobet + tpro
            lastbal = balance
        end
        payout = 99/chance  nextbet = initbal/div
        ctlose = 0 pro = 0 recov = false
    else
        ctlose = ctlose + 1
        if chance > 66 then chance = math.random(33,66) end
        if currentstreak < -payout and rtp > 66 then
            nextbet = previousbet*(1+(chance/66))
        else
            if ctlose > payout then
                chance = chance + math.random(50,100)/100
            end
            if chance < 33 then
                if chance < 10 then
                    nextbet = previousbet*(1+(chance/33))
                else
                    nextbet = previousbet*(1+(chance/50))
                end
            else
                chance = math.random(3300,6600)/100
                if cprofit < -initbal*0.1 then
                    nextbet = (previousbet*0.5)*(1+(chance/66))
                else
                    nextbet = previousbet*(1+(chance/66))
                end
                if nextbet > (cprofit*-1) then nextbet = (cprofit*-1)/((99/chance)-1) end
            end
        end
        if cprofit*-1 < nextbet and chance >= 33 then nextbet = (cprofit*-1)/((99/chance)-1) end
        if cprofit < -initbal*0.3 and (recov == false) then
            chance  = math.random(33,66)
            nextbet = cprofit/-dropbet
            recov   = true
        else
            recov = false
            nextbet = previousbet * (1+(chance/66))
        end
        if bb > (initbal/div) then limitbet = bb else limitbet = initbal/div end
        if cprofit*-1 <= limitbet and chance >= 33 and currentstreak == -1 or nextbet <= limitbet and chance >= 33 and currentstreak == -1 then
            chance = math.random(minch*100, (minch+5)*100)/100
        end
        if win then
            bethigh = !bethigh
        else
            if chance > 50 and lastBet.roll < chance and ctlose >= 2 then
                bethigh = false
            else
                if chance > 50 and cprofit < -initbal*0.1 and (bethigh == false) and lastBet.roll > chance and ctlose >= 2 then bethigh = true end
            end
        end
        payout = 99/chance
    end
    if chance > maxch then chance = maxch end
    if nextbet < bb then
        if (initbal/div) > bb then
            nextbet = initbal/div
        else
            nextbet = bb
        end
    end
end
-- drop down function
balhi = 0 drop = 0 maxdrop = 0 dd = 0
function init_drop()
    if balance > balhi then balhi = balance else balhi = balhi end
    drop = balhi - balance if drop > maxdrop then maxdrop = drop end
    dd   = (maxdrop/balance)*100
end