tfe-1.0/area/
tfe-1.0/files/
tfe-1.0/logs/
tfe-1.0/logs/immortal/
tfe-1.0/logs/mob/
tfe-1.0/logs/object/
tfe-1.0/logs/player/
tfe-1.0/logs/room/
tfe-1.0/notes/clans/
tfe-1.0/player/
tfe-1.0/prev/
tfe-1.0/prev/area/
tfe-1.0/prev/player/
tfe-1.0/prev/rooms/
tfe-1.0/rooms/
tfe-1.0/src-gc/
tfe-1.0/src-msvc/
tfe-1.0/src-unix/
tfe-1.0/www/
tfe-1.0/www/html/
#include <ctype.h>
#include <sys/types.h>
#include <stdio.h>
#include <stdlib.h>
#include "define.h"
#include "struct.h"


const char* suit_name [] = {
  "Spades", "Hearts", "Diamonds", "Clubs" };

const char* cards = "AKQJT98765432";


void look_cards( char_data* ch, obj_data* deck )
{
  char      tmp  [ TWO_LINES ];
  int      suit;
  int      card;
  char*  letter;

  send( "A stack of cards contains\n\r\n\r", ch );

  for( suit = 0; suit < 4; suit++ ) {
    sprintf( tmp, "%10s: ", suit_name[suit] );
    letter = &tmp[12];
    for( card = 0; card < 13; card++ ) 
      if( is_set( deck->value, 13*suit+card ) )
        *letter++ = cards[card];
    strcat( letter, "\n\r" );
    send( tmp, ch );
    } 

  return;       
}