Progressive Corners BET (TESTING)

[ignatus]

TESTing now of my  old ”Holy Grail”-roulettesystem 80 000 spins (same spins as "Route 66")

Stoploss -750u
Take Profit +500

65 Wins
24 Losses

...That is 65/89=73% winrate

Wins 500*65=32500
Losses 750*24=18000

TOTAL= +14500u

RX-Testing code

Code Select Expand

system "Progressive corner BET v8"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
       Set List [1,1,1,2,4,12,35,105,300,750,1000]
         to Record "progression" Data
       

  end
   put 0 to Record "Highest Bankroll" Data

       Copy List [corner(1:5)] to Record "L1" Layout
       Copy List [corner(7:11)] to Record "L2" Layout
       Copy List [corner(13:17)] to Record "L3" Layout
       Copy List [corner(19:23)] to Record "L4" Layout
       Copy List [corner(25:29)] to Record "L5" Layout
       Copy List [corner(31:35)] to Record "L6" Layout

       Copy List [corner(2:6)] to Record "c1" Layout
       Copy List [corner(8:12)] to Record "c2" Layout
       Copy List [corner(14:18)] to Record "c3" Layout
       Copy List [corner(20:24)] to Record "c4" Layout
       Copy List [corner(26:30)] to Record "c5" Layout
       Copy List [corner(32:36)] to Record "c6" Layout


  while on each spin
  begin
 
if total inside bets count = 0 each
begin
  if column c has hit more 1 times each
  begin
  set flag "bet" true
  end
 
  if column a has hit more 1 times each
  begin
  set flag "bet2" true
  end
end

IF flag "bet" true each
begin
 
  if flag "L5" true each
  begin
  set flag "L6" true
  end

  if flag "L4" true each
  begin
  set flag "L5" true
  end

  if flag "L3" true each
  begin
  set flag "L4" true
  end

   if flag "L2" true each
  begin
  set flag "L3" true
  end

  if flag "L1" true each
  begin
  set flag "L2" true
  end

  if flag "L1" false each
  begin
  set flag "L1" true
  end

end

IF flag "bet2" true each
begin

  if flag "c5" true each
  begin
  set flag "c6" true
  end

  if flag "c4" true each
  begin
  set flag "c5" true
  end

  if flag "c3" true each
  begin
  set flag "c4" true
  end

   if flag "c2" true each
  begin
  set flag "c3" true
  end

  if flag "c1" true each
  begin
  set flag "c2" true
  end

  if flag "c1" false each
  begin
  set flag "c1" true
  end

end
 
   
    IF any inside bet lost each
  begin
    add 1 on Record "progression" Data Index
  end

   If any inside bet won each
  begin
      set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false
     
      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false

     // Put 1 on Record "progression" Data Index
     // add 1 on Record "progression" Data Index

      if Bankroll >= Record "Highest Bankroll" Data
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

  end
 

{ if total spin count >= 300 each
  begin
  stop session
  end
  }
 
  if total bankroll <= -750 each
  begin
    add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

// stop session
  end

  if total bankroll >= 500 each
  begin
    add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

  //stop session
  end




IF flag "L1" true each
  begin
  Put 100% of Record "progression" Data to Record "L1" Layout List
  end
 
  IF flag "L2" true each
  begin
  Put 100% of Record "progression" Data to Record "L2" Layout List
  end
 
  IF flag "L3" true each
  begin
  Put 100% of Record "progression" Data to Record "L3" Layout List
  end
 
  IF flag "L4" true each
  begin
  Put 100% of Record "progression" Data to Record "L4" Layout List
  end

  IF flag "L5" true each
  begin
  Put 100% of Record "progression" Data to Record "L5" Layout List
  end
 
  IF flag "L6" true each
  begin
  Put 100% of Record "progression" Data to Record "L6" Layout List
   {   set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false

      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false
      }
  end
 
 
  IF flag "c1" true each
  begin
  Put 100% of Record "progression" Data to Record "c1" Layout List
  end

  IF flag "c2" true each
  begin
  Put 100% of Record "progression" Data to Record "c2" Layout List
  end

  IF flag "c3" true each
  begin
  Put 100% of Record "progression" Data to Record "c3" Layout List
  end

  IF flag "c4" true each
  begin
  Put 100% of Record "progression" Data to Record "c4" Layout List
  end

  IF flag "c5" true each
  begin
  Put 100% of Record "progression" Data to Record "c5" Layout List
  end

  IF flag "c6" true each
  begin
  Put 100% of Record "progression" Data to Record "c6" Layout List
    {  set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false

      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false
     }
  end



 

If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
      set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false
     
      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false

      Put 1 on Record "progression" Data Index

      clear Record "L1" Layout
      clear Record "L2" Layout
      clear Record "B3" Layout
      clear Record "B4" Layout
    End
   

  end
END

[ignatus]

Now adapted for LIVE-play (Progressionline 5,5,5,10,20,60,175,525 STOP)
Wingoal +500u
Stoploss -750u

wins 320
losses 129

320/449=71% winrate

wins 320*500=160 000
losses 750*124=93 000

TOTAL= +67 000u

RX-code

Code Select Expand

system "Progressive corner BET v9"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
       Set List [5,5,5,10,20,60,175,525]
         to Record "progression" Data
       

  end
   put 0 to Record "Highest Bankroll" Data

       Copy List [corner(1:5)] to Record "L1" Layout
       Copy List [corner(7:11)] to Record "L2" Layout
       Copy List [corner(13:17)] to Record "L3" Layout
       Copy List [corner(19:23)] to Record "L4" Layout
       Copy List [corner(25:29)] to Record "L5" Layout
       Copy List [corner(31:35)] to Record "L6" Layout

       Copy List [corner(2:6)] to Record "c1" Layout
       Copy List [corner(8:12)] to Record "c2" Layout
       Copy List [corner(14:18)] to Record "c3" Layout
       Copy List [corner(20:24)] to Record "c4" Layout
       Copy List [corner(26:30)] to Record "c5" Layout
       Copy List [corner(32:36)] to Record "c6" Layout


  while on each spin
  begin
 
if total inside bets count = 0 each
begin
  if column c has hit more 1 times each
  begin
  set flag "bet" true
  end
 
  if column a has hit more 1 times each
  begin
  set flag "bet2" true
  end
end

IF flag "bet" true each
begin
 
  if flag "L5" true each
  begin
  set flag "L6" true
  end

  if flag "L4" true each
  begin
  set flag "L5" true
  end

  if flag "L3" true each
  begin
  set flag "L4" true
  end

   if flag "L2" true each
  begin
  set flag "L3" true
  end

  if flag "L1" true each
  begin
  set flag "L2" true
  end

  if flag "L1" false each
  begin
  set flag "L1" true
  end

end

IF flag "bet2" true each
begin

  if flag "c5" true each
  begin
  set flag "c6" true
  end

  if flag "c4" true each
  begin
  set flag "c5" true
  end

  if flag "c3" true each
  begin
  set flag "c4" true
  end

   if flag "c2" true each
  begin
  set flag "c3" true
  end

  if flag "c1" true each
  begin
  set flag "c2" true
  end

  if flag "c1" false each
  begin
  set flag "c1" true
  end

end
 
   
    IF any inside bet lost each
  begin
    add 1 on Record "progression" Data Index
  end

   If any inside bet won each
  begin
      set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false
     
      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false

     // Put 1 on Record "progression" Data Index
     // add 1 on Record "progression" Data Index

      if Bankroll >= Record "Highest Bankroll" Data
     begin
        clear Record "Highest Bankroll" Data
        put 100% Bankroll to Record "Highest Bankroll" Data
        put 1 on Record "progression" Data Index
     end

  end
 

{ if total spin count >= 300 each
  begin
  stop session
  end
  }
 
  if total bankroll <= -750 each
  begin
    add 1 to record "lost sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

// stop session
  end

  if total bankroll >= 500 each
  begin
    add 1 to record "won sessions" data index
    put 0 on total bankroll
    put 1 on Record "progression" Data Index

  //stop session
  end




IF flag "L1" true each
  begin
  Put 100% of Record "progression" Data to Record "L1" Layout List
  end
 
  IF flag "L2" true each
  begin
  Put 100% of Record "progression" Data to Record "L2" Layout List
  end
 
  IF flag "L3" true each
  begin
  Put 100% of Record "progression" Data to Record "L3" Layout List
  end
 
  IF flag "L4" true each
  begin
  Put 100% of Record "progression" Data to Record "L4" Layout List
  end

  IF flag "L5" true each
  begin
  Put 100% of Record "progression" Data to Record "L5" Layout List
  end
 
  IF flag "L6" true each
  begin
  Put 100% of Record "progression" Data to Record "L6" Layout List
   {   set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false

      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false
      }
  end
 
 
  IF flag "c1" true each
  begin
  Put 100% of Record "progression" Data to Record "c1" Layout List
  end

  IF flag "c2" true each
  begin
  Put 100% of Record "progression" Data to Record "c2" Layout List
  end

  IF flag "c3" true each
  begin
  Put 100% of Record "progression" Data to Record "c3" Layout List
  end

  IF flag "c4" true each
  begin
  Put 100% of Record "progression" Data to Record "c4" Layout List
  end

  IF flag "c5" true each
  begin
  Put 100% of Record "progression" Data to Record "c5" Layout List
  end

  IF flag "c6" true each
  begin
  Put 100% of Record "progression" Data to Record "c6" Layout List
    {  set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false

      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false
     }
  end



 

If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
      set flag "bet" false
      set flag "bet2" false
      set flag "L1" false
      set flag "L2" false
      set flag "L3" false
      set flag "L4" false
      set flag "L5" false
      set flag "L6" false
     
      set flag "c1" false
      set flag "c2" false
      set flag "c3" false
      set flag "c4" false
      set flag "c5" false
      set flag "c6" false

      Put 1 on Record "progression" Data Index

      clear Record "L1" Layout
      clear Record "L2" Layout
      clear Record "B3" Layout
      clear Record "B4" Layout
    End
   

  end
END