Unit BjTypes

Classes

TDeck -
THand -
TPlayer -

Functions

Types

TCard
TCardArray
THandOptions
TPlayerAction

Constants

DECKCARDS

Variables


Functions


Types


TCard = record
Face : byte;
Num : byte;
BjVal : byte;
Junk : byte;
end;
Number of cards per deck (duh!
TCardArray = array[0..999999] of TCard;
PlaceHolder
THandOptions = set of (hoCanSplit, hoCanDouble, hoCanHit)

TPlayerAction = (paHit, paStand, paDouble, paSplit);

Constants

DECKCARDS = 52


Variables