#include<bits/stdc++.h>
#include<conio.h>
using namespace std;
#define int long long
const int N=1e6+10;
#define debug() cout<<"come on"<<'\n'
int r[]={8,128,256,512,1024,2048,4096};
int a[4][4],point,type,kkk;
char op;
const int dx[]={0,0,1,-1};
const int dy[]={-1,1,0,0};
bool ji(int x,int y){
	for(int i=0;i<=3;i++){
		int xx=x+dx[i];
		int yy=y+dy[i];
		if(xx<0||xx>3||yy<0||yy>3)continue;
		if(a[xx][yy]==a[x][y])return false;
	}
	return true;
}
bool man(){
	for(int i=0;i<=3;i++){
		for(int j=0;j<=3;j++){
			if(a[i][j]==0)return true;
		}
	}
	return false;
}
bool pd(){
	if(man())return true;
	for(int i=0;i<=3;i++){
		for(int j=0;j<=3;j++){
			if(!ji(i,j))return true;
		}
	}
	return false;
}
void sc(){
	int x,y;
	if(!man())return ;
	do{
		x=rand()%4;
		y=rand()%4;
	}while(a[x][y]>=2);
	a[x][y]=(rand()%2+1)*2;//iakioi
//	cout<<x<<" "<<y<<" "<<a[x][y]<<'\n';
}
bool print(){
	int maxx=2;
	for(int i=0;i<=3;i++){
		for(int j=0;j<=3;j++){
			maxx=max(maxx,a[i][j]);
			if(a[i][j]>=1000){
				cout<<""<<a[i][j]<<" |";
			}
			else if(a[i][j]>=100){
				cout<<" "<<a[i][j]<<" |";
			}
			else if(a[i][j]>=10){
				cout<<" "<<a[i][j]<<"  |";
			}
			else if(a[i][j]>=1){
				cout<<"  "<<a[i][j]<<"  |";
			}
			else cout<<"     |";
		}
		cout<<endl;
	}
	if(maxx>=kkk)return true;
	return false;
}
void sy(int x,int y){
	for(int i=x-1;i>=0;i--){
		if(a[i][y]==0){
			a[i][y]=a[i+1][y];
			a[i+1][y]=0;
		}
		else{
			if(a[i][y]==a[i+1][y]){
				a[i][y]=a[i+1][y]*2;
				point+=a[i][y];
				a[i+1][y]=0;
				break;
			}
			else{
				break;
			}
		}
	} 
}
void zy(int x,int y){
	for(int i=y-1;i>=0;i--){
		if(a[x][i]==0){
			a[x][i]=a[x][i+1];
			a[x][i+1]=0;
		}
		else{
			if(a[x][i]==a[x][i+1]){
				a[x][i]=a[x][i+1]*2;
				point+=a[x][i];
				a[x][i+1]=0;
				break;
			}
			else{
				break;
			}
		}
	}
}
void yy(int x,int y){
	for(int i=y+1;i<=3;i++){
		if(a[x][i]==0){
			a[x][i]=a[x][i-1];
			a[x][i-1]=0;
		}
		else{
			if(a[x][i]==a[x][i-1]){
				a[x][i]=a[x][i-1]*2;
				point+=a[x][i];
				a[x][i-1]=0;
				break;
			}
			else{
				break;
			}
		}
	}
}
void xy(int x,int y){
	for(int i=x+1;i<=3;i++){
		if(a[i][y]==0){
			a[i][y]=a[i-1][y];
			a[i-1][y]=0;
		}
		else{
			if(a[i][y]==a[i-1][y]){
				a[i][y]=a[i-1][y]*2;
				point+=a[i][y];
				a[i-1][y]=0;
				break;
			}
			else{
				break;
			}
		}
	} 
}
signed main(){
	srand(time(NULL));
	sc();
	cout<<"请选择胜利的目标( 0 : 8  ,  1 : 128  ,  2 : 256  ,  3 : 512  ,  4 : 1024  ,  5 : 2048  ,  6 : 4096 )"<<'\n';
	cin>>type;
	kkk=r[type];
	int cnt=0; 
	cout<<"\n按wasd游玩\n";
	while(op=getch()){
		cout<<"步数"<<++cnt<<":"<<'\n';
		if(op=='w'){
			for(int i=0;i<=3;i++){
				for(int j=0;j<=3;j++){
					if(a[i][j]!=0)sy(i,j);
				}
			}
		}
		else if(op=='a'){
			for(int i=0;i<=3;i++){
				for(int j=0;j<=3;j++){
					if(a[i][j]!=0)zy(i,j);
				}
			}
		}
		else if(op=='s'){
			for(int i=0;i<=3;i++){
				for(int j=0;j<=3;j++){
					if(a[i][j]!=0)xy(i,j);
				}
			}
		}
		else if(op=='d'){
			for(int i=0;i<=3;i++){
				for(int j=0;j<=3;j++){
					if(a[i][j]!=0)yy(i,j);
				}
			}
		}
		else{
			print();
			continue;
		}
		sc();
		if(print()){
			cout<<"You Win!"<<'\n';
			cout<<"你的分数是"<<point<<"分\n";
			return 0;
		}
		cout<<"现在的分数是:"<<point<<"分"<<'\n';
		if(pd()){
//			for(int i=0;i<=3;i++){
//				for(int j=0;j<=3;j++){
//					if(ji(i,j))cout<<"true ";
//					else cout<<"false ";
//				}
//				cout<<endl;
//			}
			continue;
		}
		else{
//			for(int i=0;i<=3;i++){
//				for(int j=0;j<=3;j++){
//					cout<<a[i][j]<<" ";
//				}
//				cout<<endl;
//			}
			cout<<"You lose!"<<'\n';
			cout<<"你的分数是"<<point<<"分\n";
			return 0;
		}
	}
	return 0;
}
//fom dulinfan2024