|
|  Rules for Double Scorpion patience
|  Written by Ph. DONSBACK.
|
SCRIPT_TYPE 1
|
BEGIN "Double Scorpion"

  FLAGS ClickFly AnimateFly
  PACKS 2
  WIDTH 10 * CW
  HEIGHT 15 * CH
  ZEROTOWIN 8 - SEQUENCES$3

  FOR stack = 0 TO 3
    STACK
      X stack * CW
      Y 0
      FIRST 13
      ID 3
      JOINOFFSET -1
      Sequence SeqSS__, x13, -1, 13
      DEAL 11, 5
      FLAGS ShallowCheck JoinSS__ ClickFly
    END
  END

    STACK
      X 4 * CW
      Y 0
      FIRST 13
      ID 3
      JOINOFFSET -1
      Sequence SeqSS__, x13, -1, 13
      DEAL 10, 5
      FLAGS ShallowCheck JoinSS__ ClickFly
    END

  FOR stack = 5 TO 9
    STACK
      X stack * CW
      Y 0
      FIRST 13
      ID 3
      JOINOFFSET -1
      Sequence SeqSS__, x13, -1, 13
      DEAL 10, 0
      FLAGS ShallowCheck JoinSS__ ClickFly
    END
  END

END
