拉灯游戏加强版

#include<windows.h>
#include<conio.h>
#include<cstdio>
#include<ctime>
#include<cstring>
#include<cstdlib>
#include<algorithm>
#define N 40
#define BOARDX(x) ((x)-OFFSETX)/2
#define BOARDY(y) (y)-OFFSETY
#define SCREENX(x) (x)*2+OFFSETX
#define SCREENY(y) (y)+OFFSETY
#define BACKGROUND_WHITE (BACKGROUND_BLUE | BACKGROUND_GREEN | BACKGROUND_RED)
#define FOREGROUND_WHITE (FOREGROUND_BLUE | FOREGROUND_GREEN | FOREGROUND_RED)
using namespace std;
int QT;
int f

;
int a[N*N][N*N];
int ans

;
int which[N*N],ins[N*N];
int OFFSETX=3;
int OFFSETY=3;
int HEIGHT;
int WIDTH;
int LAMP;
int LEVEL;
HANDLE hIn,hOut;
const int dir[4][2]={
0,1,
1,0,
0,-1,
-1,0
};

void writeChar(LPCSTR pChar,COORD wrtCrd);
void newgame();
void levelmade();
void gamemade();
bool is_win();
void drawCell(int x,int y);
void write();
void initgame();
void doing();
void WinGame();
void exchange(int x,int y);
void clearScreen();

void AnsMade()
{
memset(a,0,sizeof(a));
for(int i=1;i<=HEIGHT;i++)
{
for(int j=1;j<=WIDTH;j++)
{
int tot=(i-1)*WIDTH+j;
a[tot][tot]=1;
for(int k=0;k<4;k++)
{
int x=i+dir[k][0],y=j+dir[k][1];
if(x>HEIGHT||x<=0||y<=0||y>WIDTH)continue;
a[tot][(x-1)*WIDTH+y]=1;
}
}
}
}

void drawAns(int x,int y)
{
char buf[5]={0};
switch (ans[x][y])
{
case 0:
sprintf(buf,"○\0");
break;
case 1:
sprintf(buf,"●\0");
break;
}
COORD cci={SCREENX(x),SCREENY(y)};
writeChar(buf,cci);
}

void GetAns()
{
SetConsoleTitle("拉灯游戏提示界面   F2:返回");
AnsMade();
for(int i=1;i<=HEIGHT;i++)
for(int j=1;j<=WIDTH;j++)
a[(i-1)*WIDTH+j][HEIGHT*WIDTH+1]=f[i][j];
int Equ=HEIGHT*WIDTH,Var=HEIGHT*WIDTH;
memset(which,0,sizeof(which));
memset(ins,0,sizeof(ins));
int i=1,j=1,k;
while(i<=Equ&&j<=Var)
{
for(k=i;k<=Equ;k++)
if(a[k][j])break;
if(a[k][j])
{
if(k!=i)
for(int p=j;p<=Var+1;p++)
swap(a[i][p],a[k][p]);
for(k=i+1;k<=Equ;k++)
{
if(!a[k][j])continue;
for(int p=j;p<=Var+1;p++)
a[k][p]^=a[i][p];
}
which[i]=j,ins[j]=i;
i++;
}
j++;
}
for(k=i;k<=Var;k++)
a[k][Var+1]=1;
for(k=i-1;k>=1;k--)
{
for(int p=which[k]+1;p<=Var;p++)
if(a[k][p])a[k][Var+1]^=a[ins[p]][Var+1];
}
clearScreen();
memset(ans,0,sizeof(ans));
for(int i=1;i<=HEIGHT;i++)
for(int j=1;j<=WIDTH;j++)
ans[i][j]=a[(i-1)*WIDTH+j][HEIGHT*WIDTH+1];
for(int i=1;i<=HEIGHT;i++)
for(int j=1;j<=WIDTH;j++)
drawAns(i,j);
}

int read()
{
static char ch;
static int D;
while(!isdigit(ch=getch()));
for(D=ch-'0';isdigit(ch=getch());)
D=D*10+ch-'0';
return D;
}

void fillChar(TCHAR cChar, DWORD len, COORD wrtCrd)
{
DWORD wtn;
FillConsoleOutputCharacter(hOut, cChar, len, wrtCrd, &wtn);
}

void fillAttr(WORD attr, DWORD len, COORD wrtCrd)
{
DWORD wtn;
FillConsoleOutputAttribute(hOut, attr, len, wrtCrd, &wtn);
}

void clearScreen()
{
COORD crd = {0, 0};
CONSOLE_SCREEN_BUFFER_INFO csbi;
GetConsoleScreenBufferInfo(hOut, &csbi);
fillChar(' ', csbi.dwSize.X * csbi.dwSize.Y, crd);
fillAttr(FOREGROUND_WHITE, csbi.dwSize.X * csbi.dwSize.Y, crd);
}

void exchange(int x,int y)
{
f[x][y]^=1;
for(int j=0;j<4;j++)
{
int xx=x+dir[j][0];
int yy=y+dir[j][1];
f[xx][yy]^=1;
}

}

void writeChar(LPCSTR pChar,COORD wrtCrd)
{
DWORD wtn;
WriteConsoleOutputCharacter(hOut,pChar,strlen(pChar),wrtCrd,&wtn);
}

void newgame()
{
SetConsoleTitle("拉灯游戏   F1:提示");
clearScreen();
char buf[50]={0};
sprintf(buf,"按任意键开始游戏\0");
COORD cci={30,10};
writeChar(buf,cci);
getch();
}

void levelmade()
{
clearScreen();
char buf[50]={0};
sprintf(buf," 请选择难度等级\0");
int x=30;
int y=9;
COORD cci1={x,y};
writeChar(buf,cci1);
sprintf(buf,"简单:1 容易:2 困难:3 自定义:4\0");
x=25;
y=11;
COORD cci2={x,y};
writeChar(buf,cci2);
char k=getch();
LEVEL=k-'0';
if(LEVEL>4||LEVEL<1)
levelmade();
}

void gamemade()
{
srand(time(0));
if(LEVEL!=4)
{
memset(f,0,sizeof(f));
LAMP=rand()%LAMP+LAMP;
for(int i=1;i<=LAMP;i++)
{
int x=rand()%HEIGHT+1;
int y=rand()%WIDTH+1;
exchange(x,y);
}
}
}

bool is_win()
{
for(int i=1;i<=HEIGHT;i++)
for(int j=1;j<=WIDTH;j++)
if(f[i][j])
return 0;
return 1;
}

void drawCell(int x,int y)
{
char buf[5]={0};
switch (f[x][y])
{
case 0:
sprintf(buf,"○\0");
break;
case 1:
sprintf(buf,"●\0");
break;
}
COORD cci={SCREENX(x),SCREENY(y)};
writeChar(buf,cci);
}

void write()
{
SetConsoleTitle("拉灯游戏   F1:提示");
clearScreen();
for(int i=1;i<=HEIGHT;i++)
{
for(int j=1;j<=WIDTH;j++)
{
if(!is_win())
drawCell(i,j);
else
WinGame();
}
}
}

void WinGame()
{
clearScreen();
char buf[50]={0};
sprintf(buf,"恭喜你，你赢了\0");
COORD cci={30,10};
writeChar(buf,cci);
Sleep(100);
getch();
initgame();
}

void make_me()
{
FILE *fin=fopen("tt.in","r");
fscanf(fin,"%d%d",&WIDTH,&HEIGHT);
for(int j=1;j<=WIDTH;j++)
for(int i=1;i<=HEIGHT;i++)
fscanf(fin,"%d",&f[i][j]);
}

void initgame()
{
levelmade();
if(LEVEL==1)
{
HEIGHT=9,WIDTH=9,LAMP=20;
gamemade();
}else if(LEVEL==2)
{
HEIGHT=16,WIDTH=16,LAMP=50;
gamemade();
}else if(LEVEL==3)
{
HEIGHT=30,WIDTH=16,LAMP=100;
gamemade();
}else make_me();
OFFSETX=(70-HEIGHT*2)/2;
write();
}

void onKeyDown(WORD keycode)
{
switch(keycode)
{
case VK_F1:GetAns();break;
case VK_F2:write();break;
default:break;
}
}

int main()
{
hIn=GetStdHandle(STD_INPUT_HANDLE);
hOut=GetStdHandle(STD_OUTPUT_HANDLE);
CONSOLE_CURSOR_INFO cci;
cci.dwSize=1;
cci.bVisible=FALSE;
SetConsoleCursorInfo(hOut,&cci);
newgame();
initgame();
for(;;)
{
DWORD nEvts;
GetNumberOfConsoleInputEvents(hIn,&nEvts);
if(nEvts>0)
{
INPUT_RECORD inpRec;
ReadConsoleInput(hIn,&inpRec,1,&nEvts);
if(inpRec.EventType==MOUSE_EVENT)
{
int x=BOARDX(inpRec.Event.MouseEvent.dwMousePosition.X);
int y=BOARDY(inpRec.Event.MouseEvent.dwMousePosition.Y);
if(inpRec.Event.MouseEvent.dwEventFlags==MOUSE_MOVED)
continue;
if(inpRec.Event.MouseEvent.dwButtonState==FROM_LEFT_1ST_BUTTON_PRESSED)
{
exchange(x,y);
write();
}else
continue;
}
if(inpRec.EventType==KEY_EVENT)
onKeyDown(inpRec.Event.KeyEvent.wVirtualKeyCode);
}
FlushConsoleInputBuffer(hIn);
Sleep(50);
}
return 0;
}