LEprerolleurDBvcBNE

--[[
1) Stratégie de pré roll qui analyse autant de chance que vous voulez et dans les 2 sens

1) Pre-roll strategy that analyzes every chances that you want and in both directions.

2) Repère les série rare (exemple: 4 roll au dessus de 90 à la suite) vous pouvez régler
quel type de série(la probabilité des series) vous chercher avec la variable NBM (exemple
NBM = 1000 cherche des series à au moins 1 chance sur 1000 d'arriver)

2) Marks all rare series (example: 4 roll over 90  in a row) you can set the type of series (the probability of the series) that you look for thanks to variable NBM (for example
NBM = 1000 mean looking for series at least 1 chance in 1000 to     happen)

3) Enchaîne à la suite des series dans le même sens et avec la chance correspondante (exem-
ple après 4 roll supérieure à 90 ça enchaîne en chance 90 et en under)

3) After a rare serie we continue in the same direction and with the corresponding chance (for instance after 4 rolls over than 90 it plays chance =  90 and bet under)
]]



--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 (lastBet.profit >= 0) 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 (lastBet.profit >= 0) 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 (lastBet.profit >= 0) 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 ((lastBet.profit >= 0) 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