2025-08-24
推箱子

2007年10月
初次尝试Windows控制台程序，花了两个晚上写的。
/*
推箱子
作者：MasterRay
时间：2007-10-18
请用Visual C++编译
*/
#include <windows.h>
#include <conio.h>

#define ENTER 13
#define ESC 27
#define SPACE 32
#define UP 72
#define LEFT 75
#define RIGHT 77
#define DOWN 80
#define ARROW 224

HANDLE hOut=GetStdHandle(STD_OUTPUT_HANDLE); //获得标准输出句柄
COORD TopLeft={0, 0}, MainPos={0, 5};
FILE *f;
char map[720], FileName[256]={"box\\"};
int x, y, //推箱者的坐标
   DirectionX[20], DirectionY[20], //目标的坐标
   maxx, maxy, level=1;

char *DecToStr(char *str, int dec)
{
   char ch, *left=str, *right=str, *p;
   do
   {
        *right++=dec%10|'0';
   }while (dec/=10);
   p=right--;
   while (left<right)
   {
        ch=*left;
        *left++=*right;
        *right--=ch;
   }
   *p++='.';
   *p++='t';
   *p++='x';
   *p++='t';
   *p='\0';
   return str;
}

//清除地图
void ClearMap()
{
   FillConsoleOutputCharacter(hOut, ' ', 1600, MainPos, 0);
}

//画地图
void DrawMap()
{
   COORD pos={0, 7};
   short i=0, j, p=0;
   char ch;
   ClearMap();
   SetConsoleCursorPosition(hOut, pos);
   for (; i<maxy; i++)
   {
        for (j=0; j<maxx; j++)
        {
            switch (map[i*maxx+j])
            {
            case 'B': //箱子
                SetConsoleTextAttribute(hOut, FOREGROUND_BLUE|FOREGROUND_INTENSITY); //蓝色
                WriteConsoleA(hOut, "■", 2, 0, 0);
                break;
            case 'D': //目标
                DirectionX[p]=j;
                DirectionY[p++]=i;
                SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_INTENSITY); //黄色
                WriteConsoleA(hOut, "◆", 2, 0, 0);
                break;
            case 'F': //目标+箱子
                map[i*maxx+j]='B';
                DirectionX[p]=j;
                DirectionY[p++]=i;
                SetConsoleTextAttribute(hOut, FOREGROUND_BLUE|FOREGROUND_INTENSITY); //蓝色
                WriteConsoleA(hOut, "■", 2, 0, 0);
                break;
            case 'P': //推箱者
                x=j;
                y=i;
                SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_INTENSITY); //红色
                WriteConsoleA(hOut, "★", 2, 0, 0);
                break;
            case 'W': //墙
                SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_BLUE); //白色
                WriteConsoleA(hOut, "■", 2, 0, 0);
                break;
            default:
                SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_BLUE); //白色
                WriteConsoleA(hOut, "　", 2, 0, 0);
            }
        }
        pos.Y++;
        SetConsoleCursorPosition(hOut, pos);
   }
   DirectionX[p]=DirectionY[p]=0;
   SetConsoleCursorPosition(hOut, MainPos);
   SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_BLUE); //白色
}

//新地图
void NewMap()
{
   int ch;
   char *p=map, flag=1;
   DecToStr(FileName+4, level);
   if ((f=fopen(FileName, "r"))==0) TerminateProcess(GetCurrentProcess(), 0);
   maxy=1;
   while ((ch=fgetc(f))!=EOF)
   {
        if (ch!='\r' && ch!='\n') *p++=ch;
        else {maxx=p-map; break;}
   }
   while ((ch=fgetc(f))!=EOF)
   {
        if (ch!='\r' && ch!='\n')
        {
            if (flag)
            {
                maxy++;
                flag=0;
            }
            *p++=ch;
        }
        else if (ch=='\n') flag=1;
   }
   DrawMap();
}

//胜利
void NextMap()
{
   SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_INTENSITY); //黄色
   SetConsoleCursorPosition(hOut, MainPos);
   WriteConsoleA(hOut, "你赢了！\n", 8, 0, 0);
   level++;
   getch();
   NewMap();
}

//判断是否胜利
void JudgeMap()
{
   char win=1;
   short p=0;
   COORD pos;
   SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_INTENSITY); //黄色
   while (DirectionX[p])
   {
        if (map[DirectionY[p]*maxx+DirectionX[p]]!='B')
        {
            win=0;
            if (DirectionX[p]!=x || DirectionY[p]!=y)
            {
                pos.X=DirectionX[p]<<1;
                pos.Y=DirectionY[p]+7;
                SetConsoleCursorPosition(hOut, pos);
                WriteConsoleA(hOut, "◆", 2, 0, 0);
            }
        }
        p++;
   }
   SetConsoleCursorPosition(hOut, MainPos);
   if (win) NextMap();
   SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_BLUE);
}

//选择地图
void SelectMap()
{
   int i, n=3;
   char szLevel[1];
   SetConsoleTextAttribute(hOut, FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_INTENSITY); //黄色
   SetConsoleCursorPosition(hOut, MainPos);
   WriteConsoleA(hOut, "关卡　\n", 6, 0, 0);
   level=0;
   while ((i=getch())!='\r')
   {
        if (i>='0' && i<='9')
        {
            level*=10;
            level+=i&15;
            szLevel[0]=i;
            WriteConsoleA(hOut, szLevel, 1, 0, 0);
            if (n--==0) break;
        }
   }
   NewMap();
}

//开始游戏
void StartGame()
{
   SetConsoleTextAttribute(hOut, BACKGROUND_RED|BACKGROUND_GREEN|BACKGROUND_BLUE|BACKGROUND_INTENSITY|FOREGROUND_RED|FOREGROUND_INTENSITY);
   SetConsoleCursorPosition(hOut, TopLeft);
   WriteConsoleA(hOut, "推箱子 　　　　　\n", 18, 0, 0);
   SetConsoleTextAttribute(hOut, BACKGROUND_RED|BACKGROUND_GREEN|BACKGROUND_BLUE|BACKGROUND_INTENSITY|FOREGROUND_BLUE|FOREGROUND_INTENSITY);
   WriteConsoleA(hOut, "ENTER——选关　　\nSPACE——重新开始\nESC———退出　　　", 53, 0, 0);
}

//控制推箱者移动
void move(short heading)
{   
   COORD pos={x<<1 ,y+7};
   SMALL_RECT rc={x<<1, y+7, (x<<1)+1, y+7};
   CHAR_INFO chFill;
   chFill.Attributes=FOREGROUND_RED|FOREGROUND_GREEN|FOREGROUND_BLUE;
   chFill.Char.AsciiChar=' ';
   switch (heading)
   {
   case UP:
        if (y>0)
        {
            if (map[(y-1)*maxx+x]!='B' && map[(y-1)*maxx+x]!='W')
            {
                y--;
                pos.Y--;
            }
            else if (y>1 && map[(y-1)*maxx+x]=='B' && map[(y-2)*maxx+x]!='B' && map[(y-2)*maxx+x]!='W')
            {
                map[(y-1)*maxx+x]='P';
                map[(y-2)*maxx+x]='B';
                y--;
                pos.Y-=2;
                rc.Top--;
            }
        }
        else return;
        break;
   case LEFT:
        if (x>0)
        {
            if (map[y*maxx+x-1]!='B' && map[y*maxx+x-1]!='W')
            {
                x--;
                pos.X-=2;
            }
            else if (x>1 && map[y*maxx+x-1]=='B' && map[y*maxx+x-2]!='B' && map[y*maxx+x-2]!='W')
            {
                map[y*maxx+x-1]='P';
                map[y*maxx+x-2]='B';
                x--;
                pos.X-=4;
                rc.Left-=2;
            }   
        }
        else return;
        break;
   case RIGHT:
        if (x<maxx-1)
        {
            if (map[y*maxx+x+1]!='B' && map[y*maxx+x+1]!='W')
            {
                x++;
                pos.X+=2;
            }
            else if (x<maxx-2 && map[y*maxx+x+1]=='B' && map[y*maxx+x+2]!='B' && map[y*maxx+x+2]!='W')
            {
                map[y*maxx+x+1]='P';
                map[y*maxx+x+2]='B';
                x++;
                pos.X+=2;
                rc.Right+=2;
            }
        }
        else return;
        break;
   case DOWN:
        if (y<maxy-1)
        {
            if (y<maxy-1 && map[(y+1)*maxx+x]!='B' && map[(y+1)*maxx+x]!='W')
            {
                y++;
                pos.Y++;
            }
            else if (y<maxy-2 && map[(y+1)*maxx+x]=='B' && map[(y+2)*maxx+x]!='B' && map[(y+2)*maxx+x]!='W')
            {
                map[(y+1)*maxx+x]='P';
                map[(y+2)*maxx+x]='B';
                y++;
                pos.Y++;
                rc.Bottom++;
            }
        }
        else return;
        break;
   default:
        return;
   }
   ScrollConsoleScreenBuffer(hOut, &rc, 0, pos, &chFill);
   JudgeMap();
}

//获取按键
void GetKey()
{
   switch (getch())
   {
   case ENTER: SelectMap(); break;
   case ESC: CloseHandle(hOut); TerminateProcess(GetCurrentProcess(), 0);
   case SPACE:   NewMap(); break;
   case ARROW: move(getch());
   }
}

int main()
{
   //设置窗口大小
   COORD size={80, 25};
   SetConsoleScreenBufferSize(hOut, size);

   SetConsoleOutputCP(936); //代码页设置为简体中文
   SetConsoleTitleA("推箱子——MasterRay"); //设置窗口标题

   StartGame();
   NewMap();
   while (1)
        GetKey();
   return 0;
}