|
貪吃蛇俄羅斯方塊萬(wàn)年歷的仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
0.png (18.92 KB, 下載次數(shù): 58)
下載附件
2017-11-15 21:26 上傳
0.png (9.9 KB, 下載次數(shù): 52)
下載附件
2017-11-15 21:26 上傳
0.png (16.57 KB, 下載次數(shù): 58)
下載附件
2017-11-15 21:25 上傳
單片機(jī)源程序如下:
- //版本:V1.0
- //作品:貪吃蛇+萬(wàn)年歷+俄羅斯方塊
- //作者所屬院校:南陽(yáng)理工學(xué)院
- //作者QQ: 497259320
- //申明:轉(zhuǎn)載請(qǐng)標(biāo)明作品來(lái)源 知識(shí)產(chǎn)權(quán)歸作者本人所有!
- //工作之余,寫(xiě)下此程序,程序、設(shè)計(jì)中有很多不足之處,風(fēng)格、命名也很亂,這是下一個(gè)版本要改進(jìn)的
- //在V1.1版本中還會(huì)增加矩陣鍵盤(pán)和科學(xué)計(jì)算器等功能,此程序已成功移植于AVR單片機(jī)。硬件上實(shí)現(xiàn)要修改底層驅(qū)動(dòng)!
- #include <at89x51.h>
- #include "18b20.h"
- #include "1302.h"
- #include "12864.h"
- #include "zifu.h"
- uchar k,direction;
- bit flag;
- bit flag5=0; //flag5是外部中斷1的標(biāo)志位 flag1是步進(jìn)標(biāo)志
- uchar p,dengji; //定時(shí)次數(shù)
- bit flag1=0;
- systemtime realtime;
- bit first=1; //中斷次數(shù)控制
- void dingshi() interrupt 1 using 1 //定時(shí)程序.產(chǎn)生步進(jìn)時(shí)間
- {
- if(p--)
- {
- TL0=0;
- TH0=0xa0;
- flag1=0;
- }
- else
- {
- flag1=1;
- TL0=0;
- TH0=0x00;
- p=20-(dengji>>1);
- }
- }
- /*開(kāi)始確認(rèn)暫停鍵的判斷*/
- void zhongduan1() interrupt 2 using 2
- {
- if(!flag5)
- {
- flag5=1;
- }
- else
- {
- flag5=0;
- }
- }
- void zhongduan() interrupt 0 using 0
- {
- uchar i=0;
- if(first) //FIRST=1;打開(kāi)方向按鍵判斷標(biāo)志
- {
- first=0;
- k=(P2>>6);
- k=k&0x03;
- if(flag)
- {
- if(k==1) direction=3;//左
- if(k==2) direction=1;//右
- }
- else
- {
- if(k==0) direction=4;//上
- if(k==3) direction=2;//下
- }
- }
- }
- /*顯示四個(gè)小格的方塊*/
- void playbuf(uchar buff,char offsetx,char offsety)
- {
- //i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
- change1((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))))&0x0f)+offsety);
- change1((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx,((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+1))&0x0f)+offsety);
- change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+2))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
- change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+3))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety);
- }
- /*判斷方塊停止向下運(yùn)動(dòng)*/
- bit tingzhixia(uchar buff,char offsetx,char offsety)
- {
- char x0,y0,x1,y1,x2,y2,x3,y3;
- bit tz=0;
- x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
- x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
- x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
- x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
- y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
- y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
- y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
- y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
-
- if(readfk(x0+1,y0))
- {
- if(!((((x0+1)==x1)&&(y0==y1))|(((x0+1)==x2)&&(y0==y2))|(((x0+1)==x3)&&(y0==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x1+1,y1))
- {
- if(!((((x1+1)==x0)&&(y1==y0))|(((x1+1)==x2)&&(y1==y2))|(((x1+1)==x3)&&(y1==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x2+1,y2))
- {
- if(!((((x2+1)==x0)&&(y2==y0))|(((x2+1)==x1)&&(y2==y1))|(((x2+1)==x3)&&(y2==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x3+1,y3))
- {
- if(!((((x3+1)==x0)&&(y3==y0))|(((x3+1)==x1)&&(y3==y1))|(((x3+1)==x2)&&(y3==y2))))
- {
- tz=1;
- }
- }
- return(tz);
- }
- /*判斷一行是否可以消除*/
- bit hangman(uchar x)
- {
- uchar i;
- bit man=1;
- for(i=0;i<15;i++)
- {
- man=man&(readfk(x,i));
- if(!man)
- break;
- }
- return(man);
- }
- /*消除一行*/
- void xiaohang(uchar x)
- {
- uchar i,j;
- for(i=0;i<15;i++)
- {
- clear1(x,i);
- }
- for(i=1;i<=x;i++)
- {
- for(j=0;j<15;j++)
- {
- if(readfk(x-i,j))
- {
- change1(x-i+1,j);
- clear1(x-i,j);
- }
- }
- }
- }
- /*判斷是否停止向右*/
- bit tingzhiyou(uchar buff,char offsetx,char offsety)
- {
- char x0,y0,x1,y1,x2,y2,x3,y3;
- bit tz=0;
- x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
- x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
- x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
- x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
- y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
- y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
- y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
- y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
- if(readfk(x0,y0-1))
- {
- if(!(((x0==x1)&&((y0-1)==y1))|((x0==x2)&&((y0-1)==y2))|((x0==x3)&&((y0-1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x1,y1-1))
- {
- if(!(((x1==x0)&&((y1-1)==y0))|((x1==x2)&&((y1-1)==y2))|((x1==x3)&&((y1-1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x2,y2-1))
- {
- if(!(((x2==x0)&&((y2-1)==y0))|((x2==x1)&&((y2-1)==y1))|((x2==x3)&&((y2-1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x3,y3-1))
- {
- if(!(((x3==x0)&&((y3-1)==y0))|((x3==x1)&&((y3-1)==y1))|((x3==x2)&&((y3-1)==y2))))
- {
- tz=1;
- }
- }
- return(tz);
- }
- /*判斷是否停止向左*/
- bit tingzhizuo(uchar buff,char offsetx,char offsety)
- {
- char x0,y0,x1,y1,x2,y2,x3,y3;
- bit tz=0;
- x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
- x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
- x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
- x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
- y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
- y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
- y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
- y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
- if(readfk(x0,y0+1))
- {
- if(!(((x0==x1)&&((y0+1)==y1))|((x0==x2)&&((y0+1)==y2))|((x0==x3)&&((y0+1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x1,y1+1))
- {
- if(!(((x1==x0)&&((y1+1)==y0))|((x1==x2)&&((y1+1)==y2))|((x1==x3)&&((y1+1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x2,y2+1))
- {
- if(!(((x2==x0)&&((y2+1)==y0))|((x2==x1)&&((y2+1)==y1))|((x2==x3)&&((y2+1)==y3))))
- {
- tz=1;
- }
- }
- if(readfk(x3,y3+1))
- {
- if(!(((x3==x0)&&((y3+1)==y0))|((x3==x1)&&((y3+1)==y1))|((x3==x2)&&((y3+1)==y2))))
- {
- tz=1;
- }
- }
- return(tz);
- }
- /*清除一個(gè)方塊*/
- void clearbuf(uchar dat,char setx,char sety)
- {
- uchar *i;
- i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
- clear1(((((*i)&0xf0)>>4)+setx),(((*i)&0x0f)+sety));
- clear1(((((*(i+1))&0xf0)>>4)+setx),(((*(i+1))&0x0f)+sety));
- clear1(((((*(i+2))&0xf0)>>4)+setx),(((*(i+2))&0x0f)+sety));
- clear1(((((*(i+3))&0xf0)>>4)+setx),(((*(i+3))&0x0f)+sety));
- }
- /*俄羅斯方塊子程序*/
- void fangkuai(void)
- {
- uchar fenshu=0;
- char offsety,offsetx;
- char offsety_buff,offsetx_buff;
- uchar buff=0x10;
- bit ting=0;
- uchar i;
- //flag5=1;
- TMOD=1; //定時(shí)器工作方式
- IT0=1; //邊延有效
- IT1=1;
- EA=1; //開(kāi)CPU中斷
- ET0=1; //開(kāi)定時(shí)器中斷
- EX0=1; //開(kāi)外部中斷
- EX1=1;
- TL0=0x00;
- TH0=0x00; //定時(shí)器初值
- TR0=1; //啟動(dòng)定時(shí)器
- k=5;
- choose12864(2);
- clear12864();
- play16(0,0,0,els);
- play16(0,0,1,els+32);
- play16(0,0,2,els+64);
- play16(0,2,0,els+96);
- play16(0,2,1,els+128);
- play8(0,0,3,shu0);
- play8(0,1,3,shu0);
- vertical(1,60,30);
- vertical(1,60,127);
- for(i=0;i<98;i++)
- {
- dot(30+i,1);
- dot(30+i,62);
- }
- offsety=7;
- offsetx=-3;
- for(;;)
- {
- if(P3&0x04)
- first=1;
- if((k==0x02)&&((P3&0x04)==0x04))
- {
- offsety_buff=offsety;
- ting=tingzhiyou(buff,offsetx,offsety);
- if(!ting)
- {
- if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety)
- offsety--;
- clearbuf(buff,offsetx_buff,offsety_buff);
- playbuf(buff,offsetx,offsety);
- offsety_buff=offsety;
-
- }
- k=5;
- }
- if((k==0x01)&&((P3&0x04)==0x04))
- {
- offsety_buff=offsety;
- ting=tingzhizuo(buff,offsetx,offsety);
- if(!ting)
- {
- if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety<=13)
- offsety++;
- k=5;
- clearbuf(buff,offsetx_buff,offsety_buff);
- playbuf(buff,offsetx,offsety);
- offsety_buff=offsety;
- }
- }
- if((k==0x03)&&((P3&0x04)==0x04))
- {
- dengji=36;/////////////
- k=5;
- }
- if((k==0x00)&&((P3&0x04)==0x04))
- {
- uchar i;
- k=5;
- i=buff;
- buff++;
- if((buff&0x0f)>=4)
- buff=buff&0xf0;
-
- //change1(0,14);
- if(((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14)
- {
- do
- {
- offsety--;
- }while((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14);
-
- }
- if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety<0)
- {
- do
- {
- offsety++;
- }while(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
- }
- clearbuf(i,offsetx_buff,offsety_buff);
- playbuf(buff,offsetx,offsety);
- }
- ting=tingzhixia(buff,offsetx,offsety);
- while(flag5);
- if(flag1)
- {
- offsetx_buff=offsetx;
- offsety_buff=offsety;
- offsetx++;
- clearbuf(buff,offsetx_buff,offsety_buff);
- playbuf(buff,offsetx,offsety);
- offsetx_buff=offsetx;
- flag1=0;
- }
- if((((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)>22)|ting)
- {
- uchar i=0;
- if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx))
- {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx);fenshu++;i++;}
-
- if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx>=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx) //x2>=x3
- {
- if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx) //x2<x1
- {
- if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- }
- if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx) //x3<x2
- {
- if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- }
- if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx) //x0<x3
- {
- if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- }
- }
- if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx) //x2<x3
- {
- if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)
- {
- if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- }
- if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx)
- {
- if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
- {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
- }
- }
-
- play8(0,0,3,shu0+((fenshu/10)<<4));
- play8(0,1,3,shu0+((fenshu%10)<<4));
- dengji=fenshu/5;
- if(((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx)<1)
- {
- delay1ms(450);
- delay1ms(450);
- choose12864(2);
- clear12864();
- play16(0,4,1,over);
- play16(0,6,1,over+32);
- play16(1,0,1,over+64);
- play16(1,2,1,over+96);
- delay1ms(450);
- delay1ms(450);
- break;
- }
- buff=(((TL0%7)<<4)|(TH0%4));
- //buff=0x11;
- offsety=7;
- offsetx=-3;
- offsetx_buff=-9;
- offsety_buff=-9;
- }
- }
-
- }
- /*萬(wàn)年歷子程序*/
- void wannianli(void)
- {
- uchar i;
- uchar count1=0;
- k=0;
- choose12864(2);
- init12864();
- clear12864();
- play8(0,0,0,shu2); //屏,列,頁(yè),地址
- play8(0,1,0,shu0);
-
- ……………………
- …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼
所有資料51hei提供下載:
貪吃蛇 俄羅斯方塊 萬(wàn)年歷.rar
(158.82 KB, 下載次數(shù): 52)
2017-11-15 19:34 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
評(píng)分
-
查看全部評(píng)分
|