WinCraps AutoBets, Data Format 3.9 Z End HB ÈD,B ' This example shows one way to set up an irregular progression series c1 LB ' First establish the steps of the progression on a series of Chip-Stacks c1 LB ' Then pick a Chip-Stack to act as the pointer to the current progression step c1 LB ' Increment the pointer according to your progression rules c1 LB ' Finally use "Chip-Stack ref #" to refer to the value of current step c1 LB ' c1 LB ' This progression bets the Pass Line in 10 steps of 1,2,2,4,5,10,15,22,25,30 c1 LB ' When the Pass Line wins, the progression moves up one step c1 LB ' When the Pass Line loses, the progression moves down one step c1 LB When . . . 1 LB Initializing Auto-Bet  <F then . . . <F Bet $ 0 on All Chip-Stacks  @ÈD Clear all Chip-Stack names X Bet $ 5 on Chip-Stack # 0   @ÈD Name Chip-Stack # 0 as "Pointer to current step in progression" WPointer to current step in progression Bet $ 1 on Chip-Stack # 5  €?ÈD Bet $ 2 on Chip-Stack # 6  @ÈD Bet $ 2 on Chip-Stack # 7  @ÈD Bet $ 4 on Chip-Stack # 8  €@ÈD Bet $ 5 on Chip-Stack # 9   @ÈD Bet $ 10 on Chip-Stack # 10  AÈD Bet $ 15 on Chip-Stack # 11  pAÈD Bet $ 22 on Chip-Stack # 12  °AÈD Bet $ 25 on Chip-Stack # 13  ÈAÈD Bet $ 30 on Chip-Stack # 14  ðAÈD While . . .  ðAÈD A Point is established on any number  à¢D then . . .  à¢D Go to "End" LEnd else . . . LEnd Name Chip-Stack ref # 0 as "" Y When . . . Y Pass Line has won each time  ,B then . . .  ,B Add $ 1 on Chip-Stack # 0  €?ÈD When . . .  €?ÈD Pass Line has lost each time  ,B Chip-Stack # 0 is greater than $ 5   @ÈD then . . .  @ÈD Subtract $ 1 from Chip-Stack # 0  €?ÈD While . . .  €?ÈD Chip-Stack # 0 is greater than $ 14  `AÈD then . . . `AÈD Show message: "The complete progression has won and will start over." OThe complete progression has won and will start over. Bet $ 5 on Chip-Stack # 0   @ÈD Do this . . .  @ÈD Name Chip-Stack ref # 0 as "Current step" YCurrent step Bet 100 % of Chip-Stack ref # 0 on Pass Line  ÈB ÈD,B End Z End ÈB ÈD,B