Turbos' 35 unit modification
Modification_of_Turbos_35.dgt — Xtreme, 5 KB (5608 bytes)
Contenuto del file
system "Modification_of_Turbos_35_unit_method_v.1" { Modification of Turbo's "35 unit" method v.1 Record 37 spins and make a list of all the sleepers. Continue without bets until a sleeper from the list is hit, then place 1 unit on it, continue until another sleeper is hit, then place 1 unit on it, etc. If a sleeper is hit again it should now have 2 units placed on it, if it's hit 3 times 3 units on it, etc... Continue for another 37-45 spins or so and see if in profit. Longer sessions become dangerous because the weight of units placed on the table become very big. (Coded by Chicko73) } method "main" begin while Starting a new Session //initialize a new session begin Call "Initialize"; Call "Input Data"; exit; end Call "Track Spins" While Flag "Ready to Bet" is False begin Call "Find Numbers that did not hit" end Call "Bankroll Check" Call "Bet" end //--------------------------( Method Declarations: )------------------------------ Method "Bet" begin If Flag "Ready to Bet" is True begin Copy last Number to the Record "Last Number" layout Put 1 on record "Numbers with No Hits" layout index Loop until Record "Numbers with No Hits" Layout Index > Record "Numbers with No Hits" Layout count begin If Record "Numbers with No Hits" layout has hit each time begin Copy last Number to the Record "Numbers With Bets" layout Put 1 on record "Numbers With Bets" layout index Loop until Record "Numbers With Bets" Layout Index > Record "Numbers With Bets" Layout count begin Add 1 to Record "Numbers with Bets" layout index end end Add 1 to Record "Numbers with No Hits" layout index end Subtract 1 from Record "Numbers with Bets" layout list Add 1 to Record "Numbers with Bets" layout list end end method "Bankroll Check" begin While Bankroll >= Record "Win Goal total Bankroll" data begin Display "Your Win Goal of has been reached. The Session will End."; Stop Session; end While Bankroll < Record "Loss Limit total Bankroll" data begin Display "Your Loss Goal has been reached. The Session will End."; Stop Session; end end method "Find Numbers that did not hit" begin Clear record "Numbers with No Hits" layout; put 1 on record "Numbers with No Hits" layout index; Put 1 on record "Single wheel" layout index; Loop until record "Single wheel" Layout Index > record "Single wheel" Layout count begin Call "Find a match in wheel"; Add 1 on Record "Single wheel" layout index; end end //Performs a comparison and finds a match method "Find a match in wheel" begin Put 1 on record "Tracked Spins" Layout index; Loop until record "Tracked Spins" Layout Index > record "Tracked Spins" Layout count begin If Record "Single wheel" layout = Record "Tracked Spins" layout begin Return; end Add 1 on Record "Tracked Spins" layout index; end //No match, then move the Number that did not hit to the No Hits list Copy record "Single wheel" layout to record "Numbers with No Hits" layout; Add 1 to record "Numbers with No Hits" layout index; end method "Track Spins" begin Set Max to record "Tracked Spins" Layout index; Add 1 on Record "Tracked Spins" Layout index; Copy last Number to the Record "Tracked Spins" layout; if record "Tracked Spins" Layout index > 37 then begin Move List Up by 1 on record "Tracked Spins" Layout; Set Max to record "Tracked Spins" Layout index; Set Flag "Ready to Bet" to True end end method "Input Data" begin Group begin Input Data "Enter your starting Bankroll:" to Record "Starting Bankroll" data; Input Data "Enter your Win Goal Units?" to Record "Win Goal" data; Input Data "Enter your Loss Goal Units?" to Record "Loss Goal" data; end Put 100 % of Record "Starting Bankroll" data on Bankroll; Put 100 % of Bankroll on Record "Loss Limit total Bankroll" data; Put 100 % of Bankroll on Record "Win Goal total Bankroll" data; Add 100 % of Record "Win Goal" data on Record "Win Goal total Bankroll" data; Subtract 100 % of Record "Loss Goal" data on Record "Loss Limit total Bankroll" data; end method "Initialize" begin Load Single Wheel; Clear Record "Tracked Spins" data; Clear Record "Numbers with No Hits" layout; Clear Record "Numbers With Bets" layout; Set Flag "Ready to Bet" to False Copy list [Number 0, Number 1, Number 2, Number 3, Number 4, Number 5, Number 6, Number 7, Number 8, Number 9, Number 10,Number 11,Number 12,Number 13,Number 14, Number 15,Number 16,Number 17,Number 18,Number 19, Number 20,Number 21,Number 22,Number 23,Number 24, Number 25,Number 26,Number 27,Number 28,Number 29, Number 30,Number 31,Number 32,Number 33,Number 34, Number 35,Number 36] to Record "Single wheel" layout; end