安利一波貪吃蛇

ID:403398 · 發(fā)表于 2018-10-27 14:04

我用的是普中科技51de小板子。
最基礎的程序，沒啥強大的功能。
適合新手學習。

源碼：

#include"TCC-INIT.H" //自定義全局聲明頭文件
#include"TCC-HSSM.H" //自定義函數(shù)聲明頭文件

void main(void)
{
INIT(); //定時器初始化
for(;;)
{
KeyDown(); //掃描鍵盤
Direction(); //方向判斷
Auto_Move(); //自動移動
Food(); //產(chǎn)生食物
Eating(); //吃掉食物
Display(); //顯示地圖
}
}

void Hc595SendByte()
{
unsigned char a;
SRCLK=0;
RCLK=0;
for(a=0;a<8;a++)
{
SER=CHARCODE[p_now][a];
SRCLK=1;
_nop_();
_nop_();
SRCLK=0;
}

RCLK=1;
_nop_();
_nop_();
RCLK=0;
}

void Hc595SendByte_clean(unsigned char dat)
{
unsigned char a;
SRCLK=0;
RCLK=0;
for(a=0;a<8;a++)
{
SER=dat>>7;
dat<<=1;

SRCLK=1;
_nop_();
_nop_();
SRCLK=0;
}

RCLK=1;
_nop_();
_nop_();
RCLK=0;
}

void Delay10ms()
{
unsigned char a,b,c;
for(c=1;c>0;c--)
for(b=38;b>0;b--)
for(a=130;a>0;a--);
}

void KeyDown()
{
GPIO_KEY=0x0f;
if(GPIO_KEY!=0x0f)
{
Delay10ms();
if(GPIO_KEY!=0x0f)
{
GPIO_KEY=0X0F;
switch(GPIO_KEY)
{
case(0X07):{
KeyValue=0;break;}
case(0X0b):KeyValue=1;break;
case(0X0d): KeyValue=2;break;
case(0X0e):KeyValue=3;break;
}
GPIO_KEY=0XF0;
switch(GPIO_KEY)
{
case(0X70):KeyValue=KeyValue; break;
case(0Xb0):KeyValue=KeyValue+4; break;
case(0Xd0): KeyValue=KeyValue+8; break;
case(0Xe0):KeyValue=KeyValue+12;break;
}
}
}
}

void WALL()
{
switch(temp_direction)
{
case 6:
case 9:
case 16:{
if(snake_x[snake_long]==7)
x=0;
else if(snake_y[snake_long]==7)
y=0;
break;
}
case 1:
case 4:{
if(snake_x[snake_long]==0)
x=7;
else if(snake_y[snake_long]==0)
y=7;
break;
}
}
}

void Direction()
{
if(KeyValue!=16)
{
direction_flag=KeyValue; //將鍵值傳遞給方向標志
}
KeyValue=16;
}

void Auto_Move()
{
unsigned char i;
if(Time==10) //蛇500ms移動一下
{
temp_x = snake_x[0]; //蛇尾坐標臨時存儲
temp_y = snake_y[0];
for(i=0;i<snake_long;i++) //除了蛇頭蛇尾-身體其它部分不改變只需要移位
{
snake_x[i] = snake_x[i+1];
snake_y[i] = snake_y[i+1];
}
snake_x[snake_long] = x; //蛇頭坐標臨時存儲
snake_y[snake_long] = y;
switch(direction_flag)
{
case 16:{//默認移動-向右
x++;
temp_direction=direction_flag;
break;
}
case 1:{//慣性制導-向上
y--;
temp_direction=direction_flag;
break;
}
case 4:{//慣性制導-向左
x--;

temp_direction=direction_flag;
break;
}
case 6:{//慣性制導-向右
x++;
temp_direction=direction_flag;
break;
}
case 9:{//慣性制導-向下
y++;
temp_direction=direction_flag;
break;
}
default:{
direction_flag=temp_direction;//按鍵按錯時修正運動方向
switch(direction_flag)
{
case 1:{y--;break; //修正-向上
}
case 4:{x--;break; //修正-向左
}
case 6:{x++;break; //修正-向右
}
case 9:{y++;break; //修正-向下
}
case 16:{x++;break; //修正-默認
}
}
break;
}
}
WALL(); //界限-防止蛇跑出地圖
CHARCODE[temp_x][temp_y]=0x00;//清除小尾巴
for(i=0;i<=snake_long;i++)

{
CHARCODE[snake_x[i]][snake_y[i]]=0x01;//將蛇在地圖中顯示
}

Time=0;
}
}

void Food()
{
if(food_flag>0)
{
food_x=rand()%7; //偽隨機數(shù)-食物橫坐標(0-7之間)
food_y=rand()%7; //偽隨機數(shù)-食物縱坐標(0-7之間)
CHARCODE[food_x][food_y]=0x01;//在地圖中顯示食物
food_flag=-food_flag; //食物產(chǎn)生標志翻轉
}
}

void Eating()
{
if(food_flag<0&&snake_x[snake_long]==food_x&&snake_y[snake_long]==food_y)
{
switch(direction_flag)
{
case 1:{
snake_x[snake_long]=food_x; //將慣性運動下一個坐標點亮增加蛇長
snake_y[snake_long]=food_y-1;
break;
}
case 4:{
snake_y[snake_long]=food_y; //將慣性運動下一個坐標點亮增加蛇長
snake_x[snake_long]=food_x-1;
break;
}
case 6:{
snake_y[snake_long]=food_y; //將慣性運動下一個坐標點亮增加蛇長
snake_x[snake_long]=food_x-1;
break;
}
case 9:{
snake_x[snake_long]=food_x; //將慣性運動下一個坐標點亮增加蛇長
snake_y[snake_long]=food_y-1;
break;
}
}
CHARCODE[food_x][food_y]=0x00;//清除食物
food_flag=-food_flag; //產(chǎn)生新的食物
snake_long++; //蛇身加長
}
}

void Timer0() interrupt 1
{
TH0 = 0x3C;
TL0 = 0xB0;
Time++;
}

void INIT()
{
TMOD = 0x01;
TH0 = 0x3C;
TL0 = 0xB0;
EA = 1;
ET0 = 1;
TR0 = 1;
}

void Display()
{
unsigned int tab;
for(tab=0;tab<8;tab++) //掃描8列
{
Hc595SendByte_clean(0x00); //消隱
COMMONPORTS = TAB[tab]; //輸出字碼
Hc595SendByte(); //寫入一個直字節(jié)數(shù)據(jù)
p_now++; //掃描下一行
if(p_now == 8) //掃描8行后歸零
{
p_now = 0; //偽指針歸零
}
}
}

ID:448174 · 發(fā)表于 2018-12-20 21:08

樓主可以教教我嗎

帳號		自動登錄	找回密碼
密碼			立即注冊

安利一波貪吃蛇

評分