欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 4005|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

51單片機(jī)+ILI9163 TFT設(shè)計(jì)的經(jīng)典懷舊游戲貪吃蛇源碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
利用51單片機(jī)設(shè)計(jì)經(jīng)典懷舊游戲貪吃蛇。


ILI9163液晶屏+單片機(jī)源程序如下:
  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. }
復(fù)制代碼
  1. /***********************************************************************************
  2. /* 文件名稱：        SNAKE.c
  3. /* 功         能：        貪吃蛇游戲代碼
  4. /* 署         名：        張先永(原作者)
  5. /* 時(shí)         間：        2009年10月11日
  6. /* 備         注：
  7. /*               游戲按鍵由于需要快速的響應(yīng)，所有按鍵通過線與擴(kuò)展為中斷按鍵
  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. //    使用結(jié)構(gòu)體定義變量   使程序的名稱更加的清楚
  20. //=================================================================
  21. struct
  22. {
  23.         uchar X;
  24.         uchar Y;                        
  25.         uchar Yes;
  26. }Food;        //食物結(jié)構(gòu)體

  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;                                        //蛇的分?jǐn)?shù)
  36.         uchar Level;                                        //蛇的等級(jí)              
  37. }Snake;        //蛇結(jié)構(gòu)體

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

  41. //=================================================================
  42. //函數(shù)功能：1ms延時(shí)函數(shù)
  43. //晶    振：11.0592        M
  44. //入口參數(shù)：n
  45. //出口參數(shù)：無
  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. //函數(shù)名稱：void Init_time0 (void)
  58. //函數(shù)功能：初始化定時(shí)器1  用于產(chǎn)生隨機(jī)數(shù)種子 ，用于放置實(shí)物
  59. //入口參數(shù)：無
  60. //出口參數(shù)：無
  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. //函數(shù)名稱：Trun_On_Point     Trun_Off_Point (uchar x,uchar y)
  80. //函數(shù)功能：點(diǎn)亮或者熄滅 一個(gè)點(diǎn)。用于顯示蛇身體
  81. //入口參數(shù)：無
  82. //出口參數(shù)：無
  83. //特別說明：此 Trun_On，函數(shù)換成其他的就可以兼容其他的液晶
  84. //          入8*8 點(diǎn)陣   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. //函數(shù)名稱：void Init_SNAKE(void)  
  98. //函數(shù)功能：繪制游戲界面，初始化游戲等級(jí)等參數(shù)
  99. //入口參數(shù)：無
  100. //出口參數(shù)：無
  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);//繪制一個(gè)矩形框, 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.         //***********初始化蛇參數(shù)********************//
  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. //函數(shù)名稱：void Display_dead(uchar i)
  135. //函數(shù)功能：顯示死亡界面
  136. //入口參數(shù)：無
  137. //出口參數(shù)：無
  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. //函數(shù)名稱：void Display_Pass(uchar i)
  152. //函數(shù)功能：顯示過關(guān)界面
  153. //入口參數(shù)：無
  154. //出口參數(shù)：無
  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. //函數(shù)名稱：void Run_SNAKE(void)
  169. //函數(shù)功能：蛇運(yùn)動(dòng)函數(shù) （游戲精華）
  170. //入口參數(shù)：無
  171. //出口參數(shù)：無
  172. //=================================================================
  173. void Run_SNAKE(void)
  174. {
  175.         uchar i=0;

  177.         /*********************根據(jù)按鍵選擇蛇的運(yùn)動(dòng)方向*******************/
  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; //蛇頭向你要求的方向移動(dòng)
  190.                
  191.                 for(i=0;i<Snake.Long;i++)                                    //這個(gè)讓蛇顯示出來的函數(shù)
  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; //蛇頭向你要求的方向移動(dòng)
  211.                
  212.                 for(i=0;i<Snake.Long;i++)                                    //這個(gè)讓蛇顯示出來的函數(shù)
  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; //蛇頭向你要求的方向移動(dòng)
  230.                
  231.                 for(i=0;i<Snake.Long;i++)                                   //這個(gè)讓蛇顯示出來的函數(shù)
  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; //蛇頭向你要求的方向移動(dòng)
  249.                
  250.                 for(i=0;i<Snake.Long;i++)                                   //這個(gè)讓蛇顯示出來的函數(shù)
  251.                 {
  252.                         Trun_On_Point(Snake.X[i],Snake.Y[i],0xaa);
  253.                 }
  254.                 Key_V_temp=Key_Down;
  255.         }
  256.         

  258.         /****************根據(jù)按鍵選擇蛇的運(yùn)動(dòng)程序結(jié)束*******************/
  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++)//從第三節(jié)開始判斷蛇頭是否咬到自己
  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.         /******************判斷蛇是否死亡程序結(jié)束***********************/
  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++;//蛇節(jié)數(shù)加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;  //食物標(biāo)志置1
  301.         }
  302. ……………………

  304. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼


所有資料51hei提供下載:
2.4 貪吃蛇實(shí)驗(yàn).rar (186.78 KB, 下載次數(shù): 26)


評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表