《连连看C语言代码.doc》由会员分享，可在线阅读，更多相关《连连看C语言代码.doc（7页珍藏版）》请在三一办公上搜索。
1、*功能：连连看*制作人：蒋睿立*时间：2007年8月1日*编译环境： VC+ 6.0*程序语言： C语言*/#include #include #include #include void initialize(); /初始化void near1(int a,int b,int a1,int b1); /算法void print_chess(); /打印棋盘int exit_chess(); /判断是否结束/全局变量char chessman1010; /编译系统初始化每个元素为0void main() int row,line; /row是行号，line是列号 int row2,line2;
2、 /row是行号，line是列号 printf(ttt按任意键开始n); fflush(stdin); getch(); initialize(); /初始化棋盘内容 do print_chess(); printf(输入第一个：); fflush(stdin); scanf(%d.%d,&line,&row); printf(输入第二个：); fflush(stdin); scanf(%d.%d,&line2,&row2); if(chessmanlinerow!=chessmanline2row2) printf(两数不相同!n); /两数不同 else if(line=line2&row
3、=row2) printf(错误输入!n); /输入相同的坐标,提示用户错误 else if(line=line2) near1(line,row,line2,row2); /使用函数处理,第一个点一定在第二个点上方 else near1(line2,row2,line,row); /使用函数处理 system(pause); while(exit_chess(); system(pause);printf(nnntt恭喜您，您胜利了！n);printf(ntt制作人：蒋睿立n);printf(nt博客：http:);void initialize() /初始化棋盘 int i,j; /用于循
4、环计数 int a8=0; /记录哪些字符出现次数不是偶数 srand(time(NULL); for(i=1;i8;i+) /这里只随机前8行,留最后一行不打印 for(j=1;j9;j+) chessmanij=rand()%8+65; /棋盘内容为大写字母A到H if(chessmanij=65) a0+; /记录A的个数 if(chessmanij=66) a1+; /记录B的个数 if(chessmanij=67) a2+; /记录C的个数 if(chessmanij=68) a3+; /记录D的个数 if(chessmanij=69) a4+; /记录E的个数 if(chessma
5、nij=70) a5+; /记录F的个数 if(chessmanij=71) a6+; /记录G的个数 if(chessmanij=72) a7+; /记录H的个数 for(i=0;i8;i+) if(ai%2!=0) /如果字符的个数是奇数就还需要打印一个 chessman8i+1=i+65; else /如果前面7行随机的A到H字符恰好是偶数，最后一行全是I字符 chessman8i+1=73; void print_chess() /打印棋盘内容 int i,j; system(cls); printf(t 1 2 3 4 5 6 7 8 n); for(i=0;i10;i+) prin
6、tf(tnt); for(j=0;j10;j+) printf(%4c,chessmanij); if(j=9&i!=0&i!=9) printf(t%d,i); printf(nnnn);int exit_chess() /判断是否满足退出 int i,j; for(i=0;i10;i+) for(j=0;j10;j+) if(chessmanij!=0) return 1; /只要有1个棋子不为0，就返回1 return 0;void near1(int a,int b,int a1,int b1) int arow2; int aline2; int brow2; int bline2;
7、 int start=0,end=0; /临时两个点 int i,j,n; /用于循环 for(i=0;i2;i+) /初始化数组 arowi=a; browi=a1; alinei=b; blinei=b1; /(a,b) a行中有哪些列 for(i=a+1;i=0;i-) if(chessmanib=0) /arow0是A点a行向上向量 arow0=i; else break; /(a1,b1) a1行中有哪些列 for(i=a1+1;i=0;i-) if(chessmanib1=0) /brow0是B点a1行向上向量 brow0=i; else break; /(a,b) b列中有哪些行
8、 for(i=b+1;i=0;i-) if(chessmanai=0) /aline0是A点b列向左向量 aline0=i; else break; /(a1,b1) b1列中有哪些行 for(i=b1+1;i=0;i-) if(chessmana1i=0) /bline0是B点b1列向左向量 bline0=i; else break; /关键算法/ /* 情况一 (a,b) (a1,b1) */ /* 情况二 (a,b) (a1,b1) */ /*考虑上下向量*/ if(brow0=arow0) /向上方向向量 有共同的列向量 start=brow0; /取大的 else start=aro
9、w0; if(brow1=arow1) /向下方向向量 有共同的列向量 end=brow1; /取小的 else end=arow1; for(;start=end;start+) /列向量上共同点start到end /* b1要大于b，否则就交换如果不交换将使下面的循环出错*/if(bb1)j=b; /小的数赋到j中i=b1; /大的数赋到i中elsej=b1;i=b; /*这里节约一个变量，所有看起来有点复杂*/ for(n=0;j0) /因为b与b1大小不能确定，所有有2个if chessmanab=chessmana1b1=0; if(n=b1-b)&(n0) chessmanab=c
10、hessmana1b1=0; /*考虑左右向量*/ if(aline0=bline0) /向左的向量 有共同的行向量 start=aline0; /取大的 else start=bline0; if(aline1bline1) /向右的向量 有共同的行向量 end=aline1; /取小的 else end=bline1; for(i=start;i=end;i+) for(j=a,n=0;j0) /a1始终大于a chessmanab=chessmana1b1=0; break; /* 同行 或者 同列 (a,b)* * 或者 * (a,b) (a1,b1) (a1,b1)*/ if(a=a1) /同行 if(aline1=b1)|(aline0=a1) chessmanab=chessmana1b1=0;
