#include "entities.h"

void Player::checkDirection(int dir, int *xVel, int *yVel) const
{
	int x=origin_.getX();
	int y=origin_.getY();
	int tmpspd=speed_;
	for(std::vector<Item*>::iterator it=(*backpack_).begin();it!=(*backpack_).end();it++)
	{
		tmpspd+=(*(*it)).pSpeed_;
	}
	switch(dir)
	{
		case 0:
			*xVel=0;
			*yVel=-tmpspd;
			
			if((y+*yVel)<(size_/2))
			{
				*yVel=(size_/2)-y;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					*yVel=((*it).y+(*it).h+(size_/2))-y;
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					*yVel=((*(*it)).getPosition().getY()+(*(*it)).getSize()/2+(size_/2))-y;
				}
			}
			break;
			
		case 1:
			*xVel=tmpspd/2;
			*yVel=-tmpspd/2;
			
			if((y+*yVel)<(size_/2))
			{
				*yVel=(size_/2)-y;
			}
			
			if((x+*xVel)>(map_.getX()-(size_/2)))
			{
				*xVel=(map_.getX()-(size_/2))-x;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					if((y-(size_/2)<(*it).y+(*it).h)&&(y+size_/2>(*it).y))
					{
						*xVel=((*it).x-(size_/2))-x;
					}
					else if((x+(size_/2)>(*it).x)&&(x-size_/2<(*it).x+(*it).w))
					{
						*yVel=((*it).y+(*it).h+(size_/2))-y;
					}
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					if((y-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+(size_/2)<(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
					{
						*xVel=((*(*it)).getPosition().getX()-(size_/2))-x;
					}
					else if((x-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+(size_/2)<(*(*it)).getPosition().getX()-(*(*it)).getSize()/2))
					{
						*yVel=((*(*it)).getPosition().getY()+(*(*it)).getSize()/2+(size_/2))-y;
					}
				}
			}
			break;
			
		case 2:
			*xVel=tmpspd;
			*yVel=0;
			
			if((x+*xVel)>(map_.getX()-(size_/2)))
			{
				*xVel=(map_.getX()-(size_/2))-x;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					*xVel=((*it).x-(size_/2))-x;
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					*xVel=((*(*it)).getPosition().getX()-(*(*it)).getSize()/2-(size_/2))-x;
				}
			}
			break;
			
		case 3:
			*xVel=tmpspd/2;
			*yVel=tmpspd/2;
			
			if((y+*yVel)>(map_.getY()-(size_/2)))
			{
				*yVel=(map_.getY()-(size_/2))-y;
			}
			
			if((x+*xVel)>(map_.getX()-(size_/2)))
			{
				*xVel=(map_.getX()-(size_/2))-x;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					if((y-(size_/2)<(*it).y+(*it).h)&&(y+size_/2>(*it).y))
					{
						*xVel=((*it).x-(size_/2))-x;
					}
					else if((x+(size_/2)>(*it).x)&&(x-size_/2<(*it).x+(*it).w))
					{
						*yVel=((*it).y-(size_/2))-y;
					}
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					if((y-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+(size_/2)<(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
					{
						*xVel=((*(*it)).getPosition().getX()-(*(*it)).getSize()/2-(size_/2))-x;
					}
					else if((x-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+(size_/2)<(*(*it)).getPosition().getX()-(*(*it)).getSize()/2))
					{
						*yVel=((*(*it)).getPosition().getY()-(*(*it)).getSize()/2-(size_/2))-y;
					}
				}
			}
			break;
			
		case 4:
			*xVel=0;
			*yVel=tmpspd;
			
			if((y+*yVel)>(map_.getY()-(size_/2)))
			{
				*yVel=(map_.getY()-(size_/2))-y;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					*yVel=((*it).y-(size_/2))-y;
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					*yVel=((*(*it)).getPosition().getY()-(*(*it)).getSize()/2-(size_/2))-y;
				}
			}
			break;
			
		case 5:
			*xVel=-tmpspd/2;
			*yVel=tmpspd/2;
			
			if((x+*xVel)<(size_/2))
			{
				*xVel=(size_/2)-x;
			}
			
			if((y+*yVel)>(map_.getY()-(size_/2)))
			{
				*yVel=(map_.getY()-(size_/2))-y;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					if((y-(size_/2)<(*it).y+(*it).h)&&(y+size_/2>(*it).y))
					{
						*xVel=((*it).x+(*it).w+(size_/2))-x;
					}
					
					if((x+(size_/2)>(*it).x)&&(x-size_/2<(*it).x+(*it).w))
					{
						*yVel=((*it).y-(size_/2))-y;
					}
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					if((y-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+(size_/2)<(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
					{
						*xVel=((*(*it)).getPosition().getX()+(*(*it)).getSize()/2+(size_/2))-x;
					}
					else if((x-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+(size_/2)<(*(*it)).getPosition().getX()-(*(*it)).getSize()/2))
					{
						*yVel=((*(*it)).getPosition().getY()-(*(*it)).getSize()/2-(size_/2))-y;
					}
				}
			}
			break;
			
		case 6:
			*xVel=-tmpspd;
			*yVel=0;
			
			if((x+*xVel)<(size_/2))
			{
				*xVel=(size_/2)-x;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					*xVel=((*it).x+(*it).w+(size_/2))-x;
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					*xVel=((*(*it)).getPosition().getX()+(*(*it)).getSize()/2+(size_/2))-x;
				}
			}
			break;
			
		case 7:
			*xVel=-tmpspd/2;
			*yVel=-tmpspd/2;
			
			if((x+*xVel)<(size_/2))
			{
				*xVel=(size_/2)-x;
			}
			
			if((y+*yVel)<(size_/2))
			{
				*yVel=(size_/2)-y;
			}
			
			for(std::vector<SDL_Rect>::iterator it=(*obstacles_).begin();it!=(*obstacles_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*it).x+(*it).w)&&(x+*xVel+(size_/2)>(*it).x)&&(y+*yVel-(size_/2)<(*it).y+(*it).h)&&(y+*yVel+(size_/2)>(*it).y))
				{
					if((y-(size_/2)<(*it).y+(*it).h)&&(y+size_/2>(*it).y))
					{
						*xVel=((*it).x+(*it).w+(size_/2))-x;
					}
					
					if((x+(size_/2)>(*it).x)&&(x-size_/2<(*it).x+(*it).w))
					{
						*yVel=((*it).y+(*it).h+(size_/2))-y;
					}
				}
			}
			
			for(std::vector<Enemy*>::iterator it=(*enemies_).begin();it!=(*enemies_).end();it++)
			{
				if((x+*xVel-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+*xVel+(size_/2)>(*(*it)).getPosition().getX()-(*(*it)).getSize()/2)&&(y+*yVel-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+*yVel+(size_/2)>(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
				{
					if((y-(size_/2)<(*(*it)).getPosition().getY()+(*(*it)).getSize()/2)&&(y+(size_/2)<(*(*it)).getPosition().getY()-(*(*it)).getSize()/2))
					{
						*xVel=((*(*it)).getPosition().getX()+(*(*it)).getSize()/2+(size_/2))-x;
					}
					else if((x-(size_/2)<(*(*it)).getPosition().getX()+(*(*it)).getSize()/2)&&(x+(size_/2)<(*(*it)).getPosition().getX()-(*(*it)).getSize()/2))
					{
						*yVel=((*(*it)).getPosition().getY()+(*(*it)).getSize()/2+(size_/2))-y;
					}
				}
			}
			break;
	}
}
Point Player::getPosition() const
{
	return origin_;
}

void Player::move(int dir)
{
	int xVel;
	int yVel;
	direction_=dir;
	checkDirection(direction_,&xVel,&yVel);
	origin_.setX(origin_.getX()+xVel);
	origin_.setY(origin_.getY()+yVel);
}
	
int Player::getDirection() const
{
	return direction_;
}

void Player::init(Point origin, int size, int dir, Point map, std::vector<SDL_Rect> *obstacles, int speed, int health, int maxHealth, std::vector<Enemy*> *enemies, std::vector<Item*> *backpack, int money)
{
	origin_.setX(origin.getX());
	origin_.setY(origin.getY());
	size_=size;
	direction_=dir;
	map_.setX(map.getX());
	map_.setY(map.getY());
	obstacles_=obstacles;
	speed_=speed;
	health_=health;
	maxHealth_=maxHealth;
	enemies_=enemies;
	backpack_=backpack;
	money_=money;
}

void Player::hurt(int val)
{
	health_-=val;
	if(health_<0)
	{
		health_=0;
	}
}

void Player::heal(int val)
{
	health_+=val;
	if(health_>maxHealth_)
	{
		health_=maxHealth_;
	}
}

int Player::getHealth()
{
	return health_;
}

int Player::getSize()
{
	return size_;
}

int Player::getMoney()
{
	return money_;
}

void Player::transaction(int money)
{
	money_+=money;
}

int Player::getMaxHealth()
{
	return maxHealth_;
}

void Player::modifyMaxHealth(int modifier)
{
	maxHealth_+=modifier;
	if(modifier>0)
	{
		health_+=modifier;
	}
	else
	{
		if(health_>modifier)
		{
			health_+=modifier;
		}
	}
}