CobCards
(c)1998 by Luis Cobian
cobian@educ.umu.se
**********
This DLL is Freeware. Don't ask my permision to do and/or distribute
this DLL . Do whatever you want with it!
**********
How to use.
**********
Cobcards is a true 32-bits  DLL with an easy interface.
It contains a 32-bits resource with standard cards.
The resource index of the cards begins with 1 and ends with 56.
Nr 1 to 13 are the Clubs (1 to King)
Nr 14 to 26 are Diamonds (1 to king)
Nr 27 to 39 are Hearts (1 to King)
Nr 40 to 53 are Spades (1 to King)
Nr 54 is the Standard Cover (back Side)
Nr 55 is another version of the back side
Nr 56 is an Empty Card
Nr 57 is a Joker

Do NOT use an index bigger than 57 or a negative one.
*********
Functions
*********
CardToIndex index 1 name 'CardToIndex',
Returns the Index of a card in the Resource.
Declaration:
CardToIndex(CardNumber:shortint;CardSuit:ShortInt):Shortint;stdcall;
CardNumber is the number (value) of the card. It can be a number from
1 to 13.
CardSuit is the Suit of the card. It can be a number from 0 to 4.
0 are Clubs
1 are Diamonds
2 are Hearts
3 are Spades
4 are Special cards like Joker etc. 
When CardSuit=4 CardNumber MUST be a number between 53 and 56.
When cardSuit is 0,1,2 or 3 card number must be any number between 1 and 13.
____
IndexToCardNumber index 2 name 'IndexToCardNumber',
Declaration:
Function IndexToCardNumber(CardIndex:shortint):ShortInt;stdcall;
This fuction returns the number (value) of a card.
CardIndex is a number between 1 and 56.
Nr 54 is the Standard Cover (back Side)
Nr 55 is another version of the back side
Nr 56 is an Empty Card
Nr 57 is a Joker
____
IndexToCardSuit index 3 name 'IndexToCardSuit';
Declaration:
Function IndexToCardSuit(CardIndex:ShortInt):ShortInt;stdcall;
returns the suit of a card.
CardIndex is a number between 1 and 56.
0 are Clubs
1 are Diamonds
2 are Hearts
3 are Spades
4 are Special cards like Joker etc. 


This is a Delphi DLL and has been tested with Delphi programs.
I have declared all the functions as StdCall to make it possible the use
of Cobcards with non Delphi programs. If you are a non-delphi programmer feel free to notify me about any problems with it!

4-Nov-1998