DRAGON LINES

[ignatus]

I dont have time to explain how this work right now (I will later) but test and see, (it should win more than it lose, i hope!) MAXBET 25u

cheers

RX-code

Code Select Expand

system "Dragon Lines"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
       Set List[1,2,3,5,10,25]
       to Record "progression" Data
       
       Set List[1,2,3,4,5,6,7]
       to Record "Bet" Data


  end
   put 0 to Record "Highest Bankroll" Data

      Copy List [1st dozen] to Record "d1" Layout
       Copy List [2nd dozen] to Record "d2" Layout
       Copy List [3rd dozen] to Record "d3" Layout
       

      Copy List [Line(1-6)] to Record "L1" Layout
       Copy List [Line(7-12)] to Record "L2" Layout
       Copy List [Line(13-18)] to Record "L3" Layout
       Copy List [Line(19-24)] to Record "L4" Layout
       Copy List [Line(25-30)] to Record "L5" Layout
       Copy List [Line(31-36)] to Record "L6" Layout
       
       Copy List [Street(1-3)] to Record "s1" Layout
        Copy List [Street(4-6)] to Record "s2" Layout
        Copy List [Street(7-9)] to Record "s3" Layout
        Copy List [Street(10-12)] to Record "s4" Layout
        Copy List [Street(13-15)] to Record "s5" Layout
        Copy List [Street(16-18)] to Record "s6" Layout
        Copy List [Street(19-21)] to Record "s7" Layout
        Copy List [Street(22-24)] to Record "s8" Layout
        Copy List [Street(25-27)] to Record "s9" Layout
        Copy List [Street(28-30)] to Record "s10" Layout
        Copy List [Street(31-33)] to Record "s11" Layout
        Copy List [Street(34-36)] to Record "s12" Layout
       
        Copy List [number 2, number 3] to Record "1" Layout
        Copy List [number 1, number 3] to Record "2" Layout
        Copy List [number 1, number 2] to Record "3" Layout
        Copy List [number 5, number 6] to Record "4" Layout
        Copy List [number 4, number 6] to Record "5" Layout
        Copy List [number 4, number 5] to Record "6" Layout
        Copy List [number 8, number 9] to Record "7" Layout
        Copy List [number 7, number 9] to Record "8" Layout
        Copy List [number 7, number 8] to Record "9" Layout
        Copy List [number 11, number 12] to Record "10" Layout
        Copy List [number 10, number 12] to Record "11" Layout
        Copy List [number 10, number 11] to Record "12" Layout
        Copy List [number 14, number 15] to Record "13" Layout
        Copy List [number 13, number 15] to Record "14" Layout
        Copy List [number 13, number 14] to Record "15" Layout
        Copy List [number 17, number 18] to Record "16" Layout
        Copy List [number 16, number 18] to Record "17" Layout
        Copy List [number 16, number 17] to Record "18" Layout
        Copy List [number 20, number 21] to Record "19" Layout
        Copy List [number 19, number 21] to Record "20" Layout
        Copy List [number 19, number 20] to Record "21" Layout
        Copy List [number 23, number 24] to Record "22" Layout
        Copy List [number 22, number 24] to Record "23" Layout
        Copy List [number 22, number 23] to Record "24" Layout
        Copy List [number 26, number 27] to Record "25" Layout
        Copy List [number 25, number 27] to Record "26" Layout
        Copy List [number 25, number 26] to Record "27" Layout
        Copy List [number 29, number 30] to Record "28" Layout
        Copy List [number 28, number 30] to Record "29" Layout
        Copy List [number 28, number 29] to Record "30" Layout
        Copy List [number 32, number 33] to Record "31" Layout
        Copy List [number 31, number 33] to Record "32" Layout
        Copy List [number 31, number 32] to Record "33" Layout
        Copy List [number 35, number 36] to Record "34" Layout
        Copy List [number 34, number 36] to Record "35" Layout
        Copy List [number 34, number 35] to Record "36" Layout

  while on each spin
  begin
   Track last Number for 20 spins to Record "last" layout


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




   If any Line bet won each
  begin
     put 1 on Record "progression" Data Index
     put 1 on Record "Bet" Data Index
    set flag "clear" true
    set flag "nobet" false

    Reset all flags false

    clear record "L1" layout
    clear record "L2" layout
    clear record "L3" layout
    clear record "L4" layout
    clear record "L5" layout
    clear record "L6" layout
  { IF Line(1-6) won each
    begin
    set flag "L1" false
    end

    IF Line(7-12) won each
    begin
    set flag "L2" false
    end
   
    IF Line(13-18) won each
    begin
    set flag "L3" false
    end
   
    IF Line(19-24) won each
    begin
    set flag "L4" false
    end
   
    IF Line(25-30) won each
    begin
    set flag "L5" false
    end

    IF Line(31-36) won each
    begin
    set flag "L6" false
    end
   }

     {
       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 Record "last" layout is found within Record "secondlast" layout each
//  begin
//if flag "nobet" false each
//begin

//  IF flag "clear" false each
//  begin
 
if total inside bets count = 0 each
begin

 
if 1st dozen has hit each
begin

IF flag "d1" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end

if 2nd dozen has hit each
begin

IF flag "d2" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end

if 3rd dozen has hit each
begin

IF flag "d3" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end

 



if 1st dozen has hit each
begin
if flag "d1" false each
begin
set flag "d1" true

  if Line(1-6) has hit each
begin

IF flag "L1" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L2" true
end
end

if Line(7-12) has hit each
begin


IF flag "L2" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L1" true
end
end

end
end

if 2nd dozen has hit each
begin
if flag "d2" false each
begin
set flag "d2" true


if Line(13-18) has hit each
begin


IF flag "L3" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L4" true
end
end


  if Line(19-24) has hit each
begin


IF flag "L4" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L3" true
end
end

end
end

if 3rd dozen has hit each
begin
if flag "d3" false each
begin
set flag "d3" true


  if Line(25-30) has hit each
begin

IF flag "L5" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L6" true
end
end


  if Line(31-36) has hit each
begin

IF flag "L6" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L5" true
end
end

end
end
{
if total inside bets count >=4 each time
   begin
  // Reset all flags false
  set flag "nobet" true
   end
}

end
//end
//end


//put 1 on Record "progression" Data Index

//LINE 1

if Record "Bet" data >= 3 each time
   begin

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


//LINE 2

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

//LINE 3

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


//LINE 4

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

//LINE 5

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

//LINE 6

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

IF flag "d1" is true each
begin

if flag "d2" is true each
begin
Put 100% of Record "progression" Data to Record "d3" Layout List
end

if flag "d3" is true each
begin
Put 100% of Record "progression" Data to Record "d2" Layout List
end
end

IF flag "d2" is true each
begin

if flag "d1" is true each
begin
Put 100% of Record "progression" Data to Record "d3" Layout List
end

if flag "d3" is true each
begin
Put 100% of Record "progression" Data to Record "d1" Layout List
end
end

IF flag "d3" is true each
begin

if flag "d2" is true each
begin
Put 100% of Record "progression" Data to Record "d1" Layout List
end

if flag "d1" is true each
begin
Put 100% of Record "progression" Data to Record "d2" Layout List
end
end

end



{ if total spin count >= 300 each
  begin
  stop session
  end
  }
 
  if total bankroll <= -150 each
  begin
    stop session
  end

  if total bankroll >= 50 each
  begin
     stop session
  end

  set flag "clear" false


If Record "progression" Data Index >
  Record "progression" Data Count  each
    Begin
      Put 1 on Record "progression" Data Index

     put 1 on Record "Bet" Data Index
    set flag "clear" true
    set flag "nobet" false

    Reset all flags false

    clear record "L1" layout
    clear record "L2" layout
    clear record "L3" layout
    clear record "L4" layout
    clear record "L5" layout
    clear record "L6" layout
     End
   
   Track last Number for 20 spins to Record "secondlast" layout
  end
END

[malifeki]

Could you please check RX code - after first spin I get "end session"
THX

[Fateichel]

Could you please check RX code - after first spin I get "end session"
THX

system "Dragon Lines"
// © ignatus 2020 ©

method "main"
begin
  while starting a new session
  begin
       Set List[1,2,3,5,10,25]
       to Record "progression" Data

       Set List[1,2,3,4,5,6,7]
       to Record "Bet" Data


  end
   put 500 to Record "Highest Bankroll" Data

      Copy List [1st dozen] to Record "d1" Layout
       Copy List [2nd dozen] to Record "d2" Layout
       Copy List [3rd dozen] to Record "d3" Layout


      Copy List [Line(1-6)] to Record "L1" Layout
       Copy List [Line(7-12)] to Record "L2" Layout
       Copy List [Line(13-18)] to Record "L3" Layout
       Copy List [Line(19-24)] to Record "L4" Layout
       Copy List [Line(25-30)] to Record "L5" Layout
       Copy List [Line(31-36)] to Record "L6" Layout

       Copy List [Street(1-3)] to Record "s1" Layout
        Copy List [Street(4-6)] to Record "s2" Layout
        Copy List [Street(7-9)] to Record "s3" Layout
        Copy List [Street(10-12)] to Record "s4" Layout
        Copy List [Street(13-15)] to Record "s5" Layout
        Copy List [Street(16-18)] to Record "s6" Layout
        Copy List [Street(19-21)] to Record "s7" Layout
        Copy List [Street(22-24)] to Record "s8" Layout
        Copy List [Street(25-27)] to Record "s9" Layout
        Copy List [Street(28-30)] to Record "s10" Layout
        Copy List [Street(31-33)] to Record "s11" Layout
        Copy List [Street(34-36)] to Record "s12" Layout

        Copy List [number 2, number 3] to Record "1" Layout
        Copy List [number 1, number 3] to Record "2" Layout
        Copy List [number 1, number 2] to Record "3" Layout
        Copy List [number 5, number 6] to Record "4" Layout
        Copy List [number 4, number 6] to Record "5" Layout
        Copy List [number 4, number 5] to Record "6" Layout
        Copy List [number 8, number 9] to Record "7" Layout
        Copy List [number 7, number 9] to Record "8" Layout
        Copy List [number 7, number 8] to Record "9" Layout
        Copy List [number 11, number 12] to Record "10" Layout
        Copy List [number 10, number 12] to Record "11" Layout
        Copy List [number 10, number 11] to Record "12" Layout
        Copy List [number 14, number 15] to Record "13" Layout
        Copy List [number 13, number 15] to Record "14" Layout
        Copy List [number 13, number 14] to Record "15" Layout
        Copy List [number 17, number 18] to Record "16" Layout
        Copy List [number 16, number 18] to Record "17" Layout
        Copy List [number 16, number 17] to Record "18" Layout
        Copy List [number 20, number 21] to Record "19" Layout
        Copy List [number 19, number 21] to Record "20" Layout
        Copy List [number 19, number 20] to Record "21" Layout
        Copy List [number 23, number 24] to Record "22" Layout
        Copy List [number 22, number 24] to Record "23" Layout
        Copy List [number 22, number 23] to Record "24" Layout
        Copy List [number 26, number 27] to Record "25" Layout
        Copy List [number 25, number 27] to Record "26" Layout
        Copy List [number 25, number 26] to Record "27" Layout
        Copy List [number 29, number 30] to Record "28" Layout
        Copy List [number 28, number 30] to Record "29" Layout
        Copy List [number 28, number 29] to Record "30" Layout
        Copy List [number 32, number 33] to Record "31" Layout
        Copy List [number 31, number 33] to Record "32" Layout
        Copy List [number 31, number 32] to Record "33" Layout
        Copy List [number 35, number 36] to Record "34" Layout
        Copy List [number 34, number 36] to Record "35" Layout
        Copy List [number 34, number 35] to Record "36" Layout

  while on each spin
  begin
   Track last Number for 20 spins to Record "last" layout


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




   If any Line bet won each
  begin
     put 1 on Record "progression" Data Index
     put 1 on Record "Bet" Data Index
    set flag "clear" true
    set flag "nobet" false

    Reset all flags false

    clear record "L1" layout
    clear record "L2" layout
    clear record "L3" layout
    clear record "L4" layout
    clear record "L5" layout
    clear record "L6" layout
  { IF Line(1-6) won each
    begin
    set flag "L1" false
    end

    IF Line(7-12) won each
    begin
    set flag "L2" false
    end

    IF Line(13-18) won each
    begin
    set flag "L3" false
    end

    IF Line(19-24) won each
    begin
    set flag "L4" false
    end

    IF Line(25-30) won each
    begin
    set flag "L5" false
    end

    IF Line(31-36) won each
    begin
    set flag "L6" false
    end
   }

     {
       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 Record "last" layout is found within Record "secondlast" layout each
//  begin
//if flag "nobet" false each
//begin

//  IF flag "clear" false each
//  begin

if total inside bets count = 0 each
begin


if 1st dozen has hit each
begin

IF flag "d1" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end

if 2nd dozen has hit each
begin

IF flag "d2" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end

if 3rd dozen has hit each
begin

IF flag "d3" true each
begin
reset all flags false
put 1 on Record "Bet" Data Index
end
end





if 1st dozen has hit each
begin
if flag "d1" false each
begin
set flag "d1" true

  if Line(1-6) has hit each
begin

IF flag "L1" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L2" true
end
end

if Line(7-12) has hit each
begin


IF flag "L2" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L1" true
end
end

end
end

if 2nd dozen has hit each
begin
if flag "d2" false each
begin
set flag "d2" true


if Line(13-18) has hit each
begin


IF flag "L3" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L4" true
end
end


  if Line(19-24) has hit each
begin


IF flag "L4" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L3" true
end
end

end
end

if 3rd dozen has hit each
begin
if flag "d3" false each
begin
set flag "d3" true


  if Line(25-30) has hit each
begin

IF flag "L5" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L6" true
end
end


  if Line(31-36) has hit each
begin

IF flag "L6" false each
begin
add 1 on Record "Bet" Data Index
Set flag "L5" true
end
end

end
end
{
if total inside bets count >=4 each time
   begin
  // Reset all flags false
  set flag "nobet" true
   end
}

end
//end
//end


//put 1 on Record "progression" Data Index

//LINE 1

if Record "Bet" data >= 3 each time
   begin

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


//LINE 2

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

//LINE 3

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


//LINE 4

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

//LINE 5

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

//LINE 6

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

IF flag "d1" is true each
begin

if flag "d2" is true each
begin
Put 100% of Record "progression" Data to Record "d3" Layout List
end

if flag "d3" is true each
begin
Put 100% of Record "progression" Data to Record "d2" Layout List
end
end

IF flag "d2" is true each
begin

if flag "d1" is true each
begin
Put 100% of Record "progression" Data to Record "d3" Layout List
end

if flag "d3" is true each
begin
Put 100% of Record "progression" Data to Record "d1" Layout List
end
end

IF flag "d3" is true each
begin

if flag "d2" is true each
begin
Put 100% of Record "progression" Data to Record "d1" Layout List
end

if flag "d1" is true each
begin
Put 100% of Record "progression" Data to Record "d2" Layout List
end
end

end



{ if total spin count >= 300 each
  begin
  stop session
  end
  }

  if total bankroll <= -150 each
  begin
    stop session
  end

  if total bankroll >= 500 each
  begin
     stop session
  end

  set flag "clear" false


If Record "progression" Data Index >
  Record "progression" Data Count  each
    Begin
      Put 1 on Record "progression" Data Index

     put 1 on Record "Bet" Data Index
    set flag "clear" true
    set flag "nobet" false

    Reset all flags false

    clear record "L1" layout
    clear record "L2" layout
    clear record "L3" layout
    clear record "L4" layout
    clear record "L5" layout
    clear record "L6" layout
     End

   Track last Number for 20 spins to Record "secondlast" layout
  end
END

[Fateichel]

Made a small test

10 Sessions
Bankroll: 200 Units
Stoploss: - 200 Units (Bankroll 0)
Stopwin: + 300 Units (Bankroll 500)

Wins: 2
Losses: 8

There is always a big drop after 60-120 units which kills the entire bankroll

[malifeki]

Sorry Fateichel,  still same error.