colobot/src/object/auto/autoconvert.cpp

530 lines
14 KiB
C++

// * This file is part of the COLOBOT source code
// * Copyright (C) 2001-2008, Daniel ROUX & EPSITEC SA, www.epsitec.ch
// * Copyright (C) 2012 Polish Portal of Colobot (PPC)
// *
// * 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/.
#include "object/auto/autoconvert.h"
#include "common/iman.h"
#include "math/geometry.h"
#include "script/cmdtoken.h"
#include "ui/interface.h"
#include "ui/window.h"
#include "ui/displaytext.h"
#include <stdio.h>
#include <string.h>
// Object's constructor.
CAutoConvert::CAutoConvert(CObject* object) : CAuto(object)
{
Init();
m_phase = ACP_STOP;
m_bResetDelete = false;
m_soundChannel = -1;
}
// Object's destructor.
CAutoConvert::~CAutoConvert()
{
}
// Destroys the object.
void CAutoConvert::DeleteObject(bool bAll)
{
CObject* fret;
if ( !bAll )
{
fret = SearchStone(OBJECT_STONE);
if ( fret != 0 )
{
fret->DeleteObject(); // destroy the stone
delete fret;
}
}
if ( m_soundChannel != -1 )
{
m_sound->FlushEnvelope(m_soundChannel);
m_sound->AddEnvelope(m_soundChannel, 0.0f, 1.0f, 1.0f, SOPER_STOP);
m_soundChannel = -1;
}
CAuto::DeleteObject(bAll);
}
// Initialize the object.
void CAutoConvert::Init()
{
m_phase = ACP_WAIT;
m_progress = 0.0f;
m_speed = 1.0f/2.0f;
m_time = 0.0f;
m_timeVirus = 0.0f;
m_lastParticle = 0.0f;
CAuto::Init();
}
// Management of an event.
bool CAutoConvert::EventProcess(const Event &event)
{
CObject* fret;
Math::Vector pos, speed;
Math::Point dim, c, p;
float angle;
CAuto::EventProcess(event);
if ( m_engine->GetPause() ) return true;
if ( event.type != EVENT_FRAME ) return true;
m_progress += event.rTime*m_speed;
m_timeVirus -= event.rTime;
if ( m_object->GetVirusMode() ) // contaminated by a virus?
{
if ( m_timeVirus <= 0.0f )
{
m_timeVirus = 0.1f+Math::Rand()*0.3f;
angle = (Math::Rand()-0.5f)*0.3f;
m_object->SetAngleY(1, angle);
m_object->SetAngleY(2, angle);
m_object->SetAngleY(3, angle+Math::PI);
m_object->SetAngleX(2, -Math::PI*0.35f*(0.8f+Math::Rand()*0.2f));
m_object->SetAngleX(3, -Math::PI*0.35f*(0.8f+Math::Rand()*0.2f));
}
return true;
}
EventProgress(event.rTime);
if ( m_phase == ACP_STOP ) return true;
if ( m_phase == ACP_WAIT )
{
if ( m_progress >= 1.0f )
{
fret = SearchStone(OBJECT_STONE); // Has stone transformed?
if ( fret == 0 || SearchVehicle() )
{
m_phase = ACP_WAIT; // still waiting ...
m_progress = 0.0f;
m_speed = 1.0f/2.0f;
}
else
{
fret->SetLock(true); // stone usable
SetBusy(true);
InitProgressTotal(3.0f+10.0f+1.5f);
UpdateInterface();
m_sound->Play(SOUND_OPEN, m_object->GetPosition(0), 1.0f, 1.0f);
m_bSoundClose = false;
m_phase = ACP_CLOSE;
m_progress = 0.0f;
m_speed = 1.0f/3.0f;
}
}
}
if ( m_phase == ACP_CLOSE )
{
if ( m_progress < 1.0f )
{
if ( m_progress >= 0.8f && !m_bSoundClose )
{
m_bSoundClose = true;
m_sound->Play(SOUND_CLOSE, m_object->GetPosition(0), 1.0f, 0.8f);
}
angle = -Math::PI*0.35f*(1.0f-Math::Bounce(m_progress, 0.85f, 0.05f));
m_object->SetAngleX(2, angle);
m_object->SetAngleX(3, angle);
}
else
{
m_object->SetAngleX(2, 0.0f);
m_object->SetAngleX(3, 0.0f);
m_soundChannel = m_sound->Play(SOUND_CONVERT, m_object->GetPosition(0), 0.0f, 0.25f, true);
m_sound->AddEnvelope(m_soundChannel, 1.0f, 0.25f, 0.5f, SOPER_CONTINUE);
m_sound->AddEnvelope(m_soundChannel, 1.0f, 1.00f, 4.5f, SOPER_CONTINUE);
m_sound->AddEnvelope(m_soundChannel, 1.0f, 0.25f, 4.5f, SOPER_CONTINUE);
m_sound->AddEnvelope(m_soundChannel, 0.0f, 0.25f, 0.5f, SOPER_STOP);
m_phase = ACP_ROTATE;
m_progress = 0.0f;
m_speed = 1.0f/10.0f;
}
}
if ( m_phase == ACP_ROTATE )
{
if ( m_progress < 1.0f )
{
if ( m_progress < 0.5f )
{
angle = powf((m_progress*2.0f)*5.0f, 2.0f); // accelerates
}
else
{
angle = -powf((2.0f-m_progress*2.0f)*5.0f, 2.0f); // slows
}
m_object->SetAngleY(1, angle);
m_object->SetAngleY(2, angle);
m_object->SetAngleY(3, angle+Math::PI);
if ( m_lastParticle+m_engine->ParticleAdapt(0.05f) <= m_time )
{
m_lastParticle = m_time;
pos = m_object->GetPosition(0);
c.x = pos.x;
c.y = pos.z;
p.x = c.x;
p.y = c.y+6.0f;
p = Math::RotatePoint(c, Math::Rand()*Math::PI*2.0f, p);
pos.x = p.x;
pos.z = p.y;
pos.y += 1.0f;
speed = Math::Vector(0.0f, 0.0f, 0.0f);
dim.x = Math::Rand()*2.0f+1.0f;
dim.y = dim.x;
m_particle->CreateParticle(pos, speed, dim, Gfx::PARTIGAS, 1.0f, 0.0f, 0.0f);
}
}
else
{
m_object->SetAngleY(1, 0.0f);
m_object->SetAngleY(2, 0.0f);
m_object->SetAngleY(3, Math::PI);
fret = SearchStone(OBJECT_STONE);
if ( fret != 0 )
{
m_bResetDelete = ( fret->GetResetCap() != RESET_NONE );
fret->DeleteObject(); // destroy the stone
delete fret;
}
CreateMetal(); // Create the metal
m_sound->Play(SOUND_OPEN, m_object->GetPosition(0), 1.0f, 1.5f);
m_phase = ACP_OPEN;
m_progress = 0.0f;
m_speed = 1.0f/1.5f;
}
}
if ( m_phase == ACP_OPEN )
{
if ( m_progress < 1.0f )
{
angle = -Math::PI*0.35f*Math::Bounce(m_progress, 0.7f, 0.2f);
m_object->SetAngleX(2, angle);
m_object->SetAngleX(3, angle);
if ( m_progress < 0.9f &&
m_lastParticle+m_engine->ParticleAdapt(0.05f) <= m_time )
{
m_lastParticle = m_time;
pos = m_object->GetPosition(0);
pos.x += (Math::Rand()-0.5f)*6.0f;
pos.z += (Math::Rand()-0.5f)*6.0f;
pos.y += Math::Rand()*4.0f;
speed = Math::Vector(0.0f, 0.0f, 0.0f);
dim.x = Math::Rand()*4.0f+3.0f;
dim.y = dim.x;
m_particle->CreateParticle(pos, speed, dim, Gfx::PARTIBLUE, 1.0f, 0.0f, 0.0f);
}
}
else
{
m_soundChannel = -1;
m_object->SetAngleX(2, -Math::PI*0.35f);
m_object->SetAngleX(3, -Math::PI*0.35f);
SetBusy(false);
UpdateInterface();
m_phase = ACP_WAIT;
m_progress = 0.0f;
m_speed = 1.0f/2.0f;
}
}
return true;
}
// Returns an error due the state of the automation.
Error CAutoConvert::GetError()
{
if ( m_object->GetVirusMode() )
{
return ERR_BAT_VIRUS;
}
if ( m_phase == ACP_WAIT ) return ERR_CONVERT_EMPTY;
return ERR_OK;
}
// Cancels the current transformation.
bool CAutoConvert::Abort()
{
if ( m_soundChannel != -1 )
{
m_sound->FlushEnvelope(m_soundChannel);
m_sound->AddEnvelope(m_soundChannel, 0.0f, 1.0f, 1.0f, SOPER_STOP);
m_soundChannel = -1;
}
m_object->SetAngleY(1, 0.0f);
m_object->SetAngleY(2, 0.0f);
m_object->SetAngleY(3, Math::PI);
m_object->SetAngleX(2, -Math::PI*0.35f);
m_object->SetAngleX(3, -Math::PI*0.35f);
m_phase = ACP_WAIT;
m_progress = 0.0f;
m_speed = 1.0f/2.0f;
SetBusy(false);
UpdateInterface();
return true;
}
// Creates all the interface when the object is selected.
bool CAutoConvert::CreateInterface(bool bSelect)
{
Ui::CWindow* pw;
Math::Point pos, ddim;
float ox, oy, sx, sy;
CAuto::CreateInterface(bSelect);
if ( !bSelect ) return true;
pw = static_cast< Ui::CWindow* >(m_interface->SearchControl(EVENT_WINDOW0));
if ( pw == nullptr ) return false;
ox = 3.0f/640.0f;
oy = 3.0f/480.0f;
sx = 33.0f/640.0f;
sy = 33.0f/480.0f;
pos.x = ox+sx*0.0f;
pos.y = oy+sy*0;
ddim.x = 66.0f/640.0f;
ddim.y = 66.0f/480.0f;
pw->CreateGroup(pos, ddim, 103, EVENT_OBJECT_TYPE);
return true;
}
// Saves all parameters of the controller.
bool CAutoConvert::Write(char *line)
{
char name[100];
if ( m_phase == ACP_STOP ||
m_phase == ACP_WAIT ) return false;
sprintf(name, " aExist=%d", 1);
strcat(line, name);
CAuto::Write(line);
sprintf(name, " aPhase=%d", m_phase);
strcat(line, name);
sprintf(name, " aProgress=%.2f", m_progress);
strcat(line, name);
sprintf(name, " aSpeed=%.2f", m_speed);
strcat(line, name);
return true;
}
// Restores all parameters of the controller.
bool CAutoConvert::Read(char *line)
{
if ( OpInt(line, "aExist", 0) == 0 ) return false;
CAuto::Read(line);
m_phase = static_cast< AutoConvertPhase >(OpInt(line, "aPhase", ACP_WAIT));
m_progress = OpFloat(line, "aProgress", 0.0f);
m_speed = OpFloat(line, "aSpeed", 1.0f);
m_lastParticle = 0.0f;
return true;
}
// Searches for the object before or during processing.
CObject* CAutoConvert::SearchStone(ObjectType type)
{
CObject* pObj;
Math::Vector cPos, oPos;
ObjectType oType;
float dist;
int i;
cPos = m_object->GetPosition(0);
for ( i=0 ; i<1000000 ; i++ )
{
pObj = static_cast< CObject* >(m_iMan->SearchInstance(CLASS_OBJECT, i));
if ( pObj == 0 ) break;
oType = pObj->GetType();
if ( oType != type ) continue;
if ( pObj->GetTruck() != 0 ) continue;
oPos = pObj->GetPosition(0);
dist = Math::Distance(oPos, cPos);
if ( dist <= 5.0f ) return pObj;
}
return 0;
}
// Search if a vehicle is too close.
bool CAutoConvert::SearchVehicle()
{
CObject* pObj;
Math::Vector cPos, oPos;
ObjectType type;
float oRadius, dist;
int i;
cPos = m_object->GetPosition(0);
for ( i=0 ; i<1000000 ; i++ )
{
pObj = static_cast< CObject* >(m_iMan->SearchInstance(CLASS_OBJECT, i));
if ( pObj == 0 ) break;
type = pObj->GetType();
if ( type != OBJECT_HUMAN &&
type != OBJECT_MOBILEfa &&
type != OBJECT_MOBILEta &&
type != OBJECT_MOBILEwa &&
type != OBJECT_MOBILEia &&
type != OBJECT_MOBILEfc &&
type != OBJECT_MOBILEtc &&
type != OBJECT_MOBILEwc &&
type != OBJECT_MOBILEic &&
type != OBJECT_MOBILEfi &&
type != OBJECT_MOBILEti &&
type != OBJECT_MOBILEwi &&
type != OBJECT_MOBILEii &&
type != OBJECT_MOBILEfs &&
type != OBJECT_MOBILEts &&
type != OBJECT_MOBILEws &&
type != OBJECT_MOBILEis &&
type != OBJECT_MOBILErt &&
type != OBJECT_MOBILErc &&
type != OBJECT_MOBILErr &&
type != OBJECT_MOBILErs &&
type != OBJECT_MOBILEsa &&
type != OBJECT_MOBILEtg &&
type != OBJECT_MOBILEft &&
type != OBJECT_MOBILEtt &&
type != OBJECT_MOBILEwt &&
type != OBJECT_MOBILEit &&
type != OBJECT_MOBILEdr &&
type != OBJECT_METAL &&
type != OBJECT_URANIUM &&
type != OBJECT_POWER &&
type != OBJECT_ATOMIC &&
type != OBJECT_BULLET &&
type != OBJECT_BBOX &&
type != OBJECT_TNT &&
type != OBJECT_MOTHER &&
type != OBJECT_ANT &&
type != OBJECT_SPIDER &&
type != OBJECT_BEE &&
type != OBJECT_WORM ) continue;
if ( !pObj->GetCrashSphere(0, oPos, oRadius) ) continue;
dist = Math::Distance(oPos, cPos)-oRadius;
if ( dist < 8.0f ) return true;
}
return false;
}
// Creates an object metal.
void CAutoConvert::CreateMetal()
{
Math::Vector pos;
float angle;
CObject* fret;
pos = m_object->GetPosition(0);
angle = m_object->GetAngleY(0);
fret = new CObject();
if ( !fret->CreateResource(pos, angle, OBJECT_METAL) )
{
delete fret;
m_displayText->DisplayError(ERR_TOOMANY, m_object);
return;
}
if ( m_bResetDelete )
{
fret->SetResetCap(RESET_DELETE);
}
m_displayText->DisplayError(INFO_CONVERT, m_object);
}