// * This file is part of the COLOBOT source code
// * Copyright (C) 2001-2008, Daniel ROUX & EPSITEC SA, www.epsitec.ch
// *
// * This program is free software: you can redistribute it and/or modify
// * it under the terms of the GNU General Public License as published by
// * the Free Software Foundation, either version 3 of the License, or
// * (at your option) any later version.
// *
// * This program is distributed in the hope that it will be useful,
// * but WITHOUT ANY WARRANTY; without even the implied warranty of
// * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// * GNU General Public License for more details.
// *
// * You should have received a copy of the GNU General Public License
// * along with this program. If not, see  http://www.gnu.org/licenses/.

#define STRICT
#define D3D_OVERLOADS

#include <windows.h>
#include <stdio.h>
#include <d3d.h>

#include "struct.h"
#include "D3DEngine.h"
#include "math3d.h"
#include "event.h"
#include "misc.h"
#include "iman.h"
#include "object.h"
#include "sound.h"
#include "task.h"
#include "taskgungoal.h"




// Constructeur de l'objet.

CTaskGunGoal::CTaskGunGoal(CInstanceManager* iMan, CObject* object)
						  : CTask(iMan, object)
{
	CTask::CTask(iMan, object);
}

// Destructeur de l'objet.

CTaskGunGoal::~CTaskGunGoal()
{
}


// Gestion d'un �v�nement.

BOOL CTaskGunGoal::EventProcess(const Event &event)
{
	float		dir;

	if ( m_engine->RetPause() )  return TRUE;
	if ( event.event != EVENT_FRAME )  return TRUE;

	m_progress += event.rTime*m_speed;

	if ( m_progress < 1.0f )
	{
		dir = m_initialDirV + (m_finalDirV-m_initialDirV)*m_progress;
	}
	else
	{
		dir = m_finalDirV;
	}
	m_object->SetGunGoalV(dir);

	if ( m_progress < 1.0f )
	{
		dir = m_initialDirH + (m_finalDirH-m_initialDirH)*m_progress;
	}
	else
	{
		dir = m_finalDirH;
	}
	m_object->SetGunGoalH(dir);

	return TRUE;
}


// Assigne le but � atteindre.

Error CTaskGunGoal::Start(float dirV, float dirH)
{
	float	speedV, speedH;
	int		i;

	m_initialDirV = m_object->RetGunGoalV();
	m_object->SetGunGoalV(dirV);
	m_finalDirV = m_object->RetGunGoalV();  // direction possible
	m_object->SetGunGoalV(m_initialDirV);  // remet direction initiale

	if ( m_finalDirV == m_initialDirV )
	{
		speedV = 100.0f;
	}
	else
	{
		speedV = 1.0f/(Abs(m_finalDirV-m_initialDirV)*1.0f);
	}

	m_initialDirH = m_object->RetGunGoalH();
	m_object->SetGunGoalH(dirH);
	m_finalDirH = m_object->RetGunGoalH();  // direction possible
	m_object->SetGunGoalH(m_initialDirH);  // remet direction initiale

	if ( m_finalDirH == m_initialDirH )
	{
		speedH = 100.0f;
	}
	else
	{
		speedH = 1.0f/(Abs(m_finalDirH-m_initialDirH)*1.0f);
	}

	m_speed = Min(speedV, speedH);

	if ( m_finalDirV != m_initialDirV ||
		 m_finalDirH != m_initialDirH )
	{
		i = m_sound->Play(SOUND_MANIP, m_object->RetPosition(0), 0.3f, 1.5f, TRUE);
		m_sound->AddEnvelope(i, 0.3f, 1.5f, 1.0f/m_speed, SOPER_STOP);
	}

	m_progress = 0.0f;

	return ERR_OK;
}

// Indique si l'action est termin�e.

Error CTaskGunGoal::IsEnded()
{
	if ( m_engine->RetPause() )  return ERR_CONTINUE;

	if ( m_initialDirV == m_finalDirV &&
		 m_initialDirH == m_finalDirH )  return ERR_STOP;
	if ( m_progress < 1.0f )  return ERR_CONTINUE;

	m_object->SetGunGoalV(m_finalDirV);
	m_object->SetGunGoalH(m_finalDirH);
	Abort();
	return ERR_STOP;
}

// Termine brutalement l'action en cours.

BOOL CTaskGunGoal::Abort()
{
	return TRUE;
}