历史上的今天
返回首页

历史上的今天

今天是:2024年12月26日(星期四)

正在发生

2019年12月26日 | 51单片机8X8点阵贪吃蛇游戏(带proteus仿真)

2019-12-26 来源:51hei

一共六关 吃20个就到下一关
 

 

 

//单片机论坛:http://www.51hei.com/bbs/

#include

#define uchar unsigned char

#define SNAKE 20                 //最大长度

#define TIME 50                 //显示延时时间

#define SPEED 71               //速度控制

//#define  keyenable 1

sbit keyenable=P3^6;                        //方向使能

/*sbit keyx=P0^1;                                        //左右

sbit keyy=P0^2;                                        //上下        */

//sbit up=P0^0;

sbit up=P3^3;       //down

sbit down=P3^1;

sbit right=P3^2;

sbit left=P3^4;

uchar x[SNAKE+1];

uchar y[SNAKE+1];          

uchar time,n,i,e;              //延时时间,当前蛇长,通用循环变量,当前速度                

char addx,addy;                //位移偏移量

/********************

延时程序

*********************/

void delay(char MS)

{

char us,usn;

while(MS!=0)

{

usn = 0;

while(usn!=0)

{

us=0xff;

while (us!=0){us--;};

usn--;

}

MS--;

}

}

/*******************************************

判断碰撞

*******************************************/

bit knock()

{bit k;

k=0;

if(x[1]>7||y[1]>7)k=1;                             //撞墙

for(i=2;ireturn k;

}

/*****************

上下左右键位处理

*****************/

void turnkey()// interrupt 0 using 2  

{//up=1;

if(keyenable)

{

if(left){addy=0;if(addx!=1)addx=-1; else addx=1;}

if(right){addy=0;if(addx!=-1)addx=1; else addx=-1;}

if(up){addx=0;if(addy!=-1)addy=1; else addy=-1;}

if(down){addx=0;if(addy!=1)addy=-1; else addy=1;}

/*if(keyy)

{addy=0;                                   //左右

if(keyx)if(addx==-1)addx=-1; else addx=1;  //左

else

if(addx==1)addx=1; else addx=-1;           //右

}

else

{addx=0;                                   //上下

if(keyx)if(addy==1)addy=1; else addy=-1;   //下

else

if(addy==-1)addy=-1; else addy=1;          //上          

} */

}

}

/*****************

乘方程序

*****************/

uchar mux(uchar temp) 

{

if(temp==7)return 128;

if(temp==6)return 64;

if(temp==5)return 32;

if(temp==4)return 16;

if(temp==3)return 8;

if(temp==2)return 4;

if(temp==1)return 2;

if(temp==0)return 1;

return 0;

}

/*****************

显示时钟 显示程序

*****************/

void timer0(uchar k)

{while(k--)

{for(i=0;i{P2=mux(x[i]);P1=255-mux(y[i]);

turnkey();                     //上下左右键位处理

delay(TIME);                   //显示延迟

P2=0x00;P1=0xff;

}}

/*****************

主程序

*****************/        

void main(void)

{e=SPEED;

P0=0x00;

P1=0xff;

P2=0x00;

P3=0x00;

while(1)       

{//if(keyenable==1){P1=0x00;P2=0xff;}else{P1=0xff;P2=0x00;}

for(i=3;ix[0]=4;y[0]=4;                                                //果子                            

n=3;                                                          //蛇长 n=-1

x[1]=1;y[1]=0;                                                //蛇头

x[2]=0;y[2]=0;                                                //蛇尾1

addx=0;addy=0;                                                //位移偏移

//k=1;

while(1){if(keyenable)break;timer0(1);}

while(1)         

  {timer0(e);

   if(knock()){e=SPEED;break;}                          //判断碰撞

        if((x[0]==x[1]+addx)&(y[0]==y[1]+addy))         //是否吃东西

           {n++;

                   if(n==SNAKE+1)

                   {n=3;e=e-10;

                   for(i=3;i           for(i=3;i                   }

           x[0]=x[n-2];

           y[0]=y[n-2];

           }

    for(i=n-1;i>1;i--){x[i]=x[i-1];y[i]=y[i-1];}        

    //x[n-1]=x[2];y[n-1]=y[2];

    x[1]=x[2]+addx;y[1]=y[2]+addy;                     //移动

  }                                                

}                        

}


推荐阅读

史海拾趣

Blaze Display Technology Co Ltd公司的发展小趣事

自1982年起,Blaze Display Technology Co., Ltd.(以下简称“Blaze公司”)以其前瞻性的视野和坚定的决心,踏入了LCD显示屏领域。创立初期,公司面临着资金短缺、技术瓶颈以及市场竞争的诸多挑战。然而,凭借创始团队对技术的深刻理解和对市场的敏锐洞察,Blaze公司逐步攻克难关,研发出了一系列具有竞争力的LCD显示屏产品。

EQCOLOGIC公司的发展小趣事

在EQCOLOGIC公司的发展历程中,曾经面临过激烈的市场竞争。当时,市场上已经存在多种类似的电子材料,而EQCOLOGIC的产品虽然性能优越,但价格相对较高。为了打开市场,EQCOLOGIC决定调整策略,与一些大型电子制造商建立合作关系,共同开发基于其材料的高端电子产品。通过不断的努力和创新,EQCOLOGIC的产品逐渐得到了市场的认可,公司也逐步实现了市场突破。

DDP Engineered LED Solutions公司的发展小趣事

随着技术的不断成熟和市场的不断扩大,DDP Engineered LED Solutions公司开始注重市场拓展和品牌建设。公司积极参加国内外各类展会和论坛,展示公司的产品和技术实力,与业界同行交流学习。同时,公司还加大品牌宣传力度,通过广告、宣传册等多种渠道提升品牌知名度和美誉度。这些努力不仅让DDP的产品走进了更多客户的视野,也为公司的长远发展奠定了坚实的基础。

Capital Advanced Technologies公司的发展小趣事

面对未来电子行业的发展趋势和市场变化,CAT制定了明确的发展战略和布局。公司将继续加大研发投入,推动技术创新和产业升级;同时,积极拓展新的应用领域和市场空间,寻求与更多合作伙伴的共赢发展。此外,CAT还将注重人才培养和团队建设,为公司的长远发展提供坚实的人才保障。

通过以上五个故事,我们可以看到Capital Advanced Technologies公司在电子行业里发展起来的艰辛与辉煌。他们凭借技术创新、市场拓展、品质管理和战略布局等方面的不断努力,逐渐成为了电子行业的领军企业。

Curtis Electromusic Specialties Inc公司的发展小趣事

在全球化的大背景下,供应链管理对于企业的运营效率至关重要。CUI公司高度重视供应链的优化和管理,通过建立完善的采购、生产和销售体系,实现了原材料的稳定供应和产品的快速交付。此外,公司还积极引入先进的生产设备和信息化管理系统,提高了生产效率和产品质量,为公司的快速发展提供了有力保障。

General Magnetics Inc公司的发展小趣事
定期对电子变压器进行维护检查,如清理灰尘、检查连接线路等,以确保其长期稳定运行。

问答坊 | AI 解惑

关于音频驱动 求问

音频配置文件有alsa.conf 和 asound.conf  看了alsa.conf,里面有 @hooks [         {                 func load               ...…

查看全部问答>

CE5.0下串口丢失字符现象

我用串口2自收发,串口先发送54个字符,然后在接收,并且会比较发送是否与接收的字符相同。用PING 命令不停地发送40960大小的包,打开5个以上的命令行,执行ping命令,同时从网上下载文件,或者renew一下重新获取IP地址(IP为动态分配)串口会出现 ...…

查看全部问答>

MMC/SD/CE-ATA区别

我需要做SD卡升级系统这功能,很多地方不清楚.MMC/SD/CE-ATA,在驱动这个层次上的区别是什么??…

查看全部问答>

嵌入式待遇并不高,为什么大家还要去学他呢?

据我所知,还不如java开发管理软件工资高。…

查看全部问答>

求助ccs

附件 Image00000.bmp (447.12 KB) 2008-2-25 12:30 附件 ...…

查看全部问答>

dsp课件讲义

这是我们上课用的课件,比较好。所以上传与大家分享…

查看全部问答>

RTP/RTCP/RTSP协议初探 [转载]

RTP/RTCP/RTSP协议初探 [转载]一.产生的背景随着互连网的发展,人们已经不满足于传统的HTTP,FTP和电子邮件等文本信息和服务,而对内容丰富多彩的多媒体信息,服务以及多媒体通信方式提出了需求,包括声音,图象,图形,视频信息等等,而这些不 ...…

查看全部问答>

華為公司電路板(PCB)設計規範

華為公司電路板(PCB)設計規範…

查看全部问答>