五子棋(TC源码--改良版).doc

#include#include#define UP 0x4800#define DOWN 0x5000#define LEFT 0x4b00#define RIGHT 0x4d00#define ESC 0x11b#define Enter 0x1c0dstatic int flag1010=0;static int life=1,Fx;static int I,J,yuan1,yuan2;static int win,color1=6,color2=15;extern int init() auto int i,j, gdriver=DETECT,gmode; /* registerbgifont(); */ registerbgidriver(EGAVGA_driver); initgraph(&gdriver,&gmode,); setbkcolor(2); setlinestyle(1,0,3); setcolor(YELLOW); outtextxy(50,10, Press ESC to quit!); outtextxy(400,460, Made by weida! Thank you!); outtextxy(10,60,NOW is:); for(i=1;i=10;i+) for(j=1;j=10;j+) rectangle(100+(i-1)*40,40*j,100+(i-1)*40+40,40*j+40); return 0; static void Drawcircle(int x,int y,int color)setcolor(YELLOW); setlinestyle(1,0,1);setfillstyle(1,color); circle(x,y,15); floodfill(x,y,YELLOW);static void bar0(int color) setfillstyle(1,2);bar(10,70,50,110); Drawcircle(30,90,color);static int New_one(int color) int colo=color,i=0,j=0; for(i=0;i=9;i+) for(j=0;j=8&flagij!=0;j+) if(i=9&j=8) return 0; if(flagij=0) break; Drawcircle(40*j+120,(i+1)*40+20,colo); I=j,J=i; if(colo=color1)yuan1=0, flagij=1; else yuan2=0, flagij=2; return 1;static int WIN(int x,int y) int _x=x,_y=y,i,j,k; for(i=1;i=5;i+) /*-*/ for(j=1;j=i-1;j+) if( (_x-80)/40-1-j0) goto loop1; if(flag(_y-20)/40-1(_x-80)/40-j=flag(_y-20)/40-1(_x-80)/40-1-j) continue; else break; for(k=0;k9 ) goto loop1; if(flag(_y-20)/40-1(_x-80)/40-1+k=flag(_y-20)/40-1(_x-80)/40+k)continue;else break; if(j=i&k=5-i)return 1; loop1: for(i=1;i=5;i+) for(j=1;j=i-1;j+) if( (_y-20)/40-1-j0) goto loop2; if( flag(_y-20)/40-j(_x-80)/40-1=flag(_y-20)/40-1-j(_x-80)/40-1) continue; else break; for(k=0;k9 ) goto loop2;if(flag(_y-20)/40-1+k(_x-80)/40-1=flag(_y-20)/40+k(_x-80)/40-1) continue; else break; if(j=i&k=5-i) return 1; loop2: for(i=1;i=5;i+) for(j=1;j9|(_y-20)/40-2+j0) goto loop3;if(flag(_y-20)/40-j(_x-80)/40+j-2=flag(_y-20)/40-1-j(_x-80)/40+j-1) continue; else break; for(k=0;k=4-i;k+) if( (_x-80)/40-1-k9) goto loop3;if(flag(_y-20)/40-1+k(_x-80)/40-1-k=flag(_y-20)/40+k(_x-80)/40-2-k) continue; else break; if(j=i&k=5-i) return 1; loop3: for(i=1;i=5;i+) for(j=1;j=i-1;j+) if( (_x-80)/40-j0|(_y-20)/40-j0) goto loop4;if(flag(_y-20)/40-j(_x-80)/40-j=flag(_y-20)/40-1-j(_x-80)/40-1-j) continue; else break; for(k=0;k9|(_y-20)/40-1+k9) goto loop4;if(flag(_y-20)/40-1+k(_x-80)/40-1+k=flag(_y-20)/40+k(_x-120)/40+1+k) continue; else break; if(j=i&k=5-i)return 1; loop4: return 0; extern void IFWIN(int co)int color=co; settextstyle(0,0,2); setfillstyle(1,BLUE); bar(150,100,500,300); outtextxy(190,150,Congratulations!); Drawcircle(250,230,color); settextstyle(0,0,8); outtextxy(300,200,WIN); getchar(); extern void close() getch(); closegraph(); extern int Move(int x,int y,int color,int direction) int di=direction,color0=color,yuan; setlinestyle(1,0,1); if(color=color1)yuan=yuan1;else yuan=yuan2; switch(di) case 0:if(y=60/*|flag(y+20)/40-3(x-80)/40-1!=0*/)return 0; if(flag(y+20)/40-3(x-80)/40-1!=0|yuan!=0)return -1; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); setcolor(YELLOW);setfillstyle(1,color); circle(x,y-40,15);floodfill(x,y-40,YELLOW); if(color0=color1) flag(y+20)/40-3(x-80)/40-1=1; else flag(y+20)/40-3(x-80)/40-1=2;break; case 1:if(y=420/*|flag(y+20)/40-1(x-80)/40-1!=0*/)return 0; if(flag(y+20)/40-1(x-80)/40-1!=0|yuan!=0)return -1; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); setcolor(YELLOW);setfillstyle(1,color); circle(x,y+40,15);floodfill(x,y+40,YELLOW); if(color0=color1) flag(y+20)/40-1(x-80)/40-1=1; else flag(y+20)/40-1(x-80)/40-1=2;break; case 2:if(x=480/*|flag(y+20)/40-2(x-80)/40!=0*/)return 0; if(flag(y+20)/40-2(x-80)/40!=0|yuan!=0)return -1; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); setcolor(YELLOW);setfillstyle(1,color); circle(x+40,y,15);floodfill(x+40,y,YELLOW); if(color0=color1) flag(y+20)/40-2(x-80)/40=1; else flag(y+20)/40-2(x-80)/40=2;break; case 3:if(x=120/*|flag(y+20)/40-2(x-80)/40-2!=0*/)return 0; if(flag(y+20)/40-2(x-80)/40-2!=0|yuan!=0)return -1; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); setcolor(YELLOW);setfillstyle(1,color); circle(x-40,y,15);floodfill(x-40,y,YELLOW); if(color0=color1) flag(y+20)/40-2(x-80)/40-2=1; else flag(y+20)/40-2(x-80)/40-2=2;break; flag(y+20)/40-2(x-80)/40-1=0; if(color=color1) yuan1=0;else yuan2=0; return 1;int through(int x,int y,int color,int d)int yuan,c,c0,f=flag(y+20)/40-2(x-80)/40-1; if(color=color1)c0=1,yuan=yuan1;else c0=2,yuan=yuan2; if(f=1)c=color1;if(f=2)c=color2; switch(d) case 0: setcolor(YELLOW);setfillstyle(1,color); circle(x,y-40,15);floodfill(x,y-40,YELLOW); if(yuan=1)Drawcircle(x,y,c); elseflag(y+20)/40-2(x-80)/40-1=0; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); if(flag(y+20)/40-3(x-80)/40-1=0) if(c0=1)yuan1=0;else yuan2=0; flag(y+20)/40-3(x-80)/40-1=c0; else if(c0=1)yuan1=1;else yuan2=1; break; case 1: setcolor(YELLOW);setfillstyle(1,color); circle(x,y+40,15);floodfill(x,y+40,YELLOW); if(yuan=1)Drawcircle(x,y,c); elseflag(y+20)/40-2(x-80)/40-1=0; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); if(flag(y+20)/40-1(x-80)/40-1=0) if(c0=1)yuan1=0;else yuan2=0; flag(y+20)/40-1(x-80)/40-1=c0; else if(c0=1)yuan1=1;else yuan2=1;break; case 2:setcolor(YELLOW);setfillstyle(1,color); circle(x+40,y,15);floodfill(x+40,y,YELLOW); if(yuan=1)Drawcircle(x,y,c); elseflag(y+20)/40-2(x-80)/40-1=0; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); if(flag(y+20)/40-2(x-80)/40=0) if(c0=1)yuan1=0;else yuan2=0;flag(y+20)/40-2(x-80)/40=c0; else if(c0=1)yuan1=1;else yuan2=1; break; case 3:setcolor(YELLOW);setfillstyle(1,color); circle(x-40,y,15);floodfill(x-40,y,YELLOW); if(yuan=1)Drawcircle(x,y,c); elseflag(y+20)/40-2(x-80)/40-1=0; setfillstyle(1,2);setcolor(2);floodfill(x,y,YELLOW);circle(x,y,15); if(flag(y+20)/40-2(x-80)/40-2=0) if(c0=1)yuan1=0;else yuan2=0; flag(y+20)/40-2(x-80)/40-2=c0; else if(c0=1)yuan1=1; else yuan2=1;break; return 0; void play()int key,i,m,win=0,x=160,y=100,color,sure=0,x1=160,y1=100; int x2=240,y2=180; yuan1=yuan2=0; Drawcircle(x1,y1,color1);flag33=2,flag11=1; Drawcircle(x2,y2,color2); Drawcircle(30,90,color1); while(win=0) loop: key=bioskey(0); switch(key) case UP: Fx=0;break; case DOWN:Fx=1;break; case LEFT: Fx=3;break; case RIGHT:Fx=2;break; case ESC:life=0;break; case Enter:if(sure=1) if(yuan2=1)goto loop; if(WIN(x,y)=1) win=2;IFWIN(color2); break; if(New_one(color1)=0)life=0;break; else x1=40*I+120,y1=(J+1)*40+20; if(WIN(x1,y1)=1) win=1;IFWIN(color1); break; bar0(color1); sure=0,x2=x,y2=y;goto loop; else if(yuan1=1)goto loop; if(WIN(x,y)=1) win=1;IFW