main.cpp

#include<graphics.h>
#include<cstdlib>
#include<ctime>
#include <ege/sys_edit.h>
#include <stdio.h>
#include <string.h>

#include"header.h"

void addscore(const char* name, int score) {
    int i;
    for (i = 0; i < scorecount; i++) {
        if (score > rank[i].score ) {
            break;
        }
    }

    for (int j = scorecount; j > i; j--) {
        rank[j] = rank[j - 1];
    }

    strcpy(rank[i].name, name);
    rank[i].score = score;
    scorecount++;
}

void loadRecord() {
	FILE *save = fopen("rank.txt", "r");
    if (save == NULL) {
        printf("Error opening txt\n");
        return;
    }
    if (save != NULL) {
        for (int i = 0; i < scorecount; i++) {
        fscanf(save,"%s %d",&rank[i].name,&rank[i].score);

    	}

    }
}

void savescores() {
    FILE* file = fopen("rank.txt", "w");

    for (int i = 0; i < scorecount; i++) {
    fprintf(file, "%s %d\n", rank[i].name, rank[i].score);

}

	fclose(file);
}


void inputname()
{
	setcolor(BLACK);

	int fontHeight = 20;

	sys_edit editBox;
	editBox.create(false);
	editBox.move(180, 200);
	int editTextHeight = 16;
	editBox.size(280, 32);
	editBox.setbgcolor(WHITE);
	editBox.setcolor(BLACK);
	editBox.setfont(editTextHeight, 0, "宋体");

	int maxLen = 60;

	editBox.setmaxlen(maxLen);

	editBox.visible(true);

	editBox.setfocus();

	const int buffSize = 100;
	char strBuffer[100] = "";


	sprintf(text, "请输入昵称");
		editBox.settext(text);

	for (; is_run(); delay_fps(60)) {
		bool isOutput = false;


		while (kbmsg()) {
			key_msg msg = getkey();
			if ((msg.key == key_enter) && (msg.msg == key_msg_up)) {
				isOutput = true;
			}
		}

		if (isOutput) {
			editBox.gettext(buffSize, strBuffer);

			editBox.settext("");
		}

		cleardevice();

		if (strBuffer[0] != '\0') {
			addscore(strBuffer,score);
			score=0;
			break;
		}
	}
	editBox.destroy();
	savescores();
	cleardevice();
	pagestate=0;
	start();
}

void snakemove(){
	Snake *nexthead;
	nexthead=(Snake*)malloc(sizeof(Snake));

			nexthead->xy[0]=head->xy[0]+fxs[fx][0];
			nexthead->xy[1]=head->xy[1]+fxs[fx][1];

	if(food[0] == nexthead->xy[0] && food[1] == nexthead->xy[1]){
		nexthead->next=head;
		head=nexthead;
		fillellipse(nexthead->xy[0], nexthead->xy[1], 10, 10);
		food[0] = (rand()%32*20+10)%640;
		food[1] = (rand()%24*20+10)%480;
		speedup();
		score+=add;
		add++;
	}
	else{
		nexthead->next=head;
		head=nexthead;
		q=head;
		while(q->next->next!=NULL){
			fillellipse(q->xy[0], q->xy[1], 10, 10);
			q=q->next;
		}fillellipse(q->xy[0], q->xy[1], 10, 10);
		setcolor(EGERGB(0x70, 0x80, 0x69));
		setfillcolor(EGERGB(0x70, 0x80, 0x69));
		fillellipse(q->next->xy[0], q->next->xy[1], 10, 10);
		setfillcolor(EGERGB(0x0, 0x0, 0x0));
		free(q->next);
		q->next=NULL;
	}
	setfont(20, 0, "宋体");
	setcolor(EGERGB(0xFF, 0x0, 0x0));
	xyprintf(0,460,"HP=%d",HP);
	xyprintf(0,440,"SCORE=%d",score);
	setcolor(EGERGB(0x0, 0x0, 0x0));
}


void keyevent(){
	key_msg msg1;
	while (kbhit()){
		msg1 = getkey();
		int key = msg1.key;
		if(key == 'a' && fx != 0)
			fx = 2;
		else if(key == 'd' && fx != 2)
			fx = 0;
		else if(key == 's' && fx != 3)
			fx = 1;
		else if(key == 'w' && fx != 1)
			fx = 3;

		if(key == ' '){
			while(1){
				if(key == ' ')
				key = 'NULL';
				Sleep(300);
					if(getch() ==' '){
						break;
						}
				}
			}
		if(GetAsyncKeyState(VK_ESCAPE)){
			end=3;
			}
		Sleep(200);
		snakemove();
	}
}

void speedup(){
	if(speed<40){
		speed+=1;
	}
}
void speeddown(){
	if(speed>2){
		speed+=2;
		score++;
	}
}

void showfood(){
		setcolor(EGERGB(0x0, 0xFF, 0x0));
		setfillcolor(EGERGB(0x0, 0xFF, 0x0));

		fillellipse(food[0], food[1], 10, 10);

		setcolor(EGERGB(0x220, 0x220, 0x220));
		setfillcolor(EGERGB(0x0, 0x0, 0x0));
}

void initsnakegraph(){
	initgraph(640, 480);
	setcaption("snake");
	setcolor(EGERGB(0x220, 0x220, 0x220));
	setbkcolor(EGERGB(0x70, 0x80, 0x69));
	setfillcolor(EGERGB(0x0, 0x0, 0x0));

	setcolor(EGERGB(0x0, 0x0, 0x0));
}

void showdeath()
{

	setfont(100,0,"宋体");
	setcolor(RED);
	outtextxy(90,150,"GAME OVER!");
	setfont(20,0,"宋体");
	setcolor(WHITE);
	outtextxy(230,450,"按任意键返回菜单...");
	setcolor(EGERGB(0x0, 0x0, 0x0));

	getch();

}

Snake* initsnake(){
	int i;
	Snake *sp;
	sp=(Snake*)malloc(sizeof(Snake));
	sp->xy[0]=50;
	sp->xy[1]=10;
	sp->next=NULL;

	for(i=1;i<3;i++){
		head=(Snake*)malloc(sizeof(Snake));
		head->next=sp;
		head->xy[0]=50+i*20;
		head->xy[1]=30;
		sp=head;
	}
}

void eatself(){
	Snake *body;
	body=head->next;
	while(body != NULL){
		if(body->xy[0]==head->xy[0] && body->xy[1]==head->xy[1]){
			end = 2;
		}
		body=body->next;
	}
}

void showrules()
{
    setfont(26, 0, "宋体");
		outtextxy(20,10,"在本游戏中，你可以使用W-上，S-下，A-左，D-右移动");
		outtextxy(20,40,"你的目标是吃到尽可能多的食物");
		outtextxy(20,70,"但是请注意:如果撞到墙壁或者自己游戏就会结束");
		outtextxy(20,100,"你的移动速度会随着吃到食物而逐渐增加");
		outtextxy(20,140,"当然与此同时你的分数也会增加");
		outtextxy(20,180,"那么现在开始挑战吧！");
		outtextxy(570,400,"返回");
		rectangle(550,400,640,428);
}

void showstopmenu()
{

	setfont(60, 0, "宋体");
	setcolor(WHITE);

	outtextxy(10,150,"英雄怎么能够临阵脱逃呢？");
	setfont(50, 0, "宋体");
	outtextxy(100,270,"想要退出(按y确定)");

	getch();
	cleardevice();
	setfont(100, 0, "宋体");
	outtextxy(200,200,"懦夫!");
	Sleep(2000);
}

void showstart()
{
	setbkcolor(EGERGB(0x70, 0x80, 0x69));
    setfont(22, 0, "宋体");
    setcolor(YELLOW);
    outtextxy(260, 202, "开始游戏");
    outtextxy(260, 252, "查看规则");
    outtextxy(250, 302, "查看排行榜");

    setfont(27, 0, "宋体");
    outtextxy(250, 352, "退出游戏");
    setcolor(WHITE);
    setfont(50, 0, "宋体");
    outtextxy(185, 100, "贪吃蛇游戏");
    setfont(22, 0, "宋体");

    rectangle(230, 200, 380, 230);
    rectangle(230, 250, 380, 280);
    rectangle(230, 300, 380, 330);
    rectangle(220, 350, 390, 380);
}

void showlevel()
{
	setcolor(WHITE);
	setfont(70,0,"宋体");
	outtextxy(210,30,"排行榜");
	setfont(40,0,"宋体");
	outtextxy(100,100,"No.1");
	outtextxy(100,180,"No.2");
	outtextxy(100,260,"No.3");
	outtextxy(530,400,"返回");
	int i, y=105;
	void loadRecord();
	for (i = 0; i<3; i++)
	{
		xyprintf(270,y,"%s %d",rank[i].name, rank[i].score );
		y+=80;
	}
}

void start()
{

    mouse_msg msg = {0};
    int pagestate = 0;  // 0: 主页面, 1: 规则页面,
    loadRecord();

    for (; is_run(); delay_fps(60))
    {
        while (mousemsg())
        {
            msg = getmouse();
        }

        if (pagestate == 0)
        {
            showstart();

            if (msg.x >= 230 && msg.x <= 380 && msg.y >= 200 && msg.y <= 230)
            {
                if ((int)msg.is_left() == 0)
                {
                    setcolor(RED);
                    outtextxy(260, 202, "开始游戏");
                    setcolor(WHITE);
                    rectangle(230, 200, 380, 230);
                }
                else if ((int)msg.is_left() == 1)
                {
                    Sleep(100);
                    cleardevice();
                    pagestate = 3;
                }
            }

            else if (msg.x >= 230 && msg.x <= 380 && msg.y >= 260 && msg.y <= 290)
            {
                if ((int)msg.is_left() == 0)
                {
                    setcolor(RED);
                    outtextxy(260, 252, "查看规则");
                    setcolor(WHITE);
                    rectangle(230, 250, 380, 280);
                }
                else if ((int)msg.is_left() == 1)
                {
                    pagestate = 1;
                    cleardevice();
                }
            }

            else if (msg.x >= 220 && msg.x <= 390 && msg.y >= 350 && msg.y <= 380)
            {
            	if((int)msg.is_left() == 0)
            	{
            		setcolor(RED);
            		setfont(27, 0, "宋体");
            		outtextxy(250, 352, "退出游戏");
				}
				else if((int)msg.is_left() == 1)
				{
					closegraph();
				}
			}

			else if (msg.x >= 230 && msg.x <= 380 && msg.y >= 300 && msg.y <= 330)
			{
				if((int)msg.is_left() == 0)
				{
					setcolor(RED);
					setfont(22, 0, "宋体");
					outtextxy(250, 302, "查看排行榜");
				}
				else if((int)msg.is_left() == 1)
				{
					pagestate = 4;
				}
			}
        }
        else if (pagestate == 1)
        {
            showrules();

            if (msg.x >= 550 && msg.x <= 640 && msg.y >= 400 && msg.y <= 428)
            {
                if ((int)msg.is_left() == 0)
                {
                    setcolor(RED);
                    outtextxy(570, 400, "返回");
                    setcolor(WHITE);
                    rectangle(550, 400, 640, 428);
                }
                else if ((int)msg.is_left() == 1)
                {
                    pagestate = 0;
                    cleardevice();
                }
            }
        }
        else if (pagestate == 2)
        {
        	showstopmenu();
        	if (msg.x >= 100 && msg.x <= 140 && msg.y >= 270 && msg.y <= 310)
        	{
        		if((int)msg.is_left() == 0)
        		{
        			setcolor(RED);
        			setfont(40, 0, "宋体");
					outtextxy(100,270,"是");
				}
				else if((int)msg.is_left() == 1)
				{
					cleardevice();
					pagestate = 0;
				}
			}
		}
		else if (pagestate == 3)
		{
			gamebody();
			savescores();
			cleardevice();
			pagestate = 0;
		}
		else if (pagestate == 4)
		{
			cleardevice();

			showlevel();
			if (msg.x >= 530 && msg.x <= 570 && msg.y >= 400 && msg.y <= 430)
			{
				if((int)msg.is_left() == 0)
				{
				setcolor(RED);
				setfont(40,0,"宋体");
				outtextxy(530,400,"返回");
				}
				else if((int)msg.is_left() == 1)
				{
					cleardevice();
					pagestate = 0;
				}
			}
		}
    }
}

void onwall(){
	if(-10 == head->xy[0] || 650 == head->xy[0] || -10==head->xy[1]|| 490==head->xy[1]){
		end=1;
	}
}

void gamebody(){

	initsnake();

	initsnakegraph();

	srand(time(0));

	while(HP!=0){


		if(timecount == 5){

			timecount = 0;

			cleardevice();

		snakemove();

		showfood();
		}


		keyevent();
		onwall();
		eatself();

		Sleep((42-speed));
		timecount++;
		if(HP!=0 && end==3){
			endgame();
			end=0;
			}
		if(HP!=0 && (end==1||end==2)){
			endgame();
			HP--;
			end=0;
			initsnake();
			fx = 1;
			speed = 2;
			}
	}
	HP=3;
	showdeath();
	inputname();

}

void endgame(){
	if(end==1){
		showdeath();
	}else if(end==2){
		showdeath();
	}else if(end==3){
		showstopmenu();
	}
}

int main(){
	initgraph(640, 480);


	start();

	return 0;
}