Oscars Grind II
Oscars_Grind_II.dgt
—
Xtreme,
5 KB (5877 bytes)
Contenuto del file
system "Oscars_Grind_II" { Oscar's grind II - Revised from Oscar's Grind that make bets are Even money layouts The layout pair (ie. Red/Black, Odd/Even) is selected by the User when a New Session has started When even or ahead, make a unit flat bet (determine from Store # 12) or the difference between the Pairs For each loss, keep bet the same as the last For each win, make the same bet again + 1 unit - not to exceed loss of +1 unit To Start, you must place a bet on both pairs resulting in a 0 Win, 0 Loss until a Zero hits. Then, you apply Oscar's Rule and take the difference. The Bet the difference on the Dominant number. Note: Store # 12 holds the starting bet amount. If you want to increase the starting amount, change it here. The higher the increase, the more aggressive. } method "main" begin While Starting a New Session begin Set List [0,0] for Record "Temp Amount List" data; Set List [0,0] for Record "Layout List" data; Clear Record "Layout number" data; Clear Record "Baseline (high bankroll)" data; Clear Record "Amount behind (if any)" data; Clear Record "Layout List" layout; Clear Record "Original Bet List" data; Clear Record "Starting Bet Amount" data; Put 1 on Record "Starting Bet Amount" data; Call "Input Layout"; Call "Setup Layout"; end //Keep track of high bankroll While Bankroll > Record "Baseline (high bankroll)" data begin Put 100 % of Bankroll on Record "Baseline (high bankroll)" data; end //Calculate amount behind from high bankroll Put 100 % of Record "Baseline (high bankroll)" data on Record "Amount behind (if any)" data; Subtract 100 % of Bankroll on Record "Amount behind (if any)" data; Put 1 on record "Layout List" data index; Put 1 on record "Layout List" layout index; Put 1 on record "Original Bet List" data index; Put 1 on record "Temp Amount List" data index; Call "Calc Layout"; Put 2 on record "Layout List" data index; Put 2 on record "Layout List" layout index; Put 2 on record "Original Bet List" data index; Put 2 on record "Temp Amount List" data index; Call "Calc Layout"; Call "Make Bet"; end method "Calc Layout" begin Put 100% of Record "Original Bet List" data on Record "Layout List" data; Put 100% of Record "Layout List" data on Record "Temp Amount List" data; While Record "Layout 1" layout has won each time And Record "Amount behind (if any)" data > 0 And Record "Amount behind (if any)" data < Record "Temp Amount List" data begin Put 100 % of Record "Amount behind (if any)" data on Record "Layout List" data; Put 100 % of Record "Layout List" data on Record "Temp Amount List" data; end While Record "Layout List" layout has won each time And Record "Amount behind (if any)" data > 0 begin Add 1 on Record "Layout List" Data; end While Record "Temp Amount List" data = 0 Or Record "Amount behind (if any)" data <= 0 begin Put 100% of Record "Starting Bet Amount" data on Record "Layout List" data; Put 100% of Record "Layout List" Data index to record "Temp Amount List" data Index; Put 100% of Record "Layout List" data on Record "Temp Amount List" data; end end method "Make Bet" begin Put 1 on Record "Layout List" data index; Put 1 on Record "Layout List" Layout index; Put 1 on Record "Original Bet List" data index; Put 100% of Record "Layout List" data on Record "Original Bet List" data; Put 100% of Record "Layout List" data on Record "Layout List" Layout; Put 2 on Record "Layout List" data index; Put 2 on Record "Layout List" Layout index; Put 2 on Record "Original Bet List" data index; Put 100% of Record "Layout List" data on Record "Original Bet List" data; Put 100% of Record "Layout List" data on Record "Layout List" Layout; Put 100% of Record "Layout List" data on Record "temp data" data; Put 1 on Record "Layout List" data index; Put 1 on Record "Layout List" layout index; While Record "Layout List" data > Record "temp data" data begin Subtract 100% of Record "temp data" data on Record "Layout List" data; Put 100% of Record "Layout List" data on Record "Layout List" layout; Put 2 on Record "Layout List" layout index; Put 0 on Record "Layout List" layout; end Put 100% of Record "Layout List" data on Record "temp data" data; Put 2 on Record "Layout List" data index; Put 2 on Record "Layout List" layout index; While Record "Layout List" data > Record "temp data" data begin Subtract 100% of Record "temp data" data on Record "Layout List" data; Put 100% of Record "Layout List" data on Record "Layout List" layout; Put 1 on Record "Layout List" Layout index; Put 0 on Record "Layout List" layout; end end method "Input Layout" begin Input Dropdown "Make a Layout Pair Selection 1:=Even/Odd 2:=Red/Black 3:=High(19-36)/Low (1-18)" to Record "Layout number" data; end method "Setup Layout" begin While Record "Layout number" data = 1 begin Copy List [Even,Odd] to Record "Layout List" layout; end Else begin While Record "Layout number" data = 2 begin Copy List [Red,Black] to Record "Layout List" layout; end Else begin While Record "Layout number" data = 3 begin Copy List [High,Low] to Record "Layout List" layout; end end end end