RosettaCodeData/Task/Mind-boggling-card-trick/AppleScript/mind-boggling-card-trick-2.applescript
2023-07-01 13:44:08 -04:00

29 lines
2.7 KiB
AppleScript
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

"Test 1: Assertion is true
Red pile: 3♦, 2♦, 9♣, 6♣, 3♥, 9♥, A♠, 3♠, 2♥, Q♠, 7♥, K♥
Black pile: Q♥, J♣, 7♦, 4♦, 8♦, 5♥, K♣, 10♠, 10♣, 7♣, 2♣, 9♦, 5♣, 6♦
Discards: 9♠, Q♦, 3♣, 6♠, 8♠, 8♥, Q♣, 4♠, J♠, K♦, 7♠, A♦, 5♦
10♥, J♦, A♥, 4♥, 6♥, J♥, K♠, 5♠, 10♦, 4♣, 2♠, 8♣, A♣
Test 2: Assertion is true
Red pile: 7♣, Q♠, 2♦, K♣, J♠, A♠, J♣, 5♣, 6♥, 7♦, 5♥, 9♥, 8♠, 3♠, 6♣, 4♠
Black pile: K♠, J♦, 4♣, 10♠, 4♥, 3♥, 6♠, 4♦, 10♣, 9♦
Discards: 8♦, J♥, A♣, 10♥, 8♣, 9♠, A♦, 2♣, K♥, Q♣, A♥, 5♦, 9♣
K♦, 3♣, 2♠, 7♠, 5♠, 2♥, 6♦, 10♦, 3♦, Q♦, 8♥, 7♥, Q♥
Test 3: Assertion is true
Red pile: 4♥, 2♠, Q♦, 9♣, 4♣, 7♥, A♣, 6♠, 3♥, 8♣, A♦, 2♣, 6♥, 5♦
Black pile: K♦, 2♦, 5♠, 10♠, J♠, 9♦, 4♦, 4♠, Q♣, 6♣, 3♣, 10♦
Discards: J♦, 9♥, K♠, 10♥, 5♥, 10♣, K♣, 8♠, 8♥, A♠, 7♣, 7♦, 8♦
Q♠, 9♠, 6♦, 3♠, 2♥, J♣, A♥, K♥, Q♥, 5♣, 7♠, 3♦, J♥
Test 4: Assertion is true
Red pile: 6♠, A♣, 8♥, 4♣, 5♥, J♠, 9♠, 7♥, 7♣, 4♦, A♠, A♥, 8♠, 6♦, 5♣, Q♣, 6♥, K♠
Black pile: 5♦, 4♠, 2♣, 6♣, 10♣, 8♣, Q♠, 10♠
Discards: J♥, A♦, 7♠, 9♥, K♦, 10♥, Q♦, 10♦, 8♦, 3♥, 3♠, 2♦, J♣
9♦, J♦, 9♣, 2♠, 3♦, 2♥, 7♦, Q♥, 3♣, K♥, K♣, 5♠, 4♥
Test 5: Assertion is true
Red pile: 2♣, 9♠, 5♦, 4♥, K♥, 5♥, 8♦, 2♠, 3♦, 10♥, 10♦
Black pile: 2♦, 2♥, 8♣, 9♣, 7♥, 3♣, Q♠, 10♠, 8♥, 10♣, K♣, 5♠, 4♦, 3♥, 6♥
Discards: 7♦, J♥, 7♣, 4♠, 6♦, 4♣, 7♠, Q♥, J♠, Q♦, 6♠, J♣, A♥
9♦, K♦, J♦, 3♠, 5♣, Q♣, A♣, K♠, 8♠, 9♥, A♠, 6♣, A♦"