如题所述
#include<stdio.h>
#include <conio.h>
#include <windows.h>
#define R 2//小人
#define B 4//箱子
#define O 3//目的地
#define W 43//墙
#define RO 5//箱子与人重合
#define BO 6//箱子与目的地重合
#define Size 13//数组大小
int main ()
{
printf ("推箱子（1~10关）：\nwasd或↑↓←→控制方向。n下一关。r重新开始。\n请注意输入法是否为小写英文输入\n");
system ("pause");
MessageBox (NULL,"第一关"," ",MB_OK);//第一关
int move (char a[Size][Size]);
char a[Size][Size]={0};
int i,j;
void all0 (char a[Size][Size]);
NO1:
all0 (a);
for (i=3;i<6;i++)
a[0][i]=W;
a[1][3]=W;
a[1][5]=W;
for (i=0;i<4;i++)
a[2][i]=W;
a[2][5]=W;
a[3][0]=W;
for (i=0;i<3;i++)
a[4][i]=W;
a[4][7]=W;
for (i=5;i<8;i++)
{
a[3][i]=W;
a[i][2]=W;
a[i][4]=W;
a[5][i]=W;
}
a[7][3]=W;
a[1][4]=O;
a[3][1]=O;
a[4][6]=O;
a[6][3]=O;
a[3][2]=B;
a[3][4]=B;
a[4][4]=B;
a[5][3]=B;
a[4][3]=R;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO1;
MessageBox (NULL,"第二关"," ",MB_OK);//第二关
NO2:
all0 (a);
for (i=0;i<5;i++)
{
a[i][0]=W;
a[0][i]=W;
a[i][4]=W;
}
a[5][2]=W;
a[4][2]=W;
for (i=4;i<9;i++)
a[i][1]=W;
for (i=2;i<6;i++)
a[8][i]=W;
a[6][5]=W;
for (i=5;i<9;i++)
a[7][i]=W;
for (i=2;i<8;i++)
a[i][8]=W;
a[2][7]=W;
for (i=2;i<5;i++)
a[i][6]=W;
a[4][5]=W;
a[1][1]=R;
a[2][2]=B;
a[2][3]=B;
a[3][2]=B;
a[3][7]=O;
a[4][7]=O;
a[5][7]=O;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO2;
MessageBox (NULL,"第三关"," ",MB_OK);//第三关
NO3:
all0 (a);
for (i=1;i<8;i++)
a[0][i]=W;
a[1][1]=W;
for (i=7;i<10;i++)
a[1][i]=W;
for (i=0;i<2;i++)
a[2][i]=W;
for (i=3;i<6;i++)
a[2][i]=W;
a[2][9]=W;
a[3][0]=W;
a[3][9]=W;
a[4][0]=W;
a[4][4]=W;
a[4][9]=W;
a[4][8]=W;
a[5][0]=W;
a[5][1]=W;
a[5][4]=W;
a[5][8]=W;
for (i=1;i<9;i++)
a[6][i]=W;
a[2][2]=B;
a[3][4]=B;
a[3][2]=R;
a[3][7]=B;
a[4][6]=B;
a[4][2]=O;
a[4][3]=O;
a[5][2]=O;
a[5][3]=O;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO3;
MessageBox (NULL,"第四关"," ",MB_OK);//第四关
NO4:
all0 (a);
for (i=1;i<5;i++)
{a[0][i]=W;a[7][i]=W;}
a[1][1]=W;
a[1][4]=W;
a[2][1]=R;
a[2][2]=B;
a[2][4]=W;
a[3][1]=W;
a[3][2]=B;
a[3][4]=W;
a[3][5]=W;
a[4][1]=W;
for (i=1;i<8;i++)
a[i][0]=W;
a[4][3]=B;
a[5][2]=B;
a[5][1]=O;
a[6][1]=O;
a[6][2]=O;
a[6][3]=BO;
a[6][4]=O;
for (i=1;i<4;i++)
a[i][4]=W;
for (i=3;i<8;i++)
a[i][5]=W;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO4;
MessageBox (NULL,"第五关"," ",MB_OK);//第五关
NO5:
all0 (a);
for (i=1;i<6;i++)
a[0][i]=W;
for (i=1;i<4;i++)
a[i][1]=W;
for (i=3;i<8;i++)
a[i][0]=W;
for (i=1;i<8;i++)
a[7][i]=W;
for (i=4;i<7;i++)
{a[1][i]=W;a[i][1]=O;}
for (i=3;i<7;i++)
a[i][7]=W;
a[2][6]=W;
a[3][6]=W;
a[1][2]=R;
a[2][3]=B;
a[3][2]=W;
a[4][2]=W;
a[3][4]=W;
a[4][4]=W;
a[5][5]=W;
a[5][2]=B;
a[6][5]=B;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO5;
MessageBox (NULL,"第六关"," ",MB_OK);//第六关
NO6:
all0 (a);
for (i=1;i<8;i++)
a[i][0]=W;
for (i=7;i<11;i++)
a[i][1]=W;
for (i=1;i<4;i++)
{a[1][i]=W;a[i][9]=W;}
for (i=3;i<10;i++)
a[0][i]=W;
for (i=3;i<8;i++)
a[i][10]=W;
for (i=7;i<11;i++)
a[i][12]=W;
a[7][11]=W;
for (i=2;i<13;i++)
a[10][i]=W;
for (i=3;i<6;i++)
{a[i][2]=W;a[8][i]=W;}
for (i=5;i<8;i++)
{a[2][i]=W;a[i][8]=W;}
a[3][4]=W;
a[6][3]=W;
a[4][7]=W;
a[7][6]=W;
a[9][8]=W;
a[9][7]=W;
a[2][4]=O;
a[6][2]=O;
a[4][8]=O;
a[8][6]=O;
a[4][4]=B;
a[4][6]=B;
a[5][5]=BO;
a[6][4]=B;
a[6][6]=B;
a[8][11]=R;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO6;
MessageBox (NULL,"第七关"," ",MB_OK);//第七关
NO7:
all0 (a);
for (i=3;i<10;i++)
a[0][i]=W;
for (i=1;i<6;i++)
a[i][2]=W;
for (i=5;i<8;i++)
a[i][0]=W;
a[5][1]=W;
a[1][3]=W;
a[6][0]=W;
for (i=0;i<9;i++)
a[7][i]=W;
a[5][8]=W;
a[6][8]=W;
for (i=1;i<6;i++)
a[i][9]=W;
a[1][6]=W;
a[2][6]=W;
a[4][5]=W;
a[4][6]=W;
a[5][6]=W;
a[3][3]=B;
a[3][5]=B;
a[3][7]=B;
a[4][4]=B;
a[5][4]=B;
a[1][8]=R;
for (i=1;i<6;i++)
a[6][i]=O;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO7;
MessageBox (NULL,"第八关"," ",MB_OK);//第八关
NO8:
all0 (a);
for (i=3;i<9;i++)
a[0][i]=W;
for (i=1;i<4;i++)
a[1][i]=W;
a[2][1]=W;
a[1][8]=W;
a[2][8]=W;
for (i=2;i<6;i++)
a[i][0]=W;
for (i=1;i<6;i++)
a[5][i]=W;
for (i=2;i<5;i++)
a[i][9]=W;
for (i=4;i<7;i++)
a[i][8]=W;
for (i=5;i<9;i++)
a[6][i]=W;
a[2][5]=W;
a[2][6]=W;
a[2][4]=B;
a[3][3]=B;
a[3][5]=B;
a[4][4]=B;
a[4][6]=B;
a[3][8]=R;
a[3][1]=O;
a[4][1]=O;
for (i=2;i<5;i++)
a[i][2]=O;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO8;
MessageBox (NULL,"第九关"," ",MB_OK);//第九关
NO9:
all0 (a);
for (i=1;i<10;i++)
{a[0][i]=W;a[8][i]=W;}
for (i=1;i<6;i++)
{a[i][1]=W;a[i][9]=W;}
for (i=5;i<9;i++)
{a[i][0]=W;a[i][10]=W;}
for (i=4;i<7;i++)
{a[3][i]=W;a[4][i]=O;a[5][i]=O;}
a[1][4]=W;
a[1][5]=W;
a[4][3]=W;
a[5][3]=W;
a[4][7]=W;
a[5][7]=W;
a[7][6]=W;
a[2][5]=B;
a[3][2]=B;
a[3][8]=B;
a[6][2]=B;
a[6][5]=B;
a[6][8]=B;
a[7][8]=R;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO9;
MessageBox (NULL,"第十关"," ",MB_OK);//第十关
NO10:
all0 (a);
for (i=2;i<8;i++)
a[0][i]=W;
a[1][2]=W;
for (i=0;i<2;i++)
a[2][i]=W;
for (i=3;i<6;i++)
a[i][0]=W;
for (i=1;i<4;i++)
a[5][i]=W;
for (i=3;i<7;i++)
a[6][i]=W;
for (i=1;i<5;i++)
a[i][7]=W;
a[4][6]=W;
a[5][6]=W;
a[3][1]=R;
for (i=3;i<6;i++)
{a[2][i]=B;a[4][i]=O;}
a[3][3]=B;
a[3][4]=O;
a[3][5]=O;
a[4][2]=B;
if (move (a))
{
printf ("WIN\n");
system ("pause");
}
else
goto NO10;
MessageBox(NULL,"恭喜您通关了。"," ",MB_OK);
return 0;
}
int move (char a[Size][Size])//控制小人的移动
{
int condition (char a [Size][Size],int x,int y,int b,int c,int d,int e);
void print ( char a [Size][Size]);
int x,y;
char c;
int i,j;
for (i=0;i<Size;i++)//给小人定位
for (j=0;j<Size;j++)
if (a[i][j]==R)
{ x=i;y=j; }
print (a);
loop:
c=getch();
if (c==0)//如果是键盘上下左右键用扫描码
c=getch();
switch(c)
{
case 'n':
case 'N': return 1;//下一关
case 'r':
case 'R': return 0;//返回0，重新开始
case 'w':
case 'W':
case 72: if (condition(a,x,y,x-1,y,x-2,y))x=x-1;break;//上
case 'a':
case 'A':
case 75: if (condition(a,x,y,x,y-1,x,y-2))y=y-1;break;//下
case 's':
case 'S':
case 80: if (condition(a,x,y,x+1,y,x+2,y))x=x+1;break;//左
case 'd':
case 'D':
case 77: if (condition(a,x,y,x,y+1,x,y+2))y=y+1;break;//右
default : goto loop;
}
print (a);
for (i=0;i<Size;i++)//用是否存在箱子作胜利条件
for (j=0;j<Size;j++)
if (a[i][j]==B)
goto loop;
return 1;
}
void print ( char a [Size][Size])//输出数组函数
{
int i,j;
system ("cls");//清屏函数
for (i=0;i<Size;i++)
{
for (j=0;j<Size;j++)
if (a[i][j]!=0)
printf ("%2c",a[i][j]);
else
printf (" ");
printf ("\n");
}
printf ("\n");
}
int condition (char a [Size][Size],int x,int y,int b,int c,int d,int e)//小人移动后的情况处理
{
if (a[b][c]!=W)
{
if (a[x][y]==R&&a[b][c]==0)
{a[x][y]=0;a[b][c]=R;return 1;}
if (a[x][y]==RO&&a[b][c]==0)
{a[x][y]=O;a[b][c]=R;return 1;}
if ((a[x][y]==R||a[x][y]==RO)&&(a[b][c]==B||a[b][c]==BO)&&(a[d][e]==B||a[d][e]==BO||a[d][e]==W))
return 0;
if (a[x][y]==R&&a[b][c]==O)
{a[x][y]=0;a[b][c]=RO;return 1;}
if (a[x][y]==RO&&a[b][c]==O)
{a[x][y]=O;a[b][c]=RO;return 1;}
if (a[x][y]==R&&a[b][c]==B&&a[d][e]==O)
{a[x][y]=0;a[b][c]=R;a[d][e]=BO;return 1;}
if (a[x][y]==R&&a[b][c]==B&&a[d][e]==0)
{a[x][y]=0;a[b][c]=R;a[d][e]=B;return 1;}
if (a[x][y]==R&&a[b][c]==BO&&a[d][e]==0)
{a[x][y]=0;a[b][c]=RO;a[d][e]=B;return 1;}
if (a[x][y]==R&&a[b][c]==BO&&a[d][e]==O)
{a[x][y]=0;a[b][c]=RO;a[d][e]=BO;return 1;}
if (a[x][y]==RO&&a[b][c]==B&&a[d][e]==O)
{a[x][y]=O;a[b][c]=R;a[d][e]=BO;return 1;}
if (a[x][y]==RO&&a[b][c]==B&&a[d][e]==0)
{a[x][y]=O;a[b][c]=R;a[d][e]=B;return 1;}
if (a[x][y]==RO&&a[b][c]==BO&&a[d][e]==O)
{a[x][y]=O;a[b][c]=RO;a[d][e]=BO;return 1;}
if (a[x][y]==RO&&a[b][c]==BO&&a[d][e]==0)
{a[x][y]=O;a[b][c]=RO;a[d][e]=B;return 1;}
}
return 0;
}
void all0 (char a[Size][Size])//数组成员归为0
{
int i,j;
for (i=0;i<Size;i++)
for (j=0;j<Size;j++)
a[i][j]=0;
}
#include <stdio.h>
#include <ctype.h>
#include <conio.h>
#include <bios.h>
#include <alloc.h>
/* 定义二维数组ghouse来记录屏幕上各点的状态，
其中：0表示什么都没有，'b'表示箱子，'w'表示墙壁，'m'表示目的地，'i'表示箱子在目的地。 */
char ghouse[20][20];/* 以下函数为直接写屏函数，很酷的函数哦！是我朋友告诉我的。 */
char far *screen=(char far* )0xb8000000;
void putchxy(int y,int x,char ch,char fc,char bc)
{
screen[(x*160)+(y<<1)+0]=ch;
screen[(x*160)+(y<<1)+1]=(bc*16)+fc;
}/* 定义判断是否胜利的数据结构 */
typedef struct winer {
int x,y;
struct winer *p;
}winer;/* 箱子位置的数据结构 */
typedef struct boxs {
int x,y;
struct boxs *next;
}boxs;/* 在特定的坐标上画墙壁并用数组记录状态的函数 */
void printwall(int x,int y)
{
putchxy(y-1,x-1,219,MAGENTA,BLACK);
ghouse[x][y]='w';
}/* 在特定的坐标上画箱子并用数组记录状态的函数 */
void printbox(int x,int y)
{
putchxy(y-1,x-1,10,WHITE,BLACK);
ghouse[x][y]='b';
}/* 在特定的坐标上画目的地并用数组记录状态的函数 */
void printwhither1(int x,int y,winer **win,winer **pw)
{
winer *qw;
putchxy(y-1,x-1,'*',YELLOW,BLACK);
ghouse[x][y]='m';
if(*win==NULL)
{
*win=*pw=qw=(winer* )malloc(sizeof(winer));
(*pw)->x=x;(*pw)->y=y;(*pw)->p=NULL;
}
else
{
qw=(winer* )malloc(sizeof(winer));
qw->x=x;qw->y=y;(*pw)->p=qw;(*pw)=qw;qw->p=NULL;
}
}
/* 在特定的坐标上画目的地并用数组记录状态的函数 */
void printwhither(int x,int y)
{
putchxy(y-1,x-1,'*',YELLOW,BLACK);
ghouse[x][y]='m';
}
/* 在特定的坐标上画人的函数 */
void printman(int x,int y)
{
gotoxy(y,x);
_AL=02;_CX=01;_AH=0xa;
geninterrupt(0x10);
}/* 在特定的坐标上画箱子在目的地上并用数组记录状态的函数 */
void printboxin(int x,int y)
{
putchxy(y-1,x-1,10,YELLOW,BLACK);
ghouse[x][y]='i';
}/* 初始化函数，初始化数组和屏幕 */
void init()
{
int i,j;
clrscr();
for(i=0;i<20;i++)
for(j=0;j<20;j++)
ghouse[i][j]=0;
_AL=3;
_AH=0;
geninterrupt(0x10);
gotoxy(40,4);
printf("Welcome to push box world!");
gotoxy(40,6);
printf("Press up,down,left,right to play.");
gotoxy(40,8);
printf("Press Esc to quit it.");
gotoxy(40,10);
printf("Press space to reset the game.");
gotoxy(40,12);
printf("April 30th 2004.");
}/* 第一关的图象初始化 */
winer *inithouse1()
{
int x,y;
winer *win=NULL,*pw;
gotoxy(8,2);
printf("Level No.1");
for(x=1,y=5;y<=9;y++)
printwall(x+4,y+10);
for(y=5,x=2;x<=5;x++)
printwall(x+4,y+10);
for(y=9,x=2;x<=5;x++)
printwall(x+4,y+10);
for(y=1,x=3;x<=8;x++)
printwall(x+4,y+10);
for(x=3,y=3;x<=5;x++)
printwall(x+4,y+10);
for(x=5,y=8;x<=9;x++)
printwall(x+4,y+10);
for(x=7,y=4;x<=9;x++)
printwall(x+4,y+10);
for(x=9,y=5;y<=7;y++)
printwall(x+4,y+10);
for(x=8,y=2;y<=3;y++)
printwall(x+4,y+10);
printwall(5+4,4+10);
printwall(5+4,7+10);
printwall(3+4,2+10);
printbox(3+4,6+10);
printbox(3+4,7+10);
printbox(4+4,7+10);
printwhither1(4+4,2+10,&win,&pw);
printwhither1(5+4,2+10,&win,&pw);
printwhither1(6+4,2+10,&win,&pw);
printman(2+4,8+10);
return win;
}
