system "Elt's Against all odds" { Created by Elt which is modeled after Turbo Genius original design. for documentation visit: http://gambling.projectsydney.com/viewtopic.php?t=763 } method "main" begin while starting a new session begin call "initialize"; call "input"; call "reset"; exit; end if Any Inside Bet has won each time or Any Outside Bet has won each time begin call "reset"; exit; end if flag "Start to Bet" is false begin call "check dozen"; if flag "Start to Bet" is false begin exit; end end if record "location index" data = 1 //dozen begin call "do dozen bet"; end if record "location index" data = 2 //line (lanes) begin call "do line bet"; end if record "location index" data = 3 //street begin call "do street bet"; end if record "location index" data = 4 //splits begin call "do split bet"; end if record "location index" data = 5 //straight begin call "do straight bet"; end call "reset"; end method "check dozen" begin clear record "last dozen" layout; copy last Dozen to record "last dozen" layout; add 1 to record "1st dozen miss" data; add 1 to record "2nd dozen miss" data; add 1 to record "3rd dozen miss" data; if record "last dozen" layout = 1st dozen begin copy last number to record "1st dozen miss" layout; put 0 on record "1st dozen miss" data; end if record "last dozen" layout = 2nd Dozen begin copy last number to record "2nd dozen miss" layout; put 0 on record "2nd dozen miss" data; end if record "last dozen" layout = 3rd Dozen begin copy last number to record "3rd dozen miss" layout; put 0 on record "3rd dozen miss" data; end if record "1st dozen miss" data = record "wait count" data begin set flag "Start to Bet" to true; copy record "1st dozen miss" layout to record "last spin" layout; return; end if record "2nd dozen miss" data = record "wait count" data begin set flag "Start to Bet" to true; copy record "2nd dozen miss" layout to record "last spin" layout; return; end if record "3rd dozen miss" data = record "wait count" data begin set flag "Start to Bet" to true; copy record "3rd dozen miss" layout to record "last spin" layout; end end method "do dozen bet" begin if record "dozen bet" data index > record "dozen bet" data count begin add 1 to record "location index" data; return; end put 100% of record "dozen bet" data to Dozen nearest of record "last spin" layout; add 1 to record "dozen bet" data index; exit; end method "do straight bet" //straight up begin if record "straight bet" data index > record "straight bet" data count begin add 1 to record "location index" data; return; end put 100% of record "straight bet" data to record "last spin" layout; add 1 to record "straight bet" data index; exit; end method "do split bet" //splits begin if record "split bet" data index > record "split bet" data count begin add 1 to record "location index" data; return; end put 100% of record "split bet" data to Split nearest of record "last spin" layout; add 1 to record "split bet" data index; exit; end method "do street bet" //lanes begin if record "street bet" data index > record "street bet" data count begin add 1 to record "location index" data; return; end put 100% of record "street bet" data to Street nearest of record "last spin" layout; add 1 to record "street bet" data index; exit; end method "do line bet" //lanes begin if record "line bet" data index > record "line bet" data count begin add 1 to record "location index" data; return; end put 100% of record "line bet" data to Line nearest of record "last spin" layout; add 1 to record "line bet" data index; exit; end method "input" begin group begin display "Turbo's Against All Odds system"; input data "Enter starting Bankroll" to record "current bankroll" data; input dropdown "Table type 1:=Single Zero 2:=Double Zero" to record "table index" data; input data "How many spins to wait before betting on the dozens?" to record "wait count" data; end call "set bet progression"; put 100% of record "current bankroll" data to Bankroll; if record "table index" data = 1 then begin load single wheel; end else begin load double wheel; end end method "initialize" begin set flag "Start to Bet" to false; clear record "last spin" layout; put 5 on record "wait count" data; end method "reset" begin put 1 on record "location index" data; put 0 on record "1st dozen miss" data; put 0 on record "2nd dozen miss" data; put 0 on record "3rd dozen miss" data; copy number 1 to record "1st dozen miss" layout; copy Number 13 to record "2nd dozen miss" layout; copy Number 25 to record "3rd dozen miss" layout; put 1 on record "dozen bet" data index; put 1 on record "line bet" data index; put 1 on record "street bet" data index; put 1 on record "split bet" data index; put 1 on record "street bet" data index; put 1 on record "straight bet" data index; set flag "Start to Bet" to false; end method "set bet progression" begin set list [1,1,2,3,4] to record "dozen bet" data; set list [3,3,4,5,6,7,8,10] to record "line bet" data; set list [6,6,7,7,8,9,10,11,12,13,14,15,16,18,20] to record "street bet" data; set list [14,15,16,17,18,19,20,21,23,24,25,26,28,30,31,33,35] to record "split bet" data; set list [19,19,20,21,21,22,22,23,24,24,25,26,27,27,28] to record "straight bet" data; end