Xpander 25 (Long term winner 67-70% winrate)

[ignatus]

Well now, the code *should* be correct, and here are my first results (note. I added another function in STATs, that IS "TOTALBR" (That is Total profits/losses made)

TEST1 (see pic!)
88031 Live-spins
BR 2000/WINGoal+3000

won 1146
lost 313

Winrate 1146/1459= 78% WINRATE

TOTALBR (Profits/losses)= +295508u

RX.code (check Statistics--> Data Records for TOTALBR/Wins/Losses)

Code Select Expand

system "Xpander"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
   put 2000 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 2000 of Record "max risk" Data

 
    //put 0 to Record "Highest Bankroll" Data

    Set List[1,1,1,2,5,15,55,175,600,1000]
     to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data
   end

   while on each spin
  begin

   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
           // put 100% of Record "highest" Data to Record "max risk" Data
           // subtract 1500 Record "max risk" Data
        end

        if Bankroll <= Record "max risk" Data
        begin
            put 2000 to Record "A" data
            subtract 100% of Bankroll from Record "A" data
            Subtract 2000 from Record "A" data

            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 2000 on total bankroll
             
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 2000 of Record "max risk" Data

            add 1 to record "lost sessions" data index

            put 1 on Record "progression" Data Index

          //  stop session
        end

  Track last Number for 1 spins to
Record "last1" layout

    if any inside bet won each
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

    if any inside bet lost each
begin
Add 1 to Record "progression" Data index
end

if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list

Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
end



   if Record "Spin counter" Data index = 1
   begin
   set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
   Put 100% of Record "progression" Data to Record "bett1" layout list
   Put 100% of Record "progression" Data to Record "bet1" layout list
   end

   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
   Put 100% of Record "progression" Data to Record "bett2" layout list
   Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
   Put 100% of Record "progression" Data to Record "bett3" layout list
   Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
   Put 100% of Record "progression" Data to Record "bett4" layout list
   Put 100% of Record "progression" Data to Record "bet4" layout list
   end

    if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
   Put 100% of Record "progression" Data to Record "bett5" layout list
   Put 100% of Record "progression" Data to Record "bet5" layout list
   end

{    if Record "Spin counter" Data index = 6
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end
}


   add 1 to Record "Spin counter" Data index




if total bankroll >= 3000 each time
begin
put 2000 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 2000 on total bankroll
    put 1 on Record "progression" Data Index

end

{
//if total bankroll <= 0 each time
//stop session
add 1 to record "lost sessions" data index
    put 500 on total bankroll
    put 1 on Record "progression" Data Index
end
}

  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
   End

  end
END

[Anastasius]

Can u wait 3 missed bets ?
For example first 5 numbers miss (hit and 2 neighbors) then 10 miss  now bet with 15 numbers

[ignatus]

Can u wait 3 missed bets ?
For example first 5 numbers miss (hit and 2 neighbors) then 10 miss  now bet with 15 numbers

Yes, i think i got the code right, then i got a 74% winrate from the first test (dont know its better or worse then the other version)... Procedure; It will only place bets 5+5+5 Sectors if the first two bets is lost (Virtual losses) else if Any of the first to bets Won (Virtual win) it will Re-start, Re-track.

RX-code

Code Select Expand

system "XpanderTEST2"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
   put 2000 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 2000 of Record "max risk" Data

 
    //put 0 to Record "Highest Bankroll" Data

    Set List[1,1,2,5,15,55,175,600,1000]
     to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data
   end

   while on each spin
  begin

   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
           // put 100% of Record "highest" Data to Record "max risk" Data
           // subtract 1500 Record "max risk" Data
        end

        if Bankroll <= Record "max risk" Data
        begin
            put 2000 to Record "A" data
            subtract 100% of Bankroll from Record "A" data
            Subtract 2000 from Record "A" data

            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 2000 on total bankroll
             
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 2000 of Record "max risk" Data

            add 1 to record "lost sessions" data index


            set flag "bet" false
            put 1 on Record "progression" Data Index
            put 1 on Record "Spin counter" Data index
             clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
          //  stop session
        end
       
        if total bankroll >= 3000 each time
begin
put 2000 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 2000 on total bankroll

    set flag "bet" false
    put 1 on Record "progression" Data Index
    put 1 on Record "Spin counter" Data index
     clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

  Track last Number for 1 spins to
Record "last1" layout

    if any inside bet won each
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

    if any inside bet lost each
begin
Add 1 to Record "progression" Data index
end

if Record "Spin counter" Data index = 2
   begin
IF Record "bet1" layout list not hit each
begin
   IF Record "bett1" layout list not hit each
begin
// set flag "bet" true
end
end
else
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
end
end








   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
//  Put 100% of Record "progression" Data to Record "bett2" layout list
//  Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin

   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
   Put 100% of Record "progression" Data to Record "bett4" layout list
   Put 100% of Record "progression" Data to Record "bet4" layout list
   end

    if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
   Put 100% of Record "progression" Data to Record "bett5" layout list
   Put 100% of Record "progression" Data to Record "bet5" layout list
   end

{    if Record "Spin counter" Data index = 6
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end
}

if Record "Spin counter" Data index = 3
   begin
IF Record "bet1" layout list not hit each
begin
IF Record "bett1" layout list not hit each
begin
IF Record "bet2" layout list not hit each
begin
IF Record "bett2" layout list not hit each
begin
  set flag "bet" true
end
end
end
end
else
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
end
end


if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list

Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
end



   add 1 to Record "Spin counter" Data index






{
//if total bankroll <= 0 each time
//stop session
add 1 to record "lost sessions" data index
    put 500 on total bankroll
    put 1 on Record "progression" Data Index
end
}

  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
   End

  end
END

[ignatus]

Just Ran the orginal verison (same spins) and got a 78% winrate,....so idk? doesnt seems to be much of an "improvement or tweak" then?,or?? Less losses in the new version ....(Also compare stats, see pic! is BR higher in the other version? im confused:S)

[Tekunda]

Some things are not clear:

What do you do when you put your bets down and a neighbour has already been covered. Do leave it out, so that we play with e. g. 23 numbers, or do you cover this number double?

[Roulettebeater]

Ignatus
It would be great if you can write down a sequence of numbers (say 15 numbers)  and tell us how would you place bets according to your strategy

[Rufius]

Ignatus,
where to find this "Xpanderstat" ?

[2BobBet]

@ Roulettebeater       I have not tested the system. I cant see this working where I play online, without a clicker or some automated way of placing bets as the amount of bets you would have to place, later in the system with the right chips  would be impossible in the time allowed before NMBets called !

[ignatus]

Ignatus,
where to find this "Xpanderstat" ?

in RX, check the menu "Satistics" then --> "Data Records" .

[ignatus]

Some things are not clear:

What do you do when you put your bets down and a neighbour has already been covered. Do leave it out, so that we play with e. g. 23 numbers, or do you cover this number double?

Those number aldready bet are left out (no double bet that is)

[ignatus]

Ignatus
It would be great if you can write down a sequence of numbers (say 15 numbers)  and tell us how would you place bets according to your strategy

Maybe i can do that, (or make a video) But then, (as i also figured) played this For real (idk if possible) YES perhaps if you place 1u Betting 5 number then (At the wheel -chart, idk what its called , but its possible to place 1u betting 5 number at the Live wheel,..)

[ignatus]

Changed progressionline now, (With the new tweak, wait until 2 first bet Virtual Loss before placing 3rd bet, 5+5+5 numbers sectors)

1,2,7,23,75,263,921 STOP

Although i "only" got a 71% winrate, the Profits made doubled. (Same spins, see pic!)

This is the "correct progressionline"

Applied for the "old bet" (bet non stop) that would be a progressionline of

1,1,2,7,23,75,263,921

RX.code

Code Select Expand

system "XpanderTEST2"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
   put 2000 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 2000 of Record "max risk" Data

 
    //put 0 to Record "Highest Bankroll" Data

    Set List[1,1,2,7,23,75,263,921]
         to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data
   end

   while on each spin
  begin

   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
           // put 100% of Record "highest" Data to Record "max risk" Data
           // subtract 1500 Record "max risk" Data
        end

        if Bankroll <= Record "max risk" Data
        begin
            put 2000 to Record "A" data
            subtract 100% of Bankroll from Record "A" data
            Subtract 2000 from Record "A" data

            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 2000 on total bankroll
             
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 2000 of Record "max risk" Data

            add 1 to record "lost sessions" data index


            set flag "bet" false
            put 1 on Record "progression" Data Index
            put 1 on Record "Spin counter" Data index
             clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
          //  stop session
        end
       
        if total bankroll >= 3000 each time
begin
put 2000 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 2000 on total bankroll

    set flag "bet" false
    put 1 on Record "progression" Data Index
    put 1 on Record "Spin counter" Data index
     clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

  Track last Number for 1 spins to
Record "last1" layout

    if any inside bet won each
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

    if any inside bet lost each
begin
Add 1 to Record "progression" Data index
end

if Record "Spin counter" Data index = 2
   begin
IF Record "bet1" layout list not hit each
begin
   IF Record "bett1" layout list not hit each
begin
// set flag "bet" true
end
end
else
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
end
end








   if Record "Spin counter" Data index = 1
   begin
  // set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
//  Put 100% of Record "progression" Data to Record "bett1" layout list
//  Put 100% of Record "progression" Data to Record "bet1" layout list
   end

   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
//  Put 100% of Record "progression" Data to Record "bett2" layout list
//  Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin

   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
  // Put 100% of Record "progression" Data to Record "bett3" layout list
  // Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
   Put 100% of Record "progression" Data to Record "bett4" layout list
   Put 100% of Record "progression" Data to Record "bet4" layout list
   end

    if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
   Put 100% of Record "progression" Data to Record "bett5" layout list
   Put 100% of Record "progression" Data to Record "bet5" layout list
   end

{    if Record "Spin counter" Data index = 6
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end
}

if Record "Spin counter" Data index = 3
   begin
IF Record "bet1" layout list not hit each
begin
IF Record "bett1" layout list not hit each
begin
IF Record "bet2" layout list not hit each
begin
IF Record "bett2" layout list not hit each
begin
  set flag "bet" true
end
end
end
end
else
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
end
end


if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list

Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
end



   add 1 to Record "Spin counter" Data index






{
//if total bankroll <= 0 each time
//stop session
add 1 to record "lost sessions" data index
    put 500 on total bankroll
    put 1 on Record "progression" Data Index
end
}

  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
   End

  end
END

[ignatus]

XPANDER FINAL VERISON

Now, testing same spins (with the original Xpander, BUT the *new progression-line* applied), best results so far, (Profits tripple amount, also higher winrate 72%. (see pic!) That means (This "other tweak" waiting for 2 Virtual Losses, will not give either higher winrate or higher profits)

RX-code

Code Select Expand

system "Xpander FINAL"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
   put 2000 on total bankroll

   put 100% of Bankroll on Record "highest" Data
        put 100% of Record "highest" Data to Record "max risk" Data
        subtract 2000 of Record "max risk" Data

 
    //put 0 to Record "Highest Bankroll" Data

    Set List[1,1,1,2,7,23,75,263,921]
     to Record "progression" Data

   Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
     to Record "Spin counter" Data
   end

   while on each spin
  begin

   if Bankroll > Record "highest" Data
        begin
            put 100% of Bankroll on Record "highest" Data
           // put 100% of Record "highest" Data to Record "max risk" Data
           // subtract 1500 Record "max risk" Data
        end

        if Bankroll <= Record "max risk" Data
        begin
            put 2000 to Record "A" data
            subtract 100% of Bankroll from Record "A" data
            Subtract 2000 from Record "A" data

            subtract 100% of Record "A" data from Record "TotalBR" Data

             put 2000 on total bankroll
             
            put 100% of Bankroll on Record "highest" Data
            put 100% of Record "highest" Data to Record "max risk" Data
            subtract 2000 of Record "max risk" Data

            add 1 to record "lost sessions" data index

            put 1 on Record "progression" Data Index

          //  stop session
        end

  Track last Number for 1 spins to
Record "last1" layout

    if any inside bet won each
begin
set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
end

    if any inside bet lost each
begin
Add 1 to Record "progression" Data index
end

if flag "bet" true each
begin
Put 100% of Record "progression" Data to Record "bet1" layout list
Put 100% of Record "progression" Data to Record "bet2" layout list
Put 100% of Record "progression" Data to Record "bet3" layout list
Put 100% of Record "progression" Data to Record "bet4" layout list
Put 100% of Record "progression" Data to Record "bet5" layout list
Put 100% of Record "progression" Data to Record "bet6" layout list

Put 100% of Record "progression" Data to Record "bett1" layout list
Put 100% of Record "progression" Data to Record "bett2" layout list
Put 100% of Record "progression" Data to Record "bett3" layout list
Put 100% of Record "progression" Data to Record "bett4" layout list
Put 100% of Record "progression" Data to Record "bett5" layout list
Put 100% of Record "progression" Data to Record "bett6" layout list
end



   if Record "Spin counter" Data index = 1
   begin
   set flag "bet" true
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet1" layout
   Copy Neighbors of Record "bet1" layout
   to Record "bett1" Layout
   Put 100% of Record "progression" Data to Record "bett1" layout list
   Put 100% of Record "progression" Data to Record "bet1" layout list
   end

   if Record "Spin counter" Data index = 2
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet2" layout
   Copy Neighbors of Record "bet2" layout
   to Record "bett2" Layout
   Put 100% of Record "progression" Data to Record "bett2" layout list
   Put 100% of Record "progression" Data to Record "bet2" layout list
   end

   if Record "Spin counter" Data index = 3
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet3" layout
   Copy Neighbors of Record "bet3" layout
   to Record "bett3" Layout
   Put 100% of Record "progression" Data to Record "bett3" layout list
   Put 100% of Record "progression" Data to Record "bet3" layout list
   end

   if Record "Spin counter" Data index = 4
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet4" layout
   Copy Neighbors of Record "bet4" layout
   to Record "bett4" Layout
   Put 100% of Record "progression" Data to Record "bett4" layout list
   Put 100% of Record "progression" Data to Record "bet4" layout list
   end

    if Record "Spin counter" Data index = 5
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet5" layout
   Copy Neighbors of Record "bet5" layout
   to Record "bett5" Layout
   Put 100% of Record "progression" Data to Record "bett5" layout list
   Put 100% of Record "progression" Data to Record "bet5" layout list
   end

{    if Record "Spin counter" Data index = 6
   begin
   //put 1 on Record "Spin counter" Data index
   Put 2 on Neighbor Count
   Copy Record "last1" layout to Record "bet6" layout
   Copy Neighbors of Record "bet6" layout
   to Record "bett6" Layout
   Put 100% of Record "progression" Data to Record "bett6" layout list
  // Put 100% of Record "progression" Data to Record "bet6" layout list
   end
}


   add 1 to Record "Spin counter" Data index




if total bankroll >= 3000 each time
begin
put 2000 to Record "A" data
subtract 100% of Record "A" data from Bankroll
add 100% of Bankroll to Record "TotalBR" Data
//stop session
add 1 to record "won sessions" data index
    put 2000 on total bankroll
    put 1 on Record "progression" Data Index

end

{
//if total bankroll <= 0 each time
//stop session
add 1 to record "lost sessions" data index
    put 500 on total bankroll
    put 1 on Record "progression" Data Index
end
}

  If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
    set flag "bet" false
put 1 on Record "progression" Data Index
put 1 on Record "Spin counter" Data index
clear Record "bet1" layout
clear Record "bet2" layout
clear Record "bet3" layout
clear Record "bet4" layout
clear Record "bet5" layout
clear Record "bet6" layout
clear Record "bett1" layout
clear Record "bett2" layout
clear Record "bett3" layout
clear Record "bett4" layout
clear Record "bett5" layout
clear Record "bett6" layout
   End

  end
END

[Bigbroben]

1,2,7,23,75,263,921 STOP

Holy Crap! That is so steep!  Suicidal.

What if you use a positive progression instead?
Did you check the stats of how many wins in a row you can get, or how many spins it takes to hit?  It would help to create the right prog...

[ignatus]

Just Ran 100 000 (RX) Random, RNG spins ...Result +789168u and a 72% winrate.