Game.cpp

#include "Game.h"
#include "iniParse.h"


Game::Game(void)
{
	if(InitializeAllegro())
	{
		TILE_SIZE = 50;
		YOFFSET = 150;

		display = al_create_display(350,500);
		evQueue = al_create_event_queue();
		timer = al_create_timer(1.0 / 05);

		al_register_event_source(evQueue, al_get_keyboard_event_source());
		al_register_event_source(evQueue, al_get_timer_event_source(timer));

		ALLEGRO_BITMAP* tmp;
		tmp = al_load_bitmap("res/player.png");

		al_destroy_bitmap(tmp);

		playerBMP = al_load_bitmap("res/player.png");
		followerBMP = al_load_bitmap("res/follower.png");

		background = al_load_bitmap("res/sky.png");

		font = al_load_ttf_font("res/pirulen.ttf",40,0);
		msgFont = al_load_ttf_font("res/pirulen.ttf", 16,0);

		player = new Sprite(playerBMP, false);
		follower = new Sprite(followerBMP, true);
		map = new TileMap();

		inGame = true;
		al_set_target_bitmap(al_get_backbuffer(display));

		iniParse ini("Tseeker.ini");

		MAXLVL = ini.getValue("General", "MaxLVL", 4);

		std::cout << "Wczytano wartosc MaxLVL: " << MAXLVL;
	}
}


bool Game::InitializeAllegro()
{
	if(al_init() && al_install_keyboard() && al_init_primitives_addon())
	{
		al_init_font_addon();		
		al_init_ttf_addon();
		al_init_image_addon();
		
		return true;
	}
	else
		return false;
}

Game::~Game(void)
{
	delete map;
	delete player;
	delete follower;

	DeinitializeAllegro();
}

void Game::DeinitializeAllegro()
{
	al_destroy_bitmap(playerBMP);
	al_destroy_bitmap(followerBMP);

	al_destroy_font(font);
	al_destroy_font(msgFont);
	al_destroy_display(display);
	al_destroy_event_queue(evQueue);
	al_destroy_timer(timer);
}

void Game::Run()
{
	
	if(GameMenu())
	{
		GameTutorial();
		currentLvl = 1;
		GameLoop();
	}
	else
		al_rest(0.5);
}

bool Game::GameMenu()
{

	al_clear_to_color(al_map_rgb(0,0,0));

	int lineY = 140;
	
	al_draw_text(font,al_map_rgb(255,255,255),20, lineY,0,"Treasure");

	int lineOffset = al_get_font_line_height(font);
	lineY += lineOffset; 

	al_draw_text(font,al_map_rgb(255,255,255),65, lineY,0,"Seeker");

	lineY = 440;

	al_draw_text(msgFont, al_map_rgb(255,255,255),  175, lineY, ALLEGRO_ALIGN_CENTRE, "Press ENTER to start");
	lineOffset = al_get_font_line_height(msgFont);
	lineY += lineOffset;

	al_draw_text(msgFont, al_map_rgb(255,255,255),  175, lineY, ALLEGRO_ALIGN_CENTRE, "ESCAPE to quit");

	al_flip_display();

	ALLEGRO_EVENT ev;

	while(true)
	{
		al_wait_for_event(evQueue, &ev);

		if(ev.type==ALLEGRO_EVENT_KEY_DOWN) 
			if (ev.keyboard.keycode == ALLEGRO_KEY_ENTER)
				return true;
			else if (ev.keyboard.keycode == ALLEGRO_KEY_ESCAPE)
				return false;
	}
}

void Game::GameTutorial()
{
	al_clear_to_color(al_map_rgb(0,0,0));

	int lineStartY = 50;
	int lineOffsetY = al_get_font_line_height(msgFont);

	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "You're unlucky");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "little spirit!");
	lineStartY += lineOffsetY *2;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Evil, hulking ogre");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "captured you to help in...");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Treasure hunting!");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Bring him to chalice!");
	lineStartY += lineOffsetY * 3;

	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Use arrow keys to:"); 
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "move spirit and");

	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "dig into earth");

	lineStartY += lineOffsetY * 2;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Use numpad arrows");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "to order ogre left, right");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "and numpad 5");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "to stop ogre!");
	lineStartY += lineOffsetY*2;

	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Press R");
	lineStartY += lineOffsetY;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "to restart current level");

	lineStartY += lineOffsetY * 3;
	al_draw_text(msgFont, al_map_rgb(255,255,255), 175, lineStartY, ALLEGRO_ALIGN_CENTRE, "Press ENTER to continue");

	al_flip_display();

	ALLEGRO_EVENT ev;

	while(true)
	{
		al_wait_for_event(evQueue, &ev);

		if(ev.type == ALLEGRO_EVENT_KEY_DOWN && ev.keyboard.keycode == ALLEGRO_KEY_ENTER)
			break;
	}
}

void Game::GameLoop()
{
	ALLEGRO_EVENT ev;

	while(inGame)
	{
		std::cout << "Poziom: " << currentLvl << std::endl; 

		inLevel = true;

		while( !(map->LoadMap(assembleMapName(), player, follower)))
		{
			if(currentLvl < MAXLVL)
			{
			++currentLvl;
			std::cout << "Próbuje poziom: " << currentLvl;
			}
			else
			{
				inLevel = inGame = false;
				break;
			}
		}

		al_start_timer(timer);

		Draw();

		while(inLevel)
		{
			al_wait_for_event(evQueue, &ev);

			if(ev.type == ALLEGRO_EVENT_KEY_DOWN)
			{
				if(ev.keyboard.keycode == ALLEGRO_KEY_ESCAPE)
				{
					inGame = false;
					break;
				}
				else if(ev.keyboard.keycode == ALLEGRO_KEY_LEFT)
					player->setVelocityX(-1);
				else if(ev.keyboard.keycode == ALLEGRO_KEY_RIGHT)
					player->setVelocityX(1);
				else if(ev.keyboard.keycode == ALLEGRO_KEY_DOWN)
					player->setVelocityY(1);
				else if(ev.keyboard.keycode == ALLEGRO_KEY_PAD_4)
					follower->setVelocityX(-1);
				else if(ev.keyboard.keycode == ALLEGRO_KEY_PAD_5)
					follower->stop();
				else if(ev.keyboard.keycode == ALLEGRO_KEY_PAD_6)
					follower->setVelocityX(1);
				else if(ev.keyboard.keycode == ALLEGRO_KEY_R)
				{
					std::cout << "Restart!\n";
					inLevel = false;
					break;
				}

			}
			else if(ev.type == ALLEGRO_EVENT_TIMER)
			{
				UpdateObject(player);
				UpdateObject(follower);
				Draw();
			}
		}

		follower->stop();
		player->stop();
		al_rest(0.5);
	}

	DrawEnd();
	al_rest(1);
}

string Game::assembleMapName()
{
	stringstream str;

	str << "maps/map";
	
	if(currentLvl < 10)
		str << "0" << currentLvl;
	else
		str << currentLvl;
	
	str << ".txt";

	return str.str();

}

void Game::UpdateObject(Sprite* object)
{
	if(object->isFollower())
	{
		object->setVelocityY(1);
	}

	int oldX = object->getX();
	int dX = object->getVelocityX();
	int newX = oldX + dX;

	if(CheckForTileCollision(newX, object->getY(), object->isFollower()))
		object->setX(newX);
	else
		object->setVelocityX(0);

	int oldY = object->getY();
	int dY = object->getVelocityY();
	int newY = oldY + dY;

	if(CheckForTileCollision(object->getX(), newY, object->isFollower()))
		object->setY(newY);
	else
		object->setVelocityY(0);

	if(!object->isFollower())
	{
		object->setVelocityX(0);
	
		object->setVelocityY(0);
	}	

	CheckObjectCollisions(object);
}

bool Game::CheckForTileCollision(int newX, int newY, bool isFollower)
{
	if(isFollower && newX == player->getX() && newY == player->getY())
		return false;
	else if( newX == follower->getX() && newY == follower->getY())
		return false;

	ALLEGRO_BITMAP* tileToCheck = map->getTile(newX,newY);

	if (newX < 0 || newX > 6 || newY > 9)
		return false;
	else if(tileToCheck == map->air || tileToCheck == map->digged)
		return true;

	else if( (tileToCheck == map->ground || tileToCheck == map->grass ) && !isFollower)
	{
		map->BreakTile(newX,newY);
		return true;
	}

	return false;
}

void Game::CheckObjectCollisions(Sprite* object)
{
	Sprite* collisionSprite = GetSpriteCollision(object);

	if( collisionSprite != NULL && object->isFollower())
	{
		if(currentLvl < MAXLVL)
			++currentLvl;
		else
			inGame = false;

		inLevel = false;
	}
}

Sprite* Game::GetSpriteCollision(Sprite* object)
{
	list<Sprite*>::iterator it = map->getFirstObject();
	list<Sprite*>::iterator end = map->getLastObject();

	for(;it != end; ++it)
	{
		if( (*it)->getX() == object->getX() && (*it)->getY() == object->getY())
			return (*it);
	}

	return NULL;
}

void Game::Draw()
{
	al_draw_bitmap(background,0,0,0);

	for(int y=0; y<10; y++)
		for(int x=0; x<7; x++)
			al_draw_bitmap(map->getTile(x,y),x * TILE_SIZE, y * TILE_SIZE,0);

	list<Sprite*>::iterator it = map->getFirstObject();
	list<Sprite*>::iterator end = map->getLastObject();

	for(;it != end; ++it)
		al_draw_bitmap((*it)->getImage(),(*it)->getX() * TILE_SIZE, (*it)->getY() * TILE_SIZE,0);

	al_draw_bitmap(player->getImage(),player->getX() * TILE_SIZE,player->getY() * TILE_SIZE,0);

	al_draw_bitmap(follower->getImage(), follower->getX() * TILE_SIZE, follower->getY() * TILE_SIZE,0);

	al_flip_display();
}

void Game::DrawEnd()
{
	if(!inGame && !inLevel)
	{
		al_clear_to_color(al_map_rgb(0,0,0));

		al_draw_text(font,al_map_rgb(255,255,255), 45, 180, 0, "Victory!");

		al_draw_text(msgFont,al_map_rgb(255,255,255), 175, 280, ALLEGRO_ALIGN_CENTRE, "Thanks for playing!");
	}
	
	al_flip_display();
}