设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机+ILI9163 TFT设计的经典怀旧游戏贪吃蛇源码
返回列表 发新帖
查看: 3555|回复: 0
收起左侧

51单片机+ILI9163 TFT设计的经典怀旧游戏贪吃蛇源码

[复制链接]
ID:342671 发表于 2018-6-1 09:36 | 显示全部楼层 |阅读模式
利用51单片机设计经典怀旧游戏贪吃蛇。

0.png
ILI9163液晶屏+单片机源程序如下:
  1. /**************************************************************************

  3. mini80 或者 mini80E 按键，上 s6，下 s14，左 s11， 右 s9， s4 重新开始

  5. 可以按照自己需要重新定义键盘扫描程序中的值，在key_sweep.h 中


  8. ****************************************************************************/

  10. #include "reg52.h"
  11. #include "KEY_SWEEP.H"
  12. #include "SNAKE.h"
  13. #include "9325tp.h"


  16. //=========================================主程序========================================//
  17. main()
  18. {
  19.      ILI9325_Initial();
  20.         Init_SNAKE();
  21.         while(1)
  22.         {
  23.         Run_SNAKE();
  24.         Key();
  25.         }
  26. }
复制代码
  1. /***********************************************************************************
  2. /* 文件名称：        SNAKE.c
  3. /* 功         能：        贪吃蛇游戏代码
  4. /* 署         名：        张先永(原作者)
  5. /* 时         间：        2009年10月11日
  6. /* 备         注：
  7. /*               游戏按键由于需要快速的响应，所有按键通过线与扩展为中断按键
  8. /*               LCD 液晶显示器在PO口 需要上拉电阻
  9. /***********************************************************************************/

  11. #include <reg52.H>  
  12. #include <KEY_SWEEP.H>
  13. #include"9325tp.h"
  14. #include "SNAKE.h"


  17. #define uchar unsigned char
  18. //=================================================================
  19. //    使用结构体定义变量   使程序的名称更加的清楚
  20. //=================================================================
  21. struct
  22. {
  23.         uchar X;
  24.         uchar Y;                        
  25.         uchar Yes;
  26. }Food;        //食物结构体

  28. #define SNAKE_Max_Long 20                 //最大长度
  29. struct
  30. {
  31.         uchar X[SNAKE_Max_Long];
  32.         uchar Y[SNAKE_Max_Long];
  33.         uchar Long;  
  34.         uchar Life;
  35.         uchar Score;                                        //蛇的分数
  36.         uchar Level;                                        //蛇的等级              
  37. }Snake;        //蛇结构体

  39. uchar Key_V_temp=0;                                     //取出上次按键值

  41. //=================================================================
  42. //函数功能：1ms延时函数
  43. //晶    振：11.0592        M
  44. //入口参数：n
  45. //出口参数：无
  46. //=================================================================
  47. void Delay_1mS(unsigned int n)
  48. {
  49.         unsigned int  i;
  50.         unsigned char j;
  51.         
  52.         for(i=0;i<n;i++)
  53.                 for(j=0;j<120;j++)         ;
  54. }

  56. //=================================================================
  57. //函数名称：void Init_time0 (void)
  58. //函数功能：初始化定时器1  用于产生随机数种子 ，用于放置实物
  59. //入口参数：无
  60. //出口参数：无
  61. //=================================================================
  62. void Init_time0 (void)
  63. {
  64.         EA=1;
  65.         ET1=1;
  66.         TMOD|=0x10;
  67.         TH1=0X00;
  68.         TL1=0X00;
  69.         TR1=1;
  70. }
  71. void time1 (void) interrupt  3
  72. {
  73.         TH1=0X00;
  74.         TL1=0X00;
  75. }


  78. //=================================================================
  79. //函数名称：Trun_On_Point     Trun_Off_Point (uchar x,uchar y)
  80. //函数功能：点亮或者熄灭 一个点。用于显示蛇身体
  81. //入口参数：无
  82. //出口参数：无
  83. //特别说明：此 Trun_On，函数换成其他的就可以兼容其他的液晶
  84. //          入8*8 点阵   12864 等
  85. //=================================================================
  86. void Trun_On_Point (uchar x,uchar y,uchar color)
  87. {
  88.         Bar((4*(x+2)),(4*(y+2)),(4*(x+3)),(4*(y+3)),color);
  89. }

  91. void Trun_Off_Point (uchar x,uchar y)
  92. {
  93.         Bar((4*(x+2)),(4*(y+2)),(4*(x+3)),(4*(y+3)),0xBE5F);        
  94. }

  96. //=================================================================
  97. //函数名称：void Init_SNAKE(void)  
  98. //函数功能：绘制游戏界面，初始化游戏等级等参数
  99. //入口参数：无
  100. //出口参数：无
  101. //=================================================================
  102. void Init_SNAKE(void)   
  103. {
  104.         uchar i;

  106.         Init_time0();
  107.         //***********绘制游戏界面********************//
  108.         CLR_Screen(0xBE5F);
  109.         Rectangle(8,8-1,85,120,0xaa);//绘制一个矩形框, 0-127
  110.          LCD_PutString(88,8,"Score",0x00ff,0xBE5F);
  111.         LCDShow_uCharNumber(96,24,Snake.Score,0x00ff,0xBE5F);
  112.          LCD_PutString(88,81,"LEVEL",0x00ff,0xBE5F);
  113.         LCDShow_uCharNumber(96,97,Snake.Level,0x00ff,0xBE5F);

  115.         //***********初始化蛇参数********************//
  116.         Snake.Long=2;                                    //定义初始化蛇的长度
  117.         Snake.Life=0;                                    //初始化蛇还活着
  118.         Snake.Score=0;
  119.         Food.Yes=1;                                       
  120.         Key_Value=0;
  121.     Key_V_temp=0;

  123.         for(i=0;i<Snake.Long;i++)                //将蛇给赋值
  124.         {
  125.                 Snake.X[i]=i+2;
  126.                 Snake.Y[i]=2;
  127.         }                                                        
  128.         for(i=0;i<Snake.Long;i++)                //将蛇给画出来
  129.         {
  130.                 Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  131.         }                                                        
  132. }
  133. //=================================================================
  134. //函数名称：void Display_dead(uchar i)
  135. //函数功能：显示死亡界面
  136. //入口参数：无
  137. //出口参数：无
  138. //=================================================================
  139. void Display_dead(void)
  140. {

  142.         LCD_PutString(10,40,"GAME OVER",0x00ff,0xBE5F);
  143.         while(Key_Value!=Key_Enter)
  144.              {
  145.                   Key();
  146.                  }
  147.         Init_SNAKE();
  148. }

  150. //=================================================================
  151. //函数名称：void Display_Pass(uchar i)
  152. //函数功能：显示过关界面
  153. //入口参数：无
  154. //出口参数：无
  155. //=================================================================
  156. void Display_Pass(void)
  157. {
  158.         Snake.Level++;        
  159.         LCD_PutString(18,40,"You are",0xcc88,0xBE5F);
  160.         LCD_PutString(34,56,"WIN!",0xcc88,0xBE5F);
  161.         while(Key_Value!=Key_Enter)
  162.              {
  163.                   Key();
  164.                  }
  165.         Init_SNAKE();
  166. }
  167. //=================================================================
  168. //函数名称：void Run_SNAKE(void)
  169. //函数功能：蛇运动函数 （游戏精华）
  170. //入口参数：无
  171. //出口参数：无
  172. //=================================================================
  173. void Run_SNAKE(void)
  174. {
  175.         uchar i=0;

  177.         /*********************根据按键选择蛇的运动方向*******************/
  178.         if((Key_Value==Key_Right&&Key_V_temp!=Key_Left)||(Key_Value==Key_Left&&Key_V_temp==Key_Right))
  179.         {
  180.                 Trun_Off_Point(Snake.X[0],Snake.Y[0]);                //先把蛇尾给熄灭掉

  182.                 for(i=0;i<Snake.Long-1;i++)                    //蛇身都是它前一段的蛇身的位置
  183.                 {
  184.                         Snake.X[i]=Snake.X[i+1];
  185.                         Snake.Y[i]=Snake.Y[i+1];
  186.                 }

  188.                 Snake.X[Snake.Long-1]=Snake.X[Snake.Long-2]+1;
  189.                 Snake.Y[Snake.Long-1]=Snake.Y[Snake.Long-2]+0; //蛇头向你要求的方向移动
  190.                
  191.                 for(i=0;i<Snake.Long;i++)                                    //这个让蛇显示出来的函数
  192.                 {
  193.                         Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  194.                 }
  195.                 Key_V_temp=Key_Right;
  196.         }

  198.         if((Key_Value==Key_Left&&Key_V_temp!=Key_Right)||(Key_Value==Key_Right&&Key_V_temp==Key_Left))
  199.         {

  201.                 Trun_Off_Point(Snake.X[0],Snake.Y[0]);                    //先把蛇尾给熄灭掉
  202.                
  203.                 for(i=0;i<Snake.Long-1;i++)                     //蛇身都是它前一段的蛇身的位置
  204.                 {
  205.                         Snake.X[i]=Snake.X[i+1];
  206.                         Snake.Y[i]=Snake.Y[i+1];
  207.                 }
  208.                
  209.                 Snake.X[Snake.Long-1]=Snake.X[Snake.Long-2]-1;
  210.                 Snake.Y[Snake.Long-1]=Snake.Y[Snake.Long-2]+0; //蛇头向你要求的方向移动
  211.                
  212.                 for(i=0;i<Snake.Long;i++)                                    //这个让蛇显示出来的函数
  213.                 {
  214.                         Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  215.                 }
  216.                 Key_V_temp=Key_Left;
  217.         }
  218.         if(( Key_Value==Key_Up&&Key_V_temp!=Key_Down)||( Key_Value==Key_Down&&Key_V_temp==Key_Up))
  219.         {
  220.                 Trun_Off_Point(Snake.X[0],Snake.Y[0]);                   //先把蛇尾给熄灭掉
  221.                
  222.                 for(i=0;i<Snake.Long-1;i++)                   //蛇身都是它前一段的蛇身的位置
  223.                 {
  224.                         Snake.X[i]=Snake.X[i+1];
  225.                         Snake.Y[i]=Snake.Y[i+1];
  226.                 }
  227.                
  228.                 Snake.X[Snake.Long-1]=Snake.X[Snake.Long-2]+0;
  229.                 Snake.Y[Snake.Long-1]=Snake.Y[Snake.Long-2]-1; //蛇头向你要求的方向移动
  230.                
  231.                 for(i=0;i<Snake.Long;i++)                                   //这个让蛇显示出来的函数
  232.                 {
  233.                         Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  234.                 }
  235.                 Key_V_temp=Key_Up;
  236.         }
  237.         if(( Key_Value==Key_Down&&Key_V_temp!=Key_Up)||( Key_Value==Key_Up&&Key_V_temp==Key_Down))
  238.         {
  239.                 Trun_Off_Point(Snake.X[0],Snake.Y[0]);                  //先把蛇尾给熄灭掉
  240.                
  241.                 for(i=0;i<Snake.Long-1;i++)                  //蛇身都是它前一段的蛇身的位置
  242.                 {
  243.                         Snake.X[i]=Snake.X[i+1];
  244.                         Snake.Y[i]=Snake.Y[i+1];
  245.                 }
  246.                
  247.                 Snake.X[Snake.Long-1]=Snake.X[Snake.Long-2]+0;
  248.                 Snake.Y[Snake.Long-1]=Snake.Y[Snake.Long-2]+1; //蛇头向你要求的方向移动
  249.                
  250.                 for(i=0;i<Snake.Long;i++)                                   //这个让蛇显示出来的函数
  251.                 {
  252.                         Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  253.                 }
  254.                 Key_V_temp=Key_Down;
  255.         }
  256.         

  258.         /****************根据按键选择蛇的运动程序结束*******************/
  259.         /////////////////////////////////////////////////////////////////

  261.         
  262.         /************************判断蛇是否死亡***********************/
  263.         if(Snake.X[Snake.Long-1]>=19||Snake.Y[Snake.Long-1]>=28)//判蛇头是否撞到墙壁
  264.         {
  265.                 Snake.Life=1;
  266.         }
  267.         for(i=3;i<Snake.Long;i++)//从第三节开始判断蛇头是否咬到自己
  268.         {
  269.                 if(Snake.X[i]==Snake.X[0]&&Snake.Y[i]==Snake.Y[0])
  270.                 {
  271.                         Snake.Life=1;
  272.                 }
  273.         }
  274.         if(Snake.Life==1)          //if the snake over
  275.         {
  276.                
  277.                 Display_dead();
  278.         }
  279.         /******************判断蛇是否死亡程序结束***********************/
  280.         /////////////////////////////////////////////////////////////////


  283.         /************************判断蛇是否最长了**********************/
  284.         if(Snake.Long==SNAKE_Max_Long)
  285.         {
  286.                
  287.                 Display_Pass();
  288.         }
  289.         /////////////////////////////////////////////////////////////////                                                                                   

  291.         /*************************判蛇是否吃到食物**********************/               
  292.         if(Snake.X[Snake.Long-1]==Food.X&&Snake.Y[Snake.Long-1]==Food.Y)//
  293.         {
  294.                 //Trun_Off_Point(Food.X,Food.Y);                  //消隐食物
  295.                 Snake.Long++;//蛇节数加1
  296.                 Snake.X[Snake.Long-1]=Food.X;
  297.                 Snake.Y[Snake.Long-1]=Food.Y;
  298.                 Snake.Score+=10;
  299.                 LCDShow_uCharNumber(96,24,Snake.Score,0x00ff,0xBE5F);
  300.                 Food.Yes=1;  //食物标志置1
  301.         }
  302. ……………………

  304. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码


所有资料51hei提供下载:
2.4 贪吃蛇实验.rar (186.78 KB, 下载次数: 26)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表