STM32貪吃蛇游戲.doc

本人移植的STM32貪吃蛇游戲，親測(cè)可行，以下為貪吃蛇驅(qū)動(dòng)snake.c與snake.h,還有main.c，希望能對(duì)大家有點(diǎn)幫助。/*snake.c*/#include SNAKE.h#include lcd.h#include key.h/#include stdlib.h#include delay.hu8 Key_V_temp=0; /取出上次按鍵值u8 Key_Value=0; /取出上次按鍵值 /=/ 使用結(jié)構(gòu)體定義變量 使程序的名稱更加的清楚/=struct u8 X;u8 Y; u8 Yes;Food;/食物結(jié)構(gòu)體#define SNAKE_Max_Long 10 /最大長(zhǎng)度struct u8 XSNAKE_Max_Long;u8 YSNAKE_Max_Long;u8 Long; u8 Life; u8 Score;/蛇的分?jǐn)?shù)u8 Level;/蛇的等級(jí) Snake;/蛇結(jié)構(gòu)體/=/函數(shù)名稱：Trun_On_Point Trun_Off_Point (u8 x,u8 y)/函數(shù)功能：點(diǎn)亮或者熄滅 一個(gè)點(diǎn)。用于顯示蛇身體/入口參數(shù)：無(wú)/出口參數(shù)：無(wú)/特別說(shuō)明：此 Trun_On，函數(shù)換成其他的就可以兼容其他的液晶/ 入8*8 點(diǎn)陣 12864 等/=void Trun_On_Point (u8 x,u8 y)LCD_Fill(u16)(x*8),(u16)(y*8),(u16)(x*8+8),(u16)(y*8+8),RED);void Trun_Off_Point (u8 x,u8 y)LCD_Fill(u16)(x*8),(u16)(y*8),(u16)(x*8+8),(u16)(y*8+8),BLACK);/=/函數(shù)名稱：void Init_SNAKE(void) /函數(shù)功能：繪制游戲界面，初始化游戲等級(jí)等參數(shù)/入口參數(shù)：無(wú)/出口參數(shù)：無(wú)/=void Init_SNAKE(void) u8 i;POINT_COLOR=WHITE;/畫筆顏色BACK_COLOR=BLACK; /背景色 /*繪制游戲界面*/LCD_Fill(0,0,8,280,DARKBLUE);/Rectangle(8,8-1,85,120,0xaa);/繪制一個(gè)矩形框, 0-127LCD_Fill(232,0,240,280,DARKBLUE);/LCD_Fill(0,0,240,8,DARKBLUE);/LCD_Fill(0,272,240,280,DARKBLUE);/ LCD_ShowString(0,280,200,16,16,Score);/Show ScoreLCD_ShowString(0,300,200,16,16,LEVEL);/Show LevelLCD_ShowNum(50,280,(u32)Snake.Score,4,16);LCD_ShowNum(50,300,(u32)Snake.Level,4,16);/LCDShow_u8Number(96,97,Snake.Level,0x00ff,0xBE5F);/*初始化蛇參數(shù)*/Snake.Long=2; /定義初始化蛇的長(zhǎng)度Snake.Life=0; /初始化蛇還活著Snake.Score=0;Food.Yes=1;Key_Value=0; Key_V_temp=0;for(i=0;iSnake.Long;i+)/將蛇給賦值Snake.Xi=i+14;Snake.Yi=17;for(i=0;iSnake.Long;i+)/將蛇給畫出來(lái)Trun_On_Point(Snake.Xi,Snake.Yi);/=/函數(shù)名稱：void Display_dead(u8 i) /函數(shù)功能：顯示死亡界面/入口參數(shù)：無(wú)/出口參數(shù)：無(wú)/=void Display_dead(void)LCD_Clear(BLACK);LCD_Fill(0,0,8,280,DARKBLUE);/Rectangle(8,8-1,85,120,0xaa);/繪制一個(gè)矩形框, 0-127LCD_Fill(232,0,240,280,DARKBLUE);/LCD_Fill(0,0,240,8,DARKBLUE);/LCD_Fill(0,272,240,280,DARKBLUE);/LCD_ShowString(0,280,200,16,16,GAME OVER! );LCD_ShowString(0,300,200,16,16,PRESS ENTER TO RESTART); while(Key_Value!=KEY_DOWN) Key_Value=KEY_Scan(0); LCD_Clear(BLACK);Init_SNAKE();/=/函數(shù)名稱：void Display_Pass(u8 i)/函數(shù)功能：顯示過(guò)關(guān)界面/入口參數(shù)：無(wú)/出口參數(shù)：無(wú)/=void Display_Pass(void)Snake.Level+;LCD_Clear(BLACK);LCD_Fill(0,0,8,280,DARKBLUE);/Rectangle(8,8-1,85,120,0xaa);/繪制一個(gè)矩形框, 0-127LCD_Fill(232,0,240,280,DARKBLUE);/LCD_Fill(0,0,240,8,DARKBLUE);/LCD_Fill(0,272,240,280,DARKBLUE);/ LCD_ShowString(0,280,200,16,16,YOU ARE WIN!);LCD_ShowString(0,300,200,16,16,PRESS ENTER TO CONTINUE); while(Key_Value!=KEY_DOWN) Key_Value=KEY_Scan(0); LCD_Clear(BLACK);Init_SNAKE();/=/函數(shù)名稱：void Run_SNAKE(void)/函數(shù)功能：蛇運(yùn)動(dòng)函數(shù) （游戲精華）/入口參數(shù)：無(wú)/出口參數(shù)：無(wú)/=void Run_SNAKE(void)u8 i=0;/*根據(jù)按鍵選擇蛇的運(yùn)動(dòng)方向*/if(Key_Value=KEY_RIGHT&Key_V_temp!=KEY_LEFT)|(Key_Value=KEY_LEFT&Key_V_temp=KEY_RIGHT)Trun_Off_Point(Snake.X0,Snake.Y0); /先把蛇尾給熄滅掉 for(i=0;iSnake.Long-1;i+) /蛇身都是它前一段的蛇身的位置Snake.Xi=Snake.Xi+1;Snake.Yi=Snake.Yi+1; Snake.XSnake.Long-1=Snake.XSnake.Long-2+1;Snake.YSnake.Long-1=Snake.YSnake.Long-2+0; /蛇頭向你要求的方向移動(dòng)for(i=0;iSnake.Long;i+) /這個(gè)讓蛇顯示出來(lái)的函數(shù)Trun_On_Point(Snake.Xi,Snake.Yi);Key_V_temp=KEY_RIGHT;if(Key_Value=KEY_LEFT&Key_V_temp!=KEY_RIGHT)|(Key_Value=KEY_RIGHT&Key_V_temp=KEY_LEFT)Trun_Off_Point(Snake.X0,Snake.Y0); /先把蛇尾給熄滅掉 for(i=0;iSnake.Long-1;i+) /蛇身都是它前一段的蛇身的位置Snake.Xi=Snake.Xi+1;Snake.Yi=Snake.Yi+1; Snake.XSnake.Long-1=Snake.XSnake.Long-2-1;Snake.YSnake.Long-1=Snake.YSnake.Long-2+0; /蛇頭向你要求的方向移動(dòng)for(i=0;iSnake.Long;i+) /這個(gè)讓蛇顯示出來(lái)的函數(shù)Trun_On_Point(Snake.Xi,Snake.Yi);Key_V_temp=KEY_LEFT;if( Key_Value=KEY_UP&Key_V_temp!=KEY_DOWN)|( Key_Value=KEY_DOWN&Key_V_temp=KEY_UP)Trun_Off_Point(Snake.X0,Snake.Y0); /先把蛇尾給熄滅掉 for(i=0;iSnake.Long-1;i+) /蛇身都是它前一段的蛇身的位置Snake.Xi=Snake.Xi+1;Snake.Yi=Snake.Yi+1; Snake.XSnake.Long-1=Snake.XSnake.Long-2+0;Snake.YSnake.Long-1=Snake.YSnake.Long-2-1; /蛇頭向你要求的方向移動(dòng)for(i=0;iSnake.Long;i+) /這個(gè)讓蛇顯示出來(lái)的函數(shù)Trun_On_Point(Snake.Xi,Snake.Yi);Key_V_temp=KEY_UP;if( Key_Value=KEY_DOWN&Key_V_temp!=KEY_UP)|( Key_Value=KEY_UP&Key_V_temp=KEY_DOWN)Trun_Off_Point(Snake.X0,Snake.Y0); /先把蛇尾給熄滅掉 for(i=0;iSnake.Long-1;i+) /蛇身都是它前一段的蛇身的位置Snake.Xi=Snake.Xi+1;Snake.Yi=Snake.Yi+1; Snake.XSnake.Long-1=Snake.XSnake.Long-2+0;Snake.YSnake.Long-1=Snake.YSnake.Long-2+1; /蛇頭向你要求的方向移動(dòng)for(i=0;iSnake.Long;i+) /這個(gè)讓蛇顯示出來(lái)的函數(shù)Trun_On_Point(Snake.Xi,Snake.Yi);Key_V_temp=KEY_DOWN;/*根據(jù)按鍵選擇蛇的運(yùn)動(dòng)程序結(jié)束*/*判斷蛇是否死亡*/if(Snake.XSnake.Long-1=30|Snake.YSnake.Long-1=33)/判蛇頭是否撞到墻壁Snake.Life=1;for(i=3;iSnake.Long;i+)/從第三節(jié)開始判斷蛇頭是否咬到自己if(Snake.Xi=Snake.X0&Snake.Yi=Snake.Y0)Snake.Life=1;if(Snake.Life=1) /if the snake overDisplay_dead();/*判斷蛇是否死亡程序結(jié)束*/*判斷蛇是否最長(zhǎng)了*/if(Snake.Long=SNAKE_Max_Long)Display_Pass();/ /*判蛇是否吃到食物*/if(Snake.XSnake.Long-1=Food.X&Snake.YSnake.Long-1=Food.Y)/Trun_Off_Point(Food.X,Food.Y); /消隱食物Snake.Long+;/蛇節(jié)數(shù)加1Snake.XSnake.Long-1=Food.X;Snake.YSnake.Long-1=Food.Y;Snake.Score+=10;LCD_ShowNum(50,280,(u32)Snake.Score,4,16);Food.Yes=1; /食物標(biāo)志置1/*放果子程序*/if(Food.Yes=0)Trun_On_Point(Food.X,Food.Y); if(Food.Yes=1)while(1)Food.X=rand()%28+1; /獲得隨機(jī)數(shù)Food.Y=rand()%28+1; for(i=0;iSnake.Long;i+)/判斷產(chǎn)生的食物坐標(biāo)是否和蛇身重合if(Food.X=Snake.Xi)&(Food.X=Snake.Yi)break;if(i=Snake.Long)Food.Yes=0;break;/產(chǎn)生有效的食物坐標(biāo)/ /*延時(shí)用于調(diào)整游戲速度*/delay_ms(100-Snake.Level*10);/*snake.h*/#include stm32f10x.h#ifndef _SNAKE_H_#define _SNAKE_H_#ifndef uchar#define uchar unsigned char #endif#ifndef uint#define uint unsigned int #endifvoid Init_SNAKE(void);void Run_SNAKE(void);void Display_Pass(void);void Display_dead(void);void Trun_On_Point (u8 x,u8 y);void Trun_Off_Point (u8 x,u8 y);extern u8 Key_V_temp; /取出上次按鍵值extern u8 Key_Value; /取出上次按鍵值/extern void Trun_On_Point (uchar x,uchar y,uchar color);#endif/*main.h*/#include led.h#include delay.h#include key.h#include sys.h#include lcd.h#include usart.h#include snake.h/ALIENTEK戰(zhàn)艦STM32開發(fā)板實(shí)驗(yàn)13/TFTLCD顯示實(shí)驗(yàn) /技術(shù)支持：/廣州市星翼電子科技有限公司void Key()u8 t;t=KEY_Scan(0);/得到鍵值 if(t) switch(t) case KEY_UP:/控制