Task

Create a data structure and the associated methods to define and manipulate a deck of   playing cards.

The deck should contain 52 unique cards.

The methods must include the ability to:

   make a new deck
   shuffle (randomize) the deck
   deal from the deck
   print the current contents of a deck 
Each card must have a pip value and a suit value which constitute the unique value of the card.

Related tasks:

 Card shuffles
 Deal cards_for_FreeCell
 War Card_Game
 Poker hand_analyser
 Go Fish


properties
	cards: []
end properties
to initialize
	set pips to (2, 3, 4, 5, 6, 7, 8, 9, 10, "Jack", "Queen", "King", "Ace")
	set suits to ("Clubs", "Spades", "Diamonds", "Hearts")
	repeat for each suit in suits
		repeat for each pip in pips
			set card to pip && "of" && suit
			insert card into my cards
		end repeat
	end repeat
	put "New deck created, number of cards in deck:" && the number of items in my cards
end initialize
to shuffle
	sort my cards by random of a million
	put "Deck shuffled"
end shuffle
to deal
	pull from my cards into card
	put "Card dealt:" && card
	put "Cards in deck remaining:" && the number of items in my cards
end deal
to handle asText
	return my cards joined by return
end asText