LEprerolleurDB

--https://bit-exo.com/?ref=pierresert1

--https://www.bitsler.com/?ref=pierresert1

--https://bitvest.io?r=100548

enablezz=false
enablesrc=false
bestTOUMX=0 --mémorise la proba de la best chaine
n=0
N=0
n=1
bestchain=0 --mémorise la valeur de la serie la + rare
indice=1 --indice de la serie la + rare aux dernier contrôle
pr=0 --mémorise profit/progression
prinitiale=pr

--balance=10000 --simu

div=100000000 ---------------unité de base

--____________________SETTINGS______
agressivite=20 --[[increases/decreases martingales' best minimum increase
for instance with multiplier=2 and aggressivite = 50 after every loses, wager are increase by 150%) ]]--
casino=1 --% edge house
chancePRLL=91 --chance to pre roll
maxchance=90 -- max chance authorized
minchance=10 --minimum chance authorized
NBRchance=100 --number of chance analyzed
target=balance*2 --STOP_IF_BALANCE_OVER
limite=0 --STOP_IF_BALANCE_UNDER
bb=20/div-------------------base bet
bbPRLL=bb --pre roll base bet
NBM=10 --[[probability of the series
(for instance with NBM=100 we are looking for series that have 1 chance in 100 ) ]]--
--_________________________________

B=balance-limite---c'est la partie de balance mis en jeu

--REMPLISSAGE DES TABLES_____________________________________________
Tch={} --chance
Tover={} --chaine lose over
Tunder={} --chaine lose under
TOUMX={}  --plus grande chaine entre over/under
Tsens={} --mémorise sens de chaque chaine
Tn={} --chaine lose min

A=minchance-((maxchance-minchance)/(NBRchance-1))
for x=1,NBRchance,1 do --Remplis les table selectione les chances
A +=(maxchance-minchance)/(NBRchance-1)
Tch[x] = A --chance
Tover[x]=0 --chaine lose over
Tunder[x]=0 --chaine lose under
TOUMX[x]=0 --plus grande chaine entre over/under
Tn[x]=0 --chaine lose min
Tsens[x]=0 --mémorise sens de chaque chaine
end

for x=1,NBRchance,1 do --table serie win min
    if Tch[x]==nil then break end
    Tn[x]=math.ceil(math.log(1/NBM)/math.log((Tch[x])/100))
end

for x=1,NBRchance,1 do --table serie lose min
    if Tch[x]==nil then break end
    Tn[x]=math.ceil(math.log(1/NBM)/math.log((100-Tch[x])/100))
end

x=0
--___________________________________________________________________

--FONCTION_______________________________________________________________

function stringA()
    M1="dev contact (telegram = @pmNofirg / mail=pmgriffon1@gmail.com )"
    M2="this script is FREE if you bought it you got scammed"
    betv=M2
    print(M1)
    print(M2)
end

function simu_printInfo()
    print("wagered= " ..wagered)
    print("profit= " ..profit)
    print("PERF= " ..(wagered/profit)*100 .."%")
    print ("chance= " ..chance)
    print("nextbet= " ..nextbet .." N° " ..bets)
end

function calcul_increase()

    payout=(100 - casino)/chance
    q=((1+(1/(payout-1)))-1)*(1+(agressivite/100))+1
    inc=(q-1)*100

end

MRTGLLOPT=false
function martingale_optimise() --optimizing the base bet to use 100% of the balance

    if win then
        B=balance-limite-0.00000001
        n=math.log((B/bb)*(-1+q)+1)/math.log(q)
        n=math.floor(n)
        nextbet=B/((1-q^n)/(1-q))
    else
        nextbet=previousbet*q
    end

    print("INCREASE= " ..inc .."%")
    print("SERIE MAX DE LOSE POSSIBLE= " ..n-1 )

end

function reset_to_preroll()

    if win then
        if bestTOUMX < Tn[indice] then
            chance=chancePRLL
            nextbet=bbPRLL
            MRTGLLOPT=false
        end
    end --retourner au preroll après win

end

function cherche_serie_de_win()
    for x=1,NBRchance,1 do

        if Tch[x]==nil then break end

        if lastBet.roll < Tch[x] then
            Tunder[x] +=1
        else
            Tunder[x] =0
        end

        if lastBet.roll > (100-Tch[x]-0.01) then
            Tover[x] +=1
        else
            Tover[x] =0
        end

        if Tunder[x] >= Tover[x] then
            TOUMX[x]=Tunder[x]
            Tsens[x]=false
        else
            TOUMX[x]=Tover[x]
            Tsens[x]=true
        end
    end
end

function cherche_serie_de_lose()
    for x=1,NBRchance,1 do

        if Tch[x]==nil then break end

        if lastBet.roll < Tch[x] then
            Tunder[x] =0
        else
            Tunder[x] +=1
        end

        if lastBet.roll > (100-Tch[x]-0.01) then
            Tover[x] =0
        else
            Tover[x] +=1
        end

        if Tunder[x] >= Tover[x] then
            TOUMX[x]=Tunder[x]
            Tsens[x]=false
        else
            TOUMX[x]=Tover[x]
            Tsens[x]=true
        end
    end
end

function selection_indice_de_la_best_serie_win()
    for x=1,NBRchance,1 do

        if Tch[x]==nil then break end
        if (1/(((Tch[x])/100)^TOUMX[x])) > bestchain then
            bestchain=(1/(((Tch[x])/100)^TOUMX[x]))
            indice=x
            bestTOUMX=TOUMX[indice]
        end
    end
    if bestTOUMX >= Tn[indice] and win then
        MRTGLLOPT=true
        bestchain=0 --pour garder en mémore même si la serie est cassé
        chance=Tch[indice]
        bethigh=Tsens[indice]
    end
end

function selection_indice_de_la_best_serie_lose()
    for x=1,NBRchance,1 do

        if Tch[x]==nil then break end
        if (1/(((100-Tch[x])/100)^TOUMX[x])) > bestchain then
            bestchain=(1/(((100-Tch[x])/100)^TOUMX[x]))
            indice=x
            bestTOUMX=TOUMX[indice]
        end
    end
    if bestTOUMX >= Tn[indice] and (win or chance==chancePRLL) then
        MRTGLLOPT=true
        chance=Tch[indice]
        bethigh=Tsens[indice]
    end
end

    function target_et_limite()
        if (balance-nextbet) < limite or betv==nil then
            print("MISSION FAILLED! C'EST LE JEU SVP FAITES PAS DE BÊTISE") stop()
        end
        if balance >= target then
            print("TARGET REACHED GG !!!") stop()
        end
    end

    bestID,badID,pirePERTE,bestPROFIT=0,0,0,0
function bestBETid()

    if currentprofit >= bestPROFIT then
        bestID=lastBet.id
        bestPROFIT=currentprofit
    end

    if currentprofit <= pirePERTE then
        badID=lastBet.id
        pirePERTE=currentprofit
    end

    print("PROFIT MAX= " ..bestID)
    print("PERTE MAX= " ..badID)

end
--_______________________________________________________________________

chance=chancePRLL
nextbet=bbPRLL

function dobet()

    stringA()
    pr +=currentprofit

    cherche_serie_de_lose()
    --cherche_serie_de_win()

    bestchain=0
    selection_indice_de_la_best_serie_lose()
    --selection_indice_de_la_best_serie_win()

    reset_to_preroll()

    if MRTGLLOPT==true then
        calcul_increase()
        martingale_optimise()
    end

    target_et_limite()
    bestBETid()
    --simu_printInfo()

end