Facing the virtual limit, chapter III
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