C语言编写的井字过三关小游戏源程序

#include "conio.h" #include "graphics.h" #include "dos.h" #include "math.h" #include "stdio.h" #include "bios.h" #include "time.h" #define right 19712 #define left 19200 #define up 18432 #define down 20480 #define enter 7181 #define esc 283 #define n 12654 #define N 12622 #define w 4471 void initgr(void) { int i; int x1=240,y1=180; int gd=DETECT,gm=0; registerbgidriver(EGAVGA_driver); initgraph(&gd, &gm, " "); /*-------------画棋盘*/ /*------------------------------------------------------*/ setcolor(5); setfillstyle(1,LIGHTBLUE); bar3d(1,1,639,479,0,0); setcolor(6); setfillstyle(1,14); setlinestyle(0,0,3); bar3d(232,172,368,308,0,0); rectangle(235,175,365,305); setlinestyle(0,0,1); setcolor(0); rectangle(240,180,360,300); for(i=1;i<3;i++) line(x1,y1+i*40,x1+120,y1+i*40); for(i=1;i<3;i++) line(x1+i*40,y1,x1+i*40,y1+120); /*------------------------------------------------------*/ } drawlight(int x,int y) /*---------------------------“画光标”----函数*/ { setcolor(LIGHTRED); line(x-12,y-12,x-1,y-12);line(x-12,y+12,x-1,y+12); line(x+12,y-12,x+1,y-12);line(x+12,y+12,x+1,y+12); line(x-12,y-1,x-12,y-12);line(x-12,y+1,x-12,y+12); line(x+12,y-1,x+12,y-12);line(x+12,y+1,x+12,y+12); } movelight(int key,int *x,int *y)/*-----------------------------移光标函数*/ { if(key==right) { drawlight(*x,*y);*x+=40;drawlight(*x,*y); } if(key==left) { drawlight(*x,*y);*x-=40;drawlight(*x,*y); } if(key==up) { drawlight(*x,*y);*y-=40;drawlight(*x,*y); } if(key==down) { drawlight(*x,*y);*y+=40;drawlight(*x,*y); } } limitlight(int directkey,int *pl,int *sl)/*-------------------光标限制函数*/ { int b0,pi; if(directkey==right) { b0=1;*pl+=b0; pi=2-abs(*pl);if(*pl==2)*pl=1; return pi; } else if(directkey==left) { b0=-1;*pl+=b0; pi=2-abs(*pl);if(*pl==-2)*pl=-1; return pi; } else if(directkey==up) { b0=1;*sl+=b0; pi=2-abs(*sl);if(*sl==2)*sl=1; return pi; } else if(directkey==down) { b0=-1;*sl+=b0; pi=2-abs(*sl);if(*sl==-2)*sl=-1; return pi; } } rw(int key,int *c)/*------------------------------记录下棋位置函数*/ { if(key==right) *c+=1; if(key==left) *c-=1; if(key==up) *c-=3; if(key==down) *c+=3; } struct remember/*-------------记录在下过黑棋位置wc和下过白棋个数wm的函数*/ { int wm; int wc; }r[5]={ {0,0}, {0,0}, {0,0}, {0,0}, {0,0} }; struct rm /*--------------------------------棋盘上每一个点的信息*/ { int num; int l1; int l2; int l3; int x; int y; int c; /*--------------------------此点的下棋信息:无-0;黑棋-1;白棋-4*/ }m[9]={ {1,1,2,8,260,200,0}, {2,0,2,6,300,200,0}, {3,2,3,7,340,200,0}, {4,0,1,5,260,240,0}, {5,0,0,0,300,240,0}, {6,0,3,5,340,240,0}, {7,1,4,7,260,280,0}, {8,0,4,6,300,280,0}, {9,3,4,8,340,280,0} }; drawpoint(int *i,struct rm m) /*---------------------画白棋子函数*/ { int x,y; x=m.x; y=m.y; setcolor(WHITE); setfillstyle(1,WHITE); pieslice(x,y,0,360,11); *i=m.num-1; } drawpointc(int *wr1,struct rm m) /*--------------------------画黑棋子函数*/ { int x,y; if(m.c==0) { x=m.x; y=m.y; setcolor(BLACK); setfillstyle(1,BLACK); pieslice(x,y,0,360,11); m.c=1; } else *wr1=1; } rand2468() { int rands; time_t t; srand((unsigned) time(&t)); rands=rand()%4; if(rands==0)return 2; if(rands==1)return 4; if(rands==2)return 6; if(rands==3)return 8; } rand1357() { int randj; time_t t; srand((unsigned) time(&t)); randj=rand()%4; if(randj==0)return 1; if(randj==1)return 3; if(randj==2)return 5; if(randj==3)return 7; } main()/*-----------------------------------------------------main函数---------*/ { int key,i,rand; int wr=0; /*----------限制在一点重复下棋*/ int rc=0,rm=0; /*----------记录下棋位置个数*/ int ow=5; /*----------记录最后下的位置*/ int co=1,ad=1,add=1,find; /*----------思考部分的跳转*/ int mx,my; /*----------坐标变化*/ int pl=0,sl=0; /*----------限制光标*/ goto jump; replay:cleardevice(); jump: initgr(); /*--------------------调用画棋盘函数*/ mx=300,my=240; setwritemode(1); drawlight(mx,my); goto jumpi; start: r[rm].wm=1; /*-----------------记录下过的白棋个数*/ if(r[3].wm==1)goto ask; rm+=1; jumpi: if(m[0].c+m[3].c+m[6].c==12||m[0].c+m[1].c+m[2].c==12|| /*----检查是否赢了*/ m[2].c+m[5].c+m[8].c==12||m[6].c+m[7].c+m[8].c==12|| m[3].c+m[4].c+m[5].c==12||m[1].c+m[4].c+m[7].c==12|| m[2].c+m[4].c+m[6].c==12||m[0].c+m[4].c+m[8].c==12) {printf("\n\n\n\n\n I win!"); printf(" ");goto ask;} else key=bioskey(0); /*----------------------------------------接受控制部分*/ while(key!=esc) { if(limitlight(key,&pl,&sl)==0) goto restart;/*------光标限制*/ rw(key,&ow); /*------------------------------位置记录*/ movelight(key,&mx,&my); /*-------------------移动光标*/ if(key==enter) { drawpointc(&wr,m[ow-1]); if(wr!=1) /*---------------------------wr=1为此处已下过棋*/ { m[ow-1].c=1; /*----------------------------记录下黑棋的位置*/ r[rc].wc=ow; rc+=1; goto think; } else{wr=0;goto start;} } restart:key=bioskey(0); } goto end; /*--------------------下棋子部分*/ drawm:switch(find) /*------------攻击下棋*/ { case 1:if(m[0].c==0){drawpoint(&i,m[0]);m[0].c=4;add=1;ad=1;goto start;} if(m[3].c==0){drawpoint(&i,m[3]);m[3].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[6]);m[6].c=4;add=1;ad=1;goto start;} case 2:if(m[0].c==0){drawpoint(&i,m[0]);m[0].c=4;add=1;ad=1;goto start;} if(m[1].c==0){drawpoint(&i,m[1]);m[1].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[2]);m[2].c=4;add=1;ad=1;goto start;} case 3:if(m[2].c==0){drawpoint(&i,m[2]);m[2].c=4;add=1;ad=1;goto start;} if(m[5].c==0){drawpoint(&i,m[5]);m[5].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[8]);m[8].c=4;add=1;ad=1;goto start;} case 4:if(m[6].c==0){drawpoint(&i,m[6]);m[6].c=4;add=1;ad=1;goto start;} if(m[7].c==0){drawpoint(&i,m[7]);m[7].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[8]);m[8].c=4;add=1;ad=1;goto start;} case 5:if(m[3].c==0){drawpoint(&i,m[3]);m[3].c=4;add=1;ad=1;goto start;} if(m[4].c==0){drawpoint(&i,m[4]);m[4].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[5]);m[5].c=4;add=1;ad=1;goto start;} case 6:if(m[1].c==0){drawpoint(&i,m[1]);m[1].c=4;add=1;ad=1;goto start;} if(m[4].c==0){drawpoint(&i,m[4]);m[4].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[7]);m[7].c=4;add=1;ad=1;goto start;} case 7:if(m[2].c==0){drawpoint(&i,m[2]);m[2].c=4;add=1;ad=1;goto start;} if(m[4].c==0){drawpoint(&i,m[4]);m[4].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[6]);m[6].c=4;add=1;ad=1;goto start;} case 8:if(m[0].c==0){drawpoint(&i,m[0]);m[0].c=4;add=1;ad=1;goto start;} if(m[4].c==0){drawpoint(&i,m[4]);m[4].c=4;add=1;ad=1;goto start;} {drawpoint(&i,m[8]);m[8].c=4;add=1;ad=1;goto start;} } drawc:switch(find) /*------------防御下棋*/ { case 1:if(m[0].c!=1){drawpoint(&i,m[0]);m[0].c=4;add=1;ad=1;goto start;} if(m[3].c!=1){drawp