BLACK JACK


Black Jack is a common card game played in all the famous casinos 
all around the world. One (or more) player (players) play against 
the dealer. The object of the game is to get a hand higher than 
the dealerīs without going above 21. The game starts with the 
dealer giving one card to every player from the Shoe (i.e. deck 
of cards), including himself (the Shoe can be of any size but 
usually between 2 and 10 decks of cards). Then he deals a second 
card to the player in turn. The player adds up the values of his 
cards and decides if he wants another card. When the player is 
happy with his hand itīs the dealers turn to take additional cards. 
The player wins the round if his hands total amount is more than 
the dealers and not above 21. 


Rules
=====

The values of the cards in Black Jack from two to ten are at face 
value. Jacks, Queens and Kings count ten and the Ace counts eleven 
or one.

The Ace always counts eleven except if your total exceeds 21 - then the value of the Ace is reduced to one.

The player wins the round if his first two cards adds up to 21, this is called Black Jack. 

The dealer has to stop when he has got a minimum of 17.

The dealer wins if  he has got the same amount as the player.

The dealer wins if the player gets bust (i.e. gets over 21).


Requirements.
============

Write a Prolog program to play Black Jack. 

Extra conditions.
=================

Computer should be the dealer.

The program should ask the number of players who play against the dealer  
(this number should be at least 1), and the size of the shoe (a number 
between 2 and 10).

Every time the dealer picks up a random card from the shoe.