Playing cards: Difference between revisions
m
Added the Sidef language
(added Swift implementation) |
m (Added the Sidef language) |
||
Line 3,901:
Sample output:
<pre>((jack . hearts) (5 . clubs) (9 . hearts) (7 . clubs) (6 . spades))</pre>
=={{header|Sidef}}==
{{trans|Perl 6}}
<lang ruby>define Pip = <A 2 3 4 5 6 7 8 9 10 J Q K>;
define Suit = <♦ ♣ ♥ ♠>;
class Card(pip, suit) {
method to_s { pip + suit }
}
class Deck {
def cards = gather {
Pip.each { |p|
Suit.each { |s|
take(Card(p, s));
}
}
};
method shuffle {
cards.shuffle!;
}
method deal { cards.shift };
method to_s { cards.join(" ") };
}
var d = Deck();
say "Deck: #{d}";
var top = d.deal;
say "Top card: #{top}";
d.shuffle;
say "Deck, shuffled: #{d}";</lang>
{{out}}
<pre>
Deck: A♦ A♣ A♥ A♠ 2♦ 2♣ 2♥ 2♠ 3♦ 3♣ 3♥ 3♠ 4♦ 4♣ 4♥ 4♠ 5♦ 5♣ 5♥ 5♠ 6♦ 6♣ 6♥ 6♠ 7♦ 7♣ 7♥ 7♠ 8♦ 8♣ 8♥ 8♠ 9♦ 9♣ 9♥ 9♠ 10♦ 10♣ 10♥ 10♠ J♦ J♣ J♥ J♠ Q♦ Q♣ Q♥ Q♠ K♦ K♣ K♥ K♠
Top card: A♦
Deck, shuffled: 10♠ 2♠ 3♠ Q♥ 3♣ A♠ 6♠ 6♣ 9♣ 6♦ Q♦ 8♣ 4♦ 7♠ 10♦ 3♥ 4♠ 7♥ 8♠ 10♥ 10♣ 9♦ 5♠ Q♠ A♥ 4♥ J♥ Q♣ 7♣ 2♥ 6♥ 8♥ 5♥ 7♦ J♠ 5♦ K♦ 3♦ J♣ 2♦ 5♣ K♥ 9♥ 2♣ 8♦ A♣ K♣ 9♠ K♠ J♦ 4♣
</pre>
=={{header|Smalltalk}}==
| |||