VC6源代码：泡泡堂模拟程序

// （修改程序请保留原作者信息） // 以下是原作者信息 // 程序拷贝自：http://tieba.baidu.com/f?kz=66726190 /************************************************* name :POPO writer:LIU wenjie 刘文杰 date :2005-10 这是一个模拟泡泡堂的游戏 有二个玩家操作 **************************************************/ // // 原程序运行在 Turbo C 2.0 下，我移植到了 Visual C++ 6.0 下。 // 编译代码请先安装 VC 绘图库(V20091123)，项目中有下载 // 最后修改日期: 2010-3-14 // #include<graphics.h>/*用到的库函数*/ #include<stdio.h> #include<stdlib.h> #include<math.h> #include <conio.h> #include <time.h> #define ESC 27 /*定义所使用到的键值*/ #define UP1 'w' #define DOWN1 's' #define LEFT1 'a' #define RIGHT1 'd' #define UP2 'i' #define DOWN2 'k' #define LEFT2 'j' #define RIGHT2 'l' #define Z 'z' #define DEL 8 #define ENTER '\r' #define SPACE ' ' #define MX 21 /*每行的方块数*/ #define MY 16 /*每列的方块数*/ #define BOXLONG 30 /*方块的长度*/ typedef struct/*定义游戏 中人的结构体*/ { int x; int y;/*人的位置*/ int definetime; /*是否可以炸弹定时*/ int maxball;/*最多可以放多少炸弹*/ int power;/*炸弹爆炸的长度，也就是威力*/ int ballnum;/*现在放了多少炸弹*/ }human; typedef struct/*定义炸弹的数据结构，用来存值储敏个炸弹的信息*/ { int used;/*该炸弹是否使用*/ int x; int y;/*炸弹位置*/ int man;/*谁放的炸弹*/ int page;/*当前炸弹是第几帧，用来产生炸弹的动态效果*/ int time;/*炸弹放置的时间*/ }tball; tball ball[10];/*定义10个炸弹*/ human man[2];/*定义2个人*/ IMAGE* tu[13];/*定义13个指向图像的指针，用来指向游戏中需要的图像*/ //切记切记，用指针表示图像没问题，用普通变量不行。帮助里面没有写 int map[MX][MY];/*定义存储屏莫信息的数组*/ int ballnum=0;/*用来保存当前所放炸弹的总个数*/ void BaoZa(int num); /*这个函数用来，初始化屏幕*/ void initgra() { initgraph(640,480); for(int i=0; i<13; i++) tu[i]=new IMAGE(); // 增加了按键说明，呵呵 setfont(24,0,"宋体"); outtextxy(10,50,"按键说明："); setfont(16,0,"宋体"); outtextxy(10, 100, "P1: 方向：asdw；放雷：空格；定时雷：z"); outtextxy(10, 140, "P2: 方向：jkli；放雷：回车；定时雷：退格"); outtextxy(10, 300, "按任意键开始游戏"); getch(); cleardevice(); } /*********************************** 这个函数用来，向游戏中产生一个信息对话框 参数为一个字符型指针 返回值为一个整型数据 如果按键为 “n” 返回0 否则返回 1 *********************************/ int message(char *s) { char c; setfillstyle(RED); setcolor(BLUE); //settextstyle(0,0,3); bar(640/2-200,480/2-50,640/2+250,480/2+50); outtextxy(640/2-200,480/2-20,s); c=getch(); //sleep(2); if(c=='n'|| c=='N')return(0);else return(1); } /**************************************** 用库函数绘出游戏中所用到的图像，保存到开的中空间中 **************************************/ void draw() { int i=0; cleardevice(); /*把一个空白图像存到0号空间中*/ getimage(tu[0],0,0,29,29); /*下面是画出产生炸弹的动态效果的四个图像到1~4 号空间中*/ setcolor(RED); setfillstyle(RED); for(i=0;i<4;i++) { fillellipse(15,15,7+i*2,7+i*2); getimage(tu[i+1],0,0,29,29); } putimage(0,0,tu[4],SRCINVERT);/*清除图像，以绘新图*/ /*画定时器的图像并存到5号空间中*/ setcolor(LIGHTRED); line(3,5,20,25); line(20,25,28,5); line(28,5,3,5); fillellipse(16,15,4,4); getimage(tu[5],0,0,29,29); putimage(0,0,tu[5],SRCINVERT); tu[6]=tu[4];/*六号空存的是炸弹图像，吃了可以增加放的炸弹数，*/ /*所以真接使用炸弹第四帧的图像*/ /*把闪电图像存到7号空间中*/ setcolor(RED); setlinestyle(0,0,3); line(20,2,7,16); line(20,2,16,12); line(16,12,24,13); line(7,16,15,15); line(15,15,8,29); line(24,13,8,29); getimage(tu[7],0,0,29,29); putimage(0,0,tu[7],SRCINVERT); /*把模拟爆炸效果的图像存到8号空间中*/ for(i=0;i<200;i++) putpixel(rand()%30,rand()%30,rand()%16); getimage(tu[8],0,0,29,29); putimage(0,0,tu[8],SRCINVERT); /*把可推动的箱子图像存到9号空间中*/ setcolor(BLUE); setfillstyle(YELLOW); bar(1,1,28,28); setcolor(BLUE); line(15,1,15,10); line(1,10,28,10); line(1,20,29,20); line(15,20,15,28); getimage(tu[9],0,0,29,29); putimage(0,0,tu[9],SRCINVERT); /*把不可推动的箱子图像存到10号空间中*/ setcolor(LIGHTBLUE); setfillstyle(LIGHTRED); bar3d(1,1,26,26,1,1); getimage(tu[10],0,0,29,29); putimage (0,0,tu[0]); /*把第一个人脸图像存到11号空间中*/ setlinestyle(0,0,3); setcolor(RED); circle(15,15,13); circle(8,13,4); circle(24,13,4); line(11,18,17,15); line(11,18,15,19); setlinestyle(0,0,3); arc(15,15,225,320,9); getimage(tu[11],0,0,29,29); putimage(0,0,tu[11],SRCINVERT); /*把第二个人脸图像存到11号空间中*/ setlinestyle(0,0,3); setcolor(BLUE); circle(15,15,13); circle(8,13,4); circle(24,13,4); line(11,18,17,15); line(11,18,15,19); setlinestyle(0,0,3); arc(15,15,225,320,9); getimage(tu[12],0,0,29,29); putimage(0,0,tu[12],SRCINVERT); } void GameOver() { int i; /*释放内存空间*/ for(i=0;i<13;i++) delete tu[i]; /*关闭图形显示模式*/ closegraph(); /*结束程序*/ exit(1); } /*************************************** 向一个方向产生爆炸效果 参数num是要爆炸的炸弹编号 x1,y1 炸的方向 0,1 是向下 0,-1 向上 －1,0 向左 1,0 向右 ****************************************/ int ZaLine(int x1,int y1,int num,int *IsHave ) { int x,y,x2,y2,i,l,j; x2=ball[num].x;/* 取出炸弹位置 */ y2=ball[num].y; l=man[ball[num].man].power;/* 炸弹爆炸的长度 */ for(i=0,j=0;abs(i)<l&&abs(j)<l;i+=x1,j+=y1)/*如果没有到指定长度 */ { x=x2+i;y=y2+j;/* 当前炸到的位置位置 */ if(x<0||x>20||y<0||y>15) return 0;/* 如果超出屏幕范围，退出函数执行 */ if ((x==man[0].x&&y==man[0].y)||(x==man[1].x&&y==man[1].y))/* 如果炸到了人 */ { if (!(x==man[0].x&&y==man[0].y))/* 如果不是一号 */ message("the red win!");/* 显示红色玩家胜的信息 */ else message("the green win!");/* 显示篮色玩家胜的信息 */ GameOver();/* 结束游戏 */ }else if(map[x][y]==0)/* 如果为空 */ { putimage((x)*30,(y)*30,tu[8]);/*放爆炸效果图 */ }else if(map[x][y]==9)/* 如果为可推箱子 */ { putimage((x)*30,(y)*30,tu[0]);/* 清去原始图像*/ putimage((x)*30,(y)*30,tu[8]);/*放爆炸效果图 */ if (rand()%4==0) /*产生爆东西的效果*/ { int r; r=(rand()%3)+5; if(r>7)r--; map[x][y]=r; } else map[x][y]=0; return 0;/* 因为炸到了可吃的东西，所以停止爆炸 */ } else if (map[x][y]>=20) { (*IsHave)++; BaoZa(map[x][y]%10);/* 如果烽到炸弹，继续炸 */ } else if (map[x][y]==10) return 0;/* 如果如是是炸不动箱子，停止爆炸 */ else/* 如果是其它肯定是那三个，以吃的东西，就是闪电，定时器，和炸弹，所以炸掉，结束爆炸 */ { putimage((x)*30,(y)*30,tu[0],SRCCOPY); putimage((x)*30,(y)*30,tu[8],SRCCOPY); if (rand()%3==0) map[x][y]=(rand()%3)+5; else map[x][y]=0; return(0); } }/* end of for */ }/* end of ZaLine*/ /************************************** 爆炸后清理爆炸现场 参数和Zaline()一样 把爆炸爆出的东西显示出来 并把爆炸效果图清去 **********************************/ int HuanYuan(int x1,int y1,int num) { int x,y,x2,y2,l,i,j; x2=ball[num].x; y2=ball[num].y; l=man[ball[num].man].power; for(i=0,j=0;abs(i)<l&&abs(j)<l;i+=x1,j+=y1) {x=x2+i;y=y2+j; if(x<0||x>20||y<0||y>15)return 0; if(map[x][y]==0) { putimage((x)*30,(y)*30,tu[0],SRCCOPY); map[x][y]=0; }else if (map[x][y]>=5&&map[x][y]<=7) { putimage(x*30,y*30,tu[0],SRCCOPY); putimage(x*30,y*30,tu[map[x][y]],SRCCOPY); }else return 0; } } /************************ 利用ZALINE() 和huanyuan()函数 产生爆炸效果 ******************************/ void BaoZa(int num) { in