WinCraps AutoBets, Data Format 3.9 Z End B,B ' Bet Pass Line or Don't Pass depending on which won the time before last c2 B ' After any win increase the last bet by one unit, not to exceed the series loss c2 B ' plus one unit. c2 B ' After a loss leave the next bet the same as the last c2 B ' Chip-Stack #5 holds next bet amount c2 B ' Chip-Stack #6 holds loss for current series c2 B ' Chip-Stack #7 is used to limit the next bet to series loss plus one unit c2 B ' Each unit is currently set to $5 but can be changed. c2 B ' Turn off Auto-Take/Lay Odds on the Auto-Play screen c2 B While . . . 2 B A Point is established on any number  à¢D then . . .  à¢D Go to "End" LEnd Record time before last decision ZLRecord time before last decision While . . . LRecord time before last decision Flag "Pass Line won last time" is True Pass Line won last time €¿€»D then . . . Pass Line won last time €¿€»D Set flag "Pass Line won time before last" to True MPass Line won time before last €¿ else . . . MPass Line won time before last €¿ Set flag "Pass Line won time before last" to False MPass Line won time before last Record last decision ZMRecord last decision When . . . MRecord last decision A Point is decided "against" any number  £D or when . . .  £D A 2,3,or 12 has rolled each time  €üD Last roll was a Come-out roll  À¢D then . . . À¢D Set flag "Pass Line won last time" to False MPass Line won last time else . . . MPass Line won last time Set flag "Pass Line won last time" to True MPass Line won last time €¿ Adjust series loss and determine bet amount ZMAdjust series loss and determine bet amount €¿ When . . . MAdjust series loss and determine bet amount €¿ Pass Line has won each time  ,B or when . . .  ,B Don't Pass has won each time  8B then . . .  8B Subtract 100 % of Chip-Stack # 5 on Chip-Stack # 6  ÈBÈDÈD Add $ 5 on Chip-Stack # 5   @ÈD When . . .   @ÈD Pass Line has lost each time  ,B or when . . .  ,B Don't Pass has lost each time  8B then . . .  8B Add 100 % of Chip-Stack # 5 on Chip-Stack # 6  ÈBÈDÈD When . . .  ÈBÈDÈD Chip-Stack # 6 is less than $ 0  ÈD then . . .  ÈD Show message: "Progression is won - Starting series over." OProgression is won - Starting series over. Bet $ 0 on Chip-Stack # 6  ÈD ' Check for minimum bet c ÈD While . . .  ÈD Chip-Stack # 5 is equal to $ 0  ÈD then . . . ÈD Bet $ 5 on Chip-Stack # 5   @ÈD ' Check if next bet exceeds series loss plus one unit c  @ÈD Do this . . .  @ÈD Bet 100 % of Chip-Stack # 6 on Chip-Stack # 7  ÈBÈDÈD Add $ 5 on Chip-Stack # 7   @ÈD While . . .   @ÈD Chip-Stack # 5 is greater than Chip-Stack # 7  ÈDÈD then . . .  ÈDÈD Bet 100 % of Chip-Stack # 7 on Chip-Stack # 5  ÈBÈDÈD Make bets Z Make bets ÈBÈDÈD While . . .  Make bets ÈBÈDÈD Flag "Pass Line won time before last" is True Pass Line won time before last €¿€»D then . . . Pass Line won time before last €¿€»D Bet 100 % of Chip-Stack # 5 on Pass Line  ÈBÈD,B Bet $ 0 on Don't Pass  8B else . . . 8B Bet 100 % of Chip-Stack # 5 on Don't Pass  ÈBÈD8B Bet $ 0 on Pass Line  ,B End Z End ,B