immibis
/
colobot
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
colobot/src/old/pyro.cpp

2487 lines
63 KiB
C++
Raw Blame History

// * 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/.
// pyro.cpp
#include <windows.h>
#include <stdio.h>
#include <d3d.h>
#include "common/struct.h"
#include "math/const.h"
#include "math/geometry.h"
#include "graphics/d3d/d3dengine.h"
#include "math/old/d3dmath.h"
#include "common/event.h"
#include "common/misc.h"
#include "common/iman.h"
#include "math/old/math3d.h"
#include "object/robotmain.h"
#include "graphics/common/terrain.h"
#include "graphics/common/camera.h"
#include "graphics/common/particule.h"
#include "graphics/common/light.h"
#include "object/object.h"
#include "object/motion/motion.h"
#include "object/motion/motionhuman.h"
#include "ui/displaytext.h"
#include "sound/sound.h"
#include "graphics/common/pyro.h"
// Object's constructor.
CPyro::CPyro(CInstanceManager* iMan)
{
m_iMan = iMan;
m_iMan->AddInstance(CLASS_PYRO, this, 100);
m_engine = (CD3DEngine*)m_iMan->SearchInstance(CLASS_ENGINE);
m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
m_camera = (CCamera*)m_iMan->SearchInstance(CLASS_CAMERA);
m_particule = (CParticule*)m_iMan->SearchInstance(CLASS_PARTICULE);
m_light = (CLight*)m_iMan->SearchInstance(CLASS_LIGHT);
m_displayText = (CDisplayText*)m_iMan->SearchInstance(CLASS_DISPLAYTEXT);
m_main = (CRobotMain*)m_iMan->SearchInstance(CLASS_MAIN);
m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
m_object = 0;
m_progress = 0.0f;
m_speed = 0.0f;
m_lightRank = -1;
m_soundChannel = -1;
LightOperFlush();
}
// Object's destructor.
CPyro::~CPyro()
{
m_iMan->DeleteInstance(CLASS_PYRO, this);
}
// Destroys the object.
void CPyro::DeleteObject(bool bAll)
{
if ( m_lightRank != -1 )
{
m_light->DeleteLight(m_lightRank);
m_lightRank = -1;
}
}
// Creates pyrotechnic effect.
bool CPyro::Create(PyroType type, CObject* pObj, float force)
{
Math::Matrix* mat;
CObject* power;
CMotion* motion;
Math::Vector min, max, pos, speed;
Math::Point dim;
ObjectType oType;
Sound sound;
float duration, mass, h, limit;
int part, objRank, total, i, channel;
m_object = pObj;
m_force = force;
oType = pObj->RetType();
objRank = pObj->RetObjectRank(0);
if ( objRank == -1 ) return false;
m_engine->GetBBox(objRank, min, max);
pos = pObj->RetPosition(0);
DisplayError(type, pObj); // displays eventual messages
// Copies all spheres of the object.
for ( i=0 ; i<50 ; i++ )
{
if ( !pObj->GetCrashSphere(i, m_crashSpherePos[i], m_crashSphereRadius[i]) ) break;
}
m_crashSphereUsed = i;
// Calculates the size of the effect.
if ( oType == OBJECT_ANT ||
oType == OBJECT_BEE ||
oType == OBJECT_WORM ||
oType == OBJECT_SPIDER )
{
m_size = 40.0f;
}
else
{
m_size = Math::Distance(min, max)*2.0f;
if ( m_size < 4.0f ) m_size = 4.0f;
if ( m_size > 80.0f ) m_size = 80.0f;
}
if ( oType == OBJECT_TNT ||
oType == OBJECT_BOMB )
{
m_size *= 2.0f;
}
m_pos = pos+(min+max)/2.0f;
m_type = type;
m_progress = 0.0f;
m_speed = 1.0f/20.0f;
m_time = 0.0f;
m_lastParticule = 0.0f;
m_lastParticuleSmoke = 0.0f;
m_lightRank = -1;
if ( oType == OBJECT_TEEN28 ||
oType == OBJECT_TEEN31 )
{
m_pos.y = pos.y+1.0f;
}
// Seeking the position of the battery.
power = pObj->RetPower();
if ( power == 0 )
{
m_bPower = false;
}
else
{
m_bPower = true;
pos = power->RetPosition(0);
pos.y += 1.0f;
mat = pObj->RetWorldMatrix(0);
m_posPower = Math::Transform(*mat, pos);
}
if ( oType == OBJECT_POWER ||
oType == OBJECT_ATOMIC ||
oType == OBJECT_URANIUM ||
oType == OBJECT_TNT ||
oType == OBJECT_BOMB )
{
m_bPower = true;
m_posPower = m_pos;
m_posPower.y += 1.0f;
m_pos = m_posPower;
}
if ( oType == OBJECT_STATION )
{
m_bPower = true;
mat = pObj->RetWorldMatrix(0);
m_posPower = Math::Transform(*mat, Math::Vector(-15.0f, 7.0f, 0.0f));
m_pos = m_posPower;
}
if ( oType == OBJECT_ENERGY )
{
m_bPower = true;
mat = pObj->RetWorldMatrix(0);
m_posPower = Math::Transform(*mat, Math::Vector(-7.0f, 6.0f, 0.0f));
m_pos = m_posPower;
}
if ( oType == OBJECT_NUCLEAR )
{
m_bPower = true;
m_posPower = m_pos;
}
if ( oType == OBJECT_PARA )
{
m_bPower = true;
m_posPower = m_pos;
}
if ( oType == OBJECT_SCRAP4 ||
oType == OBJECT_SCRAP5 ) // plastic material?
{
m_bPower = true;
m_posPower = m_pos;
}
// Plays the sound of a pyrotechnic effect.
if ( type == PT_FRAGT ||
type == PT_FRAGW ||
type == PT_EXPLOT ||
type == PT_EXPLOW )
{
if ( m_bPower )
{
sound = SOUND_EXPLOp;
}
else
{
sound = SOUND_EXPLO;
}
if ( oType == OBJECT_STONE ||
oType == OBJECT_METAL ||
oType == OBJECT_BULLET ||
oType == OBJECT_BBOX ||
oType == OBJECT_KEYa ||
oType == OBJECT_KEYb ||
oType == OBJECT_KEYc ||
oType == OBJECT_KEYd )
{
sound = SOUND_EXPLOl;
}
if ( oType == OBJECT_URANIUM ||
oType == OBJECT_POWER ||
oType == OBJECT_ATOMIC ||
oType == OBJECT_TNT ||
oType == OBJECT_BOMB )
{
sound = SOUND_EXPLOlp;
}
m_sound->Play(sound, m_pos);
}
if ( type == PT_FRAGO ||
type == PT_EXPLOO ||
type == PT_SPIDER ||
type == PT_SHOTM )
{
m_sound->Play(SOUND_EXPLOi, m_pos);
}
if ( type == PT_BURNT ||
type == PT_BURNO )
{
m_soundChannel = m_sound->Play(SOUND_BURN, m_pos, 1.0f, 1.0f, true);
m_sound->AddEnvelope(m_soundChannel, 1.0f, 1.0f, 12.0f, SOPER_CONTINUE);
m_sound->AddEnvelope(m_soundChannel, 0.0f, 1.0f, 5.0f, SOPER_STOP);
}
if ( type == PT_BURNO )
{
m_sound->Play(SOUND_DEADi, m_pos);
m_sound->Play(SOUND_DEADi, m_engine->RetEyePt());
}
if ( type == PT_EGG )
{
m_sound->Play(SOUND_EGG, m_pos);
}
if ( type == PT_WPCHECK ||
type == PT_FLCREATE ||
type == PT_FLDELETE )
{
m_sound->Play(SOUND_WAYPOINT, m_pos);
}
if ( oType == OBJECT_HUMAN )
{
if ( type == PT_DEADG )
{
m_sound->Play(SOUND_DEADg, m_pos);
}
if ( type == PT_DEADW )
{
m_sound->Play(SOUND_DEADw, m_pos);
}
if ( type == PT_SHOTH && m_object->RetSelect() )
{
m_sound->Play(SOUND_AIE, m_pos);
m_sound->Play(SOUND_AIE, m_engine->RetEyePt());
}
}
if ( m_type == PT_FRAGT ||
m_type == PT_FRAGO ||
m_type == PT_FRAGW )
{
m_engine->ShadowDelete(m_object->RetObjectRank(0));
}
if ( m_type == PT_DEADG )
{
m_object->SetDead(true);
motion = m_object->RetMotion();
if ( motion != 0 )
{
motion->SetAction(MHS_DEADg, 1.0f);
}
m_camera->StartCentering(m_object, Math::PI*0.5f, 99.9f, 0.0f, 1.5f);
m_camera->StartOver(OE_FADEOUTw, m_pos, 1.0f);
m_speed = 1.0f/10.0f;
return true;
}
if ( m_type == PT_DEADW )
{
m_object->SetDead(true);
motion = m_object->RetMotion();
if ( motion != 0 )
{
motion->SetAction(MHS_DEADw, 4.0f);
}
m_camera->StartCentering(m_object, Math::PI*0.5f, 99.9f, 0.0f, 3.0f);
m_camera->StartOver(OE_FADEOUTb, m_pos, 1.0f);
m_speed = 1.0f/10.0f;
return true;
}
if ( m_type == PT_SHOTT ||
m_type == PT_SHOTM )
{
m_camera->StartEffect(CE_SHOT, m_pos, force);
m_speed = 1.0f/1.0f;
return true;
}
if ( m_type == PT_SHOTH )
{
if ( m_object->RetSelect() )
{
m_camera->StartOver(OE_BLOOD, m_pos, force);
}
m_speed = 1.0f/0.2f;
return true;
}
if ( m_type == PT_SHOTW )
{
m_speed = 1.0f/1.0f;
}
if ( m_type == PT_BURNT )
{
BurnStart();
}
if ( m_type == PT_WPCHECK )
{
m_speed = 1.0f/8.0f;
m_object->SetEnable(false); // object more functional
}
if ( m_type == PT_FLCREATE )
{
m_speed = 1.0f/2.0f;
}
if ( m_type == PT_FLDELETE )
{
m_speed = 1.0f/2.0f;
m_object->SetEnable(false); // object more functional
}
if ( m_type == PT_RESET )
{
m_speed = 1.0f/2.0f;
m_object->SetPosition(0, m_object->RetResetPosition());
m_object->SetAngle(0, m_object->RetResetAngle());
m_object->SetZoom(0, 0.0f);
}
if ( m_type == PT_FINDING )
{
limit = (m_size-1.0f)/4.0f;
if ( limit > 8.0f ) limit = 8.0f;
if ( oType == OBJECT_APOLLO2 ) limit = 2.0f;
m_speed = 1.0f/limit;
}
if ( m_type == PT_EXPLOT ||
m_type == PT_EXPLOO ||
m_type == PT_EXPLOW )
{
CreateTriangle(pObj, oType, 0);
m_engine->ShadowDelete(m_object->RetObjectRank(0));
ExploStart();
}
if ( m_type == PT_FALL )
{
FallStart();
return true;
}
if ( m_type == PT_BURNT ||
m_type == PT_BURNO )
{
m_speed = 1.0f/15.0f;
LightOperAdd(0.00f, 0.0f, 2.0f, 1.0f, 0.0f); // red-orange
LightOperAdd(0.30f, 1.0f, -0.8f, -0.8f, -0.8f); // dark gray
LightOperAdd(0.80f, 1.0f, -0.8f, -0.8f, -0.8f); // dark gray
LightOperAdd(1.00f, 0.0f, -0.8f, -0.8f, -0.8f); // dark gray
CreateLight(m_pos, 40.0f);
return true;
}
if ( m_type == PT_SPIDER )
{
m_speed = 1.0f/15.0f;
pos = Math::Vector(-3.0f, 2.0f, 0.0f);
mat = pObj->RetWorldMatrix(0);
m_pos = Math::Transform(*mat, pos);
m_engine->ShadowDelete(m_object->RetObjectRank(0));
}
if ( m_type != PT_EGG &&
m_type != PT_WIN &&
m_type != PT_LOST )
{
h = 40.0f;
if ( m_type == PT_FRAGO ||
m_type == PT_EXPLOO )
{
LightOperAdd(0.00f, 0.0f, -1.0f, -0.5f, -1.0f); // dark green
LightOperAdd(0.05f, 1.0f, -1.0f, -0.5f, -1.0f); // dark green
LightOperAdd(1.00f, 0.0f, -1.0f, -0.5f, -1.0f); // dark green
}
else if ( m_type == PT_FRAGT ||
m_type == PT_EXPLOT )
{
LightOperAdd(0.00f, 1.0f, 4.0f, 4.0f, 2.0f); // yellow
LightOperAdd(0.02f, 1.0f, 4.0f, 2.0f, 0.0f); // red-orange
LightOperAdd(0.16f, 1.0f, -0.8f, -0.8f, -0.8f); // dark gray
LightOperAdd(1.00f, 0.0f, -0.8f, -0.8f, -0.8f); // dark gray
h = m_size*2.0f;
}
else if ( m_type == PT_SPIDER )
{
LightOperAdd(0.00f, 0.0f, -0.5f, -1.0f, -1.0f); // dark red
LightOperAdd(0.05f, 1.0f, -0.5f, -1.0f, -1.0f); // dark red
LightOperAdd(1.00f, 0.0f, -0.5f, -1.0f, -1.0f); // dark red
}
else if ( m_type == PT_FRAGW ||
m_type == PT_EXPLOW ||
m_type == PT_SHOTW )
{
LightOperAdd(0.00f, 0.0f, -0.5f, -0.5f, -1.0f); // dark yellow
LightOperAdd(0.05f, 1.0f, -0.5f, -0.5f, -1.0f); // dark yellow
LightOperAdd(1.00f, 0.0f, -0.5f, -0.5f, -1.0f); // dark yellow
}
else if ( m_type == PT_WPCHECK ||
m_type == PT_FLCREATE ||
m_type == PT_FLDELETE ||
m_type == PT_RESET ||
m_type == PT_FINDING )
{
LightOperAdd(0.00f, 1.0f, 4.0f, 4.0f, 2.0f); // yellow
LightOperAdd(1.00f, 0.0f, 4.0f, 4.0f, 2.0f); // yellow
}
else
{
LightOperAdd(0.00f, 0.0f, -0.8f, -0.8f, -0.8f); // dark gray
LightOperAdd(0.05f, 1.0f, -0.8f, -0.8f, -0.8f); // dark gray
LightOperAdd(1.00f, 0.0f, -0.8f, -0.8f, -0.8f); // dark gray
}
CreateLight(m_pos, h);
if ( m_type != PT_SHOTW &&
m_type != PT_WPCHECK &&
m_type != PT_FLCREATE &&
m_type != PT_FLDELETE &&
m_type != PT_RESET &&
m_type != PT_FINDING )
{
m_camera->StartEffect(CE_EXPLO, m_pos, force);
}
}
if ( m_type == PT_SHOTW ) return true;
// Generates the triangles of the explosion.
if ( m_type == PT_FRAGT ||
m_type == PT_FRAGO ||
m_type == PT_FRAGW ||
m_type == PT_SPIDER ||
m_type == PT_EGG ||
(m_type == PT_EXPLOT && oType == OBJECT_MOBILEtg) ||
(m_type == PT_EXPLOT && oType == OBJECT_TEEN28 ) ||
(m_type == PT_EXPLOT && oType == OBJECT_TEEN31 ) )
{
for ( part=0 ; part<OBJECTMAXPART ; part++ )
{
CreateTriangle(pObj, oType, part);
}
}
if ( m_type == PT_FRAGT ||
m_type == PT_EXPLOT )
{
if ( m_bPower )
{
total = (int)(10.0f*m_engine->RetParticuleDensity());
if ( oType == OBJECT_TNT ||
oType == OBJECT_BOMB ) total *= 3;
for ( i=0 ; i<total ; i++ )
{
pos = m_posPower;
speed.x = (Math::Rand()-0.5f)*30.0f;
speed.z = (Math::Rand()-0.5f)*30.0f;
speed.y = Math::Rand()*30.0f;
dim.x = 1.0f;
dim.y = dim.x;
duration = Math::Rand()*3.0f+2.0f;
mass = Math::Rand()*10.0f+15.0f;
m_particule->CreateTrack(pos, speed, dim, PARTITRACK1,
duration, mass, Math::Rand()+0.7f, 1.0f);
}
}
if ( m_size > 10.0f ) // large enough (freight excluded)?
{
if ( m_bPower )
{
pos = m_posPower;
}
else
{
pos = m_pos;
m_terrain->MoveOnFloor(pos);
pos.y += 1.0f;
}
dim.x = m_size*0.4f;
dim.y = dim.x;
m_particule->CreateParticule(pos, Math::Vector(0.0f,0.0f,0.0f), dim, PARTISPHERE0, 2.0f, 0.0f, 0.0f);
}
}
if ( m_type == PT_FRAGO ||
m_type == PT_EXPLOO )
{
total = (int)(10.0f*m_engine->RetParticuleDensity());
for ( i=0 ; i<total ; i++ )
{
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*30.0f;
speed.z = (Math::Rand()-0.5f)*30.0f;
speed.y = Math::Rand()*50.0f;
dim.x = 1.0f;
dim.y = dim.x;
duration = Math::Rand()*1.0f+0.8f;
mass = Math::Rand()*10.0f+15.0f;
m_particule->CreateParticule(pos, speed, dim, PARTIORGANIC1,
duration, mass);
}
total = (int)(5.0f*m_engine->RetParticuleDensity());
for ( i=0 ; i<total ; i++ )
{
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*30.0f;
speed.z = (Math::Rand()-0.5f)*30.0f;
speed.y = Math::Rand()*50.0f;
dim.x = 1.0f;
dim.y = dim.x;
duration = Math::Rand()*2.0f+1.4f;
mass = Math::Rand()*10.0f+15.0f;
m_particule->CreateTrack(pos, speed, dim, PARTITRACK4,
duration, mass, duration*0.5f, dim.x*2.0f);
}
}
if ( m_type == PT_SPIDER )
{
for ( i=0 ; i<50 ; i++ )
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*3.0f;
pos.z += (Math::Rand()-0.5f)*3.0f;
pos.y += (Math::Rand()-0.5f)*2.0f;
speed.x = (Math::Rand()-0.5f)*24.0f;
speed.z = (Math::Rand()-0.5f)*24.0f;
speed.y = 10.0f+Math::Rand()*10.0f;
dim.x = 1.0f;
dim.y = dim.x;
channel = m_particule->CreateParticule(pos, speed, dim, PARTIGUN3, 2.0f+Math::Rand()*2.0f, 10.0f);
m_particule->SetObjectFather(channel, pObj);
}
total = (int)(10.0f*m_engine->RetParticuleDensity());
for ( i=0 ; i<total ; i++ )
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*3.0f;
pos.z += (Math::Rand()-0.5f)*3.0f;
pos.y += (Math::Rand()-0.5f)*2.0f;
speed.x = (Math::Rand()-0.5f)*24.0f;
speed.z = (Math::Rand()-0.5f)*24.0f;
speed.y = 7.0f+Math::Rand()*7.0f;
dim.x = 1.0f;
dim.y = dim.x;
m_particule->CreateTrack(pos, speed, dim, PARTITRACK3,
2.0f+Math::Rand()*2.0f, 10.0f, 2.0f, 0.6f);
}
}
if ( type == PT_FRAGT ||
type == PT_FRAGW ||
type == PT_EXPLOT ||
type == PT_EXPLOW )
{
if ( m_size > 10.0f || m_bPower )
{
pos = m_pos;
//? m_terrain->MoveOnFloor(pos);
//? pos.y += 2.0f;
speed = Math::Vector(0.0f, 0.0f, 0.0f);
dim.x = m_size;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTICHOC, 2.0f);
}
}
return true;
}
// Creates an explosion with triangular form of particles.
void CPyro::CreateTriangle(CObject* pObj, ObjectType oType, int part)
{
D3DTriangle buffer[100];
Math::Matrix* mat;
Math::Vector offset, pos, speed;
float percent, min, max, h, duration, mass;
int objRank, total, i;
objRank = pObj->RetObjectRank(part);
if ( objRank == -1 ) return;
min = 0.0f;
max = m_engine->RetLimitLOD(0);
total = m_engine->RetTotalTriangles(objRank);
percent = 0.10f;
if ( total < 50 ) percent = 0.25f;
if ( total < 20 ) percent = 0.50f;
if ( m_type == PT_EGG ) percent = 0.30f;
if ( oType == OBJECT_POWER ||
oType == OBJECT_ATOMIC ||
oType == OBJECT_URANIUM ||
oType == OBJECT_TNT ||
oType == OBJECT_BOMB ) percent = 0.75f;
if ( oType == OBJECT_MOBILEtg ) percent = 0.50f;
if ( oType == OBJECT_TEEN28 ) percent = 0.75f;
if ( oType == OBJECT_MOTHER ) max = 1000000.0f;
if ( oType == OBJECT_TEEN28 ) max = 1000000.0f;
if ( oType == OBJECT_TEEN31 ) max = 1000000.0f;
total = m_engine->GetTriangles(objRank, min, max, buffer, 100, percent);
for ( i=0 ; i<total ; i++ )
{
Math::Vector p1, p2, p3;
p1.x = buffer[i].triangle[0].x;
p1.y = buffer[i].triangle[0].y;
p1.z = buffer[i].triangle[0].z;
p2.x = buffer[i].triangle[1].x;
p2.y = buffer[i].triangle[1].y;
p2.z = buffer[i].triangle[1].z;
p3.x = buffer[i].triangle[2].x;
p3.y = buffer[i].triangle[2].y;
p3.z = buffer[i].triangle[2].z;
h = Math::Distance(p1, p2);
if ( h > 5.0f )
{
p2.x = p1.x+((p2.x-p1.x)*5.0f/h);
p2.y = p1.y+((p2.y-p1.y)*5.0f/h);
p2.z = p1.z+((p2.z-p1.z)*5.0f/h);
}
h = Math::Distance(p2, p3);
if ( h > 5.0f )
{
p3.x = p2.x+((p3.x-p2.x)*5.0f/h);
p3.y = p2.y+((p3.y-p2.y)*5.0f/h);
p3.z = p2.z+((p3.z-p2.z)*5.0f/h);
}
h = Math::Distance(p3, p1);
if ( h > 5.0f )
{
p1.x = p3.x+((p1.x-p3.x)*5.0f/h);
p1.y = p3.y+((p1.y-p3.y)*5.0f/h);
p1.z = p3.z+((p1.z-p3.z)*5.0f/h);
}
buffer[i].triangle[0].x = p1.x;
buffer[i].triangle[0].y = p1.y;
buffer[i].triangle[0].z = p1.z;
buffer[i].triangle[1].x = p2.x;
buffer[i].triangle[1].y = p2.y;
buffer[i].triangle[1].z = p2.z;
buffer[i].triangle[2].x = p3.x;
buffer[i].triangle[2].y = p3.y;
buffer[i].triangle[2].z = p3.z;
offset.x = (buffer[i].triangle[0].x+buffer[i].triangle[1].x+buffer[i].triangle[2].x)/3.0f;
offset.y = (buffer[i].triangle[0].y+buffer[i].triangle[1].y+buffer[i].triangle[2].y)/3.0f;
offset.z = (buffer[i].triangle[0].z+buffer[i].triangle[1].z+buffer[i].triangle[2].z)/3.0f;
buffer[i].triangle[0].x -= offset.x;
buffer[i].triangle[1].x -= offset.x;
buffer[i].triangle[2].x -= offset.x;
buffer[i].triangle[0].y -= offset.y;
buffer[i].triangle[1].y -= offset.y;
buffer[i].triangle[2].y -= offset.y;
buffer[i].triangle[0].z -= offset.z;
buffer[i].triangle[1].z -= offset.z;
buffer[i].triangle[2].z -= offset.z;
mat = pObj->RetWorldMatrix(part);
pos = Math::Transform(*mat, offset);
if ( m_type == PT_EGG )
{
speed.x = (Math::Rand()-0.5f)*10.0f;
speed.z = (Math::Rand()-0.5f)*10.0f;
speed.y = Math::Rand()*15.0f;
mass = Math::Rand()*20.0f+20.0f;
}
else if ( m_type == PT_SPIDER )
{
speed.x = (Math::Rand()-0.5f)*10.0f;
speed.z = (Math::Rand()-0.5f)*10.0f;
speed.y = Math::Rand()*20.0f;
mass = Math::Rand()*10.0f+15.0f;
}
else
{
speed.x = (Math::Rand()-0.5f)*30.0f;
speed.z = (Math::Rand()-0.5f)*30.0f;
speed.y = Math::Rand()*30.0f;
mass = Math::Rand()*10.0f+15.0f;
}
if ( oType == OBJECT_STONE ) speed *= 0.5f;
if ( oType == OBJECT_URANIUM ) speed *= 0.4f;
duration = Math::Rand()*3.0f+3.0f;
m_particule->CreateFrag(pos, speed, &buffer[i], PARTIFRAG,
duration, mass, 0.5f);
}
}
// Displays the error or eventual information,
// linked to the destruction of an insect, a vehicle or building.
void CPyro::DisplayError(PyroType type, CObject* pObj)
{
ObjectType oType;
Error err;
oType = pObj->RetType();
if ( type == PT_FRAGT ||
type == PT_FRAGO ||
type == PT_FRAGW ||
type == PT_EXPLOT ||
type == PT_EXPLOO ||
type == PT_EXPLOW ||
type == PT_BURNT ||
type == PT_BURNO )
{
err = ERR_OK;
if ( oType == OBJECT_MOTHER ) err = INFO_DELETEMOTHER;
if ( oType == OBJECT_ANT ) err = INFO_DELETEANT;
if ( oType == OBJECT_BEE ) err = INFO_DELETEBEE;
if ( oType == OBJECT_WORM ) err = INFO_DELETEWORM;
if ( oType == OBJECT_SPIDER ) err = INFO_DELETESPIDER;
if ( oType == OBJECT_MOBILEwa ||
oType == OBJECT_MOBILEta ||
oType == OBJECT_MOBILEfa ||
oType == OBJECT_MOBILEia ||
oType == OBJECT_MOBILEwc ||
oType == OBJECT_MOBILEtc ||
oType == OBJECT_MOBILEfc ||
oType == OBJECT_MOBILEic ||
oType == OBJECT_MOBILEwi ||
oType == OBJECT_MOBILEti ||
oType == OBJECT_MOBILEfi ||
oType == OBJECT_MOBILEii ||
oType == OBJECT_MOBILEws ||
oType == OBJECT_MOBILEts ||
oType == OBJECT_MOBILEfs ||
oType == OBJECT_MOBILEis ||
oType == OBJECT_MOBILErt ||
oType == OBJECT_MOBILErc ||
oType == OBJECT_MOBILErr ||
oType == OBJECT_MOBILErs ||
oType == OBJECT_MOBILEsa ||
oType == OBJECT_MOBILEwt ||
oType == OBJECT_MOBILEtt ||
oType == OBJECT_MOBILEft ||
oType == OBJECT_MOBILEit ||
oType == OBJECT_MOBILEdr )
{
err = ERR_DELETEMOBILE;
}
if ( oType == OBJECT_DERRICK ||
oType == OBJECT_FACTORY ||
oType == OBJECT_STATION ||
oType == OBJECT_CONVERT ||
oType == OBJECT_REPAIR ||
oType == OBJECT_DESTROYER||
oType == OBJECT_TOWER ||
oType == OBJECT_RESEARCH ||
oType == OBJECT_RADAR ||
oType == OBJECT_INFO ||
oType == OBJECT_ENERGY ||
oType == OBJECT_LABO ||
oType == OBJECT_NUCLEAR ||
oType == OBJECT_PARA ||
oType == OBJECT_SAFE ||
oType == OBJECT_HUSTON ||
oType == OBJECT_START ||
oType == OBJECT_END )
{
err = ERR_DELETEBUILDING;
m_displayText->DisplayError(err, pObj->RetPosition(0), 5.0f);
return;
}
if ( err != ERR_OK )
{
m_displayText->DisplayError(err, pObj);
}
}
}
// Management of an event.
bool CPyro::EventProcess(const Event &event)
{
ParticuleType type;
Math::Vector pos, speed, angle;
Math::Point dim;
float prog, factor, duration;
int i, r;
if ( event.event != EVENT_FRAME ) return true;
if ( m_engine->RetPause() ) return true;
m_time += event.rTime;
m_progress += event.rTime*m_speed;
if ( m_soundChannel != -1 && m_object != 0 )
{
pos = m_object->RetPosition(0);
m_sound->Position(m_soundChannel, pos);
if ( m_lightRank != -1 )
{
pos.y += m_lightHeight;
m_light->SetLightPos(m_lightRank, pos);
}
}
if ( m_type == PT_SHOTT &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
if ( m_crashSphereUsed > 0 )
{
i = rand()%m_crashSphereUsed;
pos = m_crashSpherePos[i];
pos.x += (Math::Rand()-0.5f)*m_crashSphereRadius[i]*2.0f;
pos.z += (Math::Rand()-0.5f)*m_crashSphereRadius[i]*2.0f;
speed.x = (Math::Rand()-0.5f)*m_crashSphereRadius[i]*0.5f;
speed.z = (Math::Rand()-0.5f)*m_crashSphereRadius[i]*0.5f;
speed.y = Math::Rand()*m_crashSphereRadius[i]*1.0f;
dim.x = Math::Rand()*m_crashSphereRadius[i]*0.5f+m_crashSphereRadius[i]*0.75f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTISMOKE1, 3.0f);
}
else
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*m_size*0.3f;
pos.z += (Math::Rand()-0.5f)*m_size*0.3f;
speed.x = (Math::Rand()-0.5f)*m_size*0.1f;
speed.z = (Math::Rand()-0.5f)*m_size*0.1f;
speed.y = Math::Rand()*m_size*0.2f;
dim.x = Math::Rand()*m_size/10.0f+m_size/10.0f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTISMOKE1, 3.0f);
}
}
if ( m_type == PT_SHOTH &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
for ( i=0 ; i<10 ; i++ )
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*m_size*0.2f;
pos.z += (Math::Rand()-0.5f)*m_size*0.2f;
pos.y += (Math::Rand()-0.5f)*m_size*0.5f;
speed.x = (Math::Rand()-0.5f)*5.0f;
speed.z = (Math::Rand()-0.5f)*5.0f;
speed.y = Math::Rand()*1.0f;
dim.x = 1.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIBLOOD, Math::Rand()*3.0f+3.0f, Math::Rand()*10.0f+15.0f, 0.5f);
}
}
if ( m_type == PT_SHOTM &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
r = (int)(10.0f*m_engine->RetParticuleDensity());
for ( i=0 ; i<r ; i++ )
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*20.0f;
pos.z += (Math::Rand()-0.5f)*20.0f;
pos.y += 8.0f;
speed.x = (Math::Rand()-0.5f)*40.0f;
speed.z = (Math::Rand()-0.5f)*40.0f;
speed.y = Math::Rand()*40.0f;
dim.x = Math::Rand()*8.0f+8.0f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIBLOODM, 2.0f, 50.0f, 0.0f);
}
}
if ( m_type == PT_SHOTW &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
if ( m_crashSphereUsed > 0 )
{
i = rand()%m_crashSphereUsed;
pos = m_crashSpherePos[i];
pos.x += (Math::Rand()-0.5f)*m_crashSphereRadius[i]*2.0f;
pos.z += (Math::Rand()-0.5f)*m_crashSphereRadius[i]*2.0f;
speed.x = (Math::Rand()-0.5f)*m_crashSphereRadius[i]*0.5f;
speed.z = (Math::Rand()-0.5f)*m_crashSphereRadius[i]*0.5f;
speed.y = Math::Rand()*m_crashSphereRadius[i]*1.0f;
dim.x = 1.0f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIBLITZ, 0.5f, 0.0f, 0.0f);
}
else
{
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*m_size*0.3f;
pos.z += (Math::Rand()-0.5f)*m_size*0.3f;
speed.x = (Math::Rand()-0.5f)*m_size*0.1f;
speed.z = (Math::Rand()-0.5f)*m_size*0.1f;
speed.y = Math::Rand()*m_size*0.2f;
dim.x = 1.0f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIBLITZ, 0.5f, 0.0f, 0.0f);
}
}
if ( m_type == PT_SHOTW &&
m_lastParticuleSmoke+m_engine->ParticuleAdapt(0.10f) <= m_time )
{
m_lastParticuleSmoke = m_time;
pos = m_pos;
pos.y -= 2.0f;
pos.x += (Math::Rand()-0.5f)*4.0f;
pos.z += (Math::Rand()-0.5f)*4.0f;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 10.0f+Math::Rand()*10.0f;
dim.x = Math::Rand()*2.5f+2.0f*m_force;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTICRASH, 4.0f);
}
if ( (m_type == PT_FRAGT || m_type == PT_EXPLOT) &&
m_progress < 0.05f &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*m_size*1.0f;
speed.z = (Math::Rand()-0.5f)*m_size*1.0f;
speed.y = Math::Rand()*m_size*0.50f;
dim.x = Math::Rand()*m_size/5.0f+m_size/5.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIEXPLOT);
}
if ( (m_type == PT_FRAGT || m_type == PT_EXPLOT) &&
m_progress < 0.10f &&
m_lastParticuleSmoke+m_engine->ParticuleAdapt(0.10f) <= m_time )
{
m_lastParticuleSmoke = m_time;
dim.x = Math::Rand()*m_size/3.0f+m_size/3.0f;
dim.y = dim.x;
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*m_size*0.5f;
pos.z += (Math::Rand()-0.5f)*m_size*0.5f;
m_terrain->MoveOnFloor(pos);
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = -dim.x/2.0f/4.0f;
pos.y += dim.x/2.0f;
r = rand()%2;
if ( r == 0 ) type = PARTISMOKE1;
if ( r == 1 ) type = PARTISMOKE2;
m_particule->CreateParticule(pos, speed, dim, type, 6.0f);
}
if ( (m_type == PT_FRAGO || m_type == PT_EXPLOO) &&
m_progress < 0.03f &&
m_lastParticule+m_engine->ParticuleAdapt(0.1f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*m_size*2.0f;
speed.z = (Math::Rand()-0.5f)*m_size*2.0f;
speed.y = Math::Rand()*m_size*1.0f;
dim.x = Math::Rand()*m_size/2.0f+m_size/2.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIEXPLOO);
}
if ( (m_type == PT_FRAGW || m_type == PT_EXPLOW) &&
m_progress < 0.05f &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*m_size*1.0f;
speed.z = (Math::Rand()-0.5f)*m_size*1.0f;
speed.y = Math::Rand()*m_size*0.50f;
dim.x = 1.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIBLITZ, 0.5f, 0.0f, 0.0f);
}
if ( (m_type == PT_FRAGW || m_type == PT_EXPLOW) &&
m_progress < 0.25f &&
m_lastParticuleSmoke+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticuleSmoke = m_time;
pos = m_pos;
pos.y -= 2.0f;
pos.x += (Math::Rand()-0.5f)*4.0f;
pos.z += (Math::Rand()-0.5f)*4.0f;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 4.0f+Math::Rand()*4.0f;
dim.x = Math::Rand()*2.5f+2.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTICRASH, 4.0f);
}
if ( m_type == PT_WPCHECK )
{
if ( m_progress < 0.25f )
{
factor = 0.0f;
}
else
{
factor = powf((m_progress-0.25f)/0.75f, 2.0f)*30.0f;
}
if ( m_progress < 0.85f &&
m_lastParticule+m_engine->ParticuleAdapt(0.10f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
pos.y += factor;
pos.x += (Math::Rand()-0.5f)*3.0f;
pos.z += (Math::Rand()-0.5f)*3.0f;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 5.0f+Math::Rand()*5.0f;
dim.x = Math::Rand()*1.5f+1.5f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIGLINT, 2.0f);
//? m_particule->CreateParticule(pos, speed, dim, (ParticuleType)(PARTILENS1+rand()%4), 2.0f);
}
angle = m_object->RetAngle(0);
angle.y = m_progress*20.0f;
angle.x = sinf(m_progress*49.0f)*0.3f;
angle.z = sinf(m_progress*47.0f)*0.2f;
m_object->SetAngle(0, angle);
pos = m_pos;
pos.y += factor;
m_object->SetPosition(0, pos);
if ( m_progress > 0.85f )
{
m_object->SetZoom(0, 1.0f-(m_progress-0.85f)/0.15f);
}
}
if ( m_type == PT_FLCREATE )
{
if ( m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
m_terrain->MoveOnFloor(pos);
pos.x += (Math::Rand()-0.5f)*1.0f;
pos.z += (Math::Rand()-0.5f)*1.0f;
speed.x = (Math::Rand()-0.5f)*2.0f;
speed.z = (Math::Rand()-0.5f)*2.0f;
speed.y = 2.0f+Math::Rand()*2.0f;
dim.x = (Math::Rand()*1.0f+1.0f)*(0.2f+m_progress*0.8f);
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIGLINT, 2.0f, 0.0f, 0.0f);
}
angle = m_object->RetAngle(0);
//? angle.y = powf(m_progress, 0.2f)*20.0f;
angle.x = sinf(m_progress*49.0f)*0.3f*(1.0f-m_progress);
angle.z = sinf(m_progress*47.0f)*0.2f*(1.0f-m_progress);
m_object->SetAngle(0, angle);
m_object->SetZoom(0, m_progress);
}
if ( m_type == PT_FLDELETE )
{
if ( m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
m_terrain->MoveOnFloor(pos);
pos.x += (Math::Rand()-0.5f)*1.0f;
pos.z += (Math::Rand()-0.5f)*1.0f;
speed.x = (Math::Rand()-0.5f)*2.0f;
speed.z = (Math::Rand()-0.5f)*2.0f;
speed.y = 2.0f+Math::Rand()*2.0f;
dim.x = (Math::Rand()*1.0f+1.0f)*(0.2f+m_progress*0.8f);
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIGLINT, 2.0f, 0.0f, 0.5f);
}
angle = m_object->RetAngle(0);
angle.y = m_progress*20.0f;
angle.x = sinf(m_progress*49.0f)*0.3f;
angle.z = sinf(m_progress*47.0f)*0.2f;
m_object->SetAngle(0, angle);
m_object->SetZoom(0, 1.0f-m_progress);
}
if ( m_type == PT_RESET )
{
#if 0
if ( m_lastParticule+m_engine->ParticuleAdapt(0.10f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*6.0f;
speed.z = (Math::Rand()-0.5f)*6.0f;
speed.y = Math::Rand()*12.0f;
dim.x = (Math::Rand()*2.5f+2.5f)*(1.0f-m_progress*0.9f);
dim.y = dim.x;
pos.y += dim.y;
m_particule->CreateParticule(pos, speed, dim,
(ParticuleType)(PARTILENS1+rand()%4),
Math::Rand()*2.5f+2.5f,
Math::Rand()*5.0f+5.0f, 0.0f);
}
#else
if ( m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_pos;
pos.x += (Math::Rand()-0.5f)*5.0f;
pos.z += (Math::Rand()-0.5f)*5.0f;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 5.0f+Math::Rand()*5.0f;
dim.x = Math::Rand()*2.0f+2.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIGLINTb, 2.0f);
pos = m_pos;
speed.x = (Math::Rand()-0.5f)*20.0f;
speed.z = (Math::Rand()-0.5f)*20.0f;
speed.y = Math::Rand()*10.0f;
speed *= 0.5f+m_progress*0.5f;
dim.x = 0.6f;
dim.y = dim.x;
pos.y += dim.y;
duration = Math::Rand()*1.5f+1.5f;
m_particule->CreateTrack(pos, speed, dim, PARTITRACK6,
duration, 0.0f,
duration*0.9f, 0.7f);
}
#endif
angle = m_object->RetResetAngle();
m_object->SetAngleY(0, angle.y-powf((1.0f-m_progress)*5.0f, 2.0f));
m_object->SetZoom(0, m_progress);
}
if ( m_type == PT_FINDING )
{
if ( m_object != 0 &&
m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
factor = m_size*0.3f;
if ( m_object->RetType() == OBJECT_SAFE ) factor *= 1.3f;
if ( factor > 40.0f ) factor = 40.0f;
pos = m_pos;
m_terrain->MoveOnFloor(pos);
pos.x += (Math::Rand()-0.5f)*factor;
pos.z += (Math::Rand()-0.5f)*factor;
speed.x = (Math::Rand()-0.5f)*2.0f;
speed.z = (Math::Rand()-0.5f)*2.0f;
speed.y = 4.0f+Math::Rand()*4.0f;
dim.x = (Math::Rand()*3.0f+3.0f)*(1.0f-m_progress*0.9f);
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIGLINT, 2.0f, 0.0f, 0.5f);
}
}
if ( (m_type == PT_BURNT || m_type == PT_BURNO) &&
m_object != 0 )
{
if ( m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
factor = m_size/25.0f; // 1 = standard size
pos = m_object->RetPosition(0);
pos.y -= m_object->RetCharacter()->height;
pos.x += (Math::Rand()-0.5f)*(4.0f+8.0f*m_progress)*factor;
pos.z += (Math::Rand()-0.5f)*(4.0f+8.0f*m_progress)*factor;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 0.0f;
dim.x = (Math::Rand()*2.5f+1.0f)*factor;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIFLAME, 2.0f, 0.0f, 0.2f);
pos = m_object->RetPosition(0);
pos.y -= m_object->RetCharacter()->height;
pos.x += (Math::Rand()-0.5f)*(2.0f+4.0f*m_progress)*factor;
pos.z += (Math::Rand()-0.5f)*(2.0f+4.0f*m_progress)*factor;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = (Math::Rand()*5.0f*m_progress+3.0f)*factor;
dim.x = (Math::Rand()*2.0f+1.0f)*factor;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTIFLAME, 2.0f, 0.0f, 0.2f);
pos = m_object->RetPosition(0);
pos.y -= 2.0f;
pos.x += (Math::Rand()-0.5f)*5.0f*factor;
pos.z += (Math::Rand()-0.5f)*5.0f*factor;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = (6.0f+Math::Rand()*6.0f+m_progress*6.0f)*factor;
dim.x = (Math::Rand()*1.5f+1.0f+m_progress*3.0f)*factor;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTISMOKE3, 4.0f);
}
if ( m_type == PT_BURNT )
{
BurnProgress();
}
else
{
speed.y = 0.0f;
speed.x = (Math::Rand()-0.5f)*m_progress*1.0f;
speed.z = (Math::Rand()-0.5f)*m_progress*1.0f;
if ( m_progress > 0.8f )
{
prog = (m_progress-0.8f)/0.2f; // 0..1
speed.y = -prog*6.0f; // sinks into the ground
m_object->SetZoom(0, 1.0f-prog*0.5f);
}
m_object->SetLinVibration(speed);
}
}
if ( m_type == PT_WIN )
{
if ( m_lastParticule+m_engine->ParticuleAdapt(0.05f) <= m_time )
{
m_lastParticule = m_time;
pos = m_object->RetPosition(0);
pos.y += 1.5f;
speed.x = (Math::Rand()-0.5f)*10.0f;
speed.z = (Math::Rand()-0.5f)*10.0f;
speed.y = 8.0f+Math::Rand()*8.0f;
dim.x = Math::Rand()*0.2f+0.2f;
dim.y = dim.x;
m_particule->CreateTrack(pos, speed, dim,
(ParticuleType)(PARTITRACK7+rand()%4),
3.0f, 20.0f, 1.0f, 0.4f);
}
}
if ( m_type == PT_LOST )
{
if ( m_lastParticule+m_engine->ParticuleAdapt(0.10f) <= m_time )
{
m_lastParticule = m_time;
pos = m_object->RetPosition(0);
pos.y -= 2.0f;
pos.x += (Math::Rand()-0.5f)*10.0f;
pos.z += (Math::Rand()-0.5f)*10.0f;
speed.x = 0.0f;
speed.z = 0.0f;
speed.y = 1.0f+Math::Rand()*1.0f;
dim.x = Math::Rand()*1.0f+1.0f;
dim.y = dim.x;
m_particule->CreateParticule(pos, speed, dim, PARTISMOKE1, 8.0f, 0.0f, 0.0f);
}
}
if ( m_type == PT_FALL )
{
FallProgress(event.rTime);
}
if ( m_lightRank != -1 )
{
LightOperFrame(event.rTime);
}
return true;
}
// Indicates that the object binds to the effect no longer exists, without deleting it.
void CPyro::CutObjectLink(CObject* pObj)
{
if ( m_object == pObj )
{
m_object = 0;
}
}
// Indicates whether the pyrotechnic effect is complete.
Error CPyro::IsEnded()
{
// Destroys the object that exploded.
//It should not be destroyed at the end of the Create,
//because it is sometimes the object itself that makes the Create:
// pyro->Create(PT_FRAGT, this);
if ( m_type == PT_FRAGT ||
m_type == PT_FRAGO ||
m_type == PT_FRAGW ||
m_type == PT_SPIDER ||
m_type == PT_EGG )
{
DeleteObject(true, true);
}
if ( m_type == PT_FALL ) // freight which grave?
{
return FallIsEnded();
}
if ( m_type == PT_WIN ||
m_type == PT_LOST )
{
return ERR_CONTINUE;
}
// End of the pyrotechnic effect?
if ( m_progress < 1.0f ) return ERR_CONTINUE;
if ( m_type == PT_EXPLOT ||
m_type == PT_EXPLOO ||
m_type == PT_EXPLOW ) // explosion?
{
ExploTerminate();
}
if ( m_type == PT_BURNT ||
m_type == PT_BURNO ) // burning?
{
BurnTerminate();
}
if ( m_type == PT_WPCHECK ||
m_type == PT_FLDELETE )
{
DeleteObject(true, true);
}
if ( m_type == PT_FLCREATE )
{
m_object->SetAngleX(0, 0.0f);
m_object->SetAngleZ(0, 0.0f);
m_object->SetZoom(0, 1.0f);
}
if ( m_type == PT_RESET )
{
m_object->SetPosition(0, m_object->RetResetPosition());
m_object->SetAngle(0, m_object->RetResetAngle());
m_object->SetZoom(0, 1.0f);
}
if ( m_lightRank != -1 )
{
m_light->DeleteLight(m_lightRank);
m_lightRank = -1;
}
return ERR_STOP;
}
// Removes the binding to a pyrotechnic effect.
void CPyro::DeleteObject(bool bPrimary, bool bSecondary)
{
CObject *sub, *truck;
Math::Vector pos;
ObjectType type;
if ( m_object == 0 ) return;
if ( m_object->RetResetCap() == RESET_MOVE ) // resettable object?
{
m_object->SetEnable(false); // object cache and inactive
pos = m_object->RetPosition(0);
pos.y = -100.0f;
m_object->SetPosition(0, pos);
return;
}
type = m_object->RetType();
if ( bSecondary &&
type != OBJECT_FACTORY &&
type != OBJECT_NUCLEAR &&
type != OBJECT_ENERGY )
{
sub = m_object->RetPower();
if ( sub != 0 )
{
sub->DeleteObject(); // removes the battery
delete sub;
m_object->SetPower(0);
}
sub = m_object->RetFret();
if ( sub != 0 )
{
sub->DeleteObject(); // removes the object transported
delete sub;
m_object->SetFret(0);
}
}
if ( bPrimary )
{
truck = m_object->RetTruck();
if ( truck != 0 ) // object carries?
{
if ( truck->RetPower() == m_object )
{
truck->SetPower(0);
}
if ( truck->RetFret() == m_object )
{
truck->SetFret(0);
}
}
sub = m_object;
sub->DeleteObject(); // removes the object (*)
delete sub;
m_object = 0;
}
}
// (*) CObject :: DeleteObject can reset m_object through CPyro :: CutObjectLink!
// Empty the table of operations of animation of light.
void CPyro::LightOperFlush()
{
m_lightOperTotal = 0;
}
// Adds an animation operation of the light.
void CPyro::LightOperAdd(float progress, float intensity,
float r, float g, float b)
{
int i;
i = m_lightOperTotal;
m_lightOper[i].progress = progress;
m_lightOper[i].intensity = intensity;
m_lightOper[i].color.r = r;
m_lightOper[i].color.g = g;
m_lightOper[i].color.b = b;
m_lightOperTotal ++;
}
// Makes evolve the associated light.
void CPyro::LightOperFrame(float rTime)
{
D3DCOLORVALUE color;
float progress, intensity;
int i;
for ( i=0 ; i<m_lightOperTotal ; i++ )
{
if ( m_progress < m_lightOper[i].progress )
{
progress = (m_progress-m_lightOper[i-1].progress) / (m_lightOper[i].progress-m_lightOper[i-1].progress);
intensity = m_lightOper[i-1].intensity + (m_lightOper[i].intensity-m_lightOper[i-1].intensity)*progress;
color.r = m_lightOper[i-1].color.r + (m_lightOper[i].color.r-m_lightOper[i-1].color.r)*progress;
color.g = m_lightOper[i-1].color.g + (m_lightOper[i].color.g-m_lightOper[i-1].color.g)*progress;
color.b = m_lightOper[i-1].color.b + (m_lightOper[i].color.b-m_lightOper[i-1].color.b)*progress;
m_light->SetLightIntensity(m_lightRank, intensity);
m_light->SetLightColor(m_lightRank, color);
break;
}
}
}
// Creates light to accompany a pyrotechnic effect.
bool CPyro::CreateLight(Math::Vector pos, float height)
{
D3DLIGHT7 light;
if ( !m_engine->RetLightMode() ) return true;
m_lightHeight = height;
ZeroMemory( &light, sizeof(light) );
light.dltType = D3DLIGHT_SPOT;
light.dvPosition.x = pos.x;
light.dvPosition.y = pos.y+height;
light.dvPosition.z = pos.z;
light.dvDirection.x = 0.0f;
light.dvDirection.y = -1.0f; // against the bottom
light.dvDirection.z = 0.0f;
light.dvRange = D3DLIGHT_RANGE_MAX;
light.dvFalloff = 1.0f;
light.dvAttenuation0 = 1.0f;
light.dvAttenuation1 = 0.0f;
light.dvAttenuation2 = 0.0f;
light.dvTheta = 0.0f;
light.dvPhi = Math::PI/4.0f;
m_lightRank = m_light->CreateLight();
if ( m_lightRank == -1 ) return false;
m_light->SetLight(m_lightRank, light);
m_light->SetLightIntensity(m_lightRank, 0.0f);
// Only illuminates the objects on the ground.
m_light->SetLightIncluType(m_lightRank, TYPETERRAIN);
return true;
}
// Starts the explosion of a vehicle.
void CPyro::ExploStart()
{
Math::Vector pos, angle, speed, min, max;
float weight;
int i, objRank, channel;
m_burnType = m_object->RetType();
pos = m_object->RetPosition(0);
m_burnFall = m_terrain->RetFloorHeight(pos, true);
m_object->Simplify();
m_object->SetLock(true); // ruin not usable yet
m_object->SetExplo(true); // being destroyed
m_object->FlatParent();
if ( m_object->RetSelect() )
{
m_object->SetSelect(false); // deselects the object
m_camera->SetType(CAMERA_EXPLO);
m_main->DeselectAll();
}
m_object->DeleteDeselList(m_object);
for ( i=0 ; i<OBJECTMAXPART ; i++ )
{
objRank = m_object->RetObjectRank(i);
if ( objRank == -1 ) continue;
m_engine->ChangeSecondTexture(objRank, "dirty04.tga");
pos = m_object->RetPosition(i);
if ( i == 0 ) // main part?
{
weight = 0.0f;
speed.y = -1.0f;
speed.x = 0.0f;
speed.z = 0.0f;
}
else
{
m_engine->GetBBox(objRank, min, max);
weight = Math::Distance(min, max); // weight according to size!
speed.y = 10.0f+Math::Rand()*20.0f;
speed.x = (Math::Rand()-0.5f)*20.0f;
speed.z = (Math::Rand()-0.5f)*20.0f;
}
channel = m_particule->CreatePart(pos, speed, PARTIPART, 10.0f, 20.0f, weight, 0.5f);
if ( channel != -1 )
{
m_object->SetMasterParticule(i, channel);
}
}
m_engine->LoadTexture("dirty04.tga", 1);
DeleteObject(false, true); // destroys the object transported + the battery
}
// Ends the explosion of a vehicle.
void CPyro::ExploTerminate()
{
DeleteObject(true, false); // removes the main object
}
// Starts a vehicle fire.
void CPyro::BurnStart()
{
Math::Vector pos, angle;
int i, objRank;
m_burnType = m_object->RetType();
pos = m_object->RetPosition(0);
m_burnFall = m_terrain->RetFloorHeight(pos, true);
m_object->Simplify();
m_object->SetLock(true); // ruin not usable yet
if ( m_object->RetSelect() )
{
m_object->SetSelect(false); // deselects the object
m_camera->SetType(CAMERA_EXPLO);
m_main->DeselectAll();
}
m_object->DeleteDeselList(m_object);
for ( i=0 ; i<OBJECTMAXPART ; i++ )
{
objRank = m_object->RetObjectRank(i);
if ( objRank == -1 ) continue;
m_engine->ChangeSecondTexture(objRank, "dirty04.tga");
}
m_engine->LoadTexture("dirty04.tga", 1);
m_burnPartTotal = 0;
if ( m_burnType == OBJECT_DERRICK ||
m_burnType == OBJECT_FACTORY ||
m_burnType == OBJECT_REPAIR ||
m_burnType == OBJECT_DESTROYER||
m_burnType == OBJECT_CONVERT ||
m_burnType == OBJECT_TOWER ||
m_burnType == OBJECT_RESEARCH ||
m_burnType == OBJECT_ENERGY ||
m_burnType == OBJECT_LABO )
{
pos.x = 0.0f;
pos.y = -(4.0f+Math::Rand()*4.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_STATION ||
m_burnType == OBJECT_RADAR ||
m_burnType == OBJECT_INFO )
{
pos.x = 0.0f;
pos.y = -(1.0f+Math::Rand()*1.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.2f;
}
else if ( m_burnType == OBJECT_NUCLEAR )
{
pos.x = 0.0f;
pos.y = -(10.0f+Math::Rand()*10.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_PARA )
{
pos.x = 0.0f;
pos.y = -(10.0f+Math::Rand()*10.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_SAFE )
{
pos.x = 0.0f;
pos.y = -(10.0f+Math::Rand()*10.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_HUSTON )
{
pos.x = 0.0f;
pos.y = -(10.0f+Math::Rand()*10.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_MOBILEwa ||
m_burnType == OBJECT_MOBILEwc ||
m_burnType == OBJECT_MOBILEwi ||
m_burnType == OBJECT_MOBILEws ||
m_burnType == OBJECT_MOBILEwt )
{
pos.x = 0.0f;
pos.y = -(0.5f+Math::Rand()*1.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.8f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.4f;
}
else if ( m_burnType == OBJECT_TEEN31 ) // basket?
{
pos.x = 0.0f;
pos.y = 0.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.8f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.2f;
}
else
{
pos.x = 0.0f;
pos.y = -(2.0f+Math::Rand()*2.0f);
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.8f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*0.8f;
}
BurnAddPart(0, pos, angle); // movement of the main part
m_burnKeepPart[0] = -1; // nothing to keep
if ( m_burnType == OBJECT_DERRICK )
{
pos.x = 0.0f;
pos.y = -40.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the drill
}
if ( m_burnType == OBJECT_REPAIR )
{
pos.x = 0.0f;
pos.y = -12.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = -90.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the sensor
}
if ( m_burnType == OBJECT_DESTROYER )
{
pos.x = 0.0f;
pos.y = -12.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = -90.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the sensor
}
if ( m_burnType == OBJECT_CONVERT )
{
pos.x = 0.0f;
pos.y = -200.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.5f;
angle.y = (Math::Rand()-0.5f)*0.5f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the cover
BurnAddPart(2, pos, angle);
BurnAddPart(3, pos, angle);
}
if ( m_burnType == OBJECT_TOWER )
{
pos.x = 0.0f;
pos.y = -7.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = (Math::Rand()-0.5f)*0.4f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the cannon
}
if ( m_burnType == OBJECT_RESEARCH )
{
pos.x = 0.0f;
pos.y = -7.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the anemometer
}
if ( m_burnType == OBJECT_RADAR )
{
pos.x = 0.0f;
pos.y = -14.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = (Math::Rand()-0.5f)*0.4f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the radar
BurnAddPart(2, pos, angle);
}
if ( m_burnType == OBJECT_INFO )
{
pos.x = 0.0f;
pos.y = -14.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.4f;
angle.y = (Math::Rand()-0.5f)*0.4f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the information terminal
BurnAddPart(2, pos, angle);
}
if ( m_burnType == OBJECT_LABO )
{
pos.x = 0.0f;
pos.y = -12.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the arm
}
if ( m_burnType == OBJECT_NUCLEAR )
{
pos.x = 0.0f;
pos.y = 0.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = -135.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the cover
}
if ( m_burnType == OBJECT_MOBILEfa ||
m_burnType == OBJECT_MOBILEta ||
m_burnType == OBJECT_MOBILEwa ||
m_burnType == OBJECT_MOBILEia )
{
pos.x = 2.0f;
pos.y = -5.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = 40.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the arm
}
if ( m_burnType == OBJECT_MOBILEfs ||
m_burnType == OBJECT_MOBILEts ||
m_burnType == OBJECT_MOBILEws ||
m_burnType == OBJECT_MOBILEis )
{
pos.x = 0.0f;
pos.y = -7.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = 50.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the sensor
}
if ( m_burnType == OBJECT_MOBILEfc ||
m_burnType == OBJECT_MOBILEtc ||
m_burnType == OBJECT_MOBILEwc ||
m_burnType == OBJECT_MOBILEic )
{
pos.x = -1.5f;
pos.y = -5.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = -25.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the cannon
}
if ( m_burnType == OBJECT_MOBILEfi ||
m_burnType == OBJECT_MOBILEti ||
m_burnType == OBJECT_MOBILEwi ||
m_burnType == OBJECT_MOBILEii )
{
pos.x = -1.5f;
pos.y = -5.0f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*0.2f;
angle.y = (Math::Rand()-0.5f)*0.2f;
angle.z = -25.0f*Math::PI/180.0f;
BurnAddPart(1, pos, angle); // down the insect-cannon
}
if ( m_burnType == OBJECT_MOBILErt ||
m_burnType == OBJECT_MOBILErc )
{
pos.x = 0.0f;
pos.y = -10.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the holder
pos.x = 0.0f;
pos.y = -10.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(2, pos, angle); // down the pestle/cannon
}
if ( m_burnType == OBJECT_MOBILErr )
{
pos.x = 0.0f;
pos.y = -10.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the holder
pos.x = 0.0f;
pos.y = 0.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = -Math::PI/2.0f;
BurnAddPart(4, pos, angle);
pos.x = 0.0f;
pos.y = 0.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = Math::PI/2.5f;
BurnAddPart(2, pos, angle);
}
if ( m_burnType == OBJECT_MOBILErs )
{
pos.x = 0.0f;
pos.y = -10.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the holder
pos.x = 0.0f;
pos.y = -5.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(2, pos, angle);
pos.x = 0.0f;
pos.y = -5.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(3, pos, angle);
}
if ( m_burnType == OBJECT_MOBILEsa )
{
pos.x = 0.0f;
pos.y = -10.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = 0.0f;
BurnAddPart(1, pos, angle); // down the holder
}
if ( m_burnType == OBJECT_MOBILEwa ||
m_burnType == OBJECT_MOBILEwc ||
m_burnType == OBJECT_MOBILEwi ||
m_burnType == OBJECT_MOBILEws ||
m_burnType == OBJECT_MOBILEwt ) // wheels?
{
for ( i=0 ; i<4 ; i++ )
{
pos.x = 0.0f;
pos.y = Math::Rand()*0.5f;
pos.z = 0.0f;
angle.x = (Math::Rand()-0.5f)*Math::PI/2.0f;
angle.y = (Math::Rand()-0.5f)*Math::PI/2.0f;
angle.z = 0.0f;
BurnAddPart(6+i, pos, angle); // wheel
m_burnKeepPart[i] = 6+i; // we keep the wheels
}
m_burnKeepPart[i] = -1;
}
if ( m_burnType == OBJECT_MOBILEta ||
m_burnType == OBJECT_MOBILEtc ||
m_burnType == OBJECT_MOBILEti ||
m_burnType == OBJECT_MOBILEts ||
m_burnType == OBJECT_MOBILErt ||
m_burnType == OBJECT_MOBILErc ||
m_burnType == OBJECT_MOBILErr ||
m_burnType == OBJECT_MOBILErs ||
m_burnType == OBJECT_MOBILEsa ||
m_burnType == OBJECT_MOBILEdr ) // caterpillars?
{
pos.x = 0.0f;
pos.y = -4.0f;
pos.z = 2.0f;
angle.x = (Math::Rand()-0.5f)*20.0f*Math::PI/180.0f;
angle.y = (Math::Rand()-0.5f)*10.0f*Math::PI/180.0f;
angle.z = (Math::Rand()-0.5f)*30.0f*Math::PI/180.0f;
BurnAddPart(6, pos, angle); // down the right caterpillar
pos.x = 0.0f;
pos.y = -4.0f;
pos.z = -2.0f;
angle.x = (Math::Rand()-0.5f)*20.0f*Math::PI/180.0f;
angle.y = (Math::Rand()-0.5f)*10.0f*Math::PI/180.0f;
angle.z = (Math::Rand()-0.5f)*30.0f*Math::PI/180.0f;
BurnAddPart(7, pos, angle); // down the left caterpillar
}
if ( m_burnType == OBJECT_MOBILEfa ||
m_burnType == OBJECT_MOBILEfc ||
m_burnType == OBJECT_MOBILEfi ||
m_burnType == OBJECT_MOBILEfs ||
m_burnType == OBJECT_MOBILEft ) // flying?
{
for ( i=0 ; i<3 ; i++ )
{
pos.x = 0.0f;
pos.y = -3.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = 0.0f;
angle.z = (Math::Rand()-0.5f)*Math::PI/2.0f;
BurnAddPart(6+i, pos, angle); // foot
}
m_burnKeepPart[i] = -1;
}
if ( m_burnType == OBJECT_MOBILEia ||
m_burnType == OBJECT_MOBILEic ||
m_burnType == OBJECT_MOBILEii ||
m_burnType == OBJECT_MOBILEis ) // legs?
{
for ( i=0 ; i<6; i++ )
{
pos.x = 0.0f;
pos.y = -3.0f;
pos.z = 0.0f;
angle.x = 0.0f;
angle.y = (Math::Rand()-0.5f)*Math::PI/4.0f;
angle.z = (Math::Rand()-0.5f)*Math::PI/4.0f;
BurnAddPart(6+i, pos, angle); // leg
}
}
}
// Adds a part move.
void CPyro::BurnAddPart(int part, Math::Vector pos, Math::Vector angle)
{
int i;
i = m_burnPartTotal;
m_burnPart[i].part = part;
m_burnPart[i].initialPos = m_object->RetPosition(part);
m_burnPart[i].finalPos = m_burnPart[i].initialPos+pos;
m_burnPart[i].initialAngle = m_object->RetAngle(part);
m_burnPart[i].finalAngle = m_burnPart[i].initialAngle+angle;
m_burnPartTotal ++;
}
// Advances of a vehicle fire.
void CPyro::BurnProgress()
{
CObject* sub;
Math::Vector pos;
float h;
int i;
if ( m_burnType == OBJECT_TEEN31 ) // basket?
{
m_object->SetZoomY(0, 1.0f-m_progress*0.5f); // slight flattening
}
for ( i=0 ; i<m_burnPartTotal ; i++ )
{
pos = m_burnPart[i].initialPos + m_progress*(m_burnPart[i].finalPos-m_burnPart[i].initialPos);
if ( i == 0 && m_burnFall > 0.0f )
{
h = powf(m_progress, 2.0f)*1000.0f;
if ( h > m_burnFall ) h = m_burnFall;
pos.y -= h;
}
m_object->SetPosition(m_burnPart[i].part, pos);
pos = m_burnPart[i].initialAngle + m_progress*(m_burnPart[i].finalAngle-m_burnPart[i].initialAngle);
m_object->SetAngle(m_burnPart[i].part, pos);
}
sub = m_object->RetPower();
if ( sub != 0 ) // is there a battery?
{
sub->SetZoomY(0, 1.0f-m_progress); // complete flattening
}
}
// Indicates whether a part should be retained.
bool CPyro::BurnIsKeepPart(int part)
{
int i;
i = 0;
while ( m_burnKeepPart[i] != -1 )
{
if ( part == m_burnKeepPart[i++] ) return true; // must keep
}
return false; // must destroy
}
// Ends the fire of an insect or a vehicle.
void CPyro::BurnTerminate()
{
int i, objRank;
if ( m_type == PT_BURNO ) // organic object is burning?
{
DeleteObject(true, true); // removes the insect
return;
}
for ( i=1 ; i<OBJECTMAXPART ; i++ )
{
objRank = m_object->RetObjectRank(i);
if ( objRank == -1 ) continue;
if ( BurnIsKeepPart(i) ) continue;
m_object->DeletePart(i);
}
DeleteObject(false, true); // destroys the object transported + the battery
if ( m_burnType == OBJECT_DERRICK ||
m_burnType == OBJECT_STATION ||
m_burnType == OBJECT_FACTORY ||
m_burnType == OBJECT_REPAIR ||
m_burnType == OBJECT_DESTROYER||
m_burnType == OBJECT_CONVERT ||
m_burnType == OBJECT_TOWER ||
m_burnType == OBJECT_RESEARCH ||
m_burnType == OBJECT_RADAR ||
m_burnType == OBJECT_INFO ||
m_burnType == OBJECT_ENERGY ||
m_burnType == OBJECT_LABO ||
m_burnType == OBJECT_NUCLEAR ||
m_burnType == OBJECT_PARA ||
m_burnType == OBJECT_SAFE ||
m_burnType == OBJECT_HUSTON ||
m_burnType == OBJECT_START ||
m_burnType == OBJECT_END )
{
m_object->SetType(OBJECT_RUINfactory); // others become a ruin
m_object->SetLock(false);
}
else
{
m_object->SetType(OBJECT_RUINmobilew1); // others become a ruin
m_object->SetLock(false);
}
m_object->SetBurn(false); // ruin usable (c-e-d. recoverable)
}
// Start of an object freight falling.
void CPyro::FallStart()
{
Math::Vector pos;
m_object->SetBurn(true); // usable
pos = m_object->RetPosition(0);
m_fallFloor = m_terrain->RetFloorLevel(pos);
m_fallSpeed = 0.0f;
m_fallBulletTime = 0.0f;
m_bFallEnding = false;
}
// Seeking an object explode by the falling ball of bees.
CObject* CPyro::FallSearchBeeExplo()
{
CObject* pObj;
Math::Vector iPos, oPos;
ObjectType oType;
float iRadius, oRadius, distance, shieldRadius;
int i, j;
m_object->GetCrashSphere(0, iPos, iRadius);
for ( i=0 ; i<1000000 ; i++ )
{
pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
if ( pObj == 0 ) break;
oType = pObj->RetType();
if ( oType != OBJECT_HUMAN &&
oType != OBJECT_MOBILEfa &&
oType != OBJECT_MOBILEta &&
oType != OBJECT_MOBILEwa &&
oType != OBJECT_MOBILEia &&
oType != OBJECT_MOBILEfc &&
oType != OBJECT_MOBILEtc &&
oType != OBJECT_MOBILEwc &&
oType != OBJECT_MOBILEic &&
oType != OBJECT_MOBILEfi &&
oType != OBJECT_MOBILEti &&
oType != OBJECT_MOBILEwi &&
oType != OBJECT_MOBILEii &&
oType != OBJECT_MOBILEfs &&
oType != OBJECT_MOBILEts &&
oType != OBJECT_MOBILEws &&
oType != OBJECT_MOBILEis &&
oType != OBJECT_MOBILErt &&
oType != OBJECT_MOBILErc &&
oType != OBJECT_MOBILErr &&
oType != OBJECT_MOBILErs &&
oType != OBJECT_MOBILEsa &&
oType != OBJECT_MOBILEtg &&
oType != OBJECT_MOBILEft &&
oType != OBJECT_MOBILEtt &&
oType != OBJECT_MOBILEwt &&
oType != OBJECT_MOBILEit &&
oType != OBJECT_MOBILEdr &&
oType != OBJECT_BASE &&
oType != OBJECT_DERRICK &&
oType != OBJECT_STATION &&
oType != OBJECT_FACTORY &&
oType != OBJECT_REPAIR &&
oType != OBJECT_DESTROYER&&
oType != OBJECT_CONVERT &&
oType != OBJECT_TOWER &&
oType != OBJECT_RESEARCH &&
oType != OBJECT_RADAR &&
oType != OBJECT_INFO &&
oType != OBJECT_ENERGY &&
oType != OBJECT_LABO &&
oType != OBJECT_NUCLEAR &&
oType != OBJECT_PARA &&
oType != OBJECT_SAFE &&
oType != OBJECT_HUSTON &&
oType != OBJECT_METAL &&
oType != OBJECT_POWER &&
oType != OBJECT_ATOMIC ) continue;
if ( pObj->RetTruck() != 0 ) continue; // object transported?
oPos = pObj->RetPosition(0);
shieldRadius = pObj->RetShieldRadius();
if ( shieldRadius > 0.0f )
{
distance = Math::Distance(oPos, iPos);
if ( distance <= shieldRadius ) return pObj;
}
if ( oType == OBJECT_BASE )
{
distance = Math::Distance(oPos, iPos);
if ( distance < 25.0f ) return pObj;
}
// Test the center of the object, which is necessary for objects
// that have no sphere in the center (station).
distance = Math::Distance(oPos, iPos)-4.0f;
if ( distance < 5.0f ) return pObj;
// Test with all spheres of the object.
j = 0;
while ( pObj->GetCrashSphere(j++, oPos, oRadius) )
{
distance = Math::Distance(oPos, iPos);
if ( distance <= iRadius+oRadius )
{
return pObj;
}
}
}
return 0;
}
// Fall of an object's freight.
void CPyro::FallProgress(float rTime)
{
CObject* pObj;
Math::Vector pos;
bool bFloor = false;
if ( m_object == 0 ) return;
m_fallSpeed += rTime*50.0f; // v2 = v1 + a*dt
pos = m_object->RetPosition(0);
pos.y -= m_fallSpeed*rTime; // dd -= v2*dt
if ( pos.y <= m_fallFloor ) // below the ground level?
{
pos.y = m_fallFloor;
bFloor = true;
}
m_object->SetPosition(0, pos);
if ( m_object->RetType() == OBJECT_BULLET )
{
m_fallBulletTime += rTime;
if ( m_fallBulletTime > 0.2f || bFloor )
{
m_fallBulletTime = 0.0f;
pObj = FallSearchBeeExplo();
if ( pObj == 0 )
{
if ( bFloor ) // reaches the ground?
{
m_object->ExploObject(EXPLO_BOUM, 0.0f); // start explosion
}
}
else
{
if ( pObj->RetShieldRadius() > 0.0f ) // protected by shield?
{
m_particule->CreateParticule(pos, Math::Vector(0.0f, 0.0f, 0.0f), Math::Point(6.0f, 6.0f), PARTIGUNDEL, 2.0f, 0.0f, 0.0f);
m_sound->Play(SOUND_GUNDEL);
DeleteObject(true, true); // removes the ball
}
else
{
if ( pObj->ExploObject(EXPLO_BOUM, 1.0f) ) // start explosion
{
DeleteObject(true, true); // removes the ball
}
else
{
m_object->ExploObject(EXPLO_BOUM, 0.0f); // start explosion
}
}
}
if ( bFloor || pObj != 0 )
{
m_bFallEnding = true;
}
}
}
}
// Indicates whether the fall is over.
Error CPyro::FallIsEnded()
{
Math::Vector pos;
if ( m_bFallEnding || m_object == 0 ) return ERR_STOP;
pos = m_object->RetPosition(0);
if ( pos.y > m_fallFloor ) return ERR_CONTINUE;
m_sound->Play(SOUND_BOUM, pos);
m_object->SetBurn(false); // usable again
return ERR_STOP;
}
Reference in New Issue View Git Blame Copy Permalink