-std

io.write('++ input minbet ')
local minbet = io.read("*n")

io.write('++ input pause ifprofit % ')
local ifpause = io.read("*n")

io.write('++ input stopwin ifdrop % ')
local ifdrop = io.read("*n")

io.write('++ input stop ifprofit % ')
local ifprofit = io.read("*n")

os.execute("cls")

balance = tonumber(balance)
target  = balance+(balance*(ifprofit/100))
dopause = balance*(ifpause/100)

function betset(p,s)
    mxstreak = math.ceil(p*(6+s))
    lmlose   = math.ceil(p*3)
    multi    = (1/(p-1)*1.5)+1
    base     = balance/(math.exp(math.log(multi)*mxstreak)/(multi-1))
    chance   = 99/p
    mxlose   = 0
end

payoutf = {5,10,5}
payout  = 5
ctlose  = 0
sesi    = 1
balst   = balance

betset(payout,(sesi-1))
nextbet = base
profitc = 0
function dobet()
    profitc = profitc + currentprofit
    if profitc > 0 then
        if profitc > dopause then
            pause()
        end
        profitc = 0
    end
    if win then
        if mxlose >= lmlose then
            bethigh = not bethigh
            payout  = payout-(payout*(payoutf[3]/100))
            if payout < payoutf[1] then
                payout = payoutf[2]
                sesi   = sesi + 1
                countdown(10)
            end
            betset(payout,(sesi-1))
        end
        ctlose  = 0
    else
        ctlose  = ctlose + 1
    end
    nextbet = base * (multi^ctlose)
    if ctlose > mxlose then
        mxlose = ctlose
    end
    if balance > target then stop() end
    displayinfo()
    if nextbet < minbet then stop() end
end

stopwin    = false
mxdrop     = 0
mxbalance,stbalance = balance,balance
function displayinfo()
    if balance > mxbalance then
        if stopwin then stop() end
        mxbalance = balance
    end
    drop = (mxbalance - balance)/mxbalance * 100
    if drop > mxdrop then mxdrop = drop end
    if mxdrop > ifdrop then stopwin = true end
    print("++ status "..ctlose.."/"..mxlose.."/"..lmlose.." max:"..mxstreak.."x  sesi:"..sesi.."    ")
end