贪吃蛇程序贪吃蛇游戏程序怎么编写 ?
贪吃蛇程序 时间: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
香港大带宽服务器香港大带宽云服务器目前市场上可以选择的商家十分少,这次给大家推荐的是我们的老便宜提速啦的香港大带宽云服务器,默认通用BGP线路(即CN2+BGP)是由三网直连线路 中国电信骨干网以及HGC、NTT、PCCW等国际线路混合而成的高品质带宽(精品带宽)线路,可有效覆盖全球200多个国家和地区。(适用于绝大部分应用场景,适合国内外访客访问,域名无需备案)提速啦官网链接:点击进入香港Cer...
A400互联怎么样?A400互联是一家成立于2020年的商家,A400互联是云服务器网(yuntue.com)首次发布的云主机商家。本次A400互联给大家带来的是,全新上线的香港节点,cmi+cn2线路,全场香港产品7折优惠,优惠码0711,A400互联,只为给你提供更快,更稳,更实惠的套餐,香港节点上线cn2+cmi线路云服务器,37.8元/季/1H/1G/10M/300G,云上日子,你我共享。...
主机参考最新消息:JustHost怎么样?JustHost服务器好不好?JustHost好不好?JustHost是一家成立于2006年的俄罗斯服务器提供商,支持支付宝付款,服务器价格便宜,200Mbps大带宽不限流量,支持免费更换5次IP,支持控制面板自由切换机房,目前JustHost有俄罗斯5个机房可以自由切换选择,最重要的还是价格真的特别便宜,最低只需要87卢布/月,约8.5元/月起!just...
贪吃蛇程序为你推荐
飘零网络验证怎么看一个程序是什么网络验证红杉树视频会议全时视频会议怎么样?胶南建管网胶南做网站哪有全国大学生网络安全知识竞赛2018年全国大学生网络安全知识竞赛获奖等级有几种?番禺网站优化广州网站优化的公司网站优化最最专业的哪家暴风播酷云暴风影音视频播放器 暴风影音万能播放器交通信号灯控制系统交通信号灯控制用PLC如何编写程序?csol进不去为什么我下了csol打不开720云全景制作720度全景是怎样拍的?app测试项目如何做好app的测试工作
万网域名解析 域名交易网 中国域名交易中心 新通用顶级域名 bbr 美国主机推荐 国外idc 海外服务器 网站监控 光棍节日志 服务器日志分析 免费个人博客 中国智能物流骨干网 qingyun 789电视 hkg 东莞数据中心 服务器合租 空间合租 电信托管 更多