WinCraps AutoBets, Data Format 3.9 ZEnd wC ' The Dance is a hybrid of the Labouchere and Martingale systems. c' The Dance is a hybrid of the Labouchere and Martingale systems. ' Phantom Martingales are run simultaneously on Pass and Don't Pass. c' Phantom Martingales are run simultaneously on Pass and Don't Pass. ' When either Martingale tries to exceed $320, the whole series from $5 to $320 c' When either Martingale tries to exceed $320, the whole series from $5 to $320 ' is copied into a list and continues as a phantom Labouchere. c' is copied into a list and continues as a phantom Labouchere. ' The Labouchere is modified to include the first two numbers in the list, plus c' The Labouchere is modified to include the first two numbers in the list, plus ' the last number, plus $5. c' the last number, plus $5. ' Actual bets are figured as the difference between the two phantom bets and c' Actual bets are figured as the difference between the two phantom bets and ' placed on Pass Line or Don't Pass according to whichever is greater. c' placed on Pass Line or Don't Pass according to whichever is greater. When . . . 3 |B Initializing Auto-Bet  <F then . . . <F Bet $ 0 on All Chip-Stacks  @ÈD Clear all Chip-Stack names X Name Chip-Stack # 1 as "Pass Line amount" WPass Line amount  Name Chip-Stack # 2 as "Don't Pass amount" WDon't Pass amount  Name Chip-Stack # 3 as "Reference for last Chip-Stack in Pass Line Labouchere" WReference for last Chip-Stack in Pass Line Labouchere  Name Chip-Stack # 4 as "Reference for last Chip-Stack in Don't Pass Labouchere" WReference for last Chip-Stack in Don't Pass Labouchere  Name Chip-Stack # 5 as "Reference for moving Chip-Stacks" WReference for moving Chip-Stacks  Name Chip-Stack # 6 as "Reference for moving Chip-Stacks" WReference for moving Chip-Stacks  Name Chip-Stack # 7 as "1st Chip-Stack in Pass Line Labouchere" W1st Chip-Stack in Pass Line Labouchere  Name Chip-Stack # 53 as "1st Chip-Stack in Don't Pass Labouchere" W1st Chip-Stack in Don't Pass Labouchere 5 Bet $ 5 on Chip-Stack # 1   @ÈD Bet $ 5 on Chip-Stack # 2   @ÈD Set Auto-Take Full Odds to False [ Set Auto-Lay Full Odds to False \ Go to "End" LEnd Do this . . . Set flag "Pass Line won" to False MPass Line won Set flag "Pass Line lost" to False MPass Line lost Set flag "Don't Pass won" to False MDon't Pass won Set flag "Don't Pass lost" to False MDon't Pass lost When . . . LFigure and make next bet A Point is decided "for" any number  £D or when . . .  Any 7 has rolled each time  àúD Last roll was a Come-out roll  À¢D or when . . .  Any 11 has rolled each time  `ûD Last roll was a Come-out roll  À¢D then . . .  DB Set flag "Pass Line won" to True MPass Line won €¿ Set flag "Don't Pass lost" to True MDon't Pass lost €¿ Go to "Pass Line won and Don't Pass lost" LPass Line won and Don't Pass lost When . . .  ÈD A Point is decided "against" any number  £D or when . . .  A 2 has rolled each time  @úD Last roll was a Come-out roll  À¢D or when . . .  Any 3 has rolled each time  `úD Last roll was a Come-out roll  À¢D then . . .  DB Set flag "Don't Pass won" to True MDon't Pass won €¿ Set flag "Pass Line lost" to True MPass Line lost €¿ Go to "Don't Pass won or Pass Line lost" LDon't Pass won or Pass Line lost When . . .  ÈD A 12 has rolled each time  €ûD Last roll was a Come-out roll  À¢D then . . .  DB Set flag "Pass Line lost" to True MPass Line lost €¿ Go to "Don't Pass won or Pass Line lost" LDon't Pass won or Pass Line lost Do this . . . Go to "End" LEnd Pass Line won and Don't Pass lost ZPass Line won and Don't Pass lost While . . .  Flag "Run Don't Pass Labouchere" is False Run Don't Pass Labouchere €»D then . . . Multiply by 2 on Chip-Stack # 2 ( @ÈD When . . .  Chip-Stack # 2 is greater than $ 320   CÈD then . . . Set flag "Run Don't Pass Labouchere" to True MRun Don't Pass Labouchere €¿ Bet $ 5 on Chip-Stack # 53   @ÈD5 Bet $ 10 on Chip-Stack # 54  AÈD6 Bet $ 20 on Chip-Stack # 55   AÈD7 Bet $ 40 on Chip-Stack # 56  BÈD8 Bet $ 80 on Chip-Stack # 57   BÈD9 Bet $ 160 on Chip-Stack # 58  CÈD: Bet $ 320 on Chip-Stack # 59   CÈD; ' set index for last Chip-Stack in Don't Pass Labouchere c' set index for last Chip-Stack in Don't Pass Labouchere Bet $ 59 on Chip-Stack # 4  lBÈD Show message: "The Don't Pass Labouchere is starting now." OThe Don't Pass Labouchere is starting now. While . . .  Flag "Run Pass Line Labouchere" is False Run Pass Line Labouchere €»D then . . . Bet $ 5 on Chip-Stack # 1   @ÈD Do this . . . Go to "Check Pass Line Labouchere" LCheck Pass Line Labouchere Don't Pass won or Pass Line lost ZDon't Pass won or Pass Line lost While . . .  Flag "Run Pass Line Labouchere" is False Run Pass Line Labouchere €»D then . . . Multiply by 2 on Chip-Stack # 1 ( @ÈD When . . .  Chip-Stack # 1 is greater than $ 320   CÈD then . . . Set flag "Run Pass Line Labouchere" to True MRun Pass Line Labouchere €¿ Bet $ 5 on Chip-Stack # 7   @ÈD Bet $ 10 on Chip-Stack # 8  AÈD Bet $ 20 on Chip-Stack # 9   AÈD Bet $ 40 on Chip-Stack # 10  BÈD Bet $ 80 on Chip-Stack # 11   BÈD Bet $ 160 on Chip-Stack # 12  CÈD Bet $ 320 on Chip-Stack # 13   CÈD ' set index for last Chip-Stack in Pass Line Labouchere c' set index for last Chip-Stack in Pass Line Labouchere Bet $ 13 on Chip-Stack # 3  PAÈD Show message: "The Pass Line Labouchere is starting now." OThe Pass Line Labouchere is starting now. While . . .  Flag "Run Don't Pass Labouchere" is False Run Don't Pass Labouchere €»D Flag "Don't Pass won" is True Don't Pass won €¿€»D then . . . Bet $ 5 on Chip-Stack # 2   @ÈD '------------------------------------------------------- c'------------------------------------------------------- Check Pass Line Labouchere ZCheck Pass Line Labouchere '------------------------------------------------------- c'------------------------------------------------------- While . . .  Flag "Run Pass Line Labouchere" is False Run Pass Line Labouchere €»D then . . . Go to "Check Don't Pass Labouchere" LCheck Don't Pass Labouchere When . . .  Flag "Run Pass Line Labouchere" is True Run Pass Line Labouchere €¿€»D then . . . Go to "Figure Pass Line Labouchere amount" LFigure Pass Line Labouchere amount While . . .  Flag "Pass Line won" is True Pass Line won €¿€»D then . . . Bet $ 0 on Chip-Stack # 7  ÈD Bet $ 0 on Chip-Stack # 8  ÈD Bet $ 0 on Chip-Stack ref # 3  ÈD While . . .  Flag "Pass Line lost" is True Pass Line lost €¿€»D then . . . Add $ 1 on Chip-Stack # 3  €?ÈD Bet 100 % of the last Pass Line on Chip-Stack ref # 3  ÈB,B ÈD Shift Pass Line Labouchere Chip-Stacks down if necessary ZShift Pass Line Labouchere Chip-Stacks down if necessary While . . .  Shift Chip-Stacks down if necessary ÈBDB ÈD Chip-Stack # 7 is greater than $ 0  ÈD then . . . ÈD Go to "Figure Pass Line Labouchere amount" LFigure Pass Line Labouchere amount Do this . . . LFigure and make next bet Bet $ 6 on Chip-Stack # 3  À@ÈD Bet $ 9 on Chip-Stack # 6  AÈD Loop to shift Pass Line Labouchere Chip-Stacks ZLoop to shift Pass Line Labouchere Chip-Stacks While . . .  Loop 1 AÈD Chip-Stack ref # 6 is greater than $ 0  ÈD then . . .  ÆBÈD Add $ 1 on Chip-Stack # 3  €?ÈD Bet 100 % of Chip-Stack ref # 6 on Chip-Stack ref # 3  ÈB ÈD ÈD Bet $ 0 on Chip-Stack ref # 6  ÈD Add $ 1 on Chip-Stack # 6  €?ÈD Go to "Loop to shift Pass Line Labouchere Chip-Stacks" LLoop to shift Pass Line Labouchere Chip-Stacks Check for end of Pass Line Labouchere ZCheck for end of Pass Line Labouchere While . . . LCheck progression Chip-Stack # 7 is equal to $ 0  ÈD then . . . ÈD Show message: "The Pass Line Labouchere has won and the "; OThe Pass Line Labouchere has won and the ; Show message: "Martingale will resume." OMartingale will resume. Set flag "Run Pass Line Labouchere" to False MRun Pass Line Labouchere Bet $ 5 on Chip-Stack # 1   @ÈD Go to "Check Don't Pass Labouchere" LCheck Don't Pass Labouchere Figure Pass Line Labouchere amount ZFigure Pass Line Labouchere amount Do this . . . LFigure and make next bet Bet 100 % of Chip-Stack # 7 on Chip-Stack # 1  ÈBÈDÈD Add $ 5 on Chip-Stack # 1   @ÈD While . . .  Chip-Stack # 3 is greater than $ 8  AÈD then . . . Add 100 % of Chip-Stack # 8 on Chip-Stack # 1  ÈBÈDÈD While . . .  ÈBÈDDB Chip-Stack # 3 is greater than $ 7  à@ÈD then . . . à@ÈD Add 100 % of Chip-Stack ref # 3 on Chip-Stack # 1  ÈB ÈDÈD '------------------------------------------------------- c'------------------------------------------------------- Check Don't Pass Labouchere ZCheck Don't Pass Labouchere '------------------------------------------------------- c'------------------------------------------------------- While . . .  Flag "Run Don't Pass Labouchere" is False Run Don't Pass Labouchere €»D then . . . Go to "Make bet" LMake bet When . . .  Flag "Run Don't Pass Labouchere" is True Run Don't Pass Labouchere €¿€»D then . . . Go to "Figure Don't Pass Labouchere amount" LFigure Don't Pass Labouchere amount While . . .  Flag "Don't Pass won" is True Don't Pass won €¿€»D then . . . Bet $ 0 on Chip-Stack # 53  ÈD5 Bet $ 0 on Chip-Stack # 54  ÈD6 Bet $ 0 on Chip-Stack ref # 4  ÈD While . . .  Flag "Don't Pass lost" is True Don't Pass lost €¿€»D then . . . Add $ 1 on Chip-Stack # 4  €?ÈD Bet 100 % of the last Don't Pass on Chip-Stack ref # 4  ÈB8B ÈD Shift Don't Pass Labouchere Chip-Stacks down if necessary ZShift Don't Pass Labouchere Chip-Stacks down if necessary While . . .  Shift Chip-Stacks down if necessary ÈBDB ÈD Chip-Stack # 53 is greater than $ 0  ÈD5 then . . . ÈD Go to "Figure Don't Pass Labouchere amount" LFigure Don't Pass Labouchere amount Do this . . . LFigure and make next bet Bet $ 52 on Chip-Stack # 4  PBÈD Bet $ 55 on Chip-Stack # 6  \BÈD Loop to shift Don't Pass Labouchere Chip-Stacks ZLoop to shift Don't Pass Labouchere Chip-Stacks While . . .  Loop 1 AÈD Chip-Stack ref # 6 is greater than $ 0  ÈD then . . .  ÆBÈD Add $ 1 on Chip-Stack # 4  €?ÈD Bet 100 % of Chip-Stack ref # 6 on Chip-Stack ref # 4  ÈB ÈD ÈD Bet $ 0 on Chip-Stack ref # 6  ÈD Add $ 1 on Chip-Stack # 6  €?ÈD Go to "Loop to shift Don't Pass Labouchere Chip-Stacks" LLoop to shift Don't Pass Labouchere Chip-Stacks Check for end of Don't Pass Labouchere ZCheck for end of Don't Pass Labouchere While . . . LCheck progression Chip-Stack # 53 is equal to $ 0  ÈD5 then . . . ÈD Show message: "The Don't Pass Labouchere has won and the "; OThe Don't Pass Labouchere has won and the ; Show message: "Martingale will resume." OMartingale will resume. Set flag "Run Don't Pass Labouchere" to False MRun Don't Pass Labouchere Bet $ 5 on Chip-Stack # 2   @ÈD Go to "Make bet" LMake bet Figure Don't Pass Labouchere amount ZFigure Don't Pass Labouchere amount Do this . . . LFigure and make next bet Bet 100 % of Chip-Stack # 53 on Chip-Stack # 2  ÈBÈD5ÈD Add $ 5 on Chip-Stack # 2   @ÈD While . . .  Chip-Stack # 4 is greater than $ 54  XBÈD then . . . Add 100 % of Chip-Stack # 54 on Chip-Stack # 2  ÈBÈD6ÈD While . . .  ÈBÈDDB Chip-Stack # 4 is greater than $ 53  TBÈD then . . . à@ÈD Add 100 % of Chip-Stack ref # 4 on Chip-Stack # 2  ÈB ÈDÈD Make bet ZMake bet Do this . . . Bet $ 0 on Don't Pass  8B Bet $ 0 on Pass Line  ,B While . . .  Chip-Stack # 1 is greater than Chip-Stack # 2  ÈDÈD then . . . Bet 100 % of Chip-Stack # 1 on Pass Line  ÈBÈD,B Subtract 100 % of Chip-Stack # 2 from Pass Line  ÈBÈD,B While . . .  Chip-Stack # 2 is greater than Chip-Stack # 1  ÈDÈD then . . . Bet 100 % of Chip-Stack # 2 on Don't Pass  ÈBÈD8B Subtract 100 % of Chip-Stack # 1 from Don't Pass  ÈBÈD8B End ZEnd