Here we have the code of the program.
<((1,2,3,4,5,6,7,8,9,10,'J','Q','K') X ("♠","♥","♦","♣")).roll>
<((1,2,3,4,5,6,7,8,9,10,'J','Q','K') X ("♠","♥","♦","♣")).pick(52)>
<roll>
is used for picking any card randomly.
`` is used for shuffeling all the deck of cards.