#define N 52
#include <graphics.h>
#include <stdlib.h>
void Init(void);/*图形驱动*/
void Close(void);/*图形关闭*/
void Play(void);/*发牌的具体过程*/
void Rand(int i,int j);/*随机发牌函数*/
void Sort();
void DrawPuke(int kind,int x,int y,char num);/*画牌*/
char p[4][13]=
      {{'2','3','4','5','6','7','8','9','0','J','Q','K','A'},
       {'2','3','4','5','6','7','8','9','0','J','Q','K','A'},
       {'2','3','4','5','6','7','8','9','0','J','Q','K','A'},
       {'2','3','4','5','6','7','8','9','0','J','Q','K','A'}};
/*10用0来表示*/
struct Pai
{
   char num;
   char kind;
   int realnum;
   int link;
}newp[52];
/****主函数*****/
void main(void)
{
   Init();/*初始化*/
   Play();
   getch();
   cleardevice(); /*清屏*/
   Sort(); /*排序*/
   Close(); /*关闭*/
   exit(0);
}
/**随机发牌函数，i和j代表行和列，共4行13列*/
void Rand(int i,int j)
{
   int kind,num;
   char n;
   randomize();/*随机种子数*/
   while(1)/*循环条件是可以有牌发为止*/
   {
      kind=random(4);/*生成4以内的随机数*/
      num=random(13); /*生成13以内的随机数*/
      if(p[kind][num]!=-1)/*牌发好以后相应位置的元素置-1*/
      {
     n=p[kind][num];/*从扑克牌中取数*/
     p[kind][num]=-1;
     newp[j*4+i].kind=kind;/*将牌的花色保存*/
     newp[j*4+i].num=n; /*将牌的面值符号保存*/
     newp[j*4+i].realnum=num; /*将牌的对应十进制数值保存*/
     break;
      }
   }
   DrawPuke(kind,i,j,n);/*显示牌*/
}
/*画牌函数，kind花色， i代表行，j代表列，num表示面值符号 */
void DrawPuke(int kind,int i,int j,char num)
{
   char str[3];
   bar(50+j*45-15,50+i*100-30,50+j*45+15,50+i*100+30);/*画空牌*/
   setcolor(BLUE);
   rectangle(50+j*45-13,50+i*100-28,50+j*45+13,50+i*100+28);
   switch(kind)/*花式的判断*/
   {
      case 0:setcolor(BLACK);sprintf(str,"%c",3);break;/* a黑桃*/
      case 1:setcolor(RED);sprintf(str,"%c",3);break;/* ?红心*/
      case 2:setcolor(RED);sprintf(str,"%c",4);break;/* ¨方块*/
      case 3:setcolor(BLACK);sprintf(str,"%c",5);break;/* §草花*/
   }
   settextstyle(0,0,1);
   outtextxy(50+j*45-11,50+i*100-26,str);/*显示牌的左上角花色*/
   outtextxy(50+j*45+5,50+i*100+20,str); /*显示牌的右下角花色*/
   if(num!='0')/*输出其它牌*/
   {
      settextstyle(0,0,2);
      sprintf(str,"%c",num);
      outtextxy(50+j*45-5,50+i*100-5,str);/*显示牌的大小*/
   }
   else/*输出10的时候*/
   {
      sprintf(str,"%d",10);
      outtextxy(50+j*45-6,50+i*100-5,str);
   }
}
void Play(void)/*发牌的具体过程*/
{
   int i,j;
   for(j=0;j<13;j++)
   {
      for(i=0;i<4;i++)
      {
     Rand(i,j);/*随机发牌*/
     delay(10000);/*延时*/
      }
   }
}
/*基数排序*/
void Sort()
{
   int i,j,k,t,p,f[13],e[13];
   for(i=0;i<N;i++) /*将52张牌链起来*/
      newp[i].link=i+1;
   newp[N-1].link=-1;
   for(i=0;i<4;i++)/*初始化队列*/
   {
      f[i]=-1;
      e[i]=0;
   }
   p=0; /*第一次分配*/
   do{
      k=newp[p].kind;
      if(f[k]==-1)
         f[k]=p;
      else
         newp[e[k]].link=p;
      e[k]=p;
      p=newp[p].link;
   }while(p!=-1);
   j=0;  /*第一次收集,将52张牌链接起来*/
   p=f[j];
   t=e[j];
   for(k=j+1;k<4;k++)
   {
      newp[t].link=f[k];
      t=e[k];
   }
   newp[t].link=-1;
   cleardevice();
   for(i=0;i<4;i++) /*输出第一次分配结果*/
   {
      p=f[i];
      for(j=0;j<13;j++)
      {
     DrawPuke(i, i, j,newp[p].num);
     p=newp[p].link;
      }
   }
   getch();
   cleardevice();
   p=f[0];/*保存第一次排序后数据的起始位置，进行第二次分配*/
   for(i=0;i<13;i++)/*初始化队列*/
   {
      f[i]=-1;
      e[i]=0;
   }
   do{
      k=newp[p].realnum;
      if(f[k]==-1)
     f[k]=p;
      else
     newp[e[k]].link=p;
      e[k]=p;
      p=newp[p].link;
   }while(p!=-1);
   j=0;  /*第二次收集,将52张牌链接起来*/
   p=f[j];
   t=e[j];
   for(k=j+1;k<13;k++)
   {
      newp[t].link=f[k];
      t=e[k];
   }
   newp[t].link=-1;
   for(j=0;j<13;j++) /*输出第二次分配结果*/
   {
      p=f[j];
      for(i=0;i<4;i++)
      {
     DrawPuke(i, i, j,newp[p].num);
     p=newp[p].link;
      }
   }
}
/*图形驱动*/
void Init(void)
{
   int gd=DETECT,gm;
   initgraph(&gd,&gm,"c:\\tc");
   cleardevice();
}
/*图形关闭*/
void Close(void)
{
   getch();
   closegraph();
}

评论