#include<graphics.h>
#include<stdio.h>
#include<stdlib.h>
#include<dos.h>

#define X_MAX_COORD  30
#define Y_MAX_COORD  17
#define ME_Y_LOC    380
#define RIGHT_ARROW_KEY 77
#define LEFT_ARROW_KEY 75

#define SPACE 0
#define ME    1
#define ENEMY 2

//외부변수지정//
int screen_attribute[X_MAX_COORD][X_MAX_COORD]; //화면의 속성을 가진 배열(적)//
int me_screen_attribute[X_MAX_COORD];           //화면의 속성을 가진 배열(나)//
void *me_image, *enemy_image;                  //나와 적의 이미지를 가진 변수//
int no_of_enemy=10;                            //현재 남은 적의 숫자//
int score=0;                                   //점수//

//프로그램의 메인 루프//
int quit=1;

void game_init();
void screen_display();
void main_loop();
void fire(int);

void main()
{
	int gdriver=DETECT; //시스템에 가장알맞은 그래픽드라이버를 자동선택해준다//
	int gmode;
	int errorcode;

	initgraph(&gdriver,&gmode,""); //화면출력모드를 그래픽-> 텍스트모드로 바꾼다//
	errorcode=graphresult();
	if(errorcode!=grOk)   //에러가 발생할 경우//
	{
		fprintf(stderr,"그래픽 에러발생 : %s\n",grapherrormsg(errorcode));
		exit(1);
	}

	randomize(); // 난수 발생 함수를 초기화 -볼랜드 C //

	//각 함수를 불러서 실행//
	game_init();  // 화면속성 데이터와 이미지 초기화//
	screen_display();  //초기화면 뿌려주는곳//
	main_loop(); 

	free(me_image);
	free(enemy_image);
	closegraph(); //원래의 화면출력모드로 바꾸어준다//
}

//각 함수 초기화//

void game_init()
{
	int i,j,x,y;

	for(i=0;i<X_MAX_COORD;i++)   //화면 초기화 기본값을 0 으로 지정한다. //
	{
		me_screen_attribute[i]=SPACE;
		for(j=0;j<Y_MAX_COORD;j++)
			screen_attribute[i][j]=SPACE;
	}

	//적들의 위치를 임의로 정한다.난수 //
	for(i=0;i<no_of_enemy;i++)  //10개의 적으로 설정하자.//
	{
		x=random(X_MAX_COORD);
		y=random(Y_MAX_COORD);
		screen_attribute[x][y]=ENEMY;  //적을 2로 지정//
	}

	//나의 위치를 임의로 정한다.난수//
	x=random(X_MAX_COORD);    //나는 하나이므로 for 로서 지정할 필요없다.//
	me_screen_attribute[x]=ME;    //나를 1로 지정//

	//나의 이미지//
	setcolor(GREEN);  //GREEN 2 로서 색깔 지정//
	setfillstyle(SOLID_FILL,GREEN);    //색깔의 패턴과 색깔 //
	pieslice(10,12,0,180,8);//부채꼴 함수(10,12:중심점 ,0,180:시작과 끝,반경)//
	setfillstyle(SOLID_FILL,YELLOW);
	bar(2,12,18,20); //2,12 에서 18,20까지 막대 그리기//
	setfillstyle(SOLID_FILL,DARKGRAY);  
	bar(1,18,20,20);
	setfillstyle(SOLID_FILL,RED);  
	bar(8,1,12,4);
	me_image=malloc(imagesize(1,1,20,20));  //메모리할당//
	getimage(1,1,20,20,me_image);
	putimage(1,1,me_image,XOR_PUT);

	//적의 이미지//
	setcolor(MAGENTA);  //색깔 지정//
	setfillstyle(SOLID_FILL,MAGENTA);  pieslice(10,12,0,180,7);
	setfillstyle(SOLID_FILL,MAGENTA);  pieslice(10,15,0,180,5);
	setfillstyle(SOLID_FILL,BLUE);     bar(1,12,20,13);
	
	enemy_image=malloc(imagesize(1,1,20,20));  //메모리할당//
	getimage(1,1,20,20,enemy_image);
	putimage(1,1,enemy_image,XOR_PUT);
}

//초기화면 보이는곳//

void screen_display()
{
	int i,j;
	char tmp[10];

	for(i=0;i<400;i++)  //우주의 임의의 점을 지정한다(별)//
		putpixel(random(X_MAX_COORD*20),random(Y_MAX_COORD*20),random(16));//좌표와 색깔//

	for(i=0;i<X_MAX_COORD;i++) //화면속성을 조사해서 적과 나의 이미지를 그림//
	{
		if(me_screen_attribute[i]==ME)
			putimage(i*20,ME_Y_LOC,me_image,XOR_PUT);
		for(j=0;j<Y_MAX_COORD;j++)
		{
			 if(screen_attribute[i][j]==ENEMY)
				 putimage(i*20,j*20,enemy_image,XOR_PUT);
		}
	}
	
	//프로그램 제목과 점수판 그리기//
	settextstyle(TRIPLEX_FONT,HORIZ_DIR,2);//폰트,방향,크기 지정//
	outtextxy(getmaxx()/2-100,5,"GAME 1");//위치와 출력문//
	setcolor(RED);
	outtextxy(getmaxx()/2+50,5,"SCORE");

	itoa(score,tmp,10);
	setcolor(WHITE);
	outtextxy(getmaxx()/2+120,5,tmp);
}

void main_loop()
{
	int i,j;
	char ch;

	while(quit)
	{
		ch=getch();
		if(ch==0)
		{
			ch=getch();
			switch(ch)  //왼쪽, 오른쪽, 스페이스바 키를 눌렀을때 구별//
			{
			case LEFT_ARROW_KEY : 
				for(i=0;i<X_MAX_COORD;i++)
				{
					if(me_screen_attribute[i]==ME)
					{
						putimage(i*20,ME_Y_LOC,me_image,XOR_PUT);//이전이미지지우기//
						if(i==0)
						{//화면속성바꾸기//
							me_screen_attribute[i]=SPACE;
							me_screen_attribute[X_MAX_COORD-1]=ME;
							//위치가 바뀜 //
							putimage((X_MAX_COORD-1)*20,ME_Y_LOC,me_image,XOR_PUT);
						}
						else
						{//화면속성바꾸기//
							me_screen_attribute[i]=SPACE;
							me_screen_attribute[i-1]=ME;
							putimage((i-1)*20,ME_Y_LOC,me_image,XOR_PUT);
						}
						break;
					}
				}
				break;
		    
			case RIGHT_ARROW_KEY : 
				for(i=0;i<X_MAX_COORD;i++)
				{
					if(me_screen_attribute[i]==ME)
					{
						putimage(i*20,ME_Y_LOC,me_image,XOR_PUT);//이전이미지지우기//
						if(i==(X_MAX_COORD-1))
						{//화면속성바꾸기//
							me_screen_attribute[i]=SPACE;
							me_screen_attribute[0]=ME;
							//위치가 바뀜 //
							putimage(0,ME_Y_LOC,me_image,XOR_PUT);
						}
						else
						{//화면속성바꾸기//
							me_screen_attribute[i]=SPACE;
							me_screen_attribute[i+1]=ME;
							putimage((i+1)*20,ME_Y_LOC,me_image,XOR_PUT);
						}
						break;
					}
				}
				break;
			}
		}
		else if(ch==32) //스페이스바를 눌렀을때//
		{
			for(i=0;i<X_MAX_COORD;i++)
			{
				if(me_screen_attribute[i]==ME)
				{
					fire(i);
					break;
				}
			}
		}
		else if(ch==27) //ESC 키를 눌렀을때//
			quit = 0;
	}
}

void fire(int i)  //레이저 발사함수//
{
	int j;
	char tmp[10];

	//레이저 발사대에서 화면 상단까지//
	for(j=ME_Y_LOC;j>-1;j=j-20)
	{
		if((j/20)<Y_MAX_COORD)
		{
			if(screen_attribute[i][j/20] == ENEMY) //현재 x 위치 위에 적이 있을때//
			{    //맞은 적을 없애는 곳//
				putimage(i*20,j,enemy_image,XOR_PUT);
				screen_attribute[i][j/20] = SPACE;

				no_of_enemy = no_of_enemy - 1; // 남아있는 적의 숫자 //

				//score 표시//
				setcolor(WHITE);
				setfillstyle(SOLID_FILL,BLACK);
				bar(getmaxx()/2+120,5,getmaxx()/2+160,50);  //a,b 에서 c,d 까지 막대를 그려라//
				score=score+10; //하나당 10점의 점수//
				sprintf(tmp,"%d",score);//일단 포맷된 스트링으로 저장//
				outtextxy(getmaxx()/2+120,5,tmp);

				//적이 모두 죽은후에는 프로그램 종료//
				if(no_of_enemy==0)
					quit=0;
				break;
			}
		}

		//레이저의 이미지//
		setwritemode(XOR_PUT);
		setcolor(YELLOW);
		line(i*20+9,j,i*20+9,j-20);
		delay(10);
		line(i*20+9,j,i*20+9,j-20);
	}
}