2 dozen progression
2-dozen progression.dgt — Xtreme, 1 KB (1930 bytes)
Contenuto del file
system "2-dozen progression" { 2-dozen progression Wait for 2 unique dozens in a row then bet on them as below. On a loss go up by 1u, then 2u, then 3u.... reset on new profit high. On a win with no new profit high, repeat the same bet. } method "main" begin while starting a new session begin set list [5,10,20,35,55,80,110] on record "pro" data copy list [1st dozen, 2nd dozen] on record "bet these" layout put 1 on record "pro" data index put 0 on record "spins" data put 50 on record "highbr" data end if record "pro" data index >=8 begin put 1 on record "pro" data index put 100% bankroll on record "highbr" data put 0 on record "spins" data end call "track" call "eval" call "bet" end //================================================================ method "track" begin if flag "ready" true begin call "eval" end else begin copy 1st dozen on record "temp" layout if record "temp" layout is found on record "bet these" layout begin clear record "bet these" layout copy list [2nd dozen, 3rd dozen] on record "bet these" layout set flag "ready" true end else begin copy list [1st dozen, 2nd dozen] on record "bet these" layout set flag "ready" true end end end method "eval" begin if record "currentbr" data > record "highbr" data begin put 100% record "currentbr" data on record "highbr" data add 50 on record "highbr" data put 1 on record "pro" data index put 1 on record "spins" data set flag "ready" false end if record "currentbr" data < record "highbr" data and any dozen bet won each time begin exit //subtract 1 on record "pro" data index end if flag "ready" true and any dozen bet lost each time begin add 1 on record "pro" data index end end method "bet" begin if flag "ready" true begin put 100% bankroll on record "currentbr" data put 100% record "pro" data on record "bet these" layout list end end