|
|  Russite One234
|  Ecrit par Ph. DONSBACK
|
SCRIPT_TYPE 1
|
BEGIN "One234"

  FLAGS  ClickFly AnimateFly
  PACKS  1
  WIDTH  8 * CW
  HEIGHT CH + CH + 5 * COH

  ZeroToWin 52 - CARDSIN$2

  FOR stack = 2 TO 5
    FOUNDATION
      X stack * CW 
      Y 0
      ID 2
      DEAL 1,1
      FLAGS Join____ RotateJoin
      JoinOffset stack + 1 
    END
  END

  FOR stack = 0 TO 7
    STACK
      X stack * CW
      Y CH
      DEAL 6,1
      DRAGUPTO 1
      MAX 0
      FLAGS ClickFly
      ID 1
    END
  END

END
