Another Repeater v2
Turbo's Another Repeater v2.dgt — Xtreme, 8 KB (8633 bytes)
Contenuto del file
system "Turbo's Another Repeater Method Ver 2" { ************************************* * System by Turbo Genius * * on the VIP Lounge * ************************************* Rx-ed by Sp1N-D1zZy ------------------------------------- not 00-c0mpatible ------------------------------------- For system instructions please visit: http://www.freewebs.com/turbogenius/anotherrepeatermethod.htm ------------------------------------- } method "main" begin while starting new session begin load single wheel put 1 record"Unit Size"data put 100% bankroll record"Master High"data group begin display "Turbo's Another Repeater Method" display "-----------------------------------------------------------" input dropdown "Progression: 1:=Increase By 1 Unit Until New High 2:=Increase on Win Decrease on Loss" record"Progression"data end call "Init" exit end add 1 record"Master Count"data if flag "Bet" true begin call "Bet" end else begin call "Track" end end method "Get Unit Size" begin if record"Progression"data = 1 begin if bankroll >= record"Master High"data begin put 100% bankroll record"Master High"data put 1 unit record"Unit Size"data end else begin add 1 record"Unit Size"data end end if record"Progression"data = 2 begin if bankroll >= record"Master High"data begin put 100% bankroll record"Master High"data put 1 unit record"Unit Size"data end else begin if bankroll >= record"Session Start BR"data begin subtract 1 record"Unit Size"data if record"Unit Size"data < 1 begin put 1 record"Unit Size"data end end else begin add 1 record"Unit Size"data end end end end method "Bet" begin if net > 0 and record"Net"data not = 1 begin put 1 record"Net"data call "Reset" end put 0 record"Net"data if flag "Bet Red" true begin duplicate record"Reds" record"Bet this" end else begin duplicate record"Blacks" record"Bet this" end track last number for 1 spins record"Last Number"layout if record"Last Number"layout found record"Red Layout"layout and flag "Bet Red" true begin set max record"Bet this"layout index add 1 record"Bet this"layout index copy record"Last Number"layout record"Bet this"layout end if record"Last Number"layout found record"Black Layout"layout and flag "Bet Black" true begin set max record"Bet this"layout index add 1 record"Bet this"layout index copy record"Last Number"layout record"Bet this"layout end put 100% record"Unit Size"data record"Bet this"layout list duplicate record"Bet this" record"Reds" duplicate record"Bet this" record"Blacks" end method "Track" begin loop until flag "Stop" true begin locate number backward record"This number"data spins from last number record"Backward number"layout if record"Backward number"layout found record"Red Layout"layout begin if flag "Red finished" false begin set flag "Red" true if record"Backward number"layout found record"Reds"layout begin set flag "Red finished" true copy record"Backward number"layout record"Red Repeater"layout end else begin copy record"Backward number"layout record"Reds"layout add 1 record"Reds"layout index end end end if record"Backward number"layout found record"Black Layout"layout begin if flag "Black finished" false begin set flag "Black" true if record"Backward number"layout found record"Blacks"layout begin set flag "Black finished" true copy record"Backward number"layout record"Black Repeater"layout end else begin copy record"Backward number"layout record"Blacks"layout add 1 record"Blacks"layout index end end end add 1 record"This number"data if record"Master Count"data < 100 begin if record"This number"data >= record"Master Count"data begin set flag "Stop" true put 0 record"This number"data end end else begin if record"This number"data >= 100 begin set flag "Stop" true put 0 record"This number"data end end end set flag "Stop" false if flag "Red finished" false begin clear record"Reds"layout end if flag "Black finished" false begin clear record"Blacks"layout end if flag "Red Finished" true and flag "Black Finished" true begin loop until flag "Stop" true begin locate number backward record"This number"data spins from last number record"Backward number"layout if flag "Black Count Complete" false begin add 1 record"Black Line Count"data end if flag "Red Count Complete" false begin add 1 record"Red Line Count"data end if record"Backward number"layout found record"Black Layout"layout and flag "Black Count Complete" false begin if record"Backward number"layout = record"Black Repeater"layout begin add 1 record"Black Repeater"data if record"Black Repeater"data = 2 begin set flag "Black Count Complete" true end end end if record"Backward number"layout found record"Red Layout"layout and flag "Red Count Complete"false begin if record"Backward number"layout = record"Red Repeater"layout begin add 1 record"Red Repeater"data if record"Red Repeater"data = 2 begin set flag "Red Count Complete" true end end end add 1 record"This number"data if record"Master Count"data < 100 begin if record"This number"data >= record"Master Count"data begin set flag "Stop" true put 0 record"This number"data end end else begin if record"This number"data >= 100 begin set flag "Stop" true put 0 record"This number"data end end // if record"Black Repeater"layout found record"Black Layout"layout // and record"Red Repeater"layout found record"Red Layout"layout // begin // set flag "Stop" true // put 0 record"This number"data // end end set flag "Stop" false end if flag "Black Count Complete" true and flag "Red Count Complete" true begin if record"Black Line Count"data = record"Red Line Count"data begin call "Reset" end if record"Black Line Count"data > record"Red Line Count"data begin set flag "Bet Black" true end else begin set flag "Bet Red" true end set flag "Bet" true put 100% bankroll record"Session Start BR"data call "Bet" end end method "Reset" begin call "Get Unit Size" clear record"This number"layout clear record"Backward Number"layout clear record"Reds"layout clear record"Blacks"layout clear record"Red Repeater"layout clear record"Red Repeater"data clear record"Black Repeater"layout clear record"Black Repeater"data clear record"Black Line Count"data clear record"Red Line Count"data clear record"Bet this"layout clear record"Last Number"layout reset all flags false call "Init" call "Track" exit end method "Init" begin copy list [1,3,5,7,9,12,14,16,18,19,21,23,25,27,30,32,34,36] record"Red Layout"layout copy list [2,4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35] record"Black Layout"layout put 0 record"This number"data end