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

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

华纳云新人下单立减40元/香港云服务器月付60元起,香港双向CN2(GIA)

华纳云(HNCloud Limited)是一家专业的全球数据中心基础服务提供商,总部在香港,隶属于香港联合通讯国际有限公司,拥有香港政府颁发的商业登记证明,保证用户的安全性和合规性。 华纳云是APNIC 和 ARIN 会员单位。主要提供数据中心基础服务、互联网业务解决方案, 以及香港服务器租用、香港服务器托管、香港云服务器、美国云服务器,云计算、云安全技术研发等产品和服务。其中云服务器基于成熟的 ...

CheapWindowsVPS$4.5/月,美国VPS/免费Windows系统/1Gbps不限流量/,可选美洲、欧洲、亚洲等8大机房

国外商家提供Windows系统的并不常见,CheapWindowsVPS 此次提供的 2 款 VPS 促销套餐,提供 5 折永久优惠码,优惠后月付 4.5 美元起,价格还是挺诱人的,VPS 不限流量,接入 1Gbps 带宽,8 个机房皆可选,其中洛杉矶机房还提供亚洲优化网络供选择,操作系统有 Windows 10 专业版、2012 R2、2016、Linux等。Cheap Windows VPS是...

UCloud云服务器香港临时补货,(Intel)CN2 GIA优化线路,上车绝佳时机

至今为止介绍了很多UCLOUD云服务器的促销活动,UCLOUD业者以前看不到我们的个人用户,即使有促销活动,续费也很少。现在新用户的折扣力很大,包括旧用户在内也有一部分折扣。结果,我们的用户是他们的生存动力。没有共享他们的信息的理由是比较受欢迎的香港云服务器CN2GIA线路产品缺货。这不是刚才看到邮件注意和刘先生的通知,而是补充UCLOUD香港云服务器、INTELCPU配置的服务器。如果我们需要他...

贪吃蛇程序为你推荐
中软国际科技服务有限公司中软国际真的是骗人吗?飘零网络验证如何在飘零网络验证里面加入成品软件有DLL文件400电话会议收费400电话会议收费吗华为开发者联盟华为开发者联盟10月27日的深圳沙龙如何报名呢?暴风播酷云VOB格式视频文件怎么用暴风播放 急急急湖北文理学院地址湖北文理学院怎么样,希望各位前辈指点。充电宝摄像机我有一个大功率充电宝,只买一个无线摄像头行吗长角牛网络监控机ARP网关欺骗攻击软件和IP冲突软件下载地址ibm磁盘阵列请问什么是RAID5?什么是IBM RAID5卡?洛奇英雄传s2洛奇英雄传有办法不交s2的任务,然后反复刷s2的图吗?
国内ip代理 香港vps 域名备案流程 美国主机评论 realvnc dropbox网盘 申请个人网页 免空 架设服务器 股票老左 傲盾官网 太原网通测速平台 photobucket 中国联通宽带测速 测速电信 买空间网 睿云 北京主机托管 好看的空间 googlevoice 更多