用c语言编写贪吃蛇

#include 
#include 
#include 
#include 
#define NULL 0
#define UP  18432
#define DOWN 20480
#define LEFT 19200
#define RIGHT 19712
#define ESC  283
#define ENTER 7181 
struct snake
{
     int centerx;
 int centery;
 int newx;
 int newy;
 struct snake *next;
};
struct snake *head;

int grade=60;                     /*控制速度的*******/
int a,b;                        /* 背静遮的 位置*/
void *far1,*far2,*far3,*far4;             /* 蛇身指针 背静遮的指针 虫子*/
int size1,size2,size3,size4;              /* **全局变量**/
int ch=RIGHT;                     /**************存按键 开始蛇的方向为RIGHT***********/
int chy=RIGHT; 
int flag=0;                       /*********判断是否退出游戏**************/
int control=4;                     /***********判断上次方向和下次方向不冲突***/
int nextshow=1;                     /*******控制下次蛇身是否显示***************/
int scenterx;                      /***************随即矩形中心坐标***************/
int scentery;
int sx;                         /*******在a b 未改变前 得到他们的值 保证随机矩形也不在此出现*******/
int sy;                
 
/************************蛇身初始化**************************/ 
void snakede()
{
     
 struct snake *p1,*p2;
 head=p1=p2=(struct snake *)malloc(sizeof(struct snake)); 
 p1->centerx=80;
 p1->newx=80;
 p1->centery=58;
 p1->newy=58;
 p1=(struct snake *)malloc(sizeof(struct snake));
 p2->next=p1;
 p1->centerx=58;
 p1->newx=58;
 p1->centery=58;
 p1->newy=58;
 p1->next=NULL;
}
/*******************end*******************/ 
void welcome()            /*************游戏开始界面　，可以选择　速度**********/                
{
      
 int key;
 int size;
 int x=240;
 int y=300;
 int f;
 void *buf; 
 setfillstyle(SOLID_FILL,BLUE);
 bar(98,100,112,125);
 setfillstyle(SOLID_FILL,RED);
 bar(98,112,112,114);
 setfillstyle(SOLID_FILL,GREEN);
 bar(100,100,110,125);
 size=imagesize(98,100,112,125);
 buf=malloc(size);
 getimage(98,100,112,125,buf);
 cleardevice();

 setfillstyle(SOLID_FILL,BLUE);
 bar(240,300,390,325);
 outtextxy(193,310,"speed:");
 setfillstyle(SOLID_FILL,RED);
 bar(240,312,390,314);
 setcolor(YELLOW);
 outtextxy(240,330,"DOWN");
 outtextxy(390,330,"UP");
 outtextxy(240,360,"ENTER to start..." ); 
 outtextxy(270,200,"SNAKE");
 fei(220,220);
 feiyang(280,220);
 yang(340,220); 
 putimage(x,y,buf,COPY_PUT); 
 setcolor(RED);
 rectangle(170,190,410,410);
 while(1)
 {
      if(bioskey(1))                      /********8选择速度部分************/
  key=bioskey(0);
  switch(key)
  {
       
    case ENTER:
   f=1;
   break;
    case DOWN:
    if(x>=240)
    {
      putimage(x-=2,y,buf,COPY_PUT);
   grade++;
   key=0;
   break;
    }
 case UP:
    if(x<=375)
    {
      putimage(x+=2,y,buf,COPY_PUT);
   grade--;
    key=0;
   break;
    } 
   }
   
   if (f==1)
   break; 
 }                           /********** end  ****************/ 
 

 free(buf);
 } 
 
/*************************随即矩形*****************/ 
/***********当nextshow 为1的时候才调用此函数**********/

void ran()
{
      int nx;
 int ny;
 int show;         /**********控制是否显示***********/
 int jump=0;
 struct snake *p;
 p=head;
 if(nextshow==1)      /***********是否开始随机产生***************/
  while(1)
  {
     show=1;
  randomize();
  nx=random(14);
  ny=random(14);
  scenterx=nx*22+58;
  scentery=ny*22+58;
   while(p!=NULL)
   {
     
    if(scenterx==p->centerx&&scentery==p->centery||scenterx==sx&&scentery==sy)
  {
     show=0;
  jump=1;
  break;
  }
    else
  p=p->next; 
   if(jump==1)
  break;
  }
 if(show==1)
  {
     putimage(scenterx-11,scentery-11,far3,COPY_PUT);
  nextshow=0;
  break;
  }

 }
}

/***********过关动画**************/ 
void donghua()
{
      int i;
 cleardevice();
 setbkcolor(BLACK);
 randomize();
 while(1)
 {
     for(i=0;i<=5;i++)
 {
     putpixel(random(640),random(80),13); 
  putpixel(random(640),random(80)+80,2); 
  putpixel(random(640),random(80)+160,3); 
  putpixel(random(640),random(80)+240,4);
  putpixel(random(640),random(80)+320,1);
  putpixel(random(640),random(80)+400,14);
 } 
  setcolor(YELLOW);
  settextstyle(0,0,4);
  outtextxy(130,200,"Wonderful!!");
  setfillstyle(SOLID_FILL,10);
  bar(240,398,375,420);
  feiyang(300,400);
  fei(250,400);
  yang(350,400);
  if(bioskey(1))
  if(bioskey(0)==ESC)
 {
     
      flag=1;
  break;
 }
 }
}

/*************************end************************/

/***********************初始化图形系统*********************/
void init()
{
     int a=DETECT,b;
 int i,j;
 initgraph(&a,&b,"");
}
/***************************end****************************/ 
 
/***画立体边框效果函数******/
void tline(int x1,int y1,int x2,int y2,int white,int black)
{
      setcolor(white);
 line(x1,y1,x2,y1);
 line(x1,y1,x1,y2);
 setcolor(black);
 line(x2,y1,x2,y2);
 line(x1,y2,x2,y2);
 } 
/****end*********/

/*************飞洋标志**********/ 
int feiyang(int x,int y) 
{
     int feiyang[18][18]={
      {
     0,0,0,0,0,0,1,1,1,1,1,1,0,1,1,0,0,0},
 {
     0,0,0,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0},
 {
     0,0,0,0,1,1,1,0,0,0,0,0,1,1,1,0,0,0},
 {
     0,0,0,1,1,1,0,0,0,0,0,0,0,1,1,0,0,0},
 {
     0,0,0,1,1,0,0,0,0,0,0,1,1,0,0,0,0,0},
 {
     0,0,1,1,0,0,0,0,0,0,1,1,1,0,0,0,0,0},
 {
     0,0,1,1,0,1,1,1,1,1,1,0,0,0,0,0,0,0},
 {
     0,0,1,1,1,1,1,0,0,1,0,0,1,1,0,0,0,0},
 {
     0,0,1,1,1,0,0,0,0,1,0,1,1,1,0,0,0,0},
 {
     0,0,1,1,0,1,1,1,0,1,1,1,0,0,0,0,0,0},
 {
     0,0,1,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0},
 {
     0,0,1,1,0,0,0,1,1,0,0,1,1,0,0,1,0,0},
 {
     0,0,1,1,1,0,0,1,1,0,0,1,1,0,0,1,0,0},
 {
     0,0,1,1,1,1,0,1,1,1,1,1,1,0,1,1,0,0},
 {
     0,0,0,1,1,1,0,1,1,1,1,1,0,0,1,0,0,0},
 {
     0,0,0,0,1,1,1,0,0,0,0,0,0,1,1,0,0,0},
 {
     0,0,0,0,0,1,1,1,0,0,0,0,1,1,0,0,0,0},
 {
     0,0,0,0,0,1,1,1,1,1,1,1,1,0,0,0,0,0}};
 int i,j;
for(i=0;i<=17;i++)
 for(j=0;j<=17;j++)
 {
     if (feiyang[i][j]==1)
 putpixel(j+x,i+y,RED);
 }
}

/********"飞"字*************/ 
int fei(int x,int y)
{
     int fei[18][18]={
     {
     1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
{
     0,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0},
 {
     0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,1,1,0,1,1,1,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0},
 {
     0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0},
 {
     0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,1,1},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0},
 {
     0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0}};
int i,j;
for(i=0;i<=17;i++)
  for(j=0;j<=17;j++)
  {
     if (fei[i][j]==1)
    putpixel(j+x,i+y,BLUE);
  }
} 
 
/*********"洋"字**************/ 
 
int yang(int x,int y)
{
     
int yang[18][18]={
     {
     0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0},
{
     1,1,0,0,0,0,1,1,1,0,0,0,1,1,0,0,0,0},
{
     0,1,1,1,0,0,0,1,1,1,0,1,1,0,0,0,0,0},
{
     0,0,1,1,0,0,0,0,0,1,1,1,0,0,0,1,0,0},
{
     0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0},
{
     0,0,0,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     1,1,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     0,1,1,1,0,0,0,0,0,0,1,0,0,1,0,0,0,0},
{
     0,0,1,1,0,0,0,1,1,1,1,1,1,1,1,0,0,0},
{
     0,0,0,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     0,0,0,1,0,0,1,0,0,0,1,0,0,0,0,0,0,0},
{
     0,0,0,0,0,1,1,0,0,0,1,0,0,0,0,1,1,0},
{
     0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1},
{
     0,0,0,1,1,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     1,1,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     0,1,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0},
{
     0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0}}; 
int i,j;
  for(i=0;i<=17;i++)
    for(j=0;j<=17;j++)
      {
     if (yang[i][j]==1)
         putpixel(j+x,i+y,BLUE);
       } 
 } 
 

/******************主场景**********************/
int bort()
{
      int a;
 setfillstyle(SOLID_FILL,15);
 bar(49,49,71,71);
 setfillstyle(SOLID_FILL,BLUE);
 bar(50,50,70,70);
 size1=imagesize(49,49,71,71);
 far1=(void *)malloc(size1);
 getimage(49,49,71,71,far1);
 cleardevice(); 
 setfillstyle(SOLID_FILL,12);
 bar(49,49,71,71);
 size2=imagesize(49,49,71,71);
 far2=(void *)malloc(size2);
 getimage(49,49,71,71,far2);
 setfillstyle(SOLID_FILL,12);
 bar(49,49,71,71);
 setfillstyle(SOLID_FILL,GREEN);
 bar(50,50,70,70);
 size3=imagesize(49,49,71,71);
 far3=(void *)malloc(size3);
 getimage(49,49,71,71,far3);
 cleardevice();                    /*取蛇身节点  背景节点 虫子节点end*/
 setbkcolor(8);
 setfillstyle(SOLID_FILL,GREEN);
 bar(21,23,600,450);
 tline(21,23,600,450,15,8);              /***开始游戏场景边框 立体效果*******/
 tline(23,25,598,448,15,8);
 tline(45,45,379,379,8,15);
 tline(43,43,381,381,8,15);
 tline(390,43,580,430,8,15);
 tline(392,45,578,428,8,15);
 tline(412,65,462,85,15,8);
 tline(410,63,464,87,15,8);
 tline(410,92,555,390,15,8);
 tline(412,94,553,388,15,8);
 tline(431,397,540,420,15,8);
 tline(429,395,542,422,15,8);
 tline(46,386,377,428,8,15);
 tline(44,384,379,430,8,15); 
 setcolor(8);
 outtextxy(429,109,"press ENTER ");
 outtextxy(429,129,"---to start");     /*键盘控制说明*/
 outtextxy(429,169,"press ESC ");
 outtextxy(429,189,"---to quiet");
 outtextxy(469,249,"UP");
 outtextxy(429,289,"LEFT");
 outtextxy(465,329,"DOWN");
 outtextxy(509,289,"RIGHT");
 setcolor(15);
 outtextxy(425,105,"press ENTER ");
 outtextxy(425,125,"---to start");
 outtextxy(425,165,"press ESC ");
 outtextxy(425,185,"---to quiet");
 outtextxy(465,245,"UP");
 outtextxy(425,285,"LEFT");
 outtextxy(461,325,"DOWN");
 outtextxy(505,285,"RIGHT");       /*******end*************/ 
 
 setcolor(8);
 outtextxy(411,52,"score");
 outtextxy(514,52,"left");
 setcolor(15);
 outtextxy(407,48,"score");
 outtextxy(510,48,"left");

 size4=imagesize(409,62,465,88);       /****分数框放到内存********/
 far4=(void *)malloc(size4);
 getimage(409,62,465,88,far4);
 putimage(500,62,far4,COPY_PUT);      /*******输出生命框***********/
 setfillstyle(SOLID_FILL,12);
 setcolor(RED);
 outtextxy(415,70,"0");         /***************输入分数为零**********/
  outtextxy(512,70,"20");          /*************显示还要吃 的虫子的数目*********/
  bar(46,46,378,378);
  feiyang(475,400);
  fei(450,400);
  yang(500,400);
  outtextxy(58,390,"mailto:[email protected]");
  outtextxy(58,410,"snake game");
  outtextxy(200,410,"made by yefeng");
 while(1)
 {
      if(bioskey(1))
  a=bioskey(0);
  if(a==ENTER)
 break;
 }

}
/******************gameover()******************/

 void gameover()
{
      char *p="GAME OVER";
 int cha; 
 setcolor(YELLOW);
 settextstyle(0,0,6);
 outtextxy(100,200,p);

  while(1)
 {
     if(bioskey(1))
  cha=bioskey(0);
  if(cha==ESC)
  {
     flag=1;
  break;
  }
 } 
 
 
 

}
/***********显示蛇身**********************/
void snakepaint()
{
     struct snake *p1; 
 p1=head;
 putimage(a-11,b-11,far2,COPY_PUT);
 while(p1!=NULL) 
 {
     putimage(p1->newx-11,p1->newy-11,far1,COPY_PUT);
 p1=p1->next;
 } 
}
/****************end**********************/ 
/*********************蛇身刷新变化 游戏关键部分 *******************/ 
void snakechange()
{
     struct snake *p1,*p2,*p3,*p4,*p5;
 int i,j; 
 static int n=0;
 static int score;
 static int left=20;
 char sscore[5];
 char sleft[1];
 p2=p1=head;
 while(p1!=NULL)
 {
      p1=p1->next;
  if(p1->next==NULL)
  {
     a=p1->newx;
  b=p1->newy;           /************记录最后节点的坐标************/
  sx=a;
  sy=b;
  }
  p1->newx=p2->centerx;
  p1->newy=p2->centery;
  p2=p1;
 }
p1=head;
while(p1!=NULL)
{
     p1->centerx=p1->newx;
 p1->centery=p1->newy;
 p1=p1->next;
}

/********判断按键方向*******/ 
if(bioskey(1))
 {
      ch=bioskey(0);
   if(ch!=RIGHT&&ch!=LEFT&&ch!=UP&&ch!=DOWN&&ch!=ESC)   /********chy为上一次的方向*********/
   ch=chy;
 } 
 switch(ch)
 {
     
  case LEFT: if(control!=4)
 {
     head->newx=head->newx-22;
         head->centerx=head->newx;
  control=2;
  if(head->newx<47)
         gameover(); 
     }
        else
     {
      head->newx=head->newx+22;
          head->centerx=head->newx;
   control=4;
   if(head->newx>377)
   gameover();
     }
  chy=ch;
  break; 
  case DOWN:
        if(control!=1)
     {
      head->newy=head->newy+22;
          head->centery=head->newy;
   control=3;
   if(head->newy>377)
   gameover();
         }
         else
       {
      head->newy=head->newy-22;
    head->centery=head->newy;
           control=1;
    if(head->newy<47)
    gameover();
          }
         chy=ch;
         break; 
  case RIGHT: if(control!=2)
  {
      head->newx=head->newx+22;
          head->centerx=head->newx;
          control=4;
   if(head->newx>377)
      gameover();
         }
         else
      {
      head->newx=head->newx-22;
          head->centerx=head->newx;
          control=2;
   if(head->newx<47)
   gameover();
  }
         chy=ch;
         break;
  case UP: if(control!=3)
    {
      head->newy=head->newy-22;
        head->centery=head->newy;
        control=1;
    if(head->newy<47)
    gameover();
       }
       else
    {
      head->newy=head->newy+22;
        head->centery=head->newy;
        control=3;
 if(head->newy>377)
        gameover();
        }
        chy=ch;
        break; 
 

  case ESC:
       flag=1;
       break;
 } 
 

/* if 判断是否吃蛇*/ 
if(flag!=1)
{
      if(head->newx==scenterx&&head->newy==scentery)
 {
      p3=head;
   while(p3!=NULL)
   {
      p4=p3;
 p3=p3->next;
   }
  p3=(struct snake *)malloc(sizeof(struct snake));
  p4->next=p3;
  p3->centerx=a;
  p3->newx=a;
  p3->centery=b;
  p3->newy=b;
  p3->next=NULL; 
  a=500;
  b=500;
  putimage(409,62,far4,COPY_PUT);  /********** 分数框挡住**************/
  putimage(500,62,far4,COPY_PUT);  /*********把以前的剩下虫子的框挡住********/
  score=(++n)*100;
  left--;
  itoa(score,sscore,10);
  itoa(left,sleft,10);
  setcolor(RED);
  outtextxy(415,70,sscore);
  outtextxy(512,70,sleft);
  nextshow=1;
  if(left==0)           /************判断是否过关**********/
  donghua();             /*******如果过关，播放过关动画*********************/ 
 }
 p5=head;       /*********************判断是否自杀***************************/
 p5=p5->next;
 p5=p5->next;
 p5=p5->next;
 p5=p5->next;      /****从第五个节点判断是否自杀************/
 while(p5!=NULL)
 {
     if(head->newx==p5->centerx&&head->newy==p5->centery)
  {
      gameover();
    break;
  }
   else
  p5=p5->next;
 }
 }
} 
/************snakechange()函数结束*******************/ 
 
 
 

/*****************************主函数******************************************/
int main()
{
      int i;
 init();       /**********初始化图形系统**********/
 welcome();      /*********8欢迎界面**************/
 bort();       /*********主场景***************/
 snakede();      /**********连表初始化**********/
 while(1)
 {
      snakechange();
  if(flag==1)
  break;
  snakepaint();
  ran();
  for(i=0;i<=grade;i++)
  delay(3000);
  }
 free(far1);
 free(far2);
 free(far3);
 free(far4);
 closegraph();
 return 0; 
}