贪吃蛇程序贪吃蛇游戏程序怎么编写 ?

贪吃蛇程序  时间: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

7月RAKsmart独立服务器和站群服务器多款促销 G口不限量更低

如果我们熟悉RAKsmart商家促销活动的应该是清楚的,每个月的活动看似基本上一致。但是有一些新品或者每个月还是有一些各自的特点的。比如七月份爆款I3-2120仅30美金、V4新品上市,活动期间5折、洛杉矶+硅谷+香港+日本站群恢复销售、G口不限流量服务器比六月份折扣力度更低。RAKsmart 商家这个月依旧还是以独立服务器和站群服务器为主。当然也包括有部分的低至1.99美元的VPS主机。第一、I...

ShockHosting($4.99/月),东京机房 可享受五折优惠,下单赠送10美金

ShockHosting商家在前面文章中有介绍过几次。ShockHosting商家成立于2013年的美国主机商,目前主要提供虚拟主机、VPS主机、独立服务器和域名注册等综合IDC业务,现有美国洛杉矶、新泽西、芝加哥、达拉斯、荷兰阿姆斯特丹、英国和澳大利亚悉尼七大数据中心。这次有新增日本东京机房。而且同时有推出5折优惠促销,而且即刻使用支付宝下单的话还可获赠10美金的账户信用额度,折扣相比之前的常规...

PacificRack(年付低至19美元),夏季促销PR-M系列和多IP站群VPS主机

这几天有几个网友询问到是否有Windows VPS主机便宜的VPS主机商。原本他们是在Linode、Vultr主机商挂载DD安装Windows系统的,有的商家支持自定义WIN镜像,但是这些操作起来特别效率低下,每次安装一个Windows系统需要一两个小时,所以如果能找到比较合适的自带Windows系统的服务器那最好不过。这不看到PacificRack商家有提供夏季促销活动,其中包括年付便宜套餐的P...

贪吃蛇程序为你推荐
ros驱动电机L298N驱动电机智慧充电桩星星充电加速布局充电桩市场 充电桩概念股票有哪些湘潭手机湘潭联想手机哪里有买?华为技术深圳华为公司技术部都是做的些什么哦?水晶之刺台湾魔兽世界/水晶之刺/部落/找上家产品涨价通知调价通知函例文高清网络球机网络高清智能球型摄像机的功能有哪些锁云有一部耽美小说,炮灰攻和受是兄弟,攻和受是父子。炮灰攻在攻年幼时就设计杀害了他母亲,也就是受的妻子720云全景制作720云制作的全景怎么发朋友圈工地监控方案监控工程质量保证措施
域名买卖 主机屋 winscp 冰山互联 bbr vps.net windows主机 国外idc 香港托管 permitrootlogin 174.127.195.202 info域名 域名转接 秒杀汇 息壤代理 香港新世界中心 上海服务器 东莞idc smtp虚拟服务器 东莞主机托管 更多