版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、扫雷 纯C语言实现件夹中找到“扫雷安=分=割=线=#include<stdio.h>#include<time.h>/本程序使用了EGE图形库#include<graphics.h>/地雷个数#define NUM 40 int map2020;/用于保存地雷阵,9表示地雷,08表示周围地雷的个数int ui2020;/用于保存显示的界面,0表示未翻开,1表示翻开,2表示插上了小红旗long timer,timer2;int life,isnew;PIMAGE LEI;/地雷PIMAGE SHOW_0;/未翻开的方块PIMAGE SHOW_1;/翻
2、开的方块PIMAGE SHOW_FLAG;/小红旗int makemap(int num);/初始化地雷阵int draw(void);绘制图形int dataup(void);/更新数据,响应鼠标操作void showother(int x,int y);/翻开空白方块旁边挨着的空白方块int main ()int x,y;srand(int)time(NULL);initgraph(600,700);LEI=newimage();SHOW_0=newimage();SHOW_1=newimage();SHOW_FLAG=newimage();getimage(LEI,"lei.p
3、ng");getimage(SHOW_0,"show_0.png");getimage(SHOW_1,"show_1.png");getimage(SHOW_FLAG,"show_flag.png");setfillcolor(LIGHTGRAY);while(1)bar(80,600,600,700);setcolor(LIGHTBLUE);setfont(50,0,"宋体");xyprintf(80,600,"Made By:Blue Sky");setfont(20,0,&quo
4、t;宋体");xyprintf(80,650,"共%d个地雷找到它们并按右键插上小红旗",NUM);life=1;isnew=1;makemap(NUM);for(y=0;y<20;y+)for(x=0;x<20;x+)uiyx=0;setbkcolor(LIGHTGRAY);draw();timer=clock(); while(life)timer2=clock();setfont(-80,0,"");setcolor(RED);xyprintf(0,600,"%d",(timer2-timer)/1000)
5、;dataup();if(life=0)for(y=0;y<20;y+)for(x=0;x<20;x+)uiyx=1;draw();break;if(isnew)draw();if(life=2)break;setfont(50,0,"宋体");setcolor(RED);bar(80,600,600,700);if(life=2)xyprintf(80,600,"太牛了!你赢了!"); if(life=0)xyprintf(80,600,"噢!你挂了!"); setfont(30,0,"宋体");xy
6、printf(80,650,"(按空格再来一局!其他键退出)");if(getch()!=VK_SPACE)break; delimage(SHOW_1);delimage(SHOW_0);delimage(LEI);closegraph();int makemap(int num)int x,y,n=0;int i,j;for(y=0;y<20;y+)for(x=0;x<20;x+)mapyx=0;for(;n<num;)n=0;x=rand()%20;y=rand()%20;mapyx=9;for(y=0;y<20;y+)for(x=0;x<
7、;20;x+)if(mapyx=9)n+;for(y=0;y<20;y+)for(x=0;x<20;x+)if(mapyx!=9)for(i=y-1;i<=y+1;i+)for(j=x-1;j<=x+1;j+)if(i>=0&&i<20&&j>=0&&j<20)if(mapij=9)mapyx+;return 0;int draw(void)int x,y;for(y=0;y<20;y+)for(x=0;x<20;x+)if(uiyx=1)if(mapyx=9)putimage(x*30
8、,y*30,LEI);elseputimage(x*30,y*30,SHOW_1);if(mapyx!=0)if(mapyx=1)setcolor(BLUE);else if(mapyx=2)setcolor(GREEN);else if(mapyx<6)setcolor(RED);else setcolor(RED);setfont(-25,0,"楷体");xyprintf(x*30+10,y*30+3,"%d",mapyx);else if (uiyx=2)putimage(x*30,y*30,SHOW_FLAG);else putimage(
9、x*30,y*30,SHOW_0);isnew =0;int dataup(void)int x,y,n=0;mouse_msg mous;if(mousemsg()mous= getmouse();x=(int)mous.x/30;y=(int)mous.y/30;if(mous.is_up()if(mous.x<600)if(mous.is_left()showother(x,y);if(mous.is_right()if(uiyx=0)uiyx=2;else if(uiyx=2)uiyx=0;/修复右键点击已经翻开的方块仍然出现小红旗的BUG /* 原错误代码if(mous.is_right()if(uiyx!=2)uiyx=2;else uiyx=0;*/ isnew =1;for(y=0;y<20;y+)for(x=0;x<20;x+)if(uiyx=2)if(mapyx=9)n+;if(n=NUM)life=2;void showother(int x,int y)int i,j;uiyx=1;if(mapyx=9)life=0;return; if(mapyx=0)for(i=y-1;i<=
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 企业档案管理制度
- 2026中国日报社及所属事业单位招聘国内高校应届毕业生21人备考题库附参考答案详解(培优)
- 度安全生产管理制度落实情况报告
- 2026上半年安徽事业单位联考铜陵市郊区招聘17人备考题库带答案详解(考试直接用)
- 2026上半年海南事业单位联考中共海南三亚市委社会工作部面向全国招聘下属事业单位工作人员2人备考题库(第1号)及答案详解(名师系列)
- 2026一季度重庆市属事业单位考核招聘310备考题库带答案详解
- 2026山东青岛国实科技集团有限公司招聘6人备考题库附参考答案详解(a卷)
- 2026云南丽江市儿童福利院编外人员招聘1人备考题库附参考答案详解(a卷)
- 2026年度上海中医药大学公开招聘备考题库及答案详解(考点梳理)
- 2026四川内江市威远隆创实业有限公司招聘高铁辅助员1人备考题库带答案详解(研优卷)
- 巨大胎儿分娩期护理查房
- 质量管理体系内审流程及表单
- (2025)新版gcp考试题库附答案
- it项目采购管理制度
- 2025年四川省成都市中考英语真题(附答案解析)
- 2025贵州省专业技术人员继续教育公需科目考试题库(2025公需课课程)
- 《电影制作流程》课件
- 工程股东协议合同
- 幼儿园入园合同协议
- 技术服务合同模板样本范本2024年
- 2024版铝锭采购合同
评论
0/150
提交评论