Game2

#include<bits/stdc++.h>
#include<windows.h>
#include<conio.h>
#define KEY_DOWN(VK_NONAME) ((GetAsyncKeyState(VK_NONAME) & 0x8000) ? 1:0)
using namespace std;
void SetColor(unsigned short ForeColor=7,unsigned short BackGroundColor=0)
{
    HANDLE hCon=GetStdHandle(STD_OUTPUT_HANDLE);
    SetConsoleTextAttribute(hCon,ForeColor|BackGroundColor);
}
void Setcolor(unsigned short ForeColor=7,unsigned short BackGroundColor=0)
{
    HANDLE hCon=GetStdHandle(STD_OUTPUT_HANDLE);
    SetConsoleTextAttribute(hCon,ForeColor|BackGroundColor);
}
int m,n,lei,ll,geet;
int x,y,z;
char a[40][40];
char showed[40][40];
int nx[8][2]={{0,-1},{1,-1},{1,0},{1,1},{0,1},{-1,1},{-1,0},{-1,-1}};
bool life=true,first_left=true;
int rd(int l,int r)
{
    return rand()%(r-l+1)+l;
}
#define F(i,x,y) for(register int i=x;i<=y;++i)
int X,Y;
void search()
{
    LONG zx=-1;
    LONG zy=-1;
    POINT ptB={0,0};
    LPPOINT xy=&ptB;
    GetCursorPos(xy);
    if ((zx!=xy->x) || (zy!=xy->y))
    {
        X=xy->x;
        Y=xy->y;
    }
}
void gotoxy(int y,int x)
{
    CONSOLE_SCREEN_BUFFER_INFO    csbiInfo;
    HANDLE    hConsoleOut;
    hConsoleOut = GetStdHandle(STD_OUTPUT_HANDLE);
    GetConsoleScreenBufferInfo(hConsoleOut,&csbiInfo);
    csbiInfo.dwCursorPosition.X = x;
    csbiInfo.dwCursorPosition.Y = y;
    SetConsoleCursorPosition(hConsoleOut,csbiInfo.dwCursorPosition);
}
void cls()
{
    system("cls");
}
int xx,yy,ix,iy,jx,jy;
void change(int x,int y)
{
    yy=(double)(x-ix)/(jx-ix)*70+0.5;
    xx=(double)(y-iy)/(jy-iy)*24+0.5;
}
void pause()
{
    printf("按空格键继续.\n");
    char c1=0; 
    while(c1!=' ') c1=getch();
}
bool ff(bool a,bool b)
{
    return ((a&&(!b))||(b&&(!a)));
}
void jz()
{
    printf("加载中，即将进入校准\n");
    Sleep(1000);
    pause();
    cls();
    printf("O  <-左键这个圆圈的中心\n");
    while(1)
    {
        if(KEY_DOWN(MOUSE_MOVED))
        {
            search();
            ix=X,iy=Y;
            printf("很好！\n");
            break;
        }
    }
    pause();
    for(int i=1;i<=21;i++) printf("\n");
    for(int i=1;i<=40;i++) printf(" ");
    printf("        左键这个圆圈的中心->  O\n");
    while(1)
    {
        if(KEY_DOWN(MOUSE_MOVED))
        {
            search();
            jx=X,jy=Y;
            printf("很好！\n不要再移动你的窗口了！！！\n");
            break;
        }
    }
    pause();
}
void help()
{
    cls();
    printf("游戏说明：\n");
    printf("经过本蒟蒻的不懈努力，玩法与Windows自带的扫雷完全一样啦！\n");
    printf("还原了大部分Windows自带扫雷的内容，如想退出请直接点击右上角。\n");
    printf("如果在使用右键时跳出右键菜单，请无视并点击游戏区域以外以刷新界面。\n");
    printf("点击下方的按钮可以保存并退出。\n");
    pause();
}
void init()
{
    cls();
    printf("请输入你希望棋盘的行数m(9 ~ 24)、列数n(9 ~ 30)、雷数l(10 ~ m*n-20)：\n");
    printf("注：初级：9 9 10;中级：16 16 40;高级：16 30 99。\n");
    scanf("%d%d%d",&m,&n,&lei);
    if(m<9||m>24||n<9||n>30||lei<10||lei>m*n-20) {printf("输入数据不合法，请重新输入");Sleep(1000);system("cls");init();}
    ll=lei;
    return;
}
bool win()
{
    F(i,1,m) F(j,1,n)
    if(a[i][j]=='*') {if(showed[i][j]!='*'&&showed[i][j]!='a') return false;}
    else {if(showed[i][j]=='*'||showed[i][j]=='a'||showed[i][j]=='?') return false;}
    return true;
}
void make_map()
{
    F(i,1,m) F(j,1,n) {a[i][j]='0';showed[i][j]='*';}
    srand(time(0));
    int cnt=0,xxx,yyy;
    while(cnt<lei)
    {
        xxx=rd(1,m),yyy=rd(1,n);
        if(a[xxx][yyy]!='*')
        {
            a[xxx][yyy]='*';
            ++cnt;
            F(i,0,7) if(a[xxx+nx[i][0]][yyy+nx[i][1]]!='*') ++a[xxx+nx[i][0]][yyy+nx[i][1]];
        }
    }
    return;
}
void showgame()
{
    F(i,1,m) F(j,1,n)
    {
        gotoxy(4+i,j<<1);
        switch(showed[i][j])
        {
            case '*':if(!win()&&life) {SetColor(0xc);putchar('*');}
                     else if(a[i][j]=='*') {SetColor(0xa);putchar('o');}
                     else {SetColor(0xc);putchar('*');}
                     SetColor();break;
            case '1':case '2':case '3':case '4':case '5':case '6':case '7':case '8':case '9':
            SetColor(0x6);putchar(showed[i][j]);SetColor();break;
            case 'a':if((!life||win())&&a[i][j]!='*') {Setcolor(0x5);putchar('x');}
                     else {SetColor(0xb);putchar('a');}
                     SetColor();break;
            case '?':SetColor(0x8);putchar('?');SetColor();break;
            case ' ':putchar(' ');break;
        }
    }
    gotoxy(6+m,14);
    printf("    ");
    gotoxy(6+m,14);
    printf("%d",ll);
    if(ll<0) printf(" ???");
    gotoxy(10+m,0);
    return;
}
void first_flush()
{
    cls();
    printf("图例：\n");
    SetColor(0x6);cout<<"数字";
    Setcolor();cout<<"：四周的雷的个数   空：旁边没有雷   ";
    Setcolor(0xb);cout<<"a";
    Setcolor();cout<<"：标记为雷\n";
    Setcolor(0xc);cout<<"*";
    Setcolor();cout<<"：未知   ";
    Setcolor(0xa);cout<<"o";
    Setcolor();cout<<"：雷（游戏结束时显现）  ";
    Setcolor(0x8);cout<<"?";
    Setcolor();cout<<"：不确定\n";
    Setcolor(0x5);cout<<"x";
    Setcolor();cout<<"：误标为雷（游戏结束时显现）\n";
    putchar('+');
    F(i,1,2*n+1) printf("-");
    putchar('+');
    putchar('\n');
    F(i,1,m)
    {
        printf("|");
        gotoxy(i+4,2*n+2);
        printf("|\n");
    }
    putchar('+');
    F(i,1,2*n+1) printf("-");
    printf("+\n");
    printf("剩余雷的个数：\n");
    printf("+--------------+\n");// line 7+m
    printf("|保 存 并 退 出|\n");
    printf("+--------------+\n");
    return;
}
void show(int xx,int yy)//left_click
{
    if(showed[xx][yy]!='*') return;
    if(a[xx][yy]=='*') {life=false;return;}
    if(a[xx][yy]!='0') showed[xx][yy]=a[xx][yy];else {showed[xx][yy]=' ';F(i,0,7) show(xx+nx[i][0],yy+nx[i][1]);}
    return;
}
void flag(int xx,int yy)//right_click
{
    if(showed[xx][yy]=='*') {showed[xx][yy]='a';--ll;}
    else if(showed[xx][yy]=='a') {showed[xx][yy]='?';++ll;}
    else if(showed[xx][yy]=='?') showed[xx][yy]='*';
    return;
}
void out(int xx,int yy)//(left+right)_click
{
    int tt=0;
    F(i,0,7) if(showed[xx+nx[i][0]][yy+nx[i][1]]=='a') ++tt;
    if(tt+48==showed[xx][yy])
    {F(i,0,7) if(showed[xx+nx[i][0]][yy+nx[i][1]]!='a') show(xx+nx[i][0],yy+nx[i][1]);}
}
void save()
{
    freopen("D:\\saolei.save","w",stdout);
    printf("%d %d %d\n",m,n,ll);
    F(i,1,m)
    {
        F(j,1,n) putchar(a[i][j]);
        putchar('\n');
    }
    F(i,1,m)
    {
        F(j,1,n) putchar(showed[i][j]);
        putchar('\n');
    }
    exit(0);
}
void read()
{
    freopen("D:\\saolei.save","r",stdin);
    cin>>m>>n>>ll;
    F(i,1,m) F(j,1,n){a[i][j]=getchar();while(a[i][j]=='\n') a[i][j]=getchar();}
    F(i,1,m) F(j,1,n){showed[i][j]=getchar();while(showed[i][j]=='\n') showed[i][j]=getchar();}
    freopen("CON","r",stdin);
    return;
}
void cz()
{
    while(1)
    if(KEY_DOWN(VK_LBUTTON))
    {
        search();
        change(X,Y);
        y=xx-4;z=yy>>1;
        if(xx>=7+m&&xx<=9+m&&yy>=0&&yy<=15) save();
        if(y<1||y>m||z<1||z>n) showgame();
        while(first_left&&a[y][z]=='*') make_map();
        first_left=false;
        show(y,z);
        while(KEY_DOWN(VK_LBUTTON));
        break;
    }
    else if(KEY_DOWN(VK_RBUTTON))
    {
        #define i y
        #define j z
        search();
        change(X,Y);
        y=xx-4;z=yy>>1;
        if(y<1||y>m||z<1||z>n) showgame();
        if(isdigit(showed[y][j]))
        F(k,0,7) if(showed[i+nx[k][0]][j+nx[k][1]]=='*')
        {gotoxy(i+nx[k][0]+4,(j+nx[k][1])<<1);putchar(' ');}
        gotoxy(10+m,0);
        while(KEY_DOWN(VK_RBUTTON))
        if(KEY_DOWN(VK_LBUTTON)) if(isdigit(showed[y][j])) {out(i,j);break;}
        if(!isdigit(showed[y][j])) flag(i,j);
        #undef i
        #undef j
    }
    return;
}
int main()
{
    system("mode con cols=80 lines=40");
    system("title C++版扫雷v1.4.5 by WYXkk");
    jz();
    help();
    if(MessageBox(NULL,"你想要读取存档吗？\n注意：请确定有存档再确定！！","C++版扫雷v1.4.5 by WYXkk",MB_YESNO)!=7)
    {read();goto start;}
    while(1)
    {
        life=true;
        first_left=true;
        init();
        make_map();
        start:first_flush();
        while(life&&(!win()))
        {
            showgame();
            cz();
        }
        if(life) ll=0;
        showgame();
        gotoxy(6+m,0);
        printf("                         \n                         \n\
                         \n                         \n");
        gotoxy(6+m,0);
        if(life) printf("你赢了！\n");
        else printf("你输了！\n");
        pause();
        cls();
        printf("你还想继续玩吗？不想请按Esc，否则按除Esc外的任意键。\n");
        printf("注意：如还想继续玩请不要移动窗口！！！\n");
        switch(getch())
        {
            case 27:return 0;
            case 32:case 13:continue;
            default:break;
        }
    }
}