TITAN Roulette

[ignatus]

Just finished the code, and did some short testings, looks good (short term... A "normal" session of 300 spins etc)

Ofc, the progressionline is unrealistic, but played with a "normal" stoploss/wingoal, we´ll see how far it can go?

Any ideas welcome.

Now, simple progression (double for each 2 losses in a row) I will test also with a normal 12 numbers negative.

Procedure; Whenever HIGH (or low) and (Black or Red) has hit 3 times in a row, bet the 9 opposite colors within that particular H/L. ALSO bet the oppsite DOZEN (1 or 3). For an example 9 Low numbers bet (1u), now you put 4u on doz 3, or else if 9 High numbers bet, you put 4u on doz 1. (This is a Hedge-bet, no progression whenever it hits, just re-bet)

RX-code

Code Select Expand

system "TITAN Roulette"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
       Set List [1,1,2,2,4,4,8,8,16,16,32,32,64,64,128,128,256,256]
        to Record "progression" Data
       
       Set List [4,4,8,8,16,16,32,32,64,64,128,128,256,256,512,512,1024,1024]
        to Record "progression2" Data
       
  end
   put 0 to Record "Highest Bankroll" Data

       Copy List [Number 2,number 4,number 6,number 8, number 10,number 11,
       number 13,number 15,number 17]
       to Record "BL" Layout

       Copy List [number 20,number 22,number 24,number 26, number 28, number 29,
       number 31,number 33,number 35]
       to Record "BH" Layout

       Copy List [Number 1,number 3,number 5,number 7, number 9,number 12,
       number 14,number 16,number 18]
       to Record "RL" Layout

       Copy List [number 19,number 21,number 23,Number 25,number 27,number 30,
       number 32, number 34,number 36]
       to Record "RH" Layout

        Copy List [1st dozen] to Record "doz1" Layout
        Copy List [3rd dozen] to Record "doz3" Layout


  while on each spin
  begin
 
 
   If any inside bet won each
  begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "RLbet" false
      set flag "RHbet" false
      set flag "BLbet" false
      set flag "BHbet" false
      Put 1 on Record "progression" Data Index

      clear Record "RH" Layout
      clear Record "RL" Layout

      clear Record "BL" Layout
      clear Record "BH" Layout

  end

{
  if total bankroll <= -1000 each
  begin
  stop session
  end

  if total bankroll >= 200 each
  begin
  stop session
  end
  }
IF any inside bet lost each
  begin
    add 1 on Record "progression" Data Index
  end

if total inside bets count = 0 each
  begin

  if red hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "BLbet" true
  end
    else begin
  IF High has hit more 2 time each
  begin
  set flag "BHbet" true
  end
  end

  end


   if Black hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "RLbet" true
  end
  else begin
  IF High has hit more 2 time each
  begin
  set flag "RHbet" true
  end
  end

  end
end

{if total inside bets count = 0 each
  begin

IF Low has hit each
begin

IF flag "RL" true each
begin
if black has hit each
begin
set flag "BLbet" true
end
end

IF flag "BL" true each
begin
if red has hit each
begin
set flag "RLbet" true
end
end

end

IF High has hit each
begin

IF flag "RH" true each
begin
if black has hit each
begin
set flag "BHbet" true
end
end

IF flag "BH" true each
begin
if red has hit each
begin
set flag "RHbet" true
end
end

end
end

}


IF flag "RLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "BLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "RHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end
 
  IF flag "BHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end




 

If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "LRbet" false
      set flag "HRbet" false
      set flag "LBbet" false
      set flag "HBbet" false
      Put 1 on Record "progression" Data Index

      clear Record "LR" Layout
      clear Record "HR" Layout

      clear Record "LB" Layout
      clear Record "HB" Layout

    End

  end
END

[ignatus]

Not "unrealistic" now played with an ordinary 12 numbers negative,... (with a table-limit of 1000u)

short term it may work...

Test 1-2 Livespins

RX-code

Code Select Expand

system "TITAN Roulette2"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
       Set List [1,1,2,3,4,6,9,14,21,31,47,70,105,158,237]
        to Record "progression" Data
       
       Set List [4,4,8,12,16,24,36,56,84,124,188,280,420,632,948]
        to Record "progression2" Data
       
  end
   put 0 to Record "Highest Bankroll" Data

       Copy List [Number 2,number 4,number 6,number 8, number 10,number 11,
       number 13,number 15,number 17]
       to Record "BL" Layout

       Copy List [number 20,number 22,number 24,number 26, number 28, number 29,
       number 31,number 33,number 35]
       to Record "BH" Layout

       Copy List [Number 1,number 3,number 5,number 7, number 9,number 12,
       number 14,number 16,number 18]
       to Record "RL" Layout

       Copy List [number 19,number 21,number 23,Number 25,number 27,number 30,
       number 32, number 34,number 36]
       to Record "RH" Layout

        Copy List [1st dozen] to Record "doz1" Layout
        Copy List [3rd dozen] to Record "doz3" Layout


  while on each spin
  begin
 
 
   If any inside bet won each
  begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "RLbet" false
      set flag "RHbet" false
      set flag "BLbet" false
      set flag "BHbet" false
      Put 1 on Record "progression" Data Index

      clear Record "RH" Layout
      clear Record "RL" Layout

      clear Record "BL" Layout
      clear Record "BH" Layout

  end

{
  if total bankroll <= -1000 each
  begin
  stop session
  end

  if total bankroll >= 200 each
  begin
  stop session
  end
  }
IF any inside bet lost each
  begin
    add 1 on Record "progression" Data Index
  end

if total inside bets count = 0 each
  begin

  if red hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "BLbet" true
  end
    else begin
  IF High has hit more 2 time each
  begin
  set flag "BHbet" true
  end
  end

  end


   if Black hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "RLbet" true
  end
  else begin
  IF High has hit more 2 time each
  begin
  set flag "RHbet" true
  end
  end

  end
end

{if total inside bets count = 0 each
  begin

IF Low has hit each
begin

IF flag "RL" true each
begin
if black has hit each
begin
set flag "BLbet" true
end
end

IF flag "BL" true each
begin
if red has hit each
begin
set flag "RLbet" true
end
end

end

IF High has hit each
begin

IF flag "RH" true each
begin
if black has hit each
begin
set flag "BHbet" true
end
end

IF flag "BH" true each
begin
if red has hit each
begin
set flag "RHbet" true
end
end

end
end

}


IF flag "RLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "BLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "RHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end
 
  IF flag "BHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end




 

If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "LRbet" false
      set flag "HRbet" false
      set flag "LBbet" false
      set flag "HBbet" false
      Put 1 on Record "progression" Data Index

      clear Record "LR" Layout
      clear Record "HR" Layout

      clear Record "LB" Layout
      clear Record "HB" Layout

    End

  end
END

[ignatus]

There were many errors in the code, now fixed... Still not a HG, but short-term it may work.

Test 1

RX-code

Code Select Expand

system "TITAN Roulette FIX"
// © ignatus 2019 ©

method "main"
begin
  while starting a new session
  begin
       Set List [1,1,2,3,4,6,9,14,21,31,47,70,105,158,237]
        to Record "progression" Data
       
       Set List [4,4,8,12,16,24,36,56,84,124,188,280,420,632,948]
        to Record "progression2" Data
       
  end
   put 0 to Record "Highest Bankroll" Data

       Copy List [Number 2,number 4,number 6,number 8, number 10,number 11,
       number 13,number 15,number 17]
       to Record "BL" Layout

       Copy List [number 20,number 22,number 24,number 26, number 28, number 29,
       number 31,number 33,number 35]
       to Record "BH" Layout

       Copy List [Number 1,number 3,number 5,number 7, number 9,number 12,
       number 14,number 16,number 18]
       to Record "RL" Layout

       Copy List [number 19,number 21,number 23,Number 25,number 27,number 30,
       number 32, number 34,number 36]
       to Record "RH" Layout

        Copy List [1st dozen] to Record "doz1" Layout
        Copy List [3rd dozen] to Record "doz3" Layout


  while on each spin
  begin
 
 
   If any inside bet won each
  begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "RLbet" false
      set flag "RHbet" false
      set flag "BLbet" false
      set flag "BHbet" false
      Put 1 on Record "progression" Data Index
      Put 1 on Record "progression2" Data Index

      clear Record "RH" Layout
      clear Record "RL" Layout

      clear Record "BL" Layout
      clear Record "BH" Layout
     
      clear Record "doz1" Layout
      clear Record "doz3" Layout

  end

{
  if total bankroll <= -1000 each
  begin
  stop session
  end

  if total bankroll >= 200 each
  begin
  stop session
  end
  }
IF any outside bet lost each
  begin
    add 1 on Record "progression" Data Index
    add 1 on Record "progression2" Data Index
  end

if total inside bets count = 0 each
  begin

  if red hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "BLbet" true
  end
    else begin
  IF High has hit more 2 time each
  begin
  set flag "BHbet" true
  end
  end

  end


   if Black hit more 2 time each
  begin

  IF Low has hit more 2 time each
  begin
  set flag "RLbet" true
  end
  else begin
  IF High has hit more 2 time each
  begin
  set flag "RHbet" true
  end
  end

  end
end

{if total inside bets count = 0 each
  begin

IF Low has hit each
begin

IF flag "RL" true each
begin
if black has hit each
begin
set flag "BLbet" true
end
end

IF flag "BL" true each
begin
if red has hit each
begin
set flag "RLbet" true
end
end

end

IF High has hit each
begin

IF flag "RH" true each
begin
if black has hit each
begin
set flag "BHbet" true
end
end

IF flag "BH" true each
begin
if red has hit each
begin
set flag "RHbet" true
end
end

end
end

}


IF flag "RLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "BLbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BL" Layout List
  Put 100% of Record "progression2" Data to Record "doz3" Layout List
  end
 
  IF flag "RHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "RH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end
 
  IF flag "BHbet" true each
  begin
  Put 100% of Record "progression" Data to Record "BH" Layout List
  Put 100% of Record "progression2" Data to Record "doz1" Layout List
  end




 

If Record "progression" Data Index >
  Record "progression" Data Count
    Begin
      set flag "LR" false
      set flag "HR" false
      set flag "LB" false
      set flag "HB" false

      set flag "LRbet" false
      set flag "HRbet" false
      set flag "LBbet" false
      set flag "HBbet" false
      Put 1 on Record "progression" Data Index

      clear Record "LR" Layout
      clear Record "HR" Layout

      clear Record "LB" Layout
      clear Record "HB" Layout

      clear Record "doz1" Layout
      clear Record "doz3" Layout
    End

  end
END