久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: 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.zg4o1577.cn/bbs/)

Powered by Discuz! X3.1

感谢您访问我们的网站，您可能还对以下资源感兴趣：

久久久久久久999|99精品久久精品一区二区爱城|成人欧美一区二区三区在线播放|国产精品日本一区二区不卡视频|国产午夜视频|欧美精品在线观看免费

主站蜘蛛池模板： 超碰人人人人 | 国内精品久久久久 | 国内精品在线视频 | 男女羞羞视频在线免费观看 | 99精品视频免费观看 | 91一区二区在线观看 | 日韩欧美国产精品 | 高清av一区 | 久久久久国产一区二区三区 | 日韩色在线 | 九九热在线观看视频 | 国产一区二区三区在线 | 亚洲入口| 国产精品污www一区二区三区 | 999免费观看视频 | 在线观看免费av片 | 午夜视频免费在线观看 | 亚洲毛片在线 | 日韩电影中文字幕在线观看 | 亚洲精品aⅴ | 日本三级电影免费观看 | 99色综合 | 欧美福利在线 | 精品一区二区三区视频在线观看 | 欧美精品在线免费观看 | 91亚洲国产成人久久精品网站 | 黄毛片 | 免费成人高清在线视频 | 国产高清在线观看 | 成人在线中文字幕 | 99热都是精品 | 国产精品国产精品国产专区不蜜 | 国产免费观看一级国产 | 久久av资源网 | 一级高清视频 | 成人欧美一区二区三区色青冈 | 91中文字幕在线 | 欧美在线观看黄色 | 伊人网国产 | av国产精品 | 欧美手机在线 |