#include"snack.h"
void SetPos(int x, int y)
{//获得设备句柄
	COORD pos = { x, y };
	HANDLE hOutput = NULL;
	//获取标准输出的句柄(⽤来标识不同设备的数值)
	hOutput = GetStdHandle(STD_OUTPUT_HANDLE);
	//设置标准输出上光标的位置为pos
	SetConsoleCursorPosition(hOutput, pos);
}
void GameStart(pSnack snack)
{
	//设置控制台信息，窗口大小，窗口名
	system("mode con cols=100 lines=30");
	system("title 贪吃蛇");
	HANDLE handle= GetStdHandle(STD_OUTPUT_HANDLE);
	CONSOLE_CURSOR_INFO cursorInfo;
	GetConsoleCursorInfo(handle, &cursorInfo);
	cursorInfo.bVisible = false;
	SetConsoleCursorInfo(handle, &cursorInfo);
	//打印欢迎界面
	WelcomeTogame();
	//绘制地图
	CreatMap();
	//初始化蛇
	InitSnack(snack);
	//创建食物
	CreatFood(snack);
}
void WelcomeTogame(void)
{
	//打印的是欢迎信息
	SetPos(35, 10);
	printf("欢迎来到贪吃蛇小游戏\n");
	SetPos(38, 20);
	system("pause");
	system("cls");
	//打印的是功能介绍信息
	SetPos(15, 10);
	printf("用 ↑　↓　←　→　来表示蛇的移动方向，F3是加速，F4是减速\n");
	SetPos(15, 11);
	printf("加速可以获得更高的分数");
	SetPos(38, 20);
	system("pause");
	system("cls");
}
void CreatMap(void)
{
	//上
	SetPos(0, 0);
	int i = 0;
	for(i;i<=56;i+=2)
		wprintf(L"%lc", WALL);
	//下
	SetPos(0, 26);
	for (i=0; i <= 56; i += 2)
		wprintf(L"%lc", WALL);
	//左
	for (i = 0; i <= 25; i++)
	{
		SetPos(0, i);
		wprintf(L"%lc", WALL);
	}
	//右
	for (i = 0; i <= 25; i++)
	{
		SetPos(56,i);
		wprintf(L"%lc",WALL);
	}
}
void InitSnack(pSnack ps)
{
	pSnackNode cur;
	int i = 0;
	for (int i = 0; i < 5; i++)
	{
		cur=(pSnackNode)malloc(sizeof(SnackNode));
		if (!cur)
		{
			perror("malloc fail : ");
			return;
		}
		cur->x = POS_X + i * 2;
		cur->y = POS_Y;
		cur->next = NULL;
		//头插法
		if (ps->pSnack == NULL)
			ps->pSnack = cur;
		else
		{
			cur->next = ps->pSnack;
			ps->pSnack = cur;
		}
	}
	//打印蛇身
	cur = ps->pSnack;
	while (cur)
	{
		SetPos(cur->x, cur->y);
		wprintf(L"%lc", BODY);
		cur = cur->next;
	}
	//贪吃蛇其他信息初始化
	ps->dir = RIGHT;
	ps->pFood = NULL;
	ps->Socre = 0;
	ps->FoodWeight = 10;
	ps->SleepTime = 200;
	ps->status = OK;
}

void CreatFood(pSnack ps)
{
	srand((unsigned int)time(NULL));
	int x = 0, y = 0;
again:
	do
	{
		x = rand() % 53 + 2;
		y = rand() % 24 + 1;
	} while (x % 2);
	//食物坐标与蛇的身体每个节点坐标比较
	pSnackNode cur = ps->pSnack;
	while (cur)
	{
		if (cur->x == x && cur->y == y)
			goto again;
		cur = cur->next;
	}
	pSnackNode food = (pSnackNode)malloc(sizeof(SnackNode));
	if (!food)
	{
		perror("malloc fail : ");
		return;
	}
	food->next = NULL;
	food->x = x;
	food->y = y;
	ps->pFood = food;
	SetPos(x, y);
	wprintf(L"%lc", FOOD);
}
void GameRun(pSnack ps)
{
	//打印帮助信息
	PrintHelpInfo();
	do
		//打印得分
	{
		SetPos(60, 10);
		printf("总分:%5d", ps->Socre);
		SetPos(60, 12);
		printf("食物的分值%2d", ps->FoodWeight);
		//检测按键
		//上下左右，空格，ESC，F3，F4
		 if (KEY_PESS(VK_UP) && ps->dir != DOWN)
			ps->dir = UP;
		else if (KEY_PESS(VK_DOWN) && ps->dir != UP)
			ps->dir = DOWN;
		else if (KEY_PESS(VK_LEFT) && ps->dir != RIGHT)
			ps->dir = LEFT;
		else if (KEY_PESS(VK_RIGHT) && ps->dir != LEFT)
			ps->dir = RIGHT;
		else if (KEY_PESS(VK_ESCAPE))
		{
			ps->status = ESC;
			break;
		}
		else if (KEY_PESS(VK_SPACE))
			pause();
		else if (KEY_PESS(VK_F3))
		 {
			 if (ps->SleepTime >= 80)
			 {
				 ps->SleepTime -= 30;
				 ps->FoodWeight += 2;
			 }
		 }
		else if (KEY_PESS(VK_F4))
		 {
			 if (ps->FoodWeight>2 )
			 {
				 ps->SleepTime += 30;
				 ps->FoodWeight -= 2;
			 }
		 }
		//睡眠一下
		 Sleep(ps->SleepTime);
		//走下一步
		 SnackMove(ps);
		 //是否撞墙
		 if (IsKillWall(ps))
			 ps->status = KILL_BY_WALL;
		 //是否咬到自己
		 if (IsKillSelf(ps))
			 ps->status = KILL_BY_SELF;
	} while (ps->status==OK);
}
void PrintHelpInfo(void)
{
	SetPos(60, 15);
	printf("1.不能穿墙  不能咬到自己\n");
	SetPos(60, 17);
	printf("2.用 ↑　↓　←　→　来表示蛇的移动方向\n");
	SetPos(60, 19);
	printf("3.按F3是加速，按F4是减速\n");
}
void pause(void)
{
	while (1)
	{
		if (KEY_PESS(VK_SPACE))
			break;
		Sleep(100);
	}
}
void SnackMove(pSnack ps)
{
	pSnackNode p=(pSnackNode)malloc(sizeof(SnackNode));
	if (p == NULL)
	{
		perror("malloc fail : ");
		return;
	}
	p->next = NULL;
	switch (ps->dir)
	{
	case UP:
		p->x = ps->pSnack->x;
		p->y = ps->pSnack->y-1;
		break;
	case DOWN:
		p->x = ps->pSnack->x;
		p->y = ps->pSnack->y + 1;
		break;
	case LEFT:
		p->x = ps->pSnack->x-2;
		p->y = ps->pSnack->y;
		break;
	case RIGHT:
		p->x = ps->pSnack->x+2;
		p->y = ps->pSnack->y;
		break;
	}
	//下一个坐标是食物吗
	if (NextIsFood(ps, p))
	{
		//吃掉食物
		EatFood(ps,p);
	}
	//不吃食物
	else
	{
		NotEatFood(ps, p);
	}
}
bool NextIsFood(pSnack ps, pSnackNode p)
{
	return ps->pFood->x == p->x&&p->y==ps->pFood->y;
}
void EatFood(pSnack ps,pSnackNode p)
{
	p->next = ps->pSnack;
	ps->pSnack = p;
	//打印蛇身
	pSnackNode cur = ps->pSnack;
	while (cur)
	{
		SetPos(cur->x, cur->y);
		wprintf(L"%lc", BODY);
		cur = cur->next;
	}
	ps->Socre += ps->FoodWeight;
	free(ps->pFood);
	CreatFood(ps);
}
void NotEatFood(pSnack ps, pSnackNode  p)
{
	p->next = ps->pSnack;
	ps->pSnack = p;
		//寻找尾节点同时打印蛇身
	while (p->next->next)//不对劲
		{
			SetPos(p->x, p->y);
			wprintf(L"%lc",BODY);
			p = p->next;
		} 
	SetPos(p->x, p->y);
	wprintf(L"%lc", BODY);
		//把尾节点的位置打印为空白字符
		SetPos(p->next->x, p->next->y);
		printf("  ");
		//释放尾节点
		free(p->next);
		p->next = NULL;
}
bool IsKillWall(pSnack  ps)
{
	if (ps->pSnack->x ==0 || ps->pSnack->x==56 || ps->pSnack->y ==0 || ps->pSnack->y==26)
		return true;
	return false;
}
bool IsKillSelf(pSnack  ps)
{
	pSnackNode cur = ps->pSnack->next;
	while (cur)
	{
		if (ps->pSnack->x == cur->x && cur->y == ps->pSnack->y)
			return true;
		cur = cur->next;
	}
	return false;
}
void GameEnd(pSnack ps)//游戏结束的善后
{
	SetPos(15, 12);
	switch (ps->status)
	{
	case ESC:
		printf("主动退出游戏退出成功\n");
		break;
	case KILL_BY_SELF:
		printf("很遗憾，你咬到自己了,游戏结束\n");
		break;
	case KILL_BY_WALL:
		printf("很遗憾，你撞墙了，游戏结束\n");
		break;

	}
	//释放开辟的空间
	pSnackNode cur = ps->pSnack;
	while (cur)
	{
		pSnackNode new = cur;
		cur = cur->next;
		free(new);
	}
	free(ps->pFood);
	ps->pFood = NULL;
	ps = NULL;
}

#pragma once
#define _CRT_SECURE_NO_WARNINGS 1
#include<stdio.h>
#include<windows.h>
#include<locale.h>
#include<stdbool.h>
#include<time.h>
#define WALL L'□'
#define BODY L'●'
#define FOOD L'★'
#define POS_X 24
#define POS_Y 5
#define KEY_PESS(VK)  (GetAsyncKeyState(VK)&1)
//贪吃蛇蛇身节点的定义
typedef struct SnackNode
{
	int x, y;
	struct SnackNode* next;
}SnackNode,*pSnackNode;

//游戏状态
enum GAME_STATUS
{
	OK=1,
	ESC,
	KILL_BY_WALL,
	KILL_BY_SELF
};

enum DIRECTION
{
	UP,
	DOWN,
	LEFT,
	RIGHT
};

//贪吃蛇信息
typedef struct Snack
{
	pSnackNode pSnack;//维护整条蛇
	pSnackNode pFood;//指向食物的指针
	int Socre;//当前分数
	int FoodWeight;//单个食物分数
		int SleepTime;//蛇的速度
		enum GAME_STATUS status;//当前游戏状态
		enum DIRECTION dir;//蛇运动方向
}Snack,*pSnack;
void SetPos(int x, int y);
void GameStart(pSnack snack);
void WelcomeTogame(void);
void CreatMap(void);
void pause(void);
void InitSnack(pSnack ps);
void CreatFood(pSnack ps);
void GameRun(pSnack ps);
void PrintHelpInfo(void);
void SnackMove(pSnack ps);
bool NextIsFood(pSnack ps, pSnackNode p);
void EatFood(pSnack ps, pSnackNode p);
void NotEatFood(pSnack ps, pSnackNode  p);
bool IsKillWall(pSnack  ps);
bool IsKillSelf(pSnack  ps);
void GameEnd(pSnack ps);//游戏结束的善后

#include"snack.h"
void test(void)
{
	int x = 0;
	do
	{
		Snack snack = { 0 };

		GameStart(&snack); //游戏开始前的初始化

		GameRun(&snack);//游戏游玩过程
		GameEnd(&snack);//游戏结束的善后
		SetPos(20, 15);
		printf("再来一局吗？（Y/N）:");
		x = getchar();
		getchar();
	} while (x == 'Y' || x == 'y');
}
int main()
{
	//配置本地环境
	setlocale(LC_ALL, "");
	test();
	SetPos(0, 26);
	return 0;
}