Playing cards: Difference between revisions

Content added Content deleted
(Added XPL0 example.)
m (→‎version 2: appended a value to the EXIT statement.)
Line 5,583: Line 5,583:
say; say right('[south]' hand.3, 60)
say; say right('[south]' hand.3, 60)
say; say; say; say 'remainder of deck: ' deck
say; say; say; say 'remainder of deck: ' deck
exit /*stick a fork in it, we're all done. */
exit 0 /*stick a fork in it, we're all done. */
/*──────────────────────────────────────────────────────────────────────────────────────*/
/*──────────────────────────────────────────────────────────────────────────────────────*/
build: _=; ranks= "A 2 3 4 5 6 7 8 9 10 J Q K" /*ranks. */
build: _=; ranks= "A 2 3 4 5 6 7 8 9 10 J Q K" /*ranks. */