贪吃蛇程序贪吃蛇游戏程序怎么编写 ?
贪吃蛇程序 时间:2022-03-02 阅读:(
)
贪吃蛇游戏程序怎么编写 ?
回答:Mr.emily 大师 6月3日 16:45 #define N 200 #include<graphics.h> #include<stdlib.h> #include<dos.h> #define LEFT 0x4b00 #define RIGHT 0x4d00 #define DOWN 0x5000 #define UP 0x4800 #define Esc 0x011b int i,key; int score=0; int gamespeed=50000; struct Food {int x; int y; int yes; }food; struct Snake {int x[N]; int y[N]; int node; int direction; int life; }snake; void Init(); void Close(); void DrawK(); void GamePlay(); void GameOver(); void PrScore(); void main() { Init(); DrawK(); GamePlay(); Close(); } void Init() {int gd=DETECT,gm; initgraph(&gd,&gm,"F:\tuoboc2");/*此处为turboc的路径,读者可以根据自己的电脑而改*/ cleardevice(); } void DrawK() {setbkcolor(LIGHTGREEN); setcolor(11); setlinestyle(SOLID_LINE,0,THICK_WIDTH); for(i=50;i<=600;i+=10) {rectangle(i,40,i+10,49); rectangle(i,451,i+10,460); } for(i=40;i<=450;i+=10) {rectangle(50,i,59,i+10); rectangle(601,i,610,i+10); } } void GamePlay() {randomize(); food.yes=1; snake.life=0; snake.direction=1; snake.x[0]=100;snake.y[0]=100; snake.x[1]=110;snake.y[1]=100 ; snake.node=2; PrScore(); while(1) {while(!kbhit()) { if(food.yes==1) {food.x=rand()%400+60; food.y=rand()%350+60; while(food.x%10!=0) food.x++; while(food.y%10!=0) food.y++; food.yes=0; } if(food.yes==0) {setcolor(GREEN); rectangle(food.x,food.y,food.x+10,food.y-10); } for(i=snake.node-1;i>0;i--) {snake.x[i]=snake.x[i-1]; snake.y[i]=snake.y[i-1]; } switch(snake.direction) {case 1: snake.x[0]+=10;break; case 2: snake.x[0]-=10;break; case 3: snake.y[0]-=10;break; case 4: snake.y[0]+=10;break; } for(i=3;i<snake.node;i++) { if(snake.x[i]==snake.x[0]&&snake.y[i]==snake.y[0]) { GameOver(); snake.life=1; break; } } if(snake.x[0]<55||snake.x[0]>595||snake.y[0]<55||snake.y[0]>455) {GameOver(); snake.life=1; } if(snake.life==1) break; if(snake.x[0]==food.x&&snake.y[0]==food.y) {setcolor(0); rectangle(food.x,food.y,food.x+10,food.y-10); snake.x[snake.node]=-20; snake.y[snake.node]=-20; snake.node++; food.yes=1; score+=10; PrScore(); } setcolor(4); for(i=0;i<snake.node;i++) rectangle(snake.x[i],snake.y[i],snake.x[i]+10,snake.y[i]-10); delay(gamespeed); setcolor(0); rectangle(snake.x[snake.node-1],snake.y[snake.node-1],snake.x[snake.node-1]+10,snake.y[snake.node-1]-10); } if(snake.life==1) break; key=bioskey(0); if(key==Esc) break; else if(key==UP&&snake.direction!=4) snake.direction=3; else if(key==RIGHT&&snake.direction!=2) snake.direction=1; else if(key==LEFT&&snake.direction!=1) snake.direction=2; else if(key==DOWN&&snake.direction!=3) snake.direction=4; } } void GameOver() { cleardevice(); PrScore(); setcolor(RED); settextstyle(3,0,4); outtextxy(100,100,"Mengmeng,i love you!"); getch(); } void PrScore() {char str[10]; setfillstyle(SOLID_FILL,YELLOW); bar(50,15,220,35); setcolor(6); settextstyle(0,0,2); sprintf(str,"score:%d",score); outtextxy(55,20,str); } void Close() { getch(); closegraph(); } Mr.emily
前几天有关注到Megalayer云服务器提供商有打算在月底的时候新增新加坡机房,这个是继美国、中国香港、菲律宾之外的第四个机房。也有工单询问到官方,新加坡机房有包括CN2国内优化线路和国际带宽,CN2优化线路应该是和菲律宾差不多的。如果我们追求速度和稳定性的中文业务,建议还是选择CN2优化带宽的香港服务器。这里有要到Megalayer新加坡服务器国际带宽的测试服务器,E3-1230配置20M国际带...
小白云是一家国人自营的企业IDC,主营国内外VPS,致力于让每一个用户都能轻松、快速、经济地享受高端的服务,成立于2019年,拥有国内大带宽高防御的特点,专注于DDoS/CC等攻击的防护;海外线路精选纯CN2线路,以确保用户体验的首选线路,商家线上多名客服一对一解决处理用户的问题,提供7*24无人全自动化服务。商家承诺绝不超开,以用户体验为中心为用提供服务,一直坚持主打以产品质量用户体验性以及高效...
如今我们还有在做个人网站吗?随着自媒体和短视频的发展和兴起,包括我们很多WEB2.0产品的延续,当然也包括个人建站市场的低迷和用户关注的不同,有些个人已经不在做网站。但是,由于我们有些朋友出于网站的爱好或者说是有些项目还是基于PC端网站的,还是有网友抱有信心的,比如我们看到有一些老牌个人网站依旧在运行,且还有新网站的出现。今天在这篇文章中谈谈有网友问关于个人网站备案的问题。这个也是前几天有他在选择...
贪吃蛇程序为你推荐
华为技术深圳华为公司技术部都是做的些什么哦?皮城警备现在皮城警备这区怎么样,?上海长宽上海长宽ftp的网址是多少?女网管我们这有个女网管很漂亮,20岁。我很想,他可能是处?我该怎么追她?求大家帮忙女网管石家庄女网管怎么啦出处吧吧求图片出处华为会议终端华为会议电视终端怎么调节摄像头水平建筑工地管理系统工地劳务管理系统哪里买?云龙数码云龙电脑电子的业务是什么?怎么样?wap地带什么是cmwapm模式
高防服务器租用 net主机 westhost iisphpmysql 美国php主机 论坛空间 丹弗 anylink 135邮箱 免费全能主机 免费智能解析 服务器硬件防火墙 新睿云 台湾google 石家庄服务器托管 贵阳电信测速 lamp是什么意思 双线空间 测速电信 广东服务器托管 更多