diff options
author | jkh <jkh@FreeBSD.org> | 1994-09-04 04:03:31 +0000 |
---|---|---|
committer | jkh <jkh@FreeBSD.org> | 1994-09-04 04:03:31 +0000 |
commit | 057afceb86e030ad65b0130436860d9a18066186 (patch) | |
tree | a0ced9c9b9278eb776d89cd2565c27ddcf020b51 /games/cribbage/cards.c | |
parent | eedec95276cdb8aef98e92c5371000f10b8d6ba7 (diff) | |
download | FreeBSD-src-057afceb86e030ad65b0130436860d9a18066186.zip FreeBSD-src-057afceb86e030ad65b0130436860d9a18066186.tar.gz |
Bring in the 4.4 Lite games directory, modulo man page changes and segregation
of the x11 based games. I'm not going to tag the originals with bsd_44_lite
and do this in two stages since it's just not worth it for this collection,
and I've got directory renames to deal with that way. Bleah.
Submitted by: jkh
Diffstat (limited to 'games/cribbage/cards.c')
-rw-r--r-- | games/cribbage/cards.c | 149 |
1 files changed, 149 insertions, 0 deletions
diff --git a/games/cribbage/cards.c b/games/cribbage/cards.c new file mode 100644 index 0000000..742370a --- /dev/null +++ b/games/cribbage/cards.c @@ -0,0 +1,149 @@ +/*- + * Copyright (c) 1980, 1993 + * The Regents of the University of California. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by the University of + * California, Berkeley and its contributors. + * 4. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + */ + +#ifndef lint +static char sccsid[] = "@(#)cards.c 8.1 (Berkeley) 5/31/93"; +#endif /* not lint */ + +#include <curses.h> +#include <stdio.h> +#include <stdlib.h> +#include <time.h> + +#include "deck.h" +#include "cribbage.h" + + +/* + * Initialize a deck of cards to contain one of each type. + */ +void +makedeck(d) + CARD d[]; +{ + register int i, j, k; + + i = time(NULL); + i = ((i & 0xff) << 8) | ((i >> 8) & 0xff) | 1; + srand(i); + k = 0; + for (i = 0; i < RANKS; i++) + for (j = 0; j < SUITS; j++) { + d[k].suit = j; + d[k++].rank = i; + } +} + +/* + * Given a deck of cards, shuffle it -- i.e. randomize it + * see Knuth, vol. 2, page 125. + */ +void +shuffle(d) + CARD d[]; +{ + register int j, k; + CARD c; + + for (j = CARDS; j > 0; --j) { + k = (rand() >> 4) % j; /* random 0 <= k < j */ + c = d[j - 1]; /* exchange (j - 1) and k */ + d[j - 1] = d[k]; + d[k] = c; + } +} + +/* + * return true if the two cards are equal... + */ +int +eq(a, b) + CARD a, b; +{ + return ((a.rank == b.rank) && (a.suit == b.suit)); +} + +/* + * isone returns TRUE if a is in the set of cards b + */ +int +isone(a, b, n) + CARD a, b[]; + int n; +{ + register int i; + + for (i = 0; i < n; i++) + if (eq(a, b[i])) + return (TRUE); + return (FALSE); +} + +/* + * remove the card a from the deck d of n cards + */ +void +cremove(a, d, n) + CARD a, d[]; + int n; +{ + register int i, j; + + for (i = j = 0; i < n; i++) + if (!eq(a, d[i])) + d[j++] = d[i]; + if (j < n) + d[j].suit = d[j].rank = EMPTY; +} + +/* + * sorthand: + * Sort a hand of n cards + */ +void +sorthand(h, n) + register CARD h[]; + int n; +{ + register CARD *cp, *endp; + CARD c; + + for (endp = &h[n]; h < endp - 1; h++) + for (cp = h + 1; cp < endp; cp++) + if ((cp->rank < h->rank) || + (cp->rank == h->rank && cp->suit < h->suit)) { + c = *h; + *h = *cp; + *cp = c; + } +} |