/*=========================================================================

	projectl.cpp

	Author:		CRB
	Created: 
	Project:	Spongebob
	Purpose: 

	Copyright (c) 2000 Climax Development Ltd

===========================================================================*/

#ifndef	__PROJECTL_PROJECTL_H__
#include "projectl\projectl.h"
#endif

#ifndef __GFX_SPRBANK_H__
#include "gfx\sprbank.h"
#endif

#ifndef __LEVEL_LEVEL_H__
#include "level\level.h"
#endif

#ifndef __FILE_EQUATES_H__
#include <biglump.h>
#endif

#ifndef __SPR_SPRITES_H__
#include <sprites.h>
#endif

#ifndef __VID_HEADER_
#include "system\vid.h"
#endif

#ifndef __GAME_GAME_H__
#include "game\game.h"
#endif

#ifndef	__PLAYER_PLAYER_H__
#include "player\player.h"
#endif

#ifndef	__ENEMY_NPC_H__
#include "enemy\npc.h"
#endif


/*****************************************************************************/

void CProjectile::init()
{
	CEnemyProjectileThing::init();

	m_spriteBank=new ("projectile sprites") SpriteBank();
	m_spriteBank->load(SPRITES_SPRITES_SPR);

	m_heading = 0;
	m_lifetime = GameState::getOneSecondInFrames() * 2;
	m_movementType = PROJECTILE_DUMBFIRE;
	m_lifetimeType = PROJECTILE_FINITE_LIFE;
	m_state = PROJECTILE_ATTACK;
	m_turnSpeed = 256;
	m_extension = 0;
	m_isShuttingDown = false;
	updateCollisionArea();
}

void CProjectile::init( DVECTOR initPos, s16 initHeading )
{
	init();

	m_heading = initHeading;
	m_initPos = Pos = initPos;
}

void CProjectile::init( DVECTOR initPos, s16 initHeading, PROJECTILE_MOVEMENT_TYPE initMoveType, PROJECTILE_LIFETIME_TYPE initLifeType )
{
	init( initPos, initHeading );

	m_movementType = initMoveType;
	m_lifetimeType = initLifeType;
}

void CProjectile::init( DVECTOR initPos, s16 initHeading, PROJECTILE_MOVEMENT_TYPE initMoveType, PROJECTILE_LIFETIME_TYPE initLifeType, s32 initLifetime )
{
	init( initPos, initHeading, initMoveType, initLifeType );

	m_lifetime = initLifetime;
}

void CProjectile::shutdown()
{
	m_spriteBank->dump();		delete m_spriteBank;

	CEnemyProjectileThing::shutdown();
}

void CProjectile::setToShutdown()
{
	m_isShuttingDown = true;
}

bool CProjectile::processTargetSeek( int _frames, DVECTOR targetPos )
{
	s32 moveX = 0, moveY = 0;

	s16 moveDist = 0;

	s32 moveVel = 0;

	s32 xDist, yDist;
	s32 xDistSqr, yDistSqr;

	xDist = targetPos.vx - this->Pos.vx;
	xDistSqr = xDist * xDist;

	yDist = targetPos.vy - this->Pos.vy;
	yDistSqr = yDist * yDist;

	//if ( xDistSqr + yDistSqr > 22500 )
	//{
		//this->m_controlFunc = NPC_CONTROL_MOVEMENT;
	//}
	//else
	{
		s16 headingToTarget = ratan2( yDist, xDist );
		s16 maxTurnRate = m_turnSpeed;
		s16 decDir, incDir;

		decDir = m_heading - headingToTarget;

		if ( decDir < 0 )
		{
			decDir += ONE;
		}

		incDir = headingToTarget - m_heading;

		if ( incDir < 0 )
		{
			incDir += ONE;
		}

		if ( decDir < incDir )
		{
			moveDist = -decDir;
		}
		else
		{
			moveDist = incDir;
		}

		if ( moveDist < -maxTurnRate )
		{
			moveDist = -maxTurnRate;
		}
		else if ( moveDist > maxTurnRate )
		{
			moveDist = maxTurnRate;
		}

		m_heading += moveDist;

		m_heading &= 4095;
		
		s32 preShiftX = _frames * 3 * rcos( m_heading );
		s32 preShiftY = _frames * 3 * rsin( m_heading );

		moveX = preShiftX >> 12;
		if ( !moveX && preShiftX )
		{
			moveX = preShiftX / abs( preShiftX );
		}

		moveY = preShiftY >> 12;
		if ( !moveY && preShiftY )
		{
			moveY = preShiftY / abs( preShiftY );
		}

		Pos.vx += moveX;
		Pos.vy += moveY;
	}

	xDist = targetPos.vx - this->Pos.vx;
	xDistSqr = xDist * xDist;

	yDist = targetPos.vy - this->Pos.vy;
	yDistSqr = yDist * yDist;

	if ( xDistSqr + yDistSqr < 100 )
	{
		return( true );
	}
	else
	{
		return( false );
	}
}

void CProjectile::setMovementType( PROJECTILE_MOVEMENT_TYPE moveType )
{
	m_movementType = moveType;
}

CProjectile::PROJECTILE_MOVEMENT_TYPE CProjectile::getMovementType()
{
	return( m_movementType );
}

void CProjectile::setState( PROJECTILE_STATE newState )
{
	m_state = newState;
}

void CProjectile::setPosition( DVECTOR newPos )
{
	Pos = newPos;
}

void CProjectile::setLifeTime( PROJECTILE_LIFETIME_TYPE lifeType )
{
	m_lifetimeType = lifeType;
}

void CProjectile::think(int _frames)
{
	if ( _frames > 2 )
	{
		_frames = 2;
	}

	CEnemyProjectileThing::think( _frames );

	switch( m_movementType )
	{
		case PROJECTILE_FIXED:
		{
			// don't move at all

			break;
		}

		case PROJECTILE_USER_SEEK:
		{
			if ( m_layerCollision->Get( Pos.vx >> 4, Pos.vy >> 4 ) )
			{
				setToShutdown();
			}
			else
			{
				switch( m_state )
				{
					case PROJECTILE_RETURN:
					{
						if ( processTargetSeek( _frames, Parent->getPos() ) )
						{
							Parent->processEvent( PROJECTILE_RETURNED_TO_SOURCE_EVENT, this );
						}

						break;
					}

					case PROJECTILE_ATTACK:
					default:
					{
						CPlayer *player = GameScene.getPlayer();
						DVECTOR playerPos = player->getPos();

						if ( processTargetSeek( _frames, playerPos ) )
						{
							m_state = PROJECTILE_RETURN;
						}

						break;
					}
				}
			}

			break;
		}

		case PROJECTILE_GAS_CLOUD:
		{
			u16 targetExtension = 100 << 8;

			if ( m_extension < targetExtension )
			{
				m_extension += ( ( targetExtension - m_extension ) * _frames ) >> 8;

				Pos = m_initPos;
				Pos.vx += ( m_extension * rcos( m_heading ) ) >> 20;
				Pos.vy += ( m_extension * rsin( m_heading ) ) >> 20;
			}
			else
			{
				// expand
			}

			break;
		}

		case PROJECTILE_DUMBFIRE:
		default:
		{
			if ( m_layerCollision->Get( Pos.vx >> 4, Pos.vy >> 4 ) )
			{
				setToShutdown();
			}
			else
			{
				Pos.vx += ( _frames * 3 * rcos( m_heading ) ) >> 12;
				Pos.vy += ( _frames * 3 * rsin( m_heading ) ) >> 12;
			}

			break;
		}
	}

	if ( m_lifetimeType == PROJECTILE_FINITE_LIFE )
	{
		m_lifetime -= _frames;

		if ( m_lifetime <= 0 )
		{
			setToShutdown();
		}
	}
}

void CProjectile::render()
{
	CEnemyProjectileThing::render();

	sFrameHdr	*frameHdr;
	DVECTOR	offset;
	int		x,y;
	int		scrnWidth = VidGetScrW();
	int		scrnHeight = VidGetScrH();
	int		spriteWidth = m_spriteBank->getFrameWidth(FRM__SPIKE);
	int		spriteHeight = m_spriteBank->getFrameHeight(FRM__SPIKE);

	offset = getScreenOffset();

	x = Pos.vx - offset.vx /*+ ( scrnWidth >> 1 ) - ( spriteWidth >> 1 )*/;
	y = Pos.vy - offset.vy /*+ ( scrnHeight >> 1 ) - ( spriteHeight >> 1 )*/;

	if ( x < -spriteWidth || y < -spriteHeight || x > scrnWidth || y > scrnHeight )
	{
		return;
	}

	//m_spriteBank->printFT4(FRM__SPIKE,x,y,0,0,0);

	frameHdr = m_spriteBank->getFrameHeader(FRM__SPIKE);

	m_spriteBank->printRotatedScaledSprite( frameHdr, x, y, 4096, 4096, m_heading, 0 );
}

DVECTOR CProjectile::getScreenOffset()
{
	return CLevel::getCameraPos();
}

void CProjectile::processEvent( GAME_EVENT evt, CThing *sourceThing )
{
}

void CProjectile::collidedWith(CThing *_thisThing)
{
	switch(_thisThing->getThingType())
	{
		case TYPE_PLAYER:
		{
			CPlayer *player = (CPlayer *) _thisThing;

			player->takeDamage( DAMAGE__HIT_ENEMY );

			if ( m_lifetimeType != PROJECTILE_INFINITE_LIFE )
			{
				setToShutdown();
			}

			break;
		}

		default:
			ASSERT(0);
			break;
	}
}

/*****************************************************************************/

void CPlayerProjectile::init()
{
	CPlayerProjectileThing::init();

	m_spriteBank=new ("projectile sprites") SpriteBank();
	m_spriteBank->load(SPRITES_SPRITES_SPR);

	m_heading = 0;
	m_lifetime = GameState::getOneSecondInFrames() * 2;
	m_movementType = PLAYER_PROJECTILE_DUMBFIRE;
	m_lifetimeType = PLAYER_PROJECTILE_FINITE_LIFE;
	m_turnSpeed = 256;
	m_extension = 0;
	m_frame = 0;
	m_reversed = 0;
	m_isShuttingDown = false;
}

void CPlayerProjectile::init( DVECTOR initPos, s16 initHeading )
{
	init();

	m_heading = initHeading;
	m_initPos = Pos = initPos;

	if ( m_heading == 2048 )
	{
		m_reversed = 1;
	}
}

void CPlayerProjectile::init( DVECTOR initPos, s16 initHeading, PLAYER_PROJECTILE_MOVEMENT_TYPE initMoveType, PLAYER_PROJECTILE_LIFETIME_TYPE initLifeType )
{
	init( initPos, initHeading );

	m_movementType = initMoveType;
	m_lifetimeType = initLifeType;
}

void CPlayerProjectile::init( DVECTOR initPos, s16 initHeading, PLAYER_PROJECTILE_MOVEMENT_TYPE initMoveType, PLAYER_PROJECTILE_LIFETIME_TYPE initLifeType, s32 initLifetime )
{
	init( initPos, initHeading, initMoveType, initLifeType );

	m_lifetime = initLifetime;
}

void CPlayerProjectile::shutdown()
{
	m_spriteBank->dump();		delete m_spriteBank;

	CPlayerProjectileThing::shutdown();
}

void CPlayerProjectile::setToShutdown()
{
	m_isShuttingDown = true;
}

void CPlayerProjectile::setMovementType( PLAYER_PROJECTILE_MOVEMENT_TYPE moveType )
{
	m_movementType = moveType;
}

CPlayerProjectile::PLAYER_PROJECTILE_MOVEMENT_TYPE CPlayerProjectile::getMovementType()
{
	return( m_movementType );
}

void CPlayerProjectile::setPosition( DVECTOR newPos )
{
	Pos = newPos;
}

void CPlayerProjectile::setLifeTime( PLAYER_PROJECTILE_LIFETIME_TYPE lifeType )
{
	m_lifetimeType = lifeType;
}

void CPlayerProjectile::think(int _frames)
{
	if ( _frames > 2 )
	{
		_frames = 2;
	}

	CPlayerProjectileThing::think( _frames );

	m_frame += _frames;

	if ( m_frame > 5 )
	{
		m_frame -= 5;
	}

	switch( m_movementType )
	{
		case PLAYER_PROJECTILE_DUMBFIRE:
		default:
		{
			if ( m_layerCollision->Get( Pos.vx >> 4, Pos.vy >> 4 ) )
			{
				setToShutdown();
			}
			else
			{
				Pos.vx += ( _frames * 5 * rcos( m_heading ) ) >> 12;
				Pos.vy += ( _frames * 5 * rsin( m_heading ) ) >> 12;
			}

			break;
		}
	}

	if ( m_lifetimeType == PLAYER_PROJECTILE_FINITE_LIFE )
	{
		m_lifetime -= _frames;

		if ( m_lifetime <= 0 )
		{
			setToShutdown();
		}
	}
}

void CPlayerProjectile::render()
{
	CPlayerProjectileThing::render();

	DVECTOR	offset;
	int		x,y;
	int		scrnWidth = VidGetScrW();
	int		scrnHeight = VidGetScrH();
	int		spriteWidth = m_spriteBank->getFrameWidth(m_frame);
	int		spriteHeight = m_spriteBank->getFrameHeight(m_frame);

	offset = getScreenOffset();

	if ( m_reversed )
	{
		x = Pos.vx - offset.vx + ( spriteWidth >> 1 );
	}
	else
	{
		x = Pos.vx - offset.vx - ( spriteWidth >> 1 );
	}

	y = Pos.vy - offset.vy - ( spriteHeight >> 1 );

	if ( x < -spriteWidth || y < -spriteHeight || x > scrnWidth || y > scrnHeight )
	{
		return;
	}

	SprFrame = m_spriteBank->printFT4(m_frame,x,y,m_reversed,0,10);
	setRGB0( SprFrame, 255, 128, 255 );
}

DVECTOR CPlayerProjectile::getScreenOffset()
{
	return CLevel::getCameraPos();
}

void CPlayerProjectile::processEvent( GAME_EVENT evt, CThing *sourceThing )
{
}

void CPlayerProjectile::collidedWith(CThing *_thisThing)
{
	switch(_thisThing->getThingType())
	{
		case TYPE_ENEMY:
		{
			CNpcEnemy *enemy = (CNpcEnemy *) _thisThing;

			enemy->hasBeenAttacked();

			setToShutdown();

			break;
		}

		default:
			ASSERT(0);
			break;
	}
}

/*****************************************************************************/