|
|  Three Blind Mice patience
|  Written by Ph.DONSBACK
|
SCRIPT_TYPE 1
|
BEGIN "Three Blind Mice"

  FLAGS ClickFly AnimateFly
  PACKS 1
  WIDTH 10 * CW
  HEIGHT CH + 4 * COH + 15 * COH + CH
  ZEROTOWIN 4 - SEQUENCES$3

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

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

  FOR stack = 0 TO 1
    STACK
      X stack * CW
      Y CH + 4 * COH + 15 * COH
      MAX 0
      DEAL 1,1
      DRAGUPTO 1
      FLAGS PaintLast
    END
  END

END
