當(dāng)前位置:首頁(yè) > 公眾號(hào)精選 > 嵌入式微處理器
[導(dǎo)讀]非常適合新手入門(mén)的項(xiàng)目

來(lái)源:21ic論壇,編輯:付斌

展示視頻

近日,21ic論壇oufuqiang做了一個(gè)用點(diǎn)陣玩貪吃蛇,而這個(gè)例子非常適合新手入門(mén)算法,下面開(kāi)始分享源碼與原理圖。不強(qiáng)調(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;?? ??? ?//四個(gè)獨(dú)立按鍵

unsigned char dpdat[8]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};?? ?//顯存
unsigned char she[65];?? ?//蛇體數(shù)組,由于點(diǎn)陣大小為8x8,所以一個(gè)字節(jié)表示蛇的一個(gè)節(jié)點(diǎn),高四位和低四位分別表示xy坐標(biāo)
unsigned char fangxiang;?? ?//蛇頭移動(dòng)方向
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?? ?//一些替換,省得寫(xiě)著寫(xiě)著自己邏輯亂掉
void yidongshe(unsigned char fangxiang);?? ?//移動(dòng)蛇函數(shù)
void xianshishe();?? ?//顯示蛇函數(shù)
void chulishe();?? ?//處理蛇函數(shù)
void send595(unsigned char dat)?? ?//向595發(fā)送一個(gè)字節(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)?? ?//一個(gè)簡(jiǎn)單的延時(shí)
{
?? ?while(--time);
}
void shechushihua()?? ?//蛇初始化,蛇長(zhǎng)兩個(gè)節(jié)點(diǎn),0xff表示蛇尾,最后一個(gè)字節(jié)是食物坐標(biāo),初始向左移動(dòng)
{
?? ?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);?? ?//延時(shí)一下
?? ??? ?yidongshe(fangxiang);?? ?//移動(dòng)蛇
?? ??? ?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時(shí)鐘用變量
?? ?TH0=(65536-2500)/256;
?? ?TL0=(65536-2500)%256;?? ?//2.5ms中斷周期
?? ?P0=0XFF;
?? ?send595(hsm[cnt]);?? ?//發(fā)送行掃數(shù)據(jù)
?? ?P0=~dpdat[cnt];?? ?//送出顯存數(shù)據(jù),由于點(diǎn)陣是0點(diǎn)亮,所以數(shù)據(jù)取反后送P0
?? ?cnt++;?? ?//移向下一行
?? ?cnt=cnt&0x07;?? ?//控制變量不超過(guò)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)?? ?//移動(dòng)蛇
{
?? ?unsigned char i;
?? ?for(i=63;i>0;i--)?? ?//從蛇尾向蛇頭遍歷蛇體數(shù)據(jù)
?? ?{
?? ??? ?if(she[i]!=0xff)?? ?//不是蛇尾
?? ??? ?{
?? ??? ??? ?she[i]=she[i-1];?? ?//后一節(jié)點(diǎn)復(fù)制前一節(jié)點(diǎn)坐標(biāo)
?? ??? ?}
?? ??? ?else
?? ??? ?{
?? ??? ??? ?continue;?? ?//是0xff表示是蛇尾數(shù)據(jù),繼續(xù)向前
?? ??? ?}
?? ?}
?? ?if(fangxiang==shang)?? ?//向上移動(dòng).點(diǎn)陣左上角坐標(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)范圍不超過(guò)0,0-7,7
}
void xianshishe()?? ?//顯示蛇,將蛇體數(shù)據(jù)映射到顯存
{
?? ?unsigned char i;
?? ??? ?for(i=0;i<8;i++)//顯存為8個(gè)字節(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);}//繪制食物,蛇體最后一個(gè)字節(jié)是食物坐標(biāo)
}
void chulishe()
{
?? ?unsigned char i;
?? ?bit shiwuzaisheshenshang;
?? ?if(she[0]==she[64])//蛇頭坐標(biāo)與食物坐標(biāo)一致,說(shuō)明吃到食物
?? ?{
?? ?for(i=0;i<65;i++)//遍歷蛇體數(shù)據(jù)
?? ?{
?? ??? ?if(she[i]==0xff)//如果到蛇尾
?? ??? ?{
?? ??? ??? ?she[i]=she[i-1];//蛇尾復(fù)制前一節(jié)點(diǎn)坐標(biāo)
?? ??? ??? ?she[i+1]=0xff;//蛇尾后移
?? ??? ??? ?break;
?? ??? ?}
?? ?}
?? ?do
?? ?{
?? ??? ?shiwuzaisheshenshang=0;//假設(shè)新生成的食物坐標(biāo)不在蛇身上
?? ??? ?she[64]=TL0&0x77;//使用TL0的值隨機(jī)生成一個(gè)食物坐標(biāo)
?? ??? ?for(i=0;i<64;i++)//遍歷蛇體判斷新的食物是否跟蛇體重合
?? ??? ?{
?? ??? ??? ?if(she[i]==she[64])//節(jié)點(diǎn)坐標(biāo)與食物坐標(biāo)相同
?? ??? ??? ?{
?? ??? ??? ??? ?shiwuzaisheshenshang=1;//置標(biāo)志位
?? ??? ??? ?}
?? ??? ?}
?? ?}while(shiwuzaisheshenshang);//如果重合,再重新生成一個(gè)食物坐標(biāo)
? }
?? ?for(i=1;i<64;i++)//遍歷蛇體
?? ?{
?? ??? ?if(she[0]==she[i]){shechushihua();}//如果蛇頭與蛇體節(jié)點(diǎn)重合,說(shuō)明咬到自己了,重新初始化蛇
?? ?}
}

原理圖如下:


嵌入式ARM

掃描二維碼,關(guān)注更多精彩內(nèi)容

本站聲明: 本文章由作者或相關(guān)機(jī)構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀(guān)點(diǎn),本站亦不保證或承諾內(nèi)容真實(shí)性等。需要轉(zhuǎn)載請(qǐng)聯(lián)系該專(zhuān)欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請(qǐng)及時(shí)聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車(chē)的華為或?qū)⒋呱龈蟮莫?dú)角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

倫敦2024年8月29日 /美通社/ -- 英國(guó)汽車(chē)技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車(chē)工程師從創(chuàng)意到認(rèn)證的所有需求的工具,可用于創(chuàng)建軟件定義汽車(chē)。 SODA V工具的開(kāi)發(fā)耗時(shí)1.5...

關(guān)鍵字: 汽車(chē) 人工智能 智能驅(qū)動(dòng) BSP

北京2024年8月28日 /美通社/ -- 越來(lái)越多用戶(hù)希望企業(yè)業(yè)務(wù)能7×24不間斷運(yùn)行,同時(shí)企業(yè)卻面臨越來(lái)越多業(yè)務(wù)中斷的風(fēng)險(xiǎn),如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報(bào)道,騰訊和網(wǎng)易近期正在縮減他們對(duì)日本游戲市場(chǎng)的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國(guó)國(guó)際大數(shù)據(jù)產(chǎn)業(yè)博覽會(huì)開(kāi)幕式在貴陽(yáng)舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

8月28日消息,在2024中國(guó)國(guó)際大數(shù)據(jù)產(chǎn)業(yè)博覽會(huì)上,華為常務(wù)董事、華為云CEO張平安發(fā)表演講稱(chēng),數(shù)字世界的話(huà)語(yǔ)權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機(jī) 衛(wèi)星通信

要點(diǎn): 有效應(yīng)對(duì)環(huán)境變化,經(jīng)營(yíng)業(yè)績(jī)穩(wěn)中有升 落實(shí)提質(zhì)增效舉措,毛利潤(rùn)率延續(xù)升勢(shì) 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務(wù)引領(lǐng)增長(zhǎng) 以科技創(chuàng)新為引領(lǐng),提升企業(yè)核心競(jìng)爭(zhēng)力 堅(jiān)持高質(zhì)量發(fā)展策略,塑強(qiáng)核心競(jìng)爭(zhēng)優(yōu)勢(shì)...

關(guān)鍵字: 通信 BSP 電信運(yùn)營(yíng)商 數(shù)字經(jīng)濟(jì)

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺(tái)與中國(guó)電影電視技術(shù)學(xué)會(huì)聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會(huì)上宣布正式成立。 活動(dòng)現(xiàn)場(chǎng) NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長(zhǎng)三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會(huì)上,軟通動(dòng)力信息技術(shù)(集團(tuán))股份有限公司(以下簡(jiǎn)稱(chēng)"軟通動(dòng)力")與長(zhǎng)三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉