Facing the virtual limit, chapter III
(John Solitude | Stormor) Tutte le combinazioni giocate non appena raggiungono un numero di ritardi prestabilito. Basato sul libro di John solitude
Facing the virtual limit.dgt
—
Xtreme,
24 KB (25212 bytes)
Contenuto del file
system "Facing the virtual limit, chapter III"
{
*************************************
* Test based upon John Solitude *
* http://www.john-solitude.be *
*************************************
Rx-ed by St0rm0r
We bet the split, street,corner,line,dozen,column,even money bet
that first reaches its entry point.
Entry points are calculated by subtracting the progression lenght from a virtual
limit of 99,999 999 5%
Entry Points:
-Split 253
-Street 168
-Corner 125
-Line 81
-Dozen & Column 37
-Even Money 22
Progressions:
Split: 91 steps
Street: 59 steps
Corner: 43 steps
Line: 28 steps
Dozen, Column: 12 steps
Even Money: 7 steps
}
method "main"
begin
// section 1: do this once
while starting a new session
begin
call "init"
exit
end
if record"#bets"data > record"max bet"data
begin
set flag "qualified" false
end
// section 2: do the tracking
track last number for 1 time record"last#"layout
track last street for 1 time record"last street"layout
track last dozen for 1 time record"last D"layout
track last column for 1 time record"last C"layout
track last red-black for 1 time record"last RB"layout
track last even-odd for 1 time record"last EO"layout
track last low-high for 1 time record"last LH"layout
call "update sleeping for list"
// section 3: act on a loss
if record"last#"layout not found in record"bet on"layout
begin
end
if net < 0
begin
add 1 record"pro"data index
if record"pro"data index > record"pro"data count
begin
put 0 record"pro"data
end
if record"#bets"data > record"max bet"data
begin
put 100% record"lenght"data in record"loss history"data index
add 1 record"loss history"data
end
end
// section 4:act on a win
if record"last#"layout found in record"bet on"layout or
record"last#"layout found in record"did we win"layout or
record"last street"layout found in record"bet on"layout or
record"last street"layout found in record"did we win"layout or
record"last D"layout found in record"bet on"layout or
record"last C"layout found in record"bet on"layout or
record"last RB"layout found in record"bet on"layout or
record"last EO"layout found in record"bet on"layout or
record"last LH"layout found in record"bet on"layout
begin
if net = 0
begin
set flag "qualified" false
if record"#bets"data > record"max bet"data
begin
put 100% record"lenght"data in record"loss history"data index
add 1 record"loss history"data
end
end
end
if net > 0
begin
set flag "qualified" false
put 100% record"lenght"data in record"win history"data index
add 1 record"win history"data
end
// section 5: what to do when not qualified
if flag "qualified" false
begin
call "check wheel for opportunities"
end
// section 6: what to do when qualified
if flag "qualified" true
begin
// bet
put 100% record"pro"data record"bet on"layout list
end
end
// subroutines
method "init"
begin
group
begin
display "Facing the virtual limit"
display "---------------------------------------------"
display "Chapter III"
end
load single wheel
clear record"win history"data
clear record"loss history"data
copy list [number 0,number 32,number 15,number 19,number 4,number 21,number 2,
number 25,number 17,number 34,number 6,number 27,number 13,number 36,number 11,
number 30,number 8,number 23,number 10,number 5,number 24,number 16, number 33,
number 1,number 20,number 14,number 31,number 9,number 22,number 18,number 29,
number 7,number 28,number 12,number 35,number 3, number 26] to record"single wheel"layout
//splits
copy list [Split(1-0),Split(2-0),Split(3-0),Split(1-2),Split(1-4),Split(2-3),
Split(2-5),Split(3-6),Split(4-5),Split(4-7),Split(5-6),Split(5-8),Split(6-9),Split(7-8),
Split(7-10),Split(8-9),Split(8-11),Split(9-12),Split(10-11),Split(10-13),Split(10-13),Split(11-12),
Split(11-14),Split(12-15),Split(13-14),Split(13-16),Split(14-15),Split(14-17),Split(15-18),Split(16-17),
Split(16-19),Split(17-18),Split(17-20),Split(18-21),Split(19-20),Split(19-22),
Split(20-21),Split(20-23),Split(21-24),Split(22-23),Split(22-25),Split(23-24),Split(23-26),
Split(24-27),Split(25-26),Split(25-28),Split(26-27),Split(26-29),Split(27-30),Split(28-29),
Split(28-31),Split(29-30),Split(29-30),Split(29-32),Split(30-33),Split(31-32),Split(31-34),
Split(32-33),Split(32-35),Split(33-36),Split(34-35),Split(35-36)] record"splits"layout
copy list [number 1,number 2,number 3,number 1,number 1,number 2,
number 2,number 3,number 4,number 4,number 5,number 5,number 6,number 7,
number 7,number 8,number 8,number 9,number 10,number 10,number 10,number 11,
number 11,number 12,number 13,number 13,number 14,number 14,number 15,number 16,
number 16,number 17,number 17,number 18,number 19,number 19,
number 20,number 20,number 21,number 22,number 22,number 23,number 23,
number 24,number 25,number 25,number 26,number 26,number 27,number 28,
number 28,number 29,number 29,number 29,number 30,number 31,number 31,
number 32,number 32,number 33,number 34,number 35] record"splits1"layout
copy list [number 0,number 0,number 0,number 2,number 4,number 3,
number 5,number 6,number 5,number 7,number 6,number 8,number 9,number 8,
number 10,number 9,number 11,number 12,number 11,number 13,number 13,number 12,
number 14,number 15,number 14,number 16,number 15,number 17,number 18,number 17,
number 19,number 18,number 20,number 21,number 20,number 22,
number 21,number 23,number 24,number 23,number 25,number 24,number 26,
number 27,number 26,number 28,number 27,number 29,number 30,number 29,
number 31,number 30,number 30,number 32,number 33,number 32,number 34,
number 33,number 35,number 36,number 35,number 36] record"splits2"layout
set list [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0] record"split frequency"data
//streets
copy list [Street(1-3),Street(4-6),Street(7-9),Street(10-12),Street(13-15),
Street(16-18),Street(19-21),Street(22-24),Street(25-27),Street(28-30),
Street(31-33),Street(34-36)] record"streets"layout
set list [0,0,0,0,0,0,0,0,0,0,0,0] record"street frequency"data
//corners
copy list [Corner(1:5),Corner(2:6),Corner(4:8),Corner(5:9),Corner(7:11),
Corner(8:12),Corner(10:14),Corner(11:15),Corner(13:17),Corner(14:18),
Corner(16:20),Corner(17:21),Corner(19:23),Corner(20:24),Corner(22:26),
Corner(23:27),Corner(25:29),Corner(26:30),Corner(28:32),Corner(29:33),
Corner(31:35),Corner(32:36)] record"corners"layout
copy list [number 1,number 2,number 4,number 5,number 7,number 8,number 10,
number 11,number 13,number 14,number 16,number 17,number 19,number 20,number 22,
number 23,number 25,number 26,number 28,number 29,number 31,number 32] record"corners1"layout
copy list [number 2,number 3,number 5,number 6,number 8,number 9,number 11,
number 12,number 14,number 15,number 17,number 18,number 20,number 21,number 23,
number 24,number 26,number 27,number 29,number 30,number 32,number 33] record"corners2"layout
copy list [number 4,number 5,number 7,number 8,number 10,number 11,number 13,
number 14,number 16,number 17,number 19,number 20,number 22,number 23,number 25,
number 26,number 28,number 29,number 31,number 32,number 34,number 35] record"corners3"layout
copy list [number 5,number 6,number 8,number 9,number 11,number 12,number 14,
number 15,number 17,number 18,number 20,number 21,number 23,number 24,number 26,
number 27,number 29,number 30,number 32,number 33,number 35,number 36] record"corners4"layout
set list [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0] record"corner frequency"data
//Lines
copy list [Line(1-6),Line(4-9),Line(7-12),Line(10-15),Line(13-18),Line(16-21),
Line(19-24),Line(22-27),Line(25-30),Line(28-33),Line(31-36)] record"lines"layout
copy list [Street(1-3),Street(4-6),Street(7-9),Street(10-12),Street(13-15),Street(16-18),
Street(19-21),Street(22-24),Street(25-27),Street(28-30),Street(31-33)] record"lines1"layout
copy list [Street(4-6),Street(7-9),Street(10-12),Street(13-15),Street(16-18),Street(19-21),
Street(22-24),Street(25-27),Street(28-30),Street(31-33),Street(34-36)] record"lines2"layout
set list [0,0,0,0,0,0,0,0,0,0,0] record"line frequency"data
//Dozens & Columns
copy list [1st dozen,2nd dozen,3rd dozen,column A,column B,column C] record"DCs"layout
set list [0,0,0,0,0,0] record"DC frequency"data
//Even Money
copy list [red,black,even,odd,high,low] record"EMs"layout
set list [0,0,0,0,0,0] record"EM frequency"data
//============================
//Change your entry point here
//============================
set list [0,253,168,125,0,81,0,0,0,0,0,37,0,0,0,0,0,22,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0] record"entry points"data
//============================
//Change progressions here
//============================
set list [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,4,4,4,
4,5,5,5,5,6,6,6,7,7,8,8,9,9,10,10,11,11,12,13,14,14,15,16,17,18,19,20,21,23,24,
25,27,28,30,32,34,36,38,40,42,45,48,50,53,56,60,63,67,71,75,80,84,89,94,100] record"pro2"data
set list [1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,3,3,3,3,4,4,4,5,5,6,6,7,7,8,9,10,11,
12,13,14,15,16,18,20,21,23,25,28,30,33,36,39,43,47,51,56,61,66,72,79,86,94] record"pro3"data
set list [1,1,1,1,1,1,1,1,2,2,2,2,3,3,3,4,4,5,5,6,7,8,9,10,11,12,14,16,18,20,22,25,28,32,
36,40,45,51,57,64,72,81,91] record"pro4"data
set list [1,1,1,1,1,2,2,2,3,3,4,5,6,7,8,10,12,14,17,21,25,30,36,43,52,62,74,89] record"pro6"data
set list [1,1,2,3,4,6,9,14,21,31,47,70] record"pro12"data
set list [1,2,4,8,16,32,64] record"pro18"data
call "reset"
end
method "reset"
begin
set flag "qualified" false
end
method "update sleeping for list"
begin
//splits
clear record"temp1"layout
clear record"temp2"layout
clear record"temp3"layout
clear record"temp4"data
clear record"temp5"layout
clear record"temp6"layout
clear record"temp7"layout
put 1 record"splits1"layout index
loop until record"splits1"layout index > record"splits1"layout count
begin
put 100% record"splits1"layout index record"splits2"layout index
put 100% record"splits1"layout index record"splits"layout index
put 100% record"splits1"layout index record"split frequency"data index
if record"last#"layout = record"splits1"layout or record"last#"layout = record"splits2"layout
begin
copy record"splits1"layout record"temp5"layout
add 1 record"temp5"layout index
copy record"splits2"layout record"temp6"layout
add 1 record"temp6"layout index
copy record"splits"layout record"temp7"layout
add 1 record"temp7"layout index
end
else
begin
copy record"splits1"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"splits2"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"splits"layout record"temp3"layout
add 1 record"temp3"layout index
put 100% record"split frequency"data record"temp4"data
add 1 record"temp4"data
add 1 record"temp4"data index
end
add 1 record"splits1"layout index
end
put 1 record"temp5"layout index
loop until record"temp5"layout index > record"temp5"layout count
begin
put 100% record"temp5"layout index record"temp6"layout index
put 100% record"temp5"layout index record"temp7"layout index
copy record"temp5"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"temp6"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"temp7"layout record"temp3"layout
add 1 record"temp3"layout index
put 0 record"temp4"data
add 1 record"temp4"data index
add 1 record"temp5"layout index
end
duplicate record"temp1" record"splits1"
duplicate record"temp2" record"splits2"
duplicate record"temp3" record"splits"
duplicate record"temp4" record"split frequency"
//streets
clear record"temp1"layout
clear record"temp5"layout
clear record"temp4"data
put 1 record"streets"layout index
loop until record"streets"layout index > record"streets"layout count
begin
put 100% record"streets"layout index record"street frequency"data index
if record"streets"layout = record"last street"layout
begin
copy record"streets"layout record"temp5"layout
end
else
begin
copy record"streets"layout record"temp1"layout
add 1 record"temp1"layout index
put 100% record"street frequency"data record"temp4"data
add 1 record"temp4"data
add 1 record"temp4"data index
end
add 1 record"streets"layout index
end
copy record"temp5"layout record"temp1"layout
put 0 record"temp4"data
duplicate record"temp1" record"streets"
duplicate record"temp4" record"street frequency"
//corners
clear record"temp1"layout
clear record"temp2"layout
clear record"temp3"layout
clear record"temp4"layout
clear record"temp5"layout
clear record"temp"data
clear record"temp11"layout
clear record"temp12"layout
clear record"temp13"layout
clear record"temp14"layout
clear record"temp15"layout
put 1 record"corners1"layout index
loop until record"corners1"layout index > record"corners1"layout count
begin
put 100% record"corners1"layout index record"corners2"layout index
put 100% record"corners1"layout index record"corners3"layout index
put 100% record"corners1"layout index record"corners4"layout index
put 100% record"corners1"layout index record"corners"layout index
put 100% record"corners1"layout index record"corner frequency"data index
if record"last#"layout = record"corners1"layout or record"last#"layout = record"corners2"layout
or record"last#"layout = record"corners3"layout or record"last#"layout = record"corners4"layout
begin
copy record"corners1"layout record"temp11"layout
add 1 record"temp11"layout index
copy record"corners2"layout record"temp12"layout
add 1 record"temp12"layout index
copy record"corners3"layout record"temp13"layout
add 1 record"temp13"layout index
copy record"corners4"layout record"temp14"layout
add 1 record"temp14"layout index
copy record"corners"layout record"temp15"layout
add 1 record"temp15"layout index
end
else
begin
copy record"corners1"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"corners2"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"corners3"layout record"temp3"layout
add 1 record"temp3"layout index
copy record"corners4"layout record"temp4"layout
add 1 record"temp4"layout index
copy record"corners"layout record"temp5"layout
add 1 record"temp5"layout index
put 100% record"corner frequency"data record"temp"data
add 1 record"temp"data
add 1 record"temp"data index
end
add 1 record"corners1"layout index
end
put 1 record"temp11"layout index
loop until record"temp11"layout index > record"temp11"layout count
begin
put 100% record"temp11"layout index record"temp12"layout index
put 100% record"temp11"layout index record"temp13"layout index
put 100% record"temp11"layout index record"temp14"layout index
put 100% record"temp11"layout index record"temp15"layout index
copy record"temp11"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"temp12"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"temp13"layout record"temp3"layout
add 1 record"temp3"layout index
copy record"temp14"layout record"temp4"layout
add 1 record"temp4"layout index
copy record"temp15"layout record"temp5"layout
add 1 record"temp5"layout index
put 0 record"temp"data
add 1 record"temp"data index
add 1 record"temp11"layout index
end
duplicate record"temp1" record"corners1"
duplicate record"temp2" record"corners2"
duplicate record"temp3" record"corners3"
duplicate record"temp4" record"corners4"
duplicate record"temp5" record"corners"
duplicate record"temp" record"corner frequency"
//lines
clear record"temp1"layout
clear record"temp2"layout
clear record"temp3"layout
clear record"temp4"data
clear record"temp5"layout
clear record"temp6"layout
clear record"temp7"layout
put 1 record"lines1"layout index
loop until record"lines1"layout index > record"lines1"layout count
begin
put 100% record"lines1"layout index record"lines2"layout index
put 100% record"lines1"layout index record"lines"layout index
put 100% record"lines1"layout index record"line frequency"data index
if record"last street"layout = record"lines1"layout or record"last street"layout = record"lines2"layout
begin
copy record"lines1"layout record"temp5"layout
add 1 record"temp5"layout index
copy record"lines2"layout record"temp6"layout
add 1 record"temp6"layout index
copy record"lines"layout record"temp7"layout
add 1 record"temp7"layout index
end
else
begin
copy record"lines1"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"lines2"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"lines"layout record"temp3"layout
add 1 record"temp3"layout index
put 100% record"line frequency"data record"temp4"data
add 1 record"temp4"data
add 1 record"temp4"data index
end
add 1 record"lines1"layout index
end
put 1 record"temp5"layout index
loop until record"temp5"layout index > record"temp5"layout count
begin
put 100% record"temp5"layout index record"temp6"layout index
put 100% record"temp5"layout index record"temp7"layout index
copy record"temp5"layout record"temp1"layout
add 1 record"temp1"layout index
copy record"temp6"layout record"temp2"layout
add 1 record"temp2"layout index
copy record"temp7"layout record"temp3"layout
add 1 record"temp3"layout index
put 0 record"temp4"data
add 1 record"temp4"data index
add 1 record"temp5"layout index
end
duplicate record"temp1" record"lines1"
duplicate record"temp2" record"lines2"
duplicate record"temp3" record"lines"
duplicate record"temp4" record"line frequency"
//Dozens & Columns
put 1 record"DCs"layout index
loop until record"DCs"layout index > record"DCs"layout count
begin
put 100% record"DCs"layout index record"DC frequency"data index
if record"DCs"layout = record"last D"layout or record"DCs"layout = record"last C"layout
begin
put 0 record"DC frequency"data
end
else
begin
add 1 record"DC frequency"data
end
add 1 record"DCs"layout index
end
//Even Money Bets
put 1 record"EMs"layout index
loop until record"EMs"layout index > record"EMs"layout count
begin
put 100% record"EMs"layout index record"EM frequency"data index
if record"EMs"layout = record"last RB"layout or
record"EMs"layout = record"last EO"layout or
record"EMs"layout = record"last LH"layout
begin
put 0 record"EM frequency"data
end
else
begin
add 1 record"EM frequency"data
end
add 1 record"EMs"layout index
end
end
method "check wheel for opportunities"
begin
//splits
put 2 record"entry points"data index
put 1 record"split frequency"data index
if record"split frequency"data >= record"entry points"data
begin
put 2 record"lenght"data
put 1 record"splits"layout index
copy record"splits"layout record"bet on"layout
clear record"did we win"layout
put 1 record"splits1"layout index
copy record"splits1"layout record"did we win"layout
add 1 record"did we win"layout index
put 1 record"splits2"layout index
copy record"splits2"layout record"did we win"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
//steets
if flag "qualified" false
begin
put 3 record"entry points"data index
put 1 record"street frequency"data index
if record"street frequency"data >= record"entry points"data
begin
put 3 record"lenght"data
put 1 record"streets"layout index
copy record"streets"layout record"bet on"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
end
//corners
if flag "qualified" false
begin
put 4 record"entry points"data index
put 1 record"corner frequency"data index
if record"corner frequency"data >= record"entry points"data
begin
put 4 record"lenght"data
put 1 record"corners"layout index
copy record"corners"layout record"bet on"layout
clear record"did we win"layout
put 1 record"corners1"layout index
copy record"corners1"layout record"did we win"layout
add 1 record"did we win"layout index
put 1 record"corners2"layout index
copy record"corners2"layout record"did we win"layout
add 1 record"did we win"layout index
put 1 record"corners3"layout index
copy record"corners3"layout record"did we win"layout
add 1 record"did we win"layout index
put 1 record"corners4"layout index
copy record"corners4"layout record"did we win"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
end
//lines
if flag "qualified" false
begin
put 6 record"entry points"data index
put 1 record"line frequency"data index
if record"line frequency"data >= record"entry points"data
begin
put 6 record"lenght"data
put 1 record"lines"layout index
copy record"lines"layout record"bet on"layout
clear record"did we win"layout
put 1 record"lines1"layout index
copy record"lines1"layout record"did we win"layout
add 1 record"did we win"layout index
put 1 record"lines2"layout index
copy record"lines2"layout record"did we win"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
end
//Dozens & Columns
if flag "qualified" false
begin
put 12 record"entry points"data index
put 1 record"DC frequency"data index
loop until record"DC frequency"data index > record"DC frequency"data count
begin
put 100% record"DC frequency"data index record"DCs"layout index
if record"DC frequency"data >= record"entry points"data
begin
put 12 record"lenght"data
copy record"DCs"layout record"bet on"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
add 1 record"DC frequency"data index
end
end
//Even Money Bets
if flag "qualified" false
begin
put 18 record"entry points"data index
put 1 record"EM frequency"data index
loop until record"EM frequency"data index > record"EM frequency"data count
begin
put 100% record"EM frequency"data index record"EMs"layout index
if record"EM frequency"data >= record"entry points"data
begin
put 18 record"lenght"data
copy record"EMs"layout record"bet on"layout
set flag "qualified" true
clear record"pro"data
call "pick up correct progression"
call "determine max"
end
add 1 record"EM frequency"data index
end
end
end
method "pick up correct progression"
begin
if record"lenght"data = 2
begin duplicate record"pro2" record"pro" end
if record"lenght"data = 3
begin duplicate record"pro3" record"pro" end
if record"lenght"data = 4
begin duplicate record"pro4" record"pro" end
if record"lenght"data = 6
begin duplicate record"pro6" record"pro" end
if record"lenght"data = 12
begin duplicate record"pro12" record"pro" end
if record"lenght"data = 18
begin duplicate record"pro18" record"pro" end
end
method "determine max"
begin
put 0 record"max bet"data
put 1 record"pro"data index
loop until record"pro"data index > record"pro"data count
begin
add 1 record"max bet"data
add 1 record"pro"data index
end
put 0 record"#bets"data
put 1 record"pro"data index
end
