// * 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/.// motionbee.cpp

#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 "light.h"
#include "particule.h"
#include "terrain.h"
#include "object.h"
#include "physics.h"
#include "brain.h"
#include "camera.h"
#include "modfile.h"
#include "sound.h"
#include "motion.h"
#include "motionbee.h"



#define ADJUST_ANGLE	FALSE		// TRUE -> ajuste les angles des membres
#define START_TIME		1000.0f		// début du temps relatif



// Constructeur de l'objet.

CMotionBee::CMotionBee(CInstanceManager* iMan, CObject* object)
					  : CMotion(iMan, object)
{
	CMotion::CMotion(iMan, object);

	m_armMember      = START_TIME;
	m_armTimeAbs     = START_TIME;
	m_armTimeMarch   = START_TIME;
	m_armTimeAction  = START_TIME;
	m_armTimeIndex   = 0;
	m_armPartIndex   = 0;
	m_armMemberIndex = 0;
	m_armLastAction  = -1;
	m_bArmStop = FALSE;
}

// Destructeur de l'objet.

CMotionBee::~CMotionBee()
{
}


// Supprime un objet.

void CMotionBee::DeleteObject(BOOL bAll)
{
}


// Crée un véhicule roulant quelconque posé sur le sol.

BOOL CMotionBee::Create(D3DVECTOR pos, float angle, ObjectType type,
						float power)
{
	CModFile*	pModFile;
	int			rank;

	if ( m_engine->RetRestCreate() < 3+18+2 )  return FALSE;

	pModFile = new CModFile(m_iMan);

	m_object->SetType(type);

	// Crée la base principale.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEVEHICULE);  // c'est un objet mobile
	m_object->SetObjectRank(0, rank);

	pModFile->ReadModel("objects\\bee1.mod");
	pModFile->CreateEngineObject(rank);

	m_object->SetPosition(0, pos);
	m_object->SetAngleY(0, angle);

	// Un véhicule doit avoir obligatoirement une sphère de
	// collision avec un centre (0;y;0) (voir GetCrashSphere).
	m_object->CreateCrashSphere(D3DVECTOR(0.0f, 0.0f, 0.0f), 4.0f, SOUND_BOUM, 0.20f);
	m_object->SetGlobalSphere(D3DVECTOR(-1.0f, 1.0f, 0.0f), 5.0f);

	// Crée la tête.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(1, rank);
	m_object->SetObjectParent(1, 0);
	pModFile->ReadModel("objects\\bee2.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(1, D3DVECTOR(1.6f, 0.3f, 0.0f));

	// Crée la queue.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(2, rank);
	m_object->SetObjectParent(2, 0);
	pModFile->ReadModel("objects\\bee3.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(2, D3DVECTOR(-0.8f, 0.0f, 0.0f));

	// Crée la cuisse 1 arrière-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(3, rank);
	m_object->SetObjectParent(3, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(3, D3DVECTOR(-0.3f, -0.1f, -0.2f));

	// Crée la jambe 1 arrière-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(4, rank);
	m_object->SetObjectParent(4, 3);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(4, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 1 arrière-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(5, rank);
	m_object->SetObjectParent(5, 4);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(5, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée la cuisse 2 milieu-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(6, rank);
	m_object->SetObjectParent(6, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(6, D3DVECTOR(0.3f, -0.1f, -0.4f));

	// Crée la jambe 2 milieu-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(7, rank);
	m_object->SetObjectParent(7, 6);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(7, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 2 milieu-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(8, rank);
	m_object->SetObjectParent(8, 7);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(8, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée la cuisse 3 avant-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(9, rank);
	m_object->SetObjectParent(9, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(9, D3DVECTOR(1.0f, -0.1f, -0.7f));

	// Crée la jambe 3 avant-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(10, rank);
	m_object->SetObjectParent(10, 9);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(10, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 3 avant-droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(11, rank);
	m_object->SetObjectParent(11, 10);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(11, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée la cuisse 1 arrière-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(12, rank);
	m_object->SetObjectParent(12, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(12, D3DVECTOR(-0.3f, -0.1f, 0.2f));
	m_object->SetAngleY(12, PI);

	// Crée la jambe 1 arrière-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(13, rank);
	m_object->SetObjectParent(13, 12);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(13, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 1 arrière-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(14, rank);
	m_object->SetObjectParent(14, 13);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(14, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée la cuisse 2 milieu-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(15, rank);
	m_object->SetObjectParent(15, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(15, D3DVECTOR(0.3f, -0.1f, 0.4f));
	m_object->SetAngleY(15, PI);

	// Crée la jambe 2 milieu-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(16, rank);
	m_object->SetObjectParent(16, 15);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(16, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 2 milieu-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(17, rank);
	m_object->SetObjectParent(17, 16);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(17, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée la cuisse 3 avant-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(18, rank);
	m_object->SetObjectParent(18, 0);
	pModFile->ReadModel("objects\\ant4.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(18, D3DVECTOR(1.0f, -0.1f, 0.7f));
	m_object->SetAngleY(18, PI);

	// Crée la jambe 3 avant-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(19, rank);
	m_object->SetObjectParent(19, 18);
	pModFile->ReadModel("objects\\ant5.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(19, D3DVECTOR(0.0f, 0.0f, -1.0f));

	// Crée le pied 3 avant-gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(20, rank);
	m_object->SetObjectParent(20, 19);
	pModFile->ReadModel("objects\\ant6.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(20, D3DVECTOR(0.0f, 0.0f, -2.0f));

	// Crée l'aile droite.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(21, rank);
	m_object->SetObjectParent(21, 0);
	pModFile->ReadModel("objects\\bee7.mod");
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(21, D3DVECTOR(0.8f, 0.4f, -0.5f));

	// Crée l'aile gauche.
	rank = m_engine->CreateObject();
	m_engine->SetObjectType(rank, TYPEDESCENDANT);
	m_object->SetObjectRank(22, rank);
	m_object->SetObjectParent(22, 0);
	pModFile->ReadModel("objects\\bee7.mod");
	pModFile->Mirror();
	pModFile->CreateEngineObject(rank);
	m_object->SetPosition(22, D3DVECTOR(0.8f, 0.4f, 0.5f));

	m_object->CreateShadowCircle(6.0f, 0.5f);

	CreatePhysics();
	m_object->SetFloorHeight(0.0f);

	pos = m_object->RetPosition(0);
	m_object->SetPosition(0, pos);  // pour afficher les ombres tout de suite

	m_engine->LoadAllTexture();

	delete pModFile;
	return TRUE;
}

// Crée la physique de l'objet.

void CMotionBee::CreatePhysics()
{
	Character*	character;
	int			i;

	int member_march[] =
	{
	//	x1,y1,z1,	x2,y2,z2,	x3,y3,z3,	// en l'air :
		0,45,0,		0,45,0,		0,50,0,		// t0: cuisses 1..3
		30,-70,0,	20,-105,20,	25,-100,0,	// t0: jambes 1..3
		-70,75,0,	-30,80,0,	-80,80,0,	// t0: pieds 1..3
											// au sol devant :
		0,30,0,		0,20,0,		0,15,0,		// t1: cuisses 1..3
		-15,-50,0,	-20,-60,0,	-10,-75,0,	// t1: jambes 1..3
		-40,50,0,	-25,15,0,	-50,35,0,	// t1: pieds 1..3
											// au sol derrière :
		0,35,0,		0,30,0,		0,20,0,		// t2: cuisses 1..3
		-20,-15,0,	-30,-55,0,	-25,-70,15,	// t2: jambes 1..3
		-25,25,0,	-20,60,0,	-30,95,0,	// t2: pieds 1..3
	};

	int member_spec[] =
	{
	//	x1,y1,z1,	x2,y2,z2,	x3,y3,z3,	// porte boulet :
		0,45,0,		0,45,0,		0,50,0,		// s0: cuisses 1..3
		-35,-70,0,	-20,-85,-25,-25,-100,0,	// s0: jambes 1..3
		-110,75,-15,-130,80,-25,-125,40,0,	// s0: pieds 1..3
											// brûle :
		0,45,0,		0,45,0,		0,50,0,		// s1: cuisses 1..3
		-35,-70,0,	-20,-85,-25,-25,-100,0,	// s1: jambes 1..3
		-110,75,-15,-130,80,-25,-125,40,0,	// s1: pieds 1..3
											// ruine :
		0,45,0,		0,45,0,		0,50,0,		// s2: cuisses 1..3
		-35,-70,0,	-20,-85,-25,-25,-100,0,	// s2: jambes 1..3
		-110,75,-15,-130,80,-25,-125,40,0,	// s2: pieds 1..3
	};

	m_physics->SetType(TYPE_FLYING);

	character = m_object->RetCharacter();
	character->wheelFront = 3.0f;
	character->wheelBack  = 3.0f;
	character->wheelLeft  = 5.0f;
	character->wheelRight = 5.0f;
	character->height     = 2.5f;

	m_physics->SetLinMotionX(MO_ADVSPEED,  50.0f);
	m_physics->SetLinMotionX(MO_RECSPEED,  50.0f);
	m_physics->SetLinMotionX(MO_ADVACCEL,  20.0f);
	m_physics->SetLinMotionX(MO_RECACCEL,  20.0f);
	m_physics->SetLinMotionX(MO_STOACCEL,  20.0f);
	m_physics->SetLinMotionX(MO_TERSLIDE,   5.0f);
	m_physics->SetLinMotionZ(MO_TERSLIDE,   5.0f);
	m_physics->SetLinMotionX(MO_TERFORCE,  10.0f);
	m_physics->SetLinMotionZ(MO_TERFORCE,  10.0f);
	m_physics->SetLinMotionZ(MO_MOTACCEL,  40.0f);
	m_physics->SetLinMotionY(MO_ADVSPEED,  60.0f);
	m_physics->SetLinMotionY(MO_RECSPEED,  60.0f);
	m_physics->SetLinMotionY(MO_ADVACCEL,  20.0f);
	m_physics->SetLinMotionY(MO_RECACCEL,  50.0f);
	m_physics->SetLinMotionY(MO_STOACCEL,  50.0f);

	m_physics->SetCirMotionY(MO_ADVSPEED,   1.0f*PI);
	m_physics->SetCirMotionY(MO_RECSPEED,   1.0f*PI);
	m_physics->SetCirMotionY(MO_ADVACCEL,  20.0f);
	m_physics->SetCirMotionY(MO_RECACCEL,  20.0f);
	m_physics->SetCirMotionY(MO_STOACCEL,  40.0f);

	for ( i=0 ; i<3*3*3*3 ; i++ )
	{
		m_armAngles[3*3*3*3*MB_MARCH+i] = member_march[i];
	}
	for ( i=0 ; i<3*3*3*3 ; i++ )
	{
		m_armAngles[3*3*3*3*MB_SPEC+i] = member_spec[i];
	}
}


// Gestion d'un événement.

BOOL CMotionBee::EventProcess(const Event &event)
{
	CMotion::EventProcess(event);

	if ( event.event == EVENT_FRAME )
	{
		return EventFrame(event);
	}

	if ( event.event == EVENT_KEYDOWN )
	{
#if ADJUST_ANGLE
		int		i;

		if ( event.param == 'A' )  m_armTimeIndex++;
		if ( m_armTimeIndex >= 3 )  m_armTimeIndex = 0;

		if ( event.param == 'Q' )  m_armPartIndex++;
		if ( m_armPartIndex >= 3 )  m_armPartIndex = 0;

		if ( event.param == 'W' )  m_armMemberIndex++;
		if ( m_armMemberIndex >= 3 )  m_armMemberIndex = 0;

		i  = m_armMemberIndex*3;
		i += m_armPartIndex*3*3;
		i += m_armTimeIndex*3*3*3;
//?		i += 3*3*3*3;

		if ( event.param == 'E' )  m_armAngles[i+0] += 5;
		if ( event.param == 'D' )  m_armAngles[i+0] -= 5;
		if ( event.param == 'R' )  m_armAngles[i+1] += 5;
		if ( event.param == 'F' )  m_armAngles[i+1] -= 5;
		if ( event.param == 'T' )  m_armAngles[i+2] += 5;
		if ( event.param == 'G' )  m_armAngles[i+2] -= 5;

		if ( event.param == 'Y' )  m_bArmStop = !m_bArmStop;
#endif
	}

	return TRUE;
}

// Gestion d'un événement.

BOOL CMotionBee::EventFrame(const Event &event)
{
	D3DVECTOR		dir;
	float			s, a, prog;
	int				action, i, st, nd;
	BOOL			bStop;

	if ( m_engine->RetPause() )  return TRUE;
	if ( !m_engine->IsVisiblePoint(m_object->RetPosition(0)) )  return TRUE;

	s =     m_physics->RetLinMotionX(MO_MOTSPEED)*0.30f;
	a = Abs(m_physics->RetCirMotionY(MO_MOTSPEED)*2.00f);

	if ( s == 0.0f && a != 0.0f )  a *= 1.5f;

	m_armTimeAbs += event.rTime;
	m_armTimeMarch += (s)*event.rTime*0.15f;
	m_armMember += (s+a)*event.rTime*0.15f;

	bStop = ( a == 0.0f && s == 0.0f );  // a l'arrêt ?
	if ( !m_physics->RetLand() )  bStop = TRUE;

	if ( bStop )
	{
		prog = Mod(m_armTimeAbs, 2.0f)/10.0f;
		a = Mod(m_armMember, 1.0f);
		a = (prog-a)*event.rTime*2.0f;  // vient gentiment à position stop
		m_armMember += a;
	}

	action = MB_MARCH;  // marche

	m_actionType = -1;
	if ( m_object->RetFret() != 0 )  m_actionType = MBS_HOLD;  // porte le boulet

	if ( m_object->RetRuin() )  // ruine ?
	{
		m_actionType = MBS_RUIN;
	}
	if ( m_object->RetBurn() )  // brûle ?
	{
		m_actionType = MBS_BURN;
	}

	for ( i=0 ; i<6 ; i++ )  // les 6 pattes
	{
		if ( m_actionType != -1 )  // action spéciale en cours ?
		{
			st = 3*3*3*3*MB_SPEC + 3*3*3*m_actionType + (i%3)*3;
			nd = st;
		}
		else
		{
			if ( i < 3 )  prog = Mod(m_armMember+(2.0f-(i%3))*0.33f+0.0f, 1.0f);
			else          prog = Mod(m_armMember+(2.0f-(i%3))*0.33f+0.3f, 1.0f);
			if ( m_bArmStop )
			{
				prog = (float)m_armTimeIndex/3.0f;
			}
			if ( prog < 0.33f )  // t0..t1 ?
			{
				prog = prog/0.33f;  // 0..1
				st = 0;  // index start
				nd = 1;  // index end
			}
			else if ( prog < 0.67f )  // t1..t2 ?
			{
				prog = (prog-0.33f)/0.33f;  // 0..1
				st = 1;  // index start
				nd = 2;  // index end
			}
			else	// t2..t0 ?
			{
				prog = (prog-0.67f)/0.33f;  // 0..1
				st = 2;  // index start
				nd = 0;  // index end
			}
			st = 3*3*3*3*action + st*3*3*3 + (i%3)*3;
			nd = 3*3*3*3*action + nd*3*3*3 + (i%3)*3;
		}

		if ( i < 3 )  // patte droite (1..3) ?
		{
			m_object->SetAngleX(3+3*i+0, Prop(m_armAngles[st+ 0], m_armAngles[nd+ 0], prog));
			m_object->SetAngleY(3+3*i+0, Prop(m_armAngles[st+ 1], m_armAngles[nd+ 1], prog));
			m_object->SetAngleZ(3+3*i+0, Prop(m_armAngles[st+ 2], m_armAngles[nd+ 2], prog));
			m_object->SetAngleX(3+3*i+1, Prop(m_armAngles[st+ 9], m_armAngles[nd+ 9], prog));
			m_object->SetAngleY(3+3*i+1, Prop(m_armAngles[st+10], m_armAngles[nd+10], prog));
			m_object->SetAngleZ(3+3*i+1, Prop(m_armAngles[st+11], m_armAngles[nd+11], prog));
			m_object->SetAngleX(3+3*i+2, Prop(m_armAngles[st+18], m_armAngles[nd+18], prog));
			m_object->SetAngleY(3+3*i+2, Prop(m_armAngles[st+19], m_armAngles[nd+19], prog));
			m_object->SetAngleZ(3+3*i+2, Prop(m_armAngles[st+20], m_armAngles[nd+20], prog));
		}
		else	// patte gauche (4..6) ?
		{
			m_object->SetAngleX(3+3*i+0, Prop(   -m_armAngles[st+ 0],    -m_armAngles[nd+ 0], prog));
			m_object->SetAngleY(3+3*i+0, Prop(180-m_armAngles[st+ 1], 180-m_armAngles[nd+ 1], prog));
			m_object->SetAngleZ(3+3*i+0, Prop(   -m_armAngles[st+ 2],    -m_armAngles[nd+ 2], prog));
			m_object->SetAngleX(3+3*i+1, Prop(    m_armAngles[st+ 9],     m_armAngles[nd+ 9], prog));
			m_object->SetAngleY(3+3*i+1, Prop(   -m_armAngles[st+10],    -m_armAngles[nd+10], prog));
			m_object->SetAngleZ(3+3*i+1, Prop(   -m_armAngles[st+11],    -m_armAngles[nd+11], prog));
			m_object->SetAngleX(3+3*i+2, Prop(    m_armAngles[st+18],     m_armAngles[nd+18], prog));
			m_object->SetAngleY(3+3*i+2, Prop(   -m_armAngles[st+19],    -m_armAngles[nd+19], prog));
			m_object->SetAngleZ(3+3*i+2, Prop(   -m_armAngles[st+20],    -m_armAngles[nd+20], prog));
		}
	}

#if ADJUST_ANGLE
	if ( m_object->RetSelect() )
	{
		char s[100];
		sprintf(s, "A:time=%d Q:part=%d W:member=%d", m_armTimeIndex, m_armPartIndex, m_armMemberIndex);
		m_engine->SetInfoText(4, s);
	}
#endif

	if ( m_physics->RetLand() )  // au sol ?
	{
		if ( m_object->RetRuin() )
		{
		}
		else if ( bStop || m_object->RetBurn() )
		{
			m_object->SetAngleZ(2, sinf(m_armTimeAbs*1.7f)*0.15f+0.35f);  // queue
		}
		else
		{
			a = Mod(m_armTimeMarch, 1.0f);
			if ( a < 0.5f )  a = -1.0f+4.0f*a;  // -1..1
			else             a =  3.0f-4.0f*a;  // 1..-1
			dir.x = sinf(a)*0.05f;

			s = Mod(m_armTimeMarch/2.0f, 1.0f);
			if ( s < 0.5f )  s = -1.0f+4.0f*s;  // -1..1
			else             s =  3.0f-4.0f*s;  // 1..-1
			dir.z = sinf(s)*0.1f;

			dir.y = 0.0f;
			m_object->SetInclinaison(dir);

			m_object->SetAngleZ(2, -sinf(a)*0.3f);  // queue

			a = Mod(m_armMember-0.1f, 1.0f);
			if ( a < 0.33f )
			{
				dir.y = -(1.0f-(a/0.33f))*0.3f;
			}
			else if ( a < 0.67f )
			{
				dir.y = 0.0f;
			}
			else
			{
				dir.y = -(a-0.67f)/0.33f*0.3f;
			}
			dir.x = 0.0f;
			dir.z = 0.0f;
			m_object->SetLinVibration(dir);
		}
	}

	if ( m_physics->RetLand() )
	{
		if ( bStop )  prog = 0.05f;
		else          prog = 0.15f;
	}
	else
	{
		prog = 1.00f;
	}

#if 0
	a = Rand()*PI/2.0f*prog;
	m_object->SetAngleX(21, a);  // aile droite
	a = -Rand()*PI/4.0f*prog;
	m_object->SetAngleY(21, a);

	a = -Rand()*PI/2.0f*prog;
	m_object->SetAngleX(22, a);  // aile gauche
	a = Rand()*PI/4.0f*prog;
	m_object->SetAngleY(22, a);
#else
	m_object->SetAngleX(21, (sinf(m_armTimeAbs*30.0f)+1.0f)*(PI/4.0f)*prog);
	m_object->SetAngleY(21, -Rand()*PI/6.0f*prog);

	m_object->SetAngleX(22, -(sinf(m_armTimeAbs*30.0f)+1.0f)*(PI/4.0f)*prog);
	m_object->SetAngleY(22, Rand()*PI/6.0f*prog);
#endif

	m_object->SetAngleZ(1, sinf(m_armTimeAbs*1.4f)*0.20f);  // tête
	m_object->SetAngleX(1, sinf(m_armTimeAbs*1.9f)*0.10f);  // tête
	m_object->SetAngleY(1, sinf(m_armTimeAbs*2.1f)*0.50f);  // tête

#if 0
	h = m_terrain->RetFloorHeight(RetPosition(0));
	radius = 4.0f+h/4.0f;
	color.r = 0.3f+h/80.0f;
	color.g = color.r;
	color.b = color.r;
	color.a = color.r;
	m_engine->SetObjectShadowRadius(m_objectPart[0].object, radius);
	m_engine->SetObjectShadowColor(m_objectPart[0].object, color);
#endif

	return TRUE;
}