來源：21ic論壇，編輯：付斌
近日，21ic論壇oufuqiang做了一個用點陣玩貪吃蛇，而這個例子非常適合新手入門算法，下面開始分享源碼與原理圖。不強調(diào)性能的源碼就是耍流氓了，結(jié)果如下：
RAM:86.2
code:697
性能:38.4fps/Mhz@8051
源碼167行的貪吃蛇
源碼如下：
#include
sbit DIN = P3^4;
sbit RCK = P3^5;
sbit SCK = P3^6;?? ?//74hc595接口
sbit k1 = P3^1;
sbit k2 = P3^0;
sbit k3 = P3^2;
sbit k4 = P3^3;?? ??? ?//四個獨立按鍵
unsigned char dpdat[8]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};?? ?//顯存
unsigned char she[65];?? ?//蛇體數(shù)組,由于點陣大小為8x8,所以一個字節(jié)表示蛇的一個節(jié)點,高四位和低四位分別表示xy坐標(biāo)
unsigned char fangxiang;?? ?//蛇頭移動方向
bit shiwushanshuo;?? ??? ?//食物閃爍控制位
#define shang 0
#define xia 1
#define zuo 2
#define you 3
#define k1_anxia k1==0
#define k2_anxia k2==0
#define k3_anxia k3==0
#define k4_anxia k4==0?? ?//一些替換,省得寫著寫著自己邏輯亂掉
void yidongshe(unsigned char fangxiang);?? ?//移動蛇函數(shù)
void xianshishe();?? ?//顯示蛇函數(shù)
void chulishe();?? ?//處理蛇函數(shù)
void send595(unsigned char dat)?? ?//向595發(fā)送一個字節(jié)數(shù)據(jù)
{
?? ?unsigned char i=8;
?? ?do
?? ?{
?? ?DIN=dat&0x80;
?? ?SCK=1;
?? ?SCK=0;
?? ?dat<<=1;
?? ?}while(--i);
?? ?RCK=1;
?? ?RCK=0;
}
void yanshi(unsigned int time)?? ?//一個簡單的延時
{
?? ?while(--time);
}
void shechushihua()?? ?//蛇初始化,蛇長兩個節(jié)點,0xff表示蛇尾,最后一個字節(jié)是食物坐標(biāo),初始向左移動
{
?? ?she[0]=0x33;she[1]=0x34;she[2]=0xff;she[64]=0x22;fangxiang=zuo;
}
void main()
{
?? ?unsigned int fps;
?? ?SCK=0;
?? ?RCK=0;
?? ?TMOD=0X01;
?? ?EA=1;
?? ?ET0=1;
?? ?TR0=1;
?? ?shechushihua();
?? ?while(1)
?? ?{
?? ??? ?xianshishe();?? ?//顯示蛇
//?? ??? ?yanshi(60000);?? ?//延時一下
?? ??? ?yidongshe(fangxiang);?? ?//移動蛇
?? ??? ?chulishe();?? ?//處理蛇
?? ??? ?fps++;
?? ?}
}
void t0() interrupt 1
{
?? ?code unsigned char hsm[]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};?? ?//行掃數(shù)據(jù)
?? ?static unsigned char cnt;?? ?//掃描變量
?? ?static unsigned int clk5hz;?? ?//5hz時鐘用變量
?? ?TH0=(65536-2500)/256;
?? ?TL0=(65536-2500)%256;?? ?//2.5ms中斷周期
?? ?P0=0XFF;
?? ?send595(hsm[cnt]);?? ?//發(fā)送行掃數(shù)據(jù)
?? ?P0=~dpdat[cnt];?? ?//送出顯存數(shù)據(jù),由于點陣是0點亮,所以數(shù)據(jù)取反后送P0
?? ?cnt++;?? ?//移向下一行
?? ?cnt=cnt&0x07;?? ?//控制變量不超過0-7
?? ?if(k1_anxia && fangxiang!=xia){fangxiang=shang;}
?? ?if(k2_anxia && fangxiang!=shang){fangxiang=xia;}
?? ?if(k3_anxia && fangxiang!=you){fangxiang=zuo;}
?? ?if(k4_anxia && fangxiang!=zuo){fangxiang=you;}?? ?//按鍵控制蛇頭方向
?? ?clk5hz++;if(clk5hz>=40){clk5hz=0;shiwushanshuo=!shiwushanshuo;}//以5hz閃爍食物
}
void yidongshe(unsigned char fangxiang)?? ?//移動蛇
{
?? ?unsigned char i;
?? ?for(i=63;i>0;i--)?? ?//從蛇尾向蛇頭遍歷蛇體數(shù)據(jù)
?? ?{
?? ??? ?if(she[i]!=0xff)?? ?//不是蛇尾
?? ??? ?{
?? ??? ??? ?she[i]=she[i-1];?? ?//后一節(jié)點復(fù)制前一節(jié)點坐標(biāo)
?? ??? ?}
?? ??? ?else
?? ??? ?{
?? ??? ??? ?continue;?? ?//是0xff表示是蛇尾數(shù)據(jù),繼續(xù)向前
?? ??? ?}
?? ?}
?? ?if(fangxiang==shang)?? ?//向上移動.點陣左上角坐標(biāo)為0,0,右下角坐標(biāo)為7,7
?? ?{
?? ??? ?she[0]=she[0]-0x10;?? ?//高四位減1
?? ?}
?? ?if(fangxiang==xia)
?? ?{
?? ??? ?she[0]=she[0]+0x10;?? ?//高四位加1
?? ?}
?? ?if(fangxiang==zuo)
?? ?{
?? ??? ?she[0]=(she[0]&0xf0)|(she[0]-0x01)&0x07;?? ?//低四位減1
?? ?}
?? ?if(fangxiang==you)
?? ?{
?? ??? ?she[0]=she[0]+0x01;?? ?//低四位加1
?? ?}
?? ?she[0]=she[0]&0x77;?? ?//控制坐標(biāo)范圍不超過0,0-7,7
}
void xianshishe()?? ?//顯示蛇,將蛇體數(shù)據(jù)映射到顯存
{
?? ?unsigned char i;
?? ??? ?for(i=0;i<8;i++)//顯存為8個字節(jié),繪制蛇之前先清除顯存
?? ??? ?{
?? ??? ??? ?dpdat[i]=0;
?? ??? ?}
?? ??? ?for(i=0;i<65;i++)//從頭到尾遍歷蛇體數(shù)據(jù)
?? ??? ?{
?? ??? ??? ?if(she[i]!=0xff)//如果未到蛇尾
?? ??? ??? ?{
?? ??? ??? ??? ?dpdat[she[i]>>4]|=0x80>>(she[i]&0x0f);//根據(jù)xy坐標(biāo)繪制
?? ??? ??? ?}
?? ??? ??? ?else
?? ??? ??? ?{
?? ??? ??? ??? ?break;//已到蛇尾,退出當(dāng)前循環(huán)
?? ??? ??? ?}
?? ??? ?}
?? ??? ?if(shiwushanshuo){dpdat[she[64]>>4]|=0x80>>(she[64]&0x0f);}//繪制食物,蛇體最后一個字節(jié)是食物坐標(biāo)
}
void chulishe()
{
?? ?unsigned char i;
?? ?bit shiwuzaisheshenshang;
?? ?if(she[0]==she[64])//蛇頭坐標(biāo)與食物坐標(biāo)一致,說明吃到食物
?? ?{
?? ?for(i=0;i<65;i++)//遍歷蛇體數(shù)據(jù)
?? ?{
?? ??? ?if(she[i]==0xff)//如果到蛇尾
?? ??? ?{
?? ??? ??? ?she[i]=she[i-1];//蛇尾復(fù)制前一節(jié)點坐標(biāo)
?? ??? ??? ?she[i+1]=0xff;//蛇尾后移
?? ??? ??? ?break;
?? ??? ?}
?? ?}
?? ?do
?? ?{
?? ??? ?shiwuzaisheshenshang=0;//假設(shè)新生成的食物坐標(biāo)不在蛇身上
?? ??? ?she[64]=TL0&0x77;//使用TL0的值隨機生成一個食物坐標(biāo)
?? ??? ?for(i=0;i<64;i++)//遍歷蛇體判斷新的食物是否跟蛇體重合
?? ??? ?{
?? ??? ??? ?if(she[i]==she[64])//節(jié)點坐標(biāo)與食物坐標(biāo)相同
?? ??? ??? ?{
?? ??? ??? ??? ?shiwuzaisheshenshang=1;//置標(biāo)志位
?? ??? ??? ?}
?? ??? ?}
?? ?}while(shiwuzaisheshenshang);//如果重合,再重新生成一個食物坐標(biāo)
? }
?? ?for(i=1;i<64;i++)//遍歷蛇體
?? ?{
?? ??? ?if(she[0]==she[i]){shechushihua();}//如果蛇頭與蛇體節(jié)點重合,說明咬到自己了,重新初始化蛇
?? ?}
}
原理圖如下：
下載文檔
