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
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
Quote from: malifeki on Jan 09, 08:15 AM 2020
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