标题: 51单片机+ILI9163 TFT设计的经典怀旧游戏贪吃蛇源码 [打印本页]

---

作者: sjd    时间: 2018-6-1 09:36
标题: 51单片机+ILI9163 TFT设计的经典怀旧游戏贪吃蛇源码
利用51单片机设计经典怀旧游戏贪吃蛇。


ILI9163液晶屏+单片机源程序如下:

1. /**************************************************************************
   
2. 
   
3. mini80 或者 mini80E 按键，上 s6，下 s14，左 s11， 右 s9， s4 重新开始
   
4. 
   
5. 可以按照自己需要重新定义键盘扫描程序中的值，在key_sweep.h 中
   
6. 
   
7. 
   
8. ****************************************************************************/
   
9. 
   
10. #include "reg52.h"
    
11. #include "KEY_SWEEP.H"
    
12. #include "SNAKE.h"
    
13. #include "9325tp.h"
    
14. 
    
15. 
    
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. /***********************************************************************************/
   
10. 
    
11. #include <reg52.H>  
    
12. #include <KEY_SWEEP.H>
    
13. #include"9325tp.h"
    
14. #include "SNAKE.h"
    
15. 
    
16. 
    
17. #define uchar unsigned char
    
18. //=================================================================
    
19. //    使用结构体定义变量   使程序的名称更加的清楚
    
20. //=================================================================
    
21. struct
    
22. {
    
23.         uchar X;
    
24.         uchar Y;                        
    
25.         uchar Yes;
    
26. }Food;        //食物结构体
    
27. 
    
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;        //蛇结构体
    
38. 
    
39. uchar Key_V_temp=0;                                     //取出上次按键值
    
40. 
    
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. }
    
55. 
    
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. }
    
76. 
    
77. 
    
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. }
    
90. 
    
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. }
    
95. 
    
96. //=================================================================
    
97. //函数名称：void Init_SNAKE(void)  
    
98. //函数功能：绘制游戏界面，初始化游戏等级等参数
    
99. //入口参数：无
    
100. //出口参数：无
     
101. //=================================================================
     
102. void Init_SNAKE(void)   
     
103. {
     
104.         uchar i;
     
105. 
     
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);
     
114. 
     
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;
     
122. 
     
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. {
     
141. 
     
142.         LCD_PutString(10,40,"GAME OVER",0x00ff,0xBE5F);
     
143.         while(Key_Value!=Key_Enter)
     
144.              {
     
145.                   Key();
     
146.                  }
     
147.         Init_SNAKE();
     
148. }
     
149. 
     
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;
     
176. 
     
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]);                //先把蛇尾给熄灭掉
     
181. 
     
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.                 }
     
187. 
     
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.         }
     
197. 
     
198.         if((Key_Value==Key_Left&&Key_V_temp!=Key_Right)||(Key_Value==Key_Right&&Key_V_temp==Key_Left))
     
199.         {
     
200. 
     
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.         
     
257. 
     
258.         /****************根据按键选择蛇的运动程序结束*******************/
     
259.         /////////////////////////////////////////////////////////////////
     
260. 
     
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.         /////////////////////////////////////////////////////////////////
     
281. 
     
282. 
     
283.         /************************判断蛇是否最长了**********************/
     
284.         if(Snake.Long==SNAKE_Max_Long)
     
285.         {
     
286.                
     
287.                 Display_Pass();
     
288.         }
     
289.         /////////////////////////////////////////////////////////////////                                                                                   
     
290. 
     
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. ……………………
     
303. 
     
304. …………限于本文篇幅 余下代码请从51黑下载附件…………
     

复制代码

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

2018-6-1 09:36 上传

点击文件名下载附件
下载积分: 黑币 -5

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1