An unpublished system, that may win "short term" with the proper moneymanagement (this you have to figure)...i just leave the code, "as it is"...cheers
RX.code
system "Dozen Streets"
// © ignatus 2020 ©
method "main"
begin
while starting a new session
begin
put 0 to Record "Highest Bankroll" Data
put 0 on total bankroll
Set List[1,2,4,8,15,35,75,125,150,200]
to Record "progression" Data
Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16]
to Record "Bet" Data
Set List[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,
22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38]
to Record "spin" Data
end
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 [Line(1-6)] to Record "L" Layout
copy List [Line(31-36)] to Record "H" Layout
}
while on each spin
begin
If Record "progression" Data Index >
Record "progression" Data Count
Begin
reset all flags false
Put 1 on Record "progression" Data Index
Put 1 on Record "spin" Data Index
Put 1 to Record "Bet" Data Index
{ clear Record "R" Layout
clear Record "B" Layout
clear Record "O" Data
clear Record "E" Data
clear Record "H" Data
clear Record "L" Data
}
End
{
if spin count >= 500 each time
begin
stop session
end
}
{
if total bankroll >= 500 each time
begin
stop session
end
if total bankroll <= -750 each time
begin
stop session
end
}
if any inside bet lost each
begin
Add 1 to Record "Bet" Data Index
if total inside bets count >= 5 each
begin
//add 1 on Record "progression" Data Index
end
if flag "L" true each
begin
set flag "W" false
end
set flag "L" true
end
Add 1 to Record "spin" Data Index
if any street bet won each
begin
set flag "L" false
//add 1 on Record "progression" Data Index
if flag "W" true each
begin
put 1 to Record "progression" Data Index
end
reset all flags false
set flag "W" true
Put 1 to Record "Bet" Data Index
Put 1 to Record "spin" Data Index
{ clear Record "R" Layout
clear Record "B" Layout
clear Record "d1" Layout
clear Record "d3" Layout
clear Record "c3" Layout
clear Record "c2" Layout
clear Record "H" Layout
clear Record "L" Layout
}
if Bankroll >= Record "Highest Bankroll" Data
begin
reset all flags false
clear Record "Highest Bankroll" Data
put 100% Bankroll to Record "Highest Bankroll" Data
put 1 to Record "progression" Data Index
set flag "W" false
end
end
if Record "Bet" data index >= 3 each
begin
if flag "W" true each
begin
add 1 to Record "W" data
end
reset all flags false
if Record "W" data >= 2 each
begin
set flag "W" true
put 1 to Record "W" data
end
Put 1 to Record "Bet" Data Index
Put 1 to Record "spin" Data Index
end
if Record "Bet" data index = 1 each
begin
IF Street(1-3) has hit each
begin
set flag "s2" true
set flag "s3" true
set flag "s4" true
end
IF Street(4-6) has hit each
begin
set flag "s1" true
set flag "s3" true
set flag "s4" true
end
IF Street(7-9) has hit each
begin
set flag "s4" true
set flag "s2" true
set flag "s1" true
end
IF Street(10-12) has hit each
begin
set flag "s1" true
set flag "s2" true
set flag "s3" true
end
IF Street(13-15) has hit each
begin
set flag "s6" true
set flag "s7" true
set flag "s8" true
end
IF Street(16-18) has hit each
begin
set flag "s8" true
set flag "s5" true
set flag "s7" true
end
IF Street(19-21) has hit each
begin
set flag "s5" true
set flag "s8" true
set flag "s6" true
end
IF Street(22-24) has hit each
begin
set flag "s5" true
set flag "s6" true
set flag "s7" true
end
IF Street(25-27) has hit each
begin
set flag "s10" true
set flag "s11" true
set flag "s12" true
end
IF Street(28-30) has hit each
begin
set flag "s9" true
set flag "s11" true
set flag "s12" true
end
IF Street(31-33) has hit each
begin
set flag "s12" true
set flag "s10" true
set flag "s9" true
end
IF Street(34-36) has hit each
begin
set flag "s11" true
set flag "s10" true
set flag "s9" true
end
end
if Record "Bet" data index = 2 each
begin
add 1 on Record "progression" Data Index
IF Street(1-3) has hit each
begin
set flag "s2" true
set flag "s3" true
set flag "s4" true
end
IF Street(4-6) has hit each
begin
set flag "s1" true
set flag "s3" true
set flag "s4" true
end
IF Street(7-9) has hit each
begin
set flag "s4" true
set flag "s2" true
set flag "s1" true
end
IF Street(10-12) has hit each
begin
set flag "s1" true
set flag "s2" true
set flag "s3" true
end
IF Street(13-15) has hit each
begin
set flag "s6" true
set flag "s7" true
set flag "s8" true
end
IF Street(16-18) has hit each
begin
set flag "s8" true
set flag "s5" true
set flag "s7" true
end
IF Street(19-21) has hit each
begin
set flag "s5" true
set flag "s8" true
set flag "s6" true
end
IF Street(22-24) has hit each
begin
set flag "s5" true
set flag "s6" true
set flag "s7" true
end
IF Street(25-27) has hit each
begin
set flag "s10" true
set flag "s11" true
set flag "s12" true
end
IF Street(28-30) has hit each
begin
set flag "s9" true
set flag "s11" true
set flag "s12" true
end
IF Street(31-33) has hit each
begin
set flag "s12" true
set flag "s10" true
set flag "s9" true
end
IF Street(34-36) has hit each
begin
set flag "s11" true
set flag "s10" true
set flag "s9" true
end
end
if flag "s1" true each
begin
put 100% of Record "progression" data to Record "s1" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s2" true each
begin
put 100% of Record "progression" data to Record "s2" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s3" true each
begin
put 100% of Record "progression" data to Record "s3" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s4" true each
begin
put 100% of Record "progression" data to Record "s4" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s5" true each
begin
put 100% of Record "progression" data to Record "s5" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s6" true each
begin
put 100% of Record "progression" data to Record "s6" Layout
put 100% of Record "progression" data to Record "H" Layout list
end
if flag "s7" true each
begin
put 100% of Record "progression" data to Record "s7" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
if flag "s8" true each
begin
put 100% of Record "progression" data to Record "s8" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
if flag "s9" true each
begin
put 100% of Record "progression" data to Record "s9" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
if flag "s10" true each
begin
put 100% of Record "progression" data to Record "s10" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
if flag "s11" true each
begin
put 100% of Record "progression" data to Record "s11" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
if flag "s12" true each
begin
put 100% of Record "progression" data to Record "s12" Layout
put 100% of Record "progression" data to Record "L" Layout list
end
end
END