Merge with branch dev-opengl

74 files changed, 99 insertions, 39940 deletions

diff --git a/.gitignore b/.gitignore
index 50c39fe..86157a0 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,2 +1,9 @@
 # Ignore the documentation folder
 /doc
+
+# Ignore the CMake build files
+/CMakeFiles
+/CMakeCache.txt
+/cmake_install.cmake
+/Makefile
+
diff --git a/CMakeLists.txt b/CMakeLists.txt
index ae0231d..2d24e0a 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -12,10 +12,9 @@ find_package(SDL_image REQUIRED)
 # Build with debugging symbols
 set(CMAKE_BUILD_TYPE debug)
 
-# Currently compiles only with -fpermissive
-
-set(CMAKE_CXX_FLAGS_RELEASE "-fpermissive -O2")
-set(CMAKE_CXX_FLAGS_DEBUG "-fpermissive -w -g -O0")
+# Global compile flags
+set(CMAKE_CXX_FLAGS_RELEASE "-O2")
+set(CMAKE_CXX_FLAGS_DEBUG "-w -g -O0")
 
 # Subdirectory with sources
 add_subdirectory(src bin)
diff --git a/README-DEV-OPENGL.txt b/README-DEV-OPENGL.txt
index 8d0c1aa..a71c429 100644
--- a/README-DEV-OPENGL.txt
+++ b/README-DEV-OPENGL.txt
@@ -4,9 +4,9 @@ This file outlines the most important things for developers.
 
 1. Goal.
 
-  This branch is the main development branch into which features from other development branches will be pulled in after completing their goals. Currently these branches include:
-   * opengl-dev  branch - branch dedicated to rewriting the graphics engine using SDL and OpenGL
-   * ...
+  This branch is dedicated to rewriting the graphics engine as well as window & event handling, sound and all other parts of the project dependent on WinAPI or DirectX, to new platform-independent libraries: SDL, OpenGL and fmod (for sound).
+  The general rule is to rewrite the code so that it resembles the old one as closely as possible so that later on, it can be joined easily with the other modules, which will not be touched yet. Of course, it doesn't mean to sacrifice the usability or flexibility of new interfaces, so some cleaning-up is welcome.
+
 
 2. Build system and organisation of directories.
 
@@ -36,5 +36,51 @@ This file outlines the most important things for developers.
 
   There is also a generated header common/config.h with #defines set by CMake.
 
-3. For other things, refer to README files in respective feature development branches.
 
+3. Plan of work.
+
+  What is done so far:
+   - changes in the build system
+   - rewriting of math module and reaching independence from old FPOINT, D3DVECTOR and D3DMATRIX structs
+   - first draft of class and struct templates in src/graphics/common
+
+  What remains to be done:
+   - in CBot library - remove dependencies to WinAPI and translate the comments from French to English
+   - write CApplication class, including handling of SDL events, mouse, joystick, etc.
+   - (connected with the above) remove dependencies from src/common
+   - complete the CDevice and CEngine interfaces and write the concrete implementations of CGLDevice and CGLEngine
+   - write the implementation of other classes in graphics engine, matching the old implementation but using only the new interface
+   - write the implementation of new sound module
+   - rewrite the old UI classes to use new graphics interface
+   - rewrite the old src/object classes to use new graphics interface
+
+  Certain tasks regarding the work should be assigned to each developer using Issues on github, so that the division is clear.
+
+
+3. Rewriting modules.
+
+  The rewriting rule is the following: every old module/header that needs to be replaced will be moved to src/old and all references to it in the rest of the code shall be changed to src/old as well. In place of the old module, a new one will be created with the new declarations, preferrably enclosing everything in a separate namespace. This way, the new code will be separated from the old one, for the time being, thus making it possible to work on new code and not break anything else. Once the functionality of new code matches the old one, it can be replaced in old code with ease.
+
+
+4. Documentation.
+
+  All new code should be documented in Doxygen. Also, don't hesitate to add comments in the old code, where you deciphered some use or detail that you want to share.
+
+
+5. Tests.
+
+  Whenever possible, please write unit tests for your code. Tests should go into test subdirectory in each of the code directories and for now, should be independent of main build system (later on, we will combine them, but for now it will be easier this way).
+
+
+6. Commiting code.
+
+  Code commited to the repository should not break compilation nor tests. Breaking the compilation of old code can be tolerated but the new one - no! If you are uncertain, or want to make partial commit or something like that, commit to your own fork, or if you must, commit but comment out the code that breaks the build.
+
+
+7. Whitespace rules.
+
+  Please indent with spaces, 1 indentation level = 4 spaces. Unix line endings. And don't leave whitespace at the end of lines. Thank you :)
+
+
+
+I will probably think of something more in the future, but that's it for now. Thanks for reading and good luck :)
diff --git a/bin/.gitignore b/bin/.gitignore
new file mode 100644
index 0000000..96ec5ae
--- /dev/null
+++ b/bin/.gitignore
@@ -0,0 +1,6 @@
+# Ignore everything
+*
+
+# But not these files...
+!.gitignore
+!README.txt
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 3f5e238..1be7a59 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -1,132 +1,31 @@
 # CBot shared library is built separately
-add_subdirectory(CBot)
+# add_subdirectory(CBot) -- not yet WinAPI-independent
 
 
-# Source files for old target (dependent on WinAPI & DirectX)
-set(OLD_SOURCES
-old/d3dapp.cpp
-old/joystick.cpp
-old/blitz.cpp
-old/camera.cpp
-old/cloud.cpp
-old/light.cpp
-old/model.cpp
-old/particule.cpp
-old/planet.cpp
-old/pyro.cpp
-old/terrain.cpp
-old/text.cpp
-old/water.cpp
-old/d3dengine.cpp
-old/d3denum.cpp
-old/d3dframe.cpp
-old/d3dtextr.cpp
-old/d3dutil.cpp
-old/d3dmath.cpp
-old/math3d.cpp
-old/modfile.cpp
-old/sound.cpp
-common/event.cpp
-common/iman.cpp
-common/metafile.cpp
-common/misc.cpp
-common/profile.cpp
-common/restext.cpp
-object/auto/auto.cpp
-object/auto/autobase.cpp
-object/auto/autoconvert.cpp
-object/auto/autoderrick.cpp
-object/auto/autodestroyer.cpp
-object/auto/autoegg.cpp
-object/auto/autoenergy.cpp
-object/auto/autofactory.cpp
-object/auto/autoflag.cpp
-object/auto/autohuston.cpp
-object/auto/autoinfo.cpp
-object/auto/autojostle.cpp
-object/auto/autokid.cpp
-object/auto/autolabo.cpp
-object/auto/automush.cpp
-object/auto/autonest.cpp
-object/auto/autonuclear.cpp
-object/auto/autopara.cpp
-object/auto/autoportico.cpp
-object/auto/autoradar.cpp
-object/auto/autorepair.cpp
-object/auto/autoresearch.cpp
-object/auto/autoroot.cpp
-object/auto/autosafe.cpp
-object/auto/autostation.cpp
-object/auto/autotower.cpp
-object/brain.cpp
-object/mainmovie.cpp
-object/motion/motion.cpp
-object/motion/motionant.cpp
-object/motion/motionbee.cpp
-object/motion/motionhuman.cpp
-object/motion/motionmother.cpp
-object/motion/motionspider.cpp
-object/motion/motiontoto.cpp
-object/motion/motionvehicle.cpp
-object/motion/motionworm.cpp
-object/object.cpp
-object/robotmain.cpp
-object/task/task.cpp
-object/task/taskadvance.cpp
-object/task/taskbuild.cpp
-object/task/taskfire.cpp
-object/task/taskfireant.cpp
-object/task/taskflag.cpp
-object/task/taskgoto.cpp
-object/task/taskgungoal.cpp
-object/task/taskinfo.cpp
-object/task/taskmanager.cpp
-object/task/taskmanip.cpp
-object/task/taskpen.cpp
-object/task/taskrecover.cpp
-object/task/taskreset.cpp
-object/task/tasksearch.cpp
-object/task/taskshield.cpp
-object/task/taskspiderexplo.cpp
-object/task/tasktake.cpp
-object/task/taskterraform.cpp
-object/task/taskturn.cpp
-object/task/taskwait.cpp
-physics/physics.cpp
-script/cbottoken.cpp
-script/cmdtoken.cpp
-script/script.cpp
-ui/button.cpp
-ui/check.cpp
-ui/color.cpp
-ui/compass.cpp
-ui/control.cpp
-ui/displayinfo.cpp
-ui/displaytext.cpp
-ui/edit.cpp
-ui/editvalue.cpp
-ui/gauge.cpp
-ui/group.cpp
-ui/image.cpp
-ui/interface.cpp
-ui/key.cpp
-ui/label.cpp
-ui/list.cpp
-ui/maindialog.cpp
-ui/mainmap.cpp
-ui/mainshort.cpp
-ui/map.cpp
-ui/scroll.cpp
-ui/shortcut.cpp
-ui/slider.cpp
-ui/studio.cpp
-ui/target.cpp
-ui/window.cpp
-)
+# Configure options
+option(DEBUG "Enable debug output" ON)
+
+if (${CMAKE_SYSTEM_NAME} MATCHES "Windows")
+  set(PLATFORM_WINDOWS 1)
+  set(PLATFORM_LINUX   0)
+  set(PLATFORM_OTHER   0)
+elseif(${CMAKE_SYSTEM_NAME} MATCHES "Linux")
+  set(PLATFORM_WINDOWS 0)
+  set(PLATFORM_LINUX   1)
+  set(PLATFORM_OTHER   0)
+else()
+  set(PLATFORM_WINDOWS 0)
+  set(PLATFORM_LINUX   0)
+  set(PLATFORM_OTHER   1)
+endif()
 
-# Source files for new target (dependent on SDL & OpenGL)
+# Configure file
+configure_file(common/config.h.cmake ${CMAKE_CURRENT_BINARY_DIR}/common/config.h)
+
+
+# Source files
 # Commented out files are still dependent on DirectX or WinAPI
-set(NEW_SOURCES
+set(SOURCES
 app/app.cpp
 app/main.cpp
 app/system.cpp
@@ -247,51 +146,17 @@ sound/sound.cpp
 # ui/window.cpp
 )
 
-# Change to DirectX SDK directory
-set(DXSDK_DIR "c:/dxsdk")
-
-# Configure options
-option(DEBUG "Enable debug output" ON)
-
-if (${CMAKE_SYSTEM_NAME} MATCHES "Windows")
-  set(PLATFORM_WINDOWS 1)
-  set(PLATFORM_LINUX   0)
-  set(PLATFORM_OTHER   0)
-elseif(${CMAKE_SYSTEM_NAME} MATCHES "Linux")
-  set(PLATFORM_WINDOWS 0)
-  set(PLATFORM_LINUX   1)
-  set(PLATFORM_OTHER   0)
-else()
-  set(PLATFORM_WINDOWS 0)
-  set(PLATFORM_LINUX   0)
-  set(PLATFORM_OTHER   1)
-endif()
-
-# Configure file
-configure_file(common/config.h.cmake ${CMAKE_CURRENT_BINARY_DIR}/common/config.h)
-
-# #defines needed for old target
-add_definitions(-DSTRICT -DD3D_OVERLOADS)
-
-include_directories(${DXSDK_DIR}/include . ${CMAKE_CURRENT_BINARY_DIR})
-
-link_directories(${CMAKE_CURRENT_SOURCE_DIR}/CBot ${DXSDK_DIR}/lib)
-
-
-# Old target
-set(OLD_LIBS -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32
-    -ladvapi32 -lshell32 -lole32 -loleaut32 -luuid -lodbc32
-    -lodbccp32 -lwinmm
-    ${DXSDK_DIR}/lib/ddraw.lib ${DXSDK_DIR}/lib/dinput.lib ${DXSDK_DIR}/lib/dxguid.lib ${DXSDK_DIR}/lib/d3d8.lib ${DXSDK_DIR}/lib/dsound.lib)
-
-add_executable(colobot_old ${OLD_SOURCES})
-
-target_link_libraries(colobot_old CBot ${OLD_LIBS})
+set(LIBS
+${SDL_LIBRARY}
+${SDLIMAGE_LIBRARY}
+${OPENGL_LIBRARY}
+#CBot  -- not yet WinAPI-independent
+)
 
+include_directories(. ${CMAKE_CURRENT_BINARY_DIR})
 
-# New target
-set(NEW_LIBS ${SDL_LIBRARY} ${SDLIMAGE_LIBRARY} ${OPENGL_LIBRARY})
+link_directories(${CMAKE_CURRENT_SOURCE_DIR}/CBot)
 
-add_executable(colobot_new ${NEW_SOURCES})
+add_executable(colobot ${SOURCES})
 
-target_link_libraries(colobot_new ${NEW_LIBS})
+target_link_libraries(colobot ${LIBS})
diff --git a/src/old/DirectX.ico b/src/old/DirectX.ico
deleted file mode 100644
index 9752f54..0000000
--- a/src/old/DirectX.ico
+++ /dev/null
diff --git a/src/old/README.txt b/src/old/README.txt
deleted file mode 100644
index 5ad59b4..0000000
--- a/src/old/README.txt
+++ /dev/null
@@ -1,3 +0,0 @@
-Contains old files that will be removed:
- - old code modules - will be replaced by new implementation
- - resources (cursors, etc.) - will be included in .dat files
diff --git a/src/old/accents.txt b/src/old/accents.txt
deleted file mode 100644
index 9473b1b..0000000
--- a/src/old/accents.txt
+++ /dev/null
@@ -1,5 +0,0 @@
-!"#$%&'()*+,-./0123456789:;<=>?

-@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^

-_abcdefghijklmnopqrstuvwxyz{|}~

-ÁÀÂÄÃÇÉÈÊËÍÌÎÏÑÓÒÔÖÕÚÙÛÜ

-áàâäãçéèêëíìîïñóòôöõúùûü

diff --git a/src/old/blitz.cpp b/src/old/blitz.cpp
deleted file mode 100644
index b3708bb..0000000
--- a/src/old/blitz.cpp
+++ /dev/null
@@ -1,475 +0,0 @@
-// * 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/.
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "old/d3dutil.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/terrain.h"
-#include "old/math3d.h"
-#include "object/object.h"
-#include "old/camera.h"
-#include "object/auto/auto.h"
-#include "object/auto/autopara.h"
-#include "old/sound.h"
-#include "old/blitz.h"
-
-
-
-
-// Constructor of the terrain.
-
-CBlitz::CBlitz(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_BLITZ, this);
-
-    m_engine = engine;
-    m_terrain = 0;
-    m_camera = 0;
-    m_sound = 0;
-    Flush();
-}
-
-// Destructor of the terrain.
-
-CBlitz::~CBlitz()
-{
-}
-
-
-// Removes lightning.
-
-void CBlitz::Flush()
-{
-    int     i;
-
-    m_bBlitzExist = false;
-    m_time = 0.0f;
-    m_phase = BPH_WAIT;
-    m_speed = 0.0f;
-    m_progress = 0.0f;
-
-    for ( i=0 ; i<BLITZMAX ; i++ )
-    {
-        m_shift[i] = Math::Point(0.0f, 0.0f);
-        m_width[i] = 1.0f;
-    }
-}
-
-
-// Management of an event
-
-bool CBlitz::EventProcess(const Event &event)
-{
-    if ( event.event == EVENT_FRAME )
-    {
-        return EventFrame(event);
-    }
-    return true;
-}
-
-// Evolved lightning.
-
-bool CBlitz::EventFrame(const Event &event)
-{
-    CObject*    pObj;
-    CAutoPara*  automat;
-    ObjectType  type;
-    Math::Vector    eye, pos;
-    float       dist, deep, max;
-    int         i;
-
-    if ( m_engine->RetPause() )  return true;
-    if ( m_engine->RetMovieLock() )  return true;
-
-    m_time += event.rTime;
-    m_progress += event.rTime*m_speed;
-
-    if ( m_phase == BPH_WAIT )
-    {
-        if ( m_progress >= 1.0f )
-        {
-#if 1
-            m_pos.x = (Math::Rand()-0.5f)*(3200.0f-200.0f);
-            m_pos.z = (Math::Rand()-0.5f)*(3200.0f-200.0f);
-#else
-            m_pos.x = (Math::Rand()-0.5f)*(3200.0f-2800.0f);
-            m_pos.z = (Math::Rand()-0.5f)*(3200.0f-2800.0f);
-#endif
-            m_pos.y = 0.0f;
-
-            pObj = SearchObject(m_pos);
-            if ( pObj == 0 )
-            {
-                m_terrain->MoveOnFloor(m_pos, true);
-            }
-            else
-            {
-                m_pos = pObj->RetPosition(0);
-                m_terrain->MoveOnFloor(m_pos, true);
-
-                type = pObj->RetType();
-                if ( type == OBJECT_BASE )
-                {
-                    m_pos.y += 120.0f;  // top of the rocket
-                }
-                else if ( type == OBJECT_PARA )
-                {
-                    automat = (CAutoPara*)pObj->RetAuto();
-                    if ( automat != 0 )
-                    {
-                        automat->StartBlitz();
-                    }
-                    m_pos.y += 67.0f;  // top of lightning rod
-                }
-                else
-                {
-                    pObj->ExploObject(EXPLO_BOUM, 1.0f);
-                }
-            }
-
-            eye = m_engine->RetEyePt();
-            dist = Math::Distance(m_pos, eye);
-            deep = m_engine->RetDeepView();
-
-            if ( dist < deep )
-            {
-                pos = eye+((m_pos-eye)*0.2f);  // like so close!
-                m_sound->Play(SOUND_BLITZ, pos);
-
-                m_camera->StartOver(OE_BLITZ, m_pos, 1.0f);
-
-                m_phase    = BPH_BLITZ;
-                m_progress = 0.0f;
-                m_speed    = 1.0f/1.0f;
-            }
-        }
-    }
-
-    if ( m_phase == BPH_BLITZ )
-    {
-        if ( m_progress < 1.0f )
-        {
-            max = 5.0f;
-            for ( i=0 ; i<BLITZMAX ; i++ )
-            {
-                max += 0.4f;
-
-                m_shift[i].x += (Math::Rand()-0.5f)*max*2.0f;
-                if ( m_shift[i].x < -max )  m_shift[i].x = -max;
-                if ( m_shift[i].x >  max )  m_shift[i].x =  max;
-
-                m_shift[i].y += (Math::Rand()-0.5f)*max*2.0f;
-                if ( m_shift[i].y < -max )  m_shift[i].y = -max;
-                if ( m_shift[i].y >  max )  m_shift[i].y =  max;
-
-                m_width[i] += (Math::Rand()-0.5f)*2.0f;
-                if ( m_width[i] < 1.0f )  m_width[i] = 1.0f;
-                if ( m_width[i] > 6.0f )  m_width[i] = 6.0f;
-            }
-            m_shift[0].x = 0.0f;
-            m_shift[0].y = 0.0f;
-            m_width[0]   = 0.0f;
-        }
-        else
-        {
-            m_phase    = BPH_WAIT;
-            m_progress = 0.0f;
-            m_speed    = 1.0f/(1.0f+Math::Rand()*m_delay);
-        }
-    }
-
-    return true;
-}
-
-
-// Draw lightning.
-
-void CBlitz::Draw()
-{
-    LPDIRECT3DDEVICE7 device;
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    corner[4], eye, n, p, p1, p2;
-    Math::Matrix    matrix;
-    Math::Point     texInf, texSup, rot;
-    float       a;
-    int         i;
-
-    if ( !m_bBlitzExist )  return;
-    if ( m_phase != BPH_BLITZ )  return;
-
-    device = m_engine->RetD3DDevice();
-    device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-
-    matrix.LoadIdentity();
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      device->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    m_engine->SetTexture("effect00.tga");
-    m_engine->SetState(D3DSTATETTb);
-    texInf.x = 64.5f/256.0f;
-    texInf.y = 33.0f/256.0f;
-    texSup.x = 95.5f/256.0f;
-    texSup.y = 34.0f/256.0f;  // blank
-
-    p1 = m_pos;
-    eye = m_engine->RetEyePt();
-    a = Math::RotateAngle(eye.x-p1.x, eye.z-p1.z);
-    n = Normalize(p1-eye);
-
-    for ( i=0 ; i<BLITZMAX-1 ; i++ )
-    {
-        p2 = p1;
-        p2.y += 8.0f+0.2f*i;
-
-        p = p1;
-        p.x += m_width[i];
-        rot = Math::RotatePoint(Math::Point(p1.x, p1.z), a+Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[0].x = rot.x+m_shift[i].x;
-        corner[0].y = p1.y;
-        corner[0].z = rot.y+m_shift[i].y;
-        rot = Math::RotatePoint(Math::Point(p1.x, p1.z), a-Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[1].x = rot.x+m_shift[i].x;
-        corner[1].y = p1.y;
-        corner[1].z = rot.y+m_shift[i].y;
-
-        p = p2;
-        p.x += m_width[i+1];
-        rot = Math::RotatePoint(Math::Point(p2.x, p2.z), a+Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[2].x = rot.x+m_shift[i+1].x;
-        corner[2].y = p2.y;
-        corner[2].z = rot.y+m_shift[i+1].y;
-        rot = Math::RotatePoint(Math::Point(p2.x, p2.z), a-Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[3].x = rot.x+m_shift[i+1].x;
-        corner[3].y = p2.y;
-        corner[3].z = rot.y+m_shift[i+1].y;
-
-        if ( p2.y < p1.y )
-        {
-            vertex[0] = D3DVERTEX2(corner[1], n, texSup.x, texSup.y);
-            vertex[1] = D3DVERTEX2(corner[0], n, texInf.x, texSup.y);
-            vertex[2] = D3DVERTEX2(corner[3], n, texSup.x, texInf.y);
-            vertex[3] = D3DVERTEX2(corner[2], n, texInf.x, texInf.y);
-        }
-        else
-        {
-            vertex[0] = D3DVERTEX2(corner[0], n, texSup.x, texSup.y);
-            vertex[1] = D3DVERTEX2(corner[1], n, texInf.x, texSup.y);
-            vertex[2] = D3DVERTEX2(corner[2], n, texSup.x, texInf.y);
-            vertex[3] = D3DVERTEX2(corner[3], n, texInf.x, texInf.y);
-        }
-
-        device->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-
-        p1 = p2;
-    }
-
-    device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-}
-
-
-// Triggers lightning.
-
-bool CBlitz::Create(float sleep, float delay, float magnetic)
-{
-    m_bBlitzExist = true;
-    if ( sleep < 1.0f )  sleep = 1.0f;
-    m_sleep = sleep;
-    m_delay = delay;
-    m_magnetic = magnetic;
-
-    m_phase    = BPH_WAIT;
-    m_progress = 0.0f;
-    m_speed    = 1.0f/m_sleep;
-
-    if ( m_terrain == 0 )
-    {
-        m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    }
-
-    if ( m_camera == 0 )
-    {
-        m_camera = (CCamera*)m_iMan->SearchInstance(CLASS_CAMERA);
-    }
-
-    if ( m_sound == 0 )
-    {
-        m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
-    }
-
-    return false;
-}
-
-
-// Gives the status of lightning.
-
-bool CBlitz::GetStatus(float &sleep, float &delay, float &magnetic, float &progress)
-{
-    if ( !m_bBlitzExist )  return false;
-
-    sleep = m_sleep;
-    delay = m_delay;
-    magnetic = m_magnetic;
-    progress = m_progress;
-
-    return true;
-}
-
-// Specifies the status of lightning.
-
-bool CBlitz::SetStatus(float sleep, float delay, float magnetic, float progress)
-{
-    m_bBlitzExist = true;
-
-    m_sleep = sleep;
-    m_delay = delay;
-    m_magnetic = magnetic;
-    m_progress = progress;
-    m_phase = BPH_WAIT;
-    m_speed = 1.0f/m_sleep;
-
-    return true;
-}
-
-
-// Seeking the object closest to the lightning.
-
-CObject* CBlitz::SearchObject(Math::Vector pos)
-{
-    CObject     *pObj, *pBest, *pObjPara[100];
-    Math::Vector    oPos, pPos[100];
-    ObjectType  type;
-    float       min, dist, detect;
-    int         i, nbPara;
-
-    // Seeking the object closest to the point of impact of lightning.
-    pBest = 0;
-    min = 100000.0f;
-    nbPara = 0;
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( !pObj->RetActif() )  continue;  // inactive object?
-        if ( pObj->RetTruck() != 0 )  continue;  // object transported?
-
-        type = pObj->RetType();
-        if ( type == OBJECT_BASE ||
-             type == OBJECT_PARA )  // building a lightning effect?
-        {
-            pObjPara[nbPara] = pObj;
-            pPos[nbPara] = pObj->RetPosition(0);
-            nbPara ++;
-        }
-
-        detect = 0.0f;
-        if ( type == OBJECT_BASE     ||
-             type == OBJECT_DERRICK  ||
-             type == OBJECT_FACTORY  ||
-             type == OBJECT_REPAIR   ||
-             type == OBJECT_DESTROYER||
-             type == OBJECT_STATION  ||
-             type == OBJECT_CONVERT  ||
-             type == OBJECT_TOWER    ||
-             type == OBJECT_RESEARCH ||
-             type == OBJECT_RADAR    ||
-             type == OBJECT_INFO     ||
-             type == OBJECT_ENERGY   ||
-             type == OBJECT_LABO     ||
-             type == OBJECT_NUCLEAR  ||
-             type == OBJECT_PARA     ||
-             type == OBJECT_SAFE     ||
-             type == OBJECT_HUSTON   )
-        {
-            detect = m_magnetic;
-        }
-        if ( type == OBJECT_METAL    ||
-             type == OBJECT_POWER    ||
-             type == OBJECT_ATOMIC   )
-        {
-            detect = m_magnetic*0.3f;
-        }
-        if ( 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_MOBILEft ||
-             type == OBJECT_MOBILEtt ||
-             type == OBJECT_MOBILEwt ||
-             type == OBJECT_MOBILEit ||
-             type == OBJECT_MOBILEdr )
-        {
-            detect = m_magnetic*0.5f;
-        }
-        if ( detect == 0.0f )  continue;
-
-        oPos = pObj->RetPosition(0);
-        dist = Math::DistanceProjected(oPos, pos);
-        if ( dist > detect )  continue;
-        if ( dist < min )
-        {
-            min = dist;
-            pBest = pObj;
-        }
-    }
-    if ( pBest == 0 )  return 0;  // nothing found
-
-    // Under the protection of a lightning conductor?
-    oPos = pBest->RetPosition(0);
-    for ( i=nbPara-1 ; i>=0 ; i-- )
-    {
-        dist = Math::DistanceProjected(oPos, pPos[i]);
-        if ( dist <= BLITZPARA )
-        {
-            return pObjPara[i];
-        }
-    }
-    return pBest;
-}
-
diff --git a/src/old/blitz.h b/src/old/blitz.h
deleted file mode 100644
index 8289576..0000000
--- a/src/old/blitz.h
+++ /dev/null
@@ -1,83 +0,0 @@
-// * 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/.
-
-// blitz.h
-
-#pragma once
-
-
-#include "common/misc.h"
-#include "math/point.h"
-#include "old/d3dengine.h"
-
-
-class CObject;
-class CInstanceManager;
-class CD3DEngine;
-class CTerrain;
-class CCamera;
-class CSound;
-
-
-
-const float BLITZPARA   = 200.0f;       // radius of lightning protection
-const int BLITZMAX      = 50;
-
-enum BlitzPhase
-{
-    BPH_WAIT,
-    BPH_BLITZ,
-};
-
-
-
-class CBlitz
-{
-public:
-    CBlitz(CInstanceManager* iMan, CD3DEngine* engine);
-    ~CBlitz();
-
-    void        Flush();
-    bool        EventProcess(const Event &event);
-    bool        Create(float sleep, float delay, float magnetic);
-    bool        GetStatus(float &sleep, float &delay, float &magnetic, float &progress);
-    bool        SetStatus(float sleep, float delay, float magnetic, float progress);
-    void        Draw();
-
-protected:
-    bool        EventFrame(const Event &event);
-    CObject*    SearchObject(Math::Vector pos);
-
-protected:
-    CInstanceManager*   m_iMan;
-    CD3DEngine*         m_engine;
-    CTerrain*           m_terrain;
-    CCamera*            m_camera;
-    CSound*             m_sound;
-
-    bool        m_bBlitzExist;
-    float       m_sleep;
-    float       m_delay;
-    float       m_magnetic;
-    BlitzPhase  m_phase;
-    float       m_time;
-    float       m_speed;
-    float       m_progress;
-    Math::Vector    m_pos;
-    Math::Point     m_shift[BLITZMAX];
-    float       m_width[BLITZMAX];
-};
-
diff --git a/src/old/bug.txt b/src/old/bug.txt
deleted file mode 100644
index b598ad0..0000000
--- a/src/old/bug.txt
+++ /dev/null
@@ -1,94 +0,0 @@
-void CD3DApplication::StepSimul(float rTime)

-{

-	Event	event;

-

-	if ( m_pRobotMain == 0 )  return;

-

-	if ( rTime > 0.5f )  rTime = 0.5f;  // jamais plus de 0.5s !

-

-	ZeroMemory(&event, sizeof(Event));

-	event.event = EVENT_FRAME;

-	event.rTime = rTime;

-	event.axeX = AxeLimit(m_axeKey.x + m_axeJoy.x);

-	event.axeY = AxeLimit(m_axeKey.y + m_axeJoy.y);

-	event.axeZ = AxeLimit(m_axeKey.z + m_axeJoy.z);

-	event.keyState = m_keyState;

-

-//?char s[100];

-//?sprintf(s, "StepSimul %.3f\n", event.rTime);

-//?OutputDebugString(s);

-	m_pRobotMain->EventProcess(event);

-}

-

-

-

-1347: void CD3DApplication::StepSimul(float rTime)

-1348: {

-0041E950   sub         esp,24h

-0041E953   push        esi

-0041E954   mov         esi,ecx

-1349:     Event   event;

-1350:

-1351:     if ( m_pRobotMain == 0 )  return;

-0041E956   mov         eax,dword ptr [esi+0ECh]

-0041E95C   test        eax,eax

-0041E95E   je          CD3DApplication::StepSimul(0x0041ea08)+0B8h

-1352:

-1353:     if ( rTime > 0.5f )  rTime = 0.5f;  // jamais plus de 0.5s !

-0041E964   fld         dword ptr [esp+2Ch]

-0041E968   fcomp       dword ptr [??_7CControl@@6B@(0x004b9ed4)+94h]

-0041E96E   push        edi

-0041E96F   fnstsw      ax

-0041E971   test        ah,41h

-0041E974   jne         CD3DApplication::StepSimul(0x0041e97e)+2Eh

-0041E976   mov         dword ptr [esp+30h],3F000000h

-1354:

-1355:     ZeroMemory(&event, sizeof(Event));

-1356:     event.event = EVENT_FRAME;

-1357:     event.rTime = rTime;

-1358:     event.axeX = AxeLimit(m_axeKey.x + m_axeJoy.x);

-0041E97E   fld         dword ptr [esi+0F8h]

-0041E984   fadd        dword ptr [esi+104h]

-0041E98A   mov         eax,dword ptr [esp+30h]

-0041E98E   mov         ecx,9

-0041E993   mov         dword ptr [esp+28h],eax

-0041E997   push        ecx

-0041E998   xor         eax,eax

-0041E99A   lea         edi,dword ptr [esp+0Ch]

-0041E99E   fstp        dword ptr [esp]

-0041E9A1   rep stos    dword ptr es:[edi]

-0041E9A3   mov         dword ptr [esp+0Ch],2

-0041E9AB   call        AxeLimit(0x0041cae0)

-1359:     event.axeY = AxeLimit(m_axeKey.y + m_axeJoy.y);

-0041E9B0   fld         dword ptr [esi+0FCh]

-0041E9B6   fadd        dword ptr [esi+108h]

-0041E9BC   fxch        st(1)

-0041E9BE   fstp        dword ptr [esp+1Ch]

-0041E9C2   fstp        dword ptr [esp]

-0041E9C5   call        AxeLimit(0x0041cae0)

-1360:     event.axeZ = AxeLimit(m_axeKey.z + m_axeJoy.z);

-0041E9CA   fld         dword ptr [esi+100h]

-0041E9D0   fadd        dword ptr [esi+10Ch]

-0041E9D6   fxch        st(1)

-0041E9D8   fstp        dword ptr [esp+20h]

-0041E9DC   fstp        dword ptr [esp]

-0041E9DF   call        AxeLimit(0x0041cae0)

-1361:     event.keyState = m_keyState;

-1362:

-1363: //?char s[100];

-1364: //?sprintf(s, "StepSimul %.3f\n", event.rTime);

-1365: //?OutputDebugString(s);

-1366:     m_pRobotMain->EventProcess(event);

-0041E9E4   mov         dx,word ptr [esi+0F4h]

-0041E9EB   mov         ecx,dword ptr [esi+0ECh]

-0041E9F1   fstp        dword ptr [esp+24h]

-0041E9F5   add         esp,4

-0041E9F8   lea         eax,dword ptr [esp+8]

-0041E9FC   mov         word ptr [esp+24h],dx

-0041EA01   push        eax

-0041EA02   call        CRobotMain::EventProcess(0x0047fba0)

-0041EA07   pop         edi

-1367: }

-0041EA08   pop         esi

-0041EA09   add         esp,24h

-0041EA0C   ret         4

diff --git a/src/old/bug1.txt b/src/old/bug1.txt
deleted file mode 100644
index 59b0ca4..0000000
--- a/src/old/bug1.txt
+++ /dev/null
@@ -1,68 +0,0 @@
-extern void object::Solution( )

-{

-	while ( true )

-	{

-		object	left, right;

-

-		left  = Radar(TypeMarkPath, -45, 120, 100);

-		right = Radar(TypeMarkPath,  45, 120, 100);

-

-		if ( left == null && right == null )

-		{

-		}

-	}

-}

-

-CBotString::CBotString(const CBotString &)

-CBotVar::GivName()

-CBotStack::FindVar(CBotToken * &, int, int)

-CBotStack::FindVar(CBotToken &, int, int)

-CBotStack::CopyVar(CBotToken &, int)

-CBotExpression::Execute(CBotStack * &)

-CBotListInstr::Execute(CBotStack * &)

-CBotWhile::Execute(CBotStack * &)

-CBotListInstr::Execute(CBotStack * &)

-CBotFunction::Execute(CBotVar * *, CBotStack * &)

-CBotProgram::Run(void *)

-CScript::Continue(const Event &)

-

-

-

-CBotString::CBotString(const CBotString &) :

-	m_token = 0xdddddddd

-

-CBotVar::GivName() :

-	return	m_token->GivString();

-

-CBotStack::FindVar(CBotToken * &, int, int) :

-	CBotStack*	p = this;

-	CBotString	name = pToken->GivString();

-

-	while (p != NULL)

-	{

-		CBotVar*	pp = p->m_listVar;

-		while ( pp != NULL)

-		{

-			if (pp->GivName() == name) <- paf

-

-	avec :

-	pp->__vfprt = 0xdddddddd

-	pp->m_token = 0xdddddddd

-	pp->m_next = 0xdddddddd

-	pp->m_type = -572662307

-	pp->m_binit = -572662307

-	pp->m_pMyThis = 0xdddddddd

-	pp->m_pUserPtr = 0xdddddddd

-	pp->m_InitExpr = 0xdddddddd

-

-CBotStack::FindVar(CBotToken &, int, int) :

-	CBotToken*	pt = &Token;

-	pt->m_next = 0

-	pt->m_prev = 0

-	pt->m_type = 4

-	pt->m_IdKeyWord = -1

-	pt->m_Text = "right"

-	pt->m_Sep = " "

-	pt->m_start = 124

-	pt->m_end = 129

-

diff --git a/src/old/camera.cpp b/src/old/camera.cpp
deleted file mode 100644
index 554fb11..0000000
--- a/src/old/camera.cpp
+++ /dev/null
@@ -1,2109 +0,0 @@
-// * 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/.
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "common/language.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/terrain.h"
-#include "old/water.h"
-#include "object/object.h"
-#include "physics/physics.h"
-#include "old/camera.h"
-
-
-
-
-// Object's constructor.
-
-CCamera::CCamera(CInstanceManager* iMan)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_CAMERA, this);
-
-    m_engine  = (CD3DEngine*)m_iMan->SearchInstance(CLASS_ENGINE);
-    m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    m_water   = (CWater*)m_iMan->SearchInstance(CLASS_WATER);
-
-    m_type      = CAMERA_FREE;
-    m_smooth    = CS_NORM;
-    m_cameraObj = 0;
-
-    m_eyeDistance = 10.0f;
-    m_initDelay   =  0.0f;
-
-    m_actualEye    = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_actualLookat = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_finalEye     = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_finalLookat  = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_normEye      = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_normLookat   = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_focus        = 1.0f;
-
-    m_bRightDown     = false;
-    m_rightPosInit   = Math::Point(0.5f, 0.5f);
-    m_rightPosCenter = Math::Point(0.5f, 0.5f);
-    m_rightPosMove   = Math::Point(0.5f, 0.5f);
-
-    m_eyePt        = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_directionH   =  0.0f;
-    m_directionV   =  0.0f;
-    m_heightEye    = 20.0f;
-    m_heightLookat =  0.0f;
-    m_speed        =  2.0f;
-
-    m_backDist      = 0.0f;
-    m_backMin       = 0.0f;
-    m_addDirectionH = 0.0f;
-    m_addDirectionV = 0.0f;
-    m_bTransparency = false;
-
-    m_fixDist       = 0.0f;
-    m_fixDirectionH = 0.0f;
-    m_fixDirectionV = 0.0f;
-
-    m_visitGoal       = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_visitDist       = 0.0f;
-    m_visitTime       = 0.0f;
-    m_visitType       = CAMERA_NULL;
-    m_visitDirectionH = 0.0f;
-    m_visitDirectionV = 0.0f;
-
-    m_editHeight = 40.0f;
-
-    m_remotePan  = 0.0f;
-    m_remoteZoom = 0.0f;
-
-    m_mouseDirH    = 0.0f;
-    m_mouseDirV    = 0.0f;
-    m_mouseMarging = 0.01f;
-
-    m_motorTurn = 0.0f;
-
-    m_centeringPhase    = CP_NULL;
-    m_centeringAngleH   = 0.0f;
-    m_centeringAngleV   = 0.0f;
-    m_centeringDist     = 0.0f;
-    m_centeringCurrentH = 0.0f;
-    m_centeringCurrentV = 0.0f;
-    m_centeringTime     = 0.0f;
-    m_centeringProgress = 0.0f;
-
-    m_effectType     = CE_NULL;
-    m_effectPos      = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_effectForce    = 0.0f;
-    m_effectProgress = 0.0f;
-    m_effectOffset   = Math::Vector(0.0f, 0.0f, 0.0f);
-
-    m_scriptEye    = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_scriptLookat = Math::Vector(0.0f, 0.0f, 0.0f);
-
-    m_bEffect        = true;
-    m_bCameraScroll  = true;
-    m_bCameraInvertX = false;
-    m_bCameraInvertY = false;
-}
-
-// Object's constructor.
-
-CCamera::~CCamera()
-{
-}
-
-
-void CCamera::SetEffect(bool bEnable)
-{
-    m_bEffect = bEnable;
-}
-
-void CCamera::SetCameraScroll(bool bScroll)
-{
-    m_bCameraScroll = bScroll;
-}
-
-void CCamera::SetCameraInvertX(bool bInvert)
-{
-    m_bCameraInvertX = bInvert;
-}
-
-void CCamera::SetCameraInvertY(bool bInvert)
-{
-    m_bCameraInvertY = bInvert;
-}
-
-
-// Returns an additional force to turn.
-
-float CCamera::RetMotorTurn()
-{
-    if ( m_type == CAMERA_BACK )  return m_motorTurn;
-    return 0.0f;
-}
-
-
-
-// Initializes the camera.
-
-void CCamera::Init(Math::Vector eye, Math::Vector lookat, float delay)
-{
-    Math::Vector    vUpVec;
-
-    m_initDelay = delay;
-
-    eye.y    += m_terrain->RetFloorLevel(eye,    true);
-    lookat.y += m_terrain->RetFloorLevel(lookat, true);
-
-    m_type = CAMERA_FREE;
-    m_eyePt = eye;
-
-    m_directionH = Math::RotateAngle(eye.x-lookat.x, eye.z-lookat.z)+Math::PI/2.0f;
-    m_directionV = -Math::RotateAngle(Math::DistanceProjected(eye, lookat), eye.y-lookat.y);
-
-    m_eyeDistance = 10.0f;
-    m_heightLookat = 10.0f;
-    m_backDist = 30.0f;
-    m_backMin  = 10.0f;
-    m_addDirectionH = 0.0f;
-    m_addDirectionV = -Math::PI*0.05f;
-    m_fixDist = 50.0f;
-    m_fixDirectionH = Math::PI*0.25f;
-    m_fixDirectionV = -Math::PI*0.10f;
-    m_centeringPhase = CP_NULL;
-    m_actualEye = m_eyePt;
-    m_actualLookat = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, 50.0f);
-    m_finalEye = m_actualEye;
-    m_finalLookat = m_actualLookat;
-    m_scriptEye = m_actualEye;
-    m_scriptLookat = m_actualLookat;
-    m_focus = 1.00f;
-    m_remotePan  = 0.0f;
-    m_remoteZoom = 0.0f;
-
-    FlushEffect();
-    FlushOver();
-    SetType(CAMERA_FREE);
-}
-
-
-// Gives the object controlling the camera.
-
-void CCamera::SetObject(CObject* object)
-{
-    m_cameraObj = object;
-}
-
-CObject* CCamera::RetObject()
-{
-    return m_cameraObj;
-}
-
-
-// Changes the level of transparency of an object and objects
-// transported (battery & cargo).
-
-void SetTransparency(CObject* pObj, float value)
-{
-    CObject*    pFret;
-
-    pObj->SetTransparency(value);
-
-    pFret = pObj->RetFret();
-    if ( pFret != 0 )
-    {
-        pFret->SetTransparency(value);
-    }
-
-    pFret = pObj->RetPower();
-    if ( pFret != 0 )
-    {
-        pFret->SetTransparency(value);
-    }
-}
-
-// Change the type of camera.
-
-void CCamera::SetType(CameraType type)
-{
-    CObject*    pObj;
-    ObjectType  oType;
-    Math::Vector    vUpVec;
-    int         i;
-
-    m_remotePan  = 0.0f;
-    m_remoteZoom = 0.0f;
-
-    if ( m_type == CAMERA_BACK && m_bTransparency )
-    {
-        for ( i=0 ; i<1000000 ; i++ )
-        {
-            pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-            if ( pObj == 0 )  break;
-
-            if ( pObj->RetTruck() )  continue;  // battery or cargo?
-
-            SetTransparency(pObj, 0.0f);  // opaque object
-        }
-    }
-    m_bTransparency = false;
-
-    if ( type == CAMERA_INFO  ||
-         type == CAMERA_VISIT )  // xx -> info ?
-    {
-        m_normEye    = m_engine->RetEyePt();
-        m_normLookat = m_engine->RetLookatPt();
-
-        m_engine->SetFocus(1.00f);  // normal
-        m_type = type;
-        return;
-    }
-
-    if ( m_type == CAMERA_INFO  ||
-         m_type == CAMERA_VISIT )  // info -> xx ?
-    {
-        m_engine->SetFocus(m_focus);  // gives initial focus
-        m_type = type;
-
-        vUpVec = Math::Vector(0.0f, 1.0f, 0.0f);
-        SetViewParams(m_normEye, m_normLookat, vUpVec);
-        return;
-    }
-
-    if ( m_type == CAMERA_BACK && type == CAMERA_FREE )  // back -> free ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -50.0f);
-    }
-
-    if ( m_type == CAMERA_BACK && type == CAMERA_EDIT )  // back -> edit ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -1.0f);
-    }
-
-    if ( m_type == CAMERA_ONBOARD && type == CAMERA_FREE )  // onboard -> free ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -30.0f);
-    }
-
-    if ( m_type == CAMERA_ONBOARD && type == CAMERA_EDIT )  // onboard -> edit ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -30.0f);
-    }
-
-    if ( m_type == CAMERA_ONBOARD && type == CAMERA_EXPLO )  // onboard -> explo ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -50.0f);
-    }
-
-    if ( m_type == CAMERA_BACK && type == CAMERA_EXPLO )  // back -> explo ?
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, -20.0f);
-    }
-
-    if ( type == CAMERA_FIX   ||
-         type == CAMERA_PLANE )
-    {
-        AbortCentering();  // Special stops framing
-    }
-
-    m_fixDist = 50.0f;
-    if ( type == CAMERA_PLANE )
-    {
-        m_fixDist = 60.0f;
-    }
-
-    if ( type == CAMERA_BACK )
-    {
-        AbortCentering();  // Special stops framing
-        m_addDirectionH = 0.0f;
-        m_addDirectionV = -Math::PI*0.05f;
-
-        if ( m_cameraObj == 0 )  oType = OBJECT_NULL;
-        else                     oType = m_cameraObj->RetType();
-
-        m_backDist = 30.0f;
-        if ( oType == OBJECT_BASE     )  m_backDist = 200.0f;
-        if ( oType == OBJECT_HUMAN    )  m_backDist =  20.0f;
-        if ( oType == OBJECT_TECH     )  m_backDist =  20.0f;
-        if ( oType == OBJECT_FACTORY  )  m_backDist =  50.0f;
-        if ( oType == OBJECT_RESEARCH )  m_backDist =  40.0f;
-        if ( oType == OBJECT_DERRICK  )  m_backDist =  40.0f;
-        if ( oType == OBJECT_REPAIR   )  m_backDist =  35.0f;
-        if ( oType == OBJECT_DESTROYER)  m_backDist =  35.0f;
-        if ( oType == OBJECT_TOWER    )  m_backDist =  45.0f;
-        if ( oType == OBJECT_NUCLEAR  )  m_backDist =  70.0f;
-        if ( oType == OBJECT_PARA     )  m_backDist = 180.0f;
-        if ( oType == OBJECT_SAFE     )  m_backDist =  50.0f;
-        if ( oType == OBJECT_HUSTON   )  m_backDist = 120.0f;
-
-        m_backMin = m_backDist/3.0f;
-        if ( oType == OBJECT_HUMAN    )  m_backMin =  10.0f;
-        if ( oType == OBJECT_TECH     )  m_backMin =  10.0f;
-        if ( oType == OBJECT_FACTORY  )  m_backMin =  30.0f;
-        if ( oType == OBJECT_RESEARCH )  m_backMin =  20.0f;
-        if ( oType == OBJECT_NUCLEAR  )  m_backMin =  32.0f;
-        if ( oType == OBJECT_PARA     )  m_backMin =  40.0f;
-        if ( oType == OBJECT_SAFE     )  m_backMin =  25.0f;
-        if ( oType == OBJECT_HUSTON   )  m_backMin =  80.0f;
-    }
-
-    if ( type != CAMERA_ONBOARD && m_cameraObj != 0 )
-    {
-        m_cameraObj->SetGunGoalH(0.0f);  // puts the cannon right
-    }
-
-    if ( type == CAMERA_ONBOARD )
-    {
-        m_focus = 1.50f;  // Wide
-    }
-    else
-    {
-        m_focus = 1.00f;  // normal
-    }
-    m_engine->SetFocus(m_focus);
-
-    m_type = type;
-
-    SetSmooth(CS_NORM);
-}
-
-CameraType CCamera::RetType()
-{
-    return m_type;
-}
-
-
-// Management of the smoothing mode.
-
-void CCamera::SetSmooth(CameraSmooth type)
-{
-    m_smooth = type;
-}
-
-CameraSmooth CCamera::RetSmoth()
-{
-    return m_smooth;
-}
-
-
-// Management of the setback distance.
-
-void CCamera::SetDist(float dist)
-{
-    m_fixDist = dist;
-}
-
-float CCamera::RetDist()
-{
-    return m_fixDist;
-}
-
-
-// Manage angle mode CAMERA_FIX.
-
-void CCamera::SetFixDirection(float angle)
-{
-    m_fixDirectionH = angle;
-}
-
-float CCamera::RetFixDirection()
-{
-    return m_fixDirectionH;
-}
-
-
-// Managing the triggering mode of the camera panning.
-
-void CCamera::SetRemotePan(float value)
-{
-    m_remotePan = value;
-}
-
-float CCamera::RetRemotePan()
-{
-    return m_remotePan;
-}
-
-// Management of the remote zoom (0 .. 1) of the camera.
-
-void CCamera::SetRemoteZoom(float value)
-{
-    value = Math::Norm(value);
-
-    if ( m_type == CAMERA_BACK )
-    {
-        m_backDist = m_backMin+(200.0f-m_backMin)*value;
-    }
-
-    if ( m_type == CAMERA_FIX   ||
-         m_type == CAMERA_PLANE )
-    {
-        m_fixDist = 10.0f+(200.0f-10.0f)*value;
-    }
-}
-
-float CCamera::RetRemoteZoom()
-{
-    if ( m_type == CAMERA_BACK )
-    {
-        return (m_backDist-m_backMin)/(200.0f-m_backMin);
-    }
-
-    if ( m_type == CAMERA_FIX   ||
-         m_type == CAMERA_PLANE )
-    {
-        return (m_fixDist-10.0f)/(200.0f-10.0f);
-    }
-    return 0.0f;
-}
-
-
-
-// Start with a tour round the camera.
-
-void CCamera::StartVisit(Math::Vector goal, float dist)
-{
-    m_visitType = m_type;
-    SetType(CAMERA_VISIT);
-    m_visitGoal = goal;
-    m_visitDist = dist;
-    m_visitTime = 0.0f;
-    m_visitDirectionH = 0.0f;
-    m_visitDirectionV = -Math::PI*0.10f;
-}
-
-// Circular end of a visit with the camera.
-
-void CCamera::StopVisit()
-{
-    SetType(m_visitType);  // presents the initial type
-}
-
-
-// Returns the point of view of the camera.
-
-void CCamera::RetCamera(Math::Vector &eye, Math::Vector &lookat)
-{
-    eye = m_eyePt;
-    lookat = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, 50.0f);
-}
-
-
-// Specifies a special movement of camera to frame action.
-
-bool CCamera::StartCentering(CObject *object, float angleH, float angleV,
-                             float dist, float time)
-{
-    if ( m_type != CAMERA_BACK )  return false;
-    if ( object != m_cameraObj )  return false;
-
-    if ( m_centeringPhase != CP_NULL )  return false;
-
-    if ( m_addDirectionH > Math::PI )
-    {
-        angleH = Math::PI*2.0f-angleH;
-    }
-
-    m_centeringPhase    = CP_START;
-    m_centeringAngleH   = angleH;
-    m_centeringAngleV   = angleV;
-    m_centeringDist     = dist;
-    m_centeringCurrentH = 0.0f;
-    m_centeringCurrentV = 0.0f;
-    m_centeringTime     = time;
-    m_centeringProgress = 0.0f;
-
-    return true;
-}
-
-// Ends a special movement of camera to frame action.
-
-bool CCamera::StopCentering(CObject *object, float time)
-{
-    if ( m_type != CAMERA_BACK )  return false;
-    if ( object != m_cameraObj )  return false;
-
-    if ( m_centeringPhase != CP_START &&
-         m_centeringPhase != CP_WAIT  )  return false;
-
-    m_centeringPhase = CP_STOP;
-
-    if ( m_centeringAngleH != 99.9f )
-    {
-        m_centeringAngleH = m_centeringCurrentH;
-    }
-    if ( m_centeringAngleV != 99.9f )
-    {
-        m_centeringAngleV = m_centeringCurrentV;
-    }
-
-    m_centeringTime     = time;
-    m_centeringProgress = 0.0f;
-
-    return true;
-}
-
-// Stop framing special in the current position.
-
-void CCamera::AbortCentering()
-{
-    if ( m_type == CAMERA_INFO  ||
-         m_type == CAMERA_VISIT )  return;
-
-    if ( m_centeringPhase == CP_NULL )  return;
-
-    m_centeringPhase = CP_NULL;
-
-    if ( m_centeringAngleH != 99.9f )
-    {
-        m_addDirectionH = m_centeringCurrentH;
-    }
-    if ( m_centeringAngleV != 99.9f )
-    {
-        m_addDirectionV = m_centeringCurrentV;
-    }
-}
-
-
-
-// Removes the special effect with the camera
-
-void CCamera::FlushEffect()
-{
-    m_effectType     = CE_NULL;
-    m_effectForce    = 0.0f;
-    m_effectProgress = 0.0f;
-    m_effectOffset   = Math::Vector(0.0f, 0.0f, 0.0f);
-}
-
-// Starts a special effect with the camera.
-
-void CCamera::StartEffect(CameraEffect effect, Math::Vector pos, float force)
-{
-    if ( !m_bEffect )  return;
-
-    m_effectType     = effect;
-    m_effectPos      = pos;
-    m_effectForce    = force;
-    m_effectProgress = 0.0f;
-}
-
-// Advances the effect of the camera.
-
-void CCamera::EffectFrame(const Event &event)
-{
-    float       dist, force;
-
-    if ( m_type == CAMERA_INFO  ||
-         m_type == CAMERA_VISIT )  return;
-
-    if ( m_effectType == CE_NULL )  return;
-
-    m_effectOffset = Math::Vector(0.0f, 0.0f, 0.0f);
-    force = m_effectForce;
-
-    if ( m_effectType == CE_TERRAFORM )
-    {
-        m_effectProgress += event.rTime*0.7f;
-        m_effectOffset.x = (Math::Rand()-0.5f)*10.0f;
-        m_effectOffset.y = (Math::Rand()-0.5f)*10.0f;
-        m_effectOffset.z = (Math::Rand()-0.5f)*10.0f;
-
-        force *= 1.0f-m_effectProgress;
-    }
-
-    if ( m_effectType == CE_EXPLO )
-    {
-        m_effectProgress += event.rTime*1.0f;
-        m_effectOffset.x = (Math::Rand()-0.5f)*5.0f;
-        m_effectOffset.y = (Math::Rand()-0.5f)*5.0f;
-        m_effectOffset.z = (Math::Rand()-0.5f)*5.0f;
-
-        force *= 1.0f-m_effectProgress;
-    }
-
-    if ( m_effectType == CE_SHOT )
-    {
-        m_effectProgress += event.rTime*1.0f;
-        m_effectOffset.x = (Math::Rand()-0.5f)*2.0f;
-        m_effectOffset.y = (Math::Rand()-0.5f)*2.0f;
-        m_effectOffset.z = (Math::Rand()-0.5f)*2.0f;
-
-        force *= 1.0f-m_effectProgress;
-    }
-
-    if ( m_effectType == CE_CRASH )
-    {
-        m_effectProgress += event.rTime*5.0f;
-        m_effectOffset.y = sinf(m_effectProgress*Math::PI)*1.5f;
-        m_effectOffset.x = (Math::Rand()-0.5f)*1.0f*(1.0f-m_effectProgress);
-        m_effectOffset.z = (Math::Rand()-0.5f)*1.0f*(1.0f-m_effectProgress);
-    }
-
-    if ( m_effectType == CE_VIBRATION )
-    {
-        m_effectProgress += event.rTime*0.1f;
-        m_effectOffset.y = (Math::Rand()-0.5f)*1.0f*(1.0f-m_effectProgress);
-        m_effectOffset.x = (Math::Rand()-0.5f)*1.0f*(1.0f-m_effectProgress);
-        m_effectOffset.z = (Math::Rand()-0.5f)*1.0f*(1.0f-m_effectProgress);
-    }
-
-    if ( m_effectType == CE_PET )
-    {
-        m_effectProgress += event.rTime*5.0f;
-        m_effectOffset.x = (Math::Rand()-0.5f)*0.2f;
-        m_effectOffset.y = (Math::Rand()-0.5f)*2.0f;
-        m_effectOffset.z = (Math::Rand()-0.5f)*0.2f;
-    }
-
-    dist = Math::Distance(m_eyePt, m_effectPos);
-    dist = Math::Norm((dist-100.f)/100.0f);
-
-    force *= 1.0f-dist;
-#if _TEEN
-    force *= 2.0f;
-#endif
-    m_effectOffset *= force;
-
-    if ( m_effectProgress >= 1.0f )
-    {
-        FlushEffect();
-    }
-}
-
-
-// Removes the effect of superposition in the foreground.
-
-void CCamera::FlushOver()
-{
-    m_overType = OE_NULL;
-    m_overColorBase.r = 0.0f;  // black
-    m_overColorBase.g = 0.0f;
-    m_overColorBase.b = 0.0f;
-    m_overColorBase.a = 0.0f;
-    m_engine->SetOverColor();  // nothing
-}
-
-// Specifies the base color.
-
-void CCamera::SetOverBaseColor(D3DCOLORVALUE color)
-{
-    m_overColorBase = color;
-}
-
-// Starts a layering effect in the foreground.
-
-void CCamera::StartOver(OverEffect effect, Math::Vector pos, float force)
-{
-    D3DCOLOR    color;
-    float       dist, decay;
-
-    m_overType = effect;
-    m_overTime = 0.0f;
-
-    if ( m_overType == OE_BLITZ )  decay = 400.0f;
-    else                           decay = 100.0f;
-    dist = Math::Distance(m_eyePt, pos);
-    dist = (dist-decay)/decay;
-    if ( dist < 0.0f )  dist = 0.0f;
-    if ( dist > 1.0f )  dist = 1.0f;
-
-    m_overForce = force * (1.0f-dist);
-
-    if ( m_overType == OE_BLOOD )
-    {
-        m_overColor.r = 0.8f;
-        m_overColor.g = 0.1f;
-        m_overColor.b = 0.1f;  // red
-        m_overMode    = D3DSTATETCb;
-
-        m_overFadeIn  = 0.4f;
-        m_overFadeOut = 0.8f;
-        m_overForce   = 1.0f;
-    }
-
-    if ( m_overType == OE_FADEINw )
-    {
-        m_overColor.r = 1.0f;
-        m_overColor.g = 1.0f;
-        m_overColor.b = 1.0f;  // white
-        m_overMode    = D3DSTATETCb;
-
-        m_overFadeIn  = 0.0f;
-        m_overFadeOut =20.0f;
-        m_overForce   = 1.0f;
-    }
-
-    if ( m_overType == OE_FADEOUTw )
-    {
-        m_overColor.r = 1.0f;
-        m_overColor.g = 1.0f;
-        m_overColor.b = 1.0f;  // white
-        m_overMode    = D3DSTATETCb;
-
-        m_overFadeIn  = 6.0f;
-        m_overFadeOut = 100000.0f;
-        m_overForce   = 1.0f;
-    }
-
-    if ( m_overType == OE_FADEOUTb )
-    {
-        color = m_engine->RetFogColor(1);  // fog color underwater
-        m_overColor = RetColor(color);
-        m_overMode = D3DSTATETCw;
-
-        m_overFadeIn  = 4.0f;
-        m_overFadeOut = 100000.0f;
-        m_overForce   = 1.0f;
-    }
-
-    if ( m_overType == OE_BLITZ )
-    {
-        m_overColor.r = 0.9f;
-        m_overColor.g = 1.0f;
-        m_overColor.b = 1.0f;  // white-cyan
-        m_overMode    = D3DSTATETCb;
-
-        m_overFadeIn  = 0.0f;
-        m_overFadeOut = 1.0f;
-    }
-}
-
-// Advanced overlay effect in the foreground.
-
-void CCamera::OverFrame(const Event &event)
-{
-    D3DCOLORVALUE   color;
-    float           intensity;
-
-    if ( m_type == CAMERA_INFO  ||
-         m_type == CAMERA_VISIT )  return;
-
-    if ( m_overType == OE_NULL )
-    {
-        return;
-    }
-
-    m_overTime += event.rTime;
-
-    if ( m_overType == OE_BLITZ )
-    {
-        if ( rand()%2 == 0 )
-        {
-            color.r = m_overColor.r*m_overForce;
-            color.g = m_overColor.g*m_overForce;
-            color.b = m_overColor.b*m_overForce;
-        }
-        else
-        {
-            color.r = 0.0f;
-            color.g = 0.0f;
-            color.b = 0.0f;
-        }
-        color.a = 0.0f;
-        m_engine->SetOverColor(RetColor(color), m_overMode);
-    }
-    else
-    {
-        if ( m_overFadeIn > 0.0f && m_overTime < m_overFadeIn )
-        {
-            intensity = m_overTime/m_overFadeIn;
-            intensity *= m_overForce;
-
-            if ( m_overMode == D3DSTATETCw )
-            {
-                color.r = 1.0f-(1.0f-m_overColor.r)*intensity;
-                color.g = 1.0f-(1.0f-m_overColor.g)*intensity;
-                color.b = 1.0f-(1.0f-m_overColor.b)*intensity;
-            }
-            else
-            {
-                color.r = m_overColor.r*intensity;
-                color.g = m_overColor.g*intensity;
-                color.b = m_overColor.b*intensity;
-
-                color.r = 1.0f-(1.0f-color.r)*(1.0f-m_overColorBase.r);
-                color.g = 1.0f-(1.0f-color.g)*(1.0f-m_overColorBase.g);
-                color.b = 1.0f-(1.0f-color.b)*(1.0f-m_overColorBase.b);
-            }
-            color.a = 0.0f;
-            m_engine->SetOverColor(RetColor(color), m_overMode);
-        }
-        else if ( m_overFadeOut > 0.0f && m_overTime-m_overFadeIn < m_overFadeOut )
-        {
-            intensity = 1.0f-(m_overTime-m_overFadeIn)/m_overFadeOut;
-            intensity *= m_overForce;
-
-            if ( m_overMode == D3DSTATETCw )
-            {
-                color.r = 1.0f-(1.0f-m_overColor.r)*intensity;
-                color.g = 1.0f-(1.0f-m_overColor.g)*intensity;
-                color.b = 1.0f-(1.0f-m_overColor.b)*intensity;
-            }
-            else
-            {
-                color.r = m_overColor.r*intensity;
-                color.g = m_overColor.g*intensity;
-                color.b = m_overColor.b*intensity;
-
-                color.r = 1.0f-(1.0f-color.r)*(1.0f-m_overColorBase.r);
-                color.g = 1.0f-(1.0f-color.g)*(1.0f-m_overColorBase.g);
-                color.b = 1.0f-(1.0f-color.b)*(1.0f-m_overColorBase.b);
-            }
-            color.a = 0.0f;
-            m_engine->SetOverColor(RetColor(color), m_overMode);
-        }
-    }
-
-    if ( m_overTime >= m_overFadeIn+m_overFadeOut )
-    {
-        FlushOver();
-        return;
-    }
-}
-
-
-
-// Sets the soft movement of the camera.
-
-void CCamera::FixCamera()
-{
-    m_initDelay = 0.0f;
-    m_actualEye    = m_finalEye    = m_scriptEye;
-    m_actualLookat = m_finalLookat = m_scriptLookat;
-    SetViewTime(m_scriptEye, m_scriptLookat, 0.0f);
-}
-
-// Specifies the location and direction of view to the 3D engine.
-
-void CCamera::SetViewTime(const Math::Vector &vEyePt,
-                          const Math::Vector &vLookatPt,
-                          float rTime)
-{
-    Math::Vector    vUpVec, eye, lookat;
-    float       prog, dist, h;
-
-    if ( m_type == CAMERA_INFO )
-    {
-        eye    = vEyePt;
-        lookat = vLookatPt;
-    }
-    else
-    {
-        if ( m_initDelay > 0.0f )
-        {
-            m_initDelay -= rTime;
-            if ( m_initDelay < 0.0f )  m_initDelay = 0.0f;
-            rTime /= 1.0f+m_initDelay;
-        }
-
-        eye    = vEyePt;
-        lookat = vLookatPt;
-        if ( !IsCollision(eye, lookat) )
-        {
-            m_finalEye    = eye;
-            m_finalLookat = lookat;
-        }
-
-        dist = Math::Distance(m_finalEye, m_actualEye);
-        if ( m_smooth == CS_NONE )  prog = dist;
-        if ( m_smooth == CS_NORM )  prog = powf(dist, 1.5f)*rTime*0.5f;
-        if ( m_smooth == CS_HARD )  prog = powf(dist, 1.0f)*rTime*4.0f;
-        if ( m_smooth == CS_SPEC )  prog = powf(dist, 1.0f)*rTime*0.05f;
-        if ( dist == 0.0f )
-        {
-            m_actualEye = m_finalEye;
-        }
-        else
-        {
-            if ( prog > dist )  prog = dist;
-            m_actualEye = (m_finalEye-m_actualEye)/dist*prog + m_actualEye;
-        }
-
-        dist = Math::Distance(m_finalLookat, m_actualLookat);
-        if ( m_smooth == CS_NONE )  prog = dist;
-        if ( m_smooth == CS_NORM )  prog = powf(dist, 1.5f)*rTime*2.0f;
-        if ( m_smooth == CS_HARD )  prog = powf(dist, 1.0f)*rTime*4.0f;
-        if ( m_smooth == CS_SPEC )  prog = powf(dist, 1.0f)*rTime*4.0f;
-        if ( dist == 0.0f )
-        {
-            m_actualLookat = m_finalLookat;
-        }
-        else
-        {
-            if ( prog > dist )  prog = dist;
-            m_actualLookat = (m_finalLookat-m_actualLookat)/dist*prog + m_actualLookat;
-        }
-
-        eye = m_effectOffset+m_actualEye;
-        m_water->AdjustEye(eye);
-
-        h = m_terrain->RetFloorLevel(eye);
-        if ( eye.y < h+4.0f )
-        {
-            eye.y = h+4.0f;
-        }
-
-        lookat = m_effectOffset+m_actualLookat;
-    }
-
-    vUpVec = Math::Vector(0.0f, 1.0f, 0.0f);
-    SetViewParams(eye, lookat, vUpVec);
-}
-
-
-// Avoid the obstacles.
-
-bool CCamera::IsCollision(Math::Vector &eye, Math::Vector lookat)
-{
-    if ( m_type == CAMERA_BACK  )  return IsCollisionBack(eye, lookat);
-    if ( m_type == CAMERA_FIX   )  return IsCollisionFix(eye, lookat);
-    if ( m_type == CAMERA_PLANE )  return IsCollisionFix(eye, lookat);
-    return false;
-}
-
-// Avoid the obstacles.
-
-bool CCamera::IsCollisionBack(Math::Vector &eye, Math::Vector lookat)
-{
-#if 0
-    CObject     *pObj;
-    Math::Vector    oPos, min, max, proj;
-    ObjectType  oType, iType;
-    float       oRadius, dpp, dpl, del, dist, len, prox;
-    int         i;
-
-    if ( m_cameraObj == 0 )
-    {
-        iType = OBJECT_NULL;
-    }
-    else
-    {
-        iType = m_cameraObj->RetType();
-    }
-
-    min.x = Math::Min(eye.x, lookat.x);
-    min.y = Math::Min(eye.y, lookat.y);
-    min.z = Math::Min(eye.z, lookat.z);
-
-    max.x = Math::Max(eye.x, lookat.x);
-    max.y = Math::Max(eye.y, lookat.y);
-    max.z = Math::Max(eye.z, lookat.z);
-
-    prox = 8.0f;  // maximum proximity of the vehicle
-
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( pObj == m_cameraObj )  continue;
-
-        oType = pObj->RetType();
-        if ( oType == OBJECT_TOTO      ||
-             oType == OBJECT_FIX       ||
-             oType == OBJECT_FRET      ||
-             oType == OBJECT_STONE     ||
-             oType == OBJECT_URANIUM   ||
-             oType == OBJECT_METAL     ||
-             oType == OBJECT_POWER     ||
-             oType == OBJECT_ATOMIC    ||
-             oType == OBJECT_BULLET    ||
-             oType == OBJECT_BBOX      ||
-             oType == OBJECT_TNT       ||
-             oType == OBJECT_BOMB      ||
-             oType == OBJECT_WAYPOINTb ||
-             oType == OBJECT_WAYPOINTr ||
-             oType == OBJECT_WAYPOINTg ||
-             oType == OBJECT_WAYPOINTy ||
-             oType == OBJECT_WAYPOINTv ||
-             oType == OBJECT_FLAGb     ||
-             oType == OBJECT_FLAGr     ||
-             oType == OBJECT_FLAGg     ||
-             oType == OBJECT_FLAGy     ||
-             oType == OBJECT_FLAGv     ||
-             oType == OBJECT_ANT       ||
-             oType == OBJECT_SPIDER    ||
-             oType == OBJECT_BEE       ||
-             oType == OBJECT_WORM      )  continue;
-
-        pObj->GetGlobalSphere(oPos, oRadius);
-        if ( oRadius <= 0.0f )  continue;
-
-        if ( oPos.x+oRadius < min.x ||
-             oPos.y+oRadius < min.y ||
-             oPos.z+oRadius < min.z ||
-             oPos.x-oRadius > max.x ||
-             oPos.y-oRadius > max.y ||
-             oPos.z-oRadius > max.z )  continue;
-
-        if ( iType == OBJECT_FACTORY )
-        {
-            dpl = Math::Distance(oPos, lookat);
-            if ( dpl < oRadius )  continue;
-        }
-
-        proj = Projection(eye, lookat, oPos);
-        dpp = Math::Distance(proj, oPos);
-        if ( dpp > oRadius )  continue;
-
-        del = Math::Distance(eye, lookat);
-        len = Math::Distance(eye, proj);
-        if ( len > del )  continue;
-
-        dist = sqrtf(oRadius*oRadius + dpp*dpp)-3.0f;
-        if ( dist < 0.0f )  dist = 0.0f;
-        proj = (lookat-eye)*dist/del + proj;
-        len  = Math::Distance(eye, proj);
-
-        if ( len < del-prox )
-        {
-            eye = proj;
-            eye.y += len/5.0f;
-            return false;
-        }
-        else
-        {
-            eye = (eye-lookat)*prox/del + lookat;
-            eye.y += (del-prox)/5.0f;
-            return false;
-        }
-    }
-    return false;
-#else
-    CObject     *pObj;
-    Math::Vector    oPos, min, max, proj;
-    ObjectType  oType, iType;
-    float       oRadius, dpp, del, len, angle;
-    int         i;
-
-    if ( m_cameraObj == 0 )
-    {
-        iType = OBJECT_NULL;
-    }
-    else
-    {
-        iType = m_cameraObj->RetType();
-    }
-
-    min.x = Math::Min(m_actualEye.x, m_actualLookat.x);
-    min.y = Math::Min(m_actualEye.y, m_actualLookat.y);
-    min.z = Math::Min(m_actualEye.z, m_actualLookat.z);
-
-    max.x = Math::Max(m_actualEye.x, m_actualLookat.x);
-    max.y = Math::Max(m_actualEye.y, m_actualLookat.y);
-    max.z = Math::Max(m_actualEye.z, m_actualLookat.z);
-
-    m_bTransparency = false;
-
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( pObj->RetTruck() )  continue;  // battery or cargo?
-
-        SetTransparency(pObj, 0.0f);  // opaque object
-
-        if ( pObj == m_cameraObj )  continue;
-
-        if ( iType == OBJECT_BASE     ||  // building?
-             iType == OBJECT_DERRICK  ||
-             iType == OBJECT_FACTORY  ||
-             iType == OBJECT_STATION  ||
-             iType == OBJECT_CONVERT  ||
-             iType == OBJECT_REPAIR   ||
-             iType == OBJECT_DESTROYER||
-             iType == OBJECT_TOWER    ||
-             iType == OBJECT_RESEARCH ||
-             iType == OBJECT_RADAR    ||
-             iType == OBJECT_ENERGY   ||
-             iType == OBJECT_LABO     ||
-             iType == OBJECT_NUCLEAR  ||
-             iType == OBJECT_PARA     ||
-             iType == OBJECT_SAFE     ||
-             iType == OBJECT_HUSTON   )  continue;
-
-        oType = pObj->RetType();
-        if ( oType == OBJECT_HUMAN  ||
-             oType == OBJECT_TECH   ||
-             oType == OBJECT_TOTO   ||
-             oType == OBJECT_FIX    ||
-             oType == OBJECT_FRET   ||
-             oType == OBJECT_ANT    ||
-             oType == OBJECT_SPIDER ||
-             oType == OBJECT_BEE    ||
-             oType == OBJECT_WORM   )  continue;
-
-        pObj->GetGlobalSphere(oPos, oRadius);
-        if ( oRadius <= 2.0f )  continue;  // ignores small objects
-
-        if ( oPos.x+oRadius < min.x ||
-             oPos.y+oRadius < min.y ||
-             oPos.z+oRadius < min.z ||
-             oPos.x-oRadius > max.x ||
-             oPos.y-oRadius > max.y ||
-             oPos.z-oRadius > max.z )  continue;
-
-        proj = Projection(m_actualEye, m_actualLookat, oPos);
-        dpp = Math::Distance(proj, oPos);
-        if ( dpp > oRadius )  continue;
-
-        if ( oType == OBJECT_FACTORY )
-        {
-            angle = Math::RotateAngle(m_actualEye.x-oPos.x, oPos.z-m_actualEye.z);  // CW !
-            angle = Math::Direction(angle, pObj->RetAngleY(0));
-            if ( fabs(angle) < 30.0f*Math::PI/180.0f )  continue;  // in the gate?
-        }
-
-        del = Math::Distance(m_actualEye, m_actualLookat);
-        if ( oType == OBJECT_FACTORY )
-        {
-            del += oRadius;
-        }
-
-        len = Math::Distance(m_actualEye, proj);
-        if ( len > del )  continue;
-
-        SetTransparency(pObj, 1.0f);  // transparent object
-        m_bTransparency = true;
-    }
-    return false;
-#endif
-}
-
-// Avoid the obstacles.
-
-bool CCamera::IsCollisionFix(Math::Vector &eye, Math::Vector lookat)
-{
-    CObject     *pObj;
-    Math::Vector    oPos, proj;
-    ObjectType  type;
-    float       oRadius, dist;
-    int         i;
-
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( pObj == m_cameraObj )  continue;
-
-        type = pObj->RetType();
-        if ( type == OBJECT_TOTO    ||
-             type == OBJECT_FRET    ||
-             type == OBJECT_STONE   ||
-             type == OBJECT_URANIUM ||
-             type == OBJECT_METAL   ||
-             type == OBJECT_POWER   ||
-             type == OBJECT_ATOMIC  ||
-             type == OBJECT_BULLET  ||
-             type == OBJECT_BBOX    ||
-             type == OBJECT_KEYa    ||
-             type == OBJECT_KEYb    ||
-             type == OBJECT_KEYc    ||
-             type == OBJECT_KEYd    ||
-             type == OBJECT_ANT     ||
-             type == OBJECT_SPIDER  ||
-             type == OBJECT_BEE     ||
-             type == OBJECT_WORM    )  continue;
-
-        pObj->GetGlobalSphere(oPos, oRadius);
-        if ( oRadius == 0.0f )  continue;
-
-        dist = Math::Distance(eye, oPos);
-        if ( dist < oRadius )
-        {
-            dist = Math::Distance(eye, lookat);
-            proj = Projection(eye, lookat, oPos);
-            eye = (lookat-eye)*oRadius/dist + proj;
-            return false;
-        }
-    }
-    return false;
-}
-
-
-// Management of an event.
-
-bool CCamera::EventProcess(const Event &event)
-{
-    switch( event.event )
-    {
-        case EVENT_FRAME:
-            EventFrame(event);
-            break;
-
-#if 0
-        case EVENT_RBUTTONDOWN:
-            m_bRightDown = true;
-            m_rightPosInit = event.pos;
-            m_rightPosCenter = Math::Point(0.5f, 0.5f);
-            m_engine->MoveMousePos(m_rightPosCenter);
-//?         m_engine->SetMouseHide(true);  // cache la souris
-            break;
-
-        case EVENT_RBUTTONUP:
-            m_bRightDown = false;
-            m_engine->MoveMousePos(m_rightPosInit);
-//?         m_engine->SetMouseHide(false);  // remontre la souris
-            m_addDirectionH = 0.0f;
-            m_addDirectionV = -Math::PI*0.05f;
-            break;
-#endif
-
-        case EVENT_MOUSEMOVE:
-            EventMouseMove(event);
-            break;
-
-        case EVENT_KEYDOWN:
-            if ( event.param == VK_WHEELUP   )  EventMouseWheel(+1);
-            if ( event.param == VK_WHEELDOWN )  EventMouseWheel(-1);
-            break;
-    }
-    return true;
-}
-
-// Changed the camera according to the mouse moved.
-
-bool CCamera::EventMouseMove(const Event &event)
-{
-    m_mousePos = event.pos;
-    return true;
-}
-
-// Mouse wheel operated.
-
-void CCamera::EventMouseWheel(int dir)
-{
-    if ( m_type == CAMERA_BACK )
-    {
-        if ( dir > 0 )
-        {
-            m_backDist -= 8.0f;
-            if ( m_backDist < m_backMin )  m_backDist = m_backMin;
-        }
-        if ( dir < 0 )
-        {
-            m_backDist += 8.0f;
-            if ( m_backDist > 200.0f )  m_backDist = 200.0f;
-        }
-    }
-
-    if ( m_type == CAMERA_FIX   ||
-         m_type == CAMERA_PLANE )
-    {
-        if ( dir > 0 )
-        {
-            m_fixDist -= 8.0f;
-            if ( m_fixDist < 10.0f )  m_fixDist = 10.0f;
-        }
-        if ( dir < 0 )
-        {
-            m_fixDist += 8.0f;
-            if ( m_fixDist > 200.0f )  m_fixDist = 200.0f;
-        }
-    }
-
-    if ( m_type == CAMERA_VISIT )
-    {
-        if ( dir > 0 )
-        {
-            m_visitDist -= 8.0f;
-            if ( m_visitDist < 20.0f )  m_visitDist = 20.0f;
-        }
-        if ( dir < 0 )
-        {
-            m_visitDist += 8.0f;
-            if ( m_visitDist > 200.0f )  m_visitDist = 200.0f;
-        }
-    }
-}
-
-// Changed the camera according to the time elapsed.
-
-bool CCamera::EventFrame(const Event &event)
-{
-    EffectFrame(event);
-    OverFrame(event);
-
-    if ( m_type == CAMERA_FREE )
-    {
-        return EventFrameFree(event);
-    }
-    if ( m_type == CAMERA_EDIT )
-    {
-        return EventFrameEdit(event);
-    }
-    if ( m_type == CAMERA_DIALOG )
-    {
-        return EventFrameDialog(event);
-    }
-    if ( m_type == CAMERA_BACK )
-    {
-        return EventFrameBack(event);
-    }
-    if ( m_type == CAMERA_FIX   ||
-         m_type == CAMERA_PLANE )
-    {
-        return EventFrameFix(event);
-    }
-    if ( m_type == CAMERA_EXPLO )
-    {
-        return EventFrameExplo(event);
-    }
-    if ( m_type == CAMERA_ONBOARD )
-    {
-        return EventFrameOnBoard(event);
-    }
-    if ( m_type == CAMERA_SCRIPT )
-    {
-        return EventFrameScript(event);
-    }
-    if ( m_type == CAMERA_INFO )
-    {
-        return EventFrameInfo(event);
-    }
-    if ( m_type == CAMERA_VISIT )
-    {
-        return EventFrameVisit(event);
-    }
-
-    return true;
-}
-
-
-// Returns the default sprite to use for the mouse.
-
-D3DMouse CCamera::RetMouseDef(Math::Point pos)
-{
-    D3DMouse    type;
-
-    type = D3DMOUSENORM;
-    m_mousePos = pos;
-
-    if ( m_type == CAMERA_INFO )  return type;
-
-    if ( m_bRightDown )  // the right button pressed?
-    {
-        m_rightPosMove.x = pos.x - m_rightPosCenter.x;
-        m_rightPosMove.y = pos.y - m_rightPosCenter.y;
-        type = D3DMOUSEMOVE;
-    }
-    else
-    {
-        if ( !m_bCameraScroll )  return type;
-
-        m_mouseDirH = 0.0f;
-        m_mouseDirV = 0.0f;
-
-        if ( pos.x < m_mouseMarging )
-        {
-            m_mouseDirH = pos.x/m_mouseMarging - 1.0f;
-        }
-
-        if ( pos.x > 1.0f-m_mouseMarging )
-        {
-            m_mouseDirH = 1.0f - (1.0f-pos.x)/m_mouseMarging;
-        }
-
-        if ( pos.y < m_mouseMarging )
-        {
-            m_mouseDirV = pos.y/m_mouseMarging - 1.0f;
-        }
-
-        if ( pos.y > 1.0f-m_mouseMarging )
-        {
-            m_mouseDirV = 1.0f - (1.0f-pos.y)/m_mouseMarging;
-        }
-
-        if ( m_type == CAMERA_FREE  ||
-             m_type == CAMERA_EDIT  ||
-             m_type == CAMERA_BACK  ||
-             m_type == CAMERA_FIX   ||
-             m_type == CAMERA_PLANE ||
-             m_type == CAMERA_EXPLO )
-        {
-            if ( m_mouseDirH > 0.0f )
-            {
-                type = D3DMOUSESCROLLR;
-            }
-            if ( m_mouseDirH < 0.0f )
-            {
-                type = D3DMOUSESCROLLL;
-            }
-        }
-
-        if ( m_type == CAMERA_FREE ||
-             m_type == CAMERA_EDIT )
-        {
-            if ( m_mouseDirV > 0.0f )
-            {
-                type = D3DMOUSESCROLLU;
-            }
-            if ( m_mouseDirV < 0.0f )
-            {
-                type = D3DMOUSESCROLLD;
-            }
-        }
-
-        if ( m_bCameraInvertX )
-        {
-            m_mouseDirH = -m_mouseDirH;
-        }
-    }
-
-    return type;
-}
-
-
-
-// Moves the point of view.
-
-bool CCamera::EventFrameFree(const Event &event)
-{
-    Math::Vector    pos, vLookatPt;
-    float       factor;
-
-    factor = m_heightEye*0.5f+30.0f;
-
-    if ( m_mouseDirH != 0.0f )
-    {
-        m_directionH -= m_mouseDirH*event.rTime*0.7f*m_speed;
-    }
-    if ( m_mouseDirV != 0.0f )
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, m_mouseDirV*event.rTime*factor*m_speed);
-    }
-
-    // Up/Down.
-    m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, event.axeY*event.rTime*factor*m_speed);
-
-    // Left/Right.
-    if ( event.keyState & KS_CONTROL )
-    {
-        if ( event.axeX < 0.0f )
-        {
-            m_eyePt = Math::LookatPoint(m_eyePt, m_directionH+Math::PI/2.0f, m_directionV, -event.axeX*event.rTime*factor*m_speed);
-        }
-        if ( event.axeX > 0.0f )
-        {
-            m_eyePt = Math::LookatPoint(m_eyePt, m_directionH-Math::PI/2.0f, m_directionV, event.axeX*event.rTime*factor*m_speed);
-        }
-    }
-    else
-    {
-        m_directionH -= event.axeX*event.rTime*0.7f*m_speed;
-    }
-
-    // PageUp/PageDown.
-    if ( event.keyState & KS_NUMMINUS )
-    {
-        if ( m_heightEye < 500.0f )
-        {
-            m_heightEye += event.rTime*factor*m_speed;
-        }
-    }
-    if ( event.keyState & KS_NUMPLUS )
-    {
-        if ( m_heightEye > -2.0f )
-        {
-            m_heightEye -= event.rTime*factor*m_speed;
-        }
-    }
-
-    m_terrain->ValidPosition(m_eyePt, 10.0f);
-
-    if ( m_terrain->MoveOnFloor(m_eyePt, true) )
-    {
-        m_eyePt.y += m_heightEye;
-
-        pos = m_eyePt;
-        if ( m_terrain->MoveOnFloor(pos, true) )
-        {
-            pos.y -= 2.0f;
-            if ( m_eyePt.y < pos.y )
-            {
-                m_eyePt.y = pos.y;
-            }
-        }
-
-    }
-
-    vLookatPt = Math::LookatPoint( m_eyePt, m_directionH, m_directionV, 50.0f );
-
-    if ( m_terrain->MoveOnFloor(vLookatPt, true) )
-    {
-        vLookatPt.y += m_heightLookat;
-    }
-
-    SetViewTime(m_eyePt, vLookatPt, event.rTime);
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameEdit(const Event &event)
-{
-    Math::Vector    pos, vLookatPt;
-    float       factor;
-
-    factor = m_editHeight*0.5f+30.0f;
-
-    if ( m_mouseDirH != 0.0f )
-    {
-        m_directionH -= m_mouseDirH*event.rTime*0.7f*m_speed;
-    }
-    if ( m_mouseDirV != 0.0f )
-    {
-        m_eyePt = Math::LookatPoint(m_eyePt, m_directionH, m_directionV, m_mouseDirV*event.rTime*factor*m_speed);
-    }
-
-    if ( m_bCameraScroll )
-    {
-    // Left/Right.
-        m_fixDirectionH += m_mouseDirH*event.rTime*1.0f*m_speed;
-        m_fixDirectionH = Math::NormAngle(m_fixDirectionH);
-
-        // Up/Down.
-//?     m_fixDirectionV -= m_mouseDirV*event.rTime*0.5f*m_speed;
-//?     if ( m_fixDirectionV < -Math::PI*0.40f )  m_fixDirectionV = -Math::PI*0.40f;
-//?     if ( m_fixDirectionV >  Math::PI*0.20f )  m_fixDirectionV =  Math::PI*0.20f;
-    }
-
-    m_terrain->ValidPosition(m_eyePt, 10.0f);
-
-    if ( m_terrain->MoveOnFloor(m_eyePt, false) )
-    {
-        m_eyePt.y += m_editHeight;
-
-        pos = m_eyePt;
-        if ( m_terrain->MoveOnFloor(pos, false) )
-        {
-            pos.y += 2.0f;
-            if ( m_eyePt.y < pos.y )
-            {
-                m_eyePt.y = pos.y;
-            }
-        }
-
-    }
-
-    vLookatPt = Math::LookatPoint( m_eyePt, m_directionH, m_directionV, 50.0f );
-
-    if ( m_terrain->MoveOnFloor(vLookatPt, true) )
-    {
-        vLookatPt.y += m_heightLookat;
-    }
-
-    SetViewTime(m_eyePt, vLookatPt, event.rTime);
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameDialog(const Event &event)
-{
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameBack(const Event &event)
-{
-    CPhysics*   physics;
-    ObjectType  type;
-    Math::Vector    pos, vLookatPt;
-    Math::Point     mouse;
-    float       centeringH, centeringV, centeringD, h, v, d, floor;
-
-    if ( m_cameraObj == 0 )
-    {
-        type = OBJECT_NULL;
-    }
-    else
-    {
-        type = m_cameraObj->RetType();
-    }
-
-    // +/-.
-    if ( event.keyState & KS_NUMPLUS )
-    {
-        m_backDist -= event.rTime*30.0f*m_speed;
-        if ( m_backDist < m_backMin )  m_backDist = m_backMin;
-    }
-    if ( event.keyState & KS_NUMMINUS )
-    {
-        m_backDist += event.rTime*30.0f*m_speed;
-        if ( m_backDist > 200.0f )  m_backDist = 200.0f;
-    }
-
-    m_motorTurn = 0.0f;
-
-    if ( m_bRightDown )
-    {
-        m_addDirectionH =  m_rightPosMove.x*6.0f;
-        m_addDirectionV = -m_rightPosMove.y*2.0f;
-    }
-    else
-    {
-        if ( m_bCameraScroll )
-        {
-#if 1
-            // Left/Right.
-            m_addDirectionH += m_mouseDirH*event.rTime*1.0f*m_speed;
-            m_addDirectionH = Math::NormAngle(m_addDirectionH);
-
-            // Up/Down.
-//?         m_backDist -= m_mouseDirV*event.rTime*30.0f*m_speed;
-//?         if ( m_backDist <  10.0f )  m_backDist =  10.0f;
-//?         if ( m_backDist > 200.0f )  m_backDist = 200.0f;
-#else
-            if ( m_mousePos.y >= 0.18f && m_mousePos.y <= 0.93f )
-            {
-//?             m_addDirectionH = -(m_mousePos.x-0.5f)*4.0f;
-                m_addDirectionV =  (m_mousePos.y-0.5f)*2.0f;
-//?             if ( m_bCameraInvertX )  m_addDirectionH = -m_addDirectionH;
-                if ( m_bCameraInvertY )  m_addDirectionV = -m_addDirectionV;
-
-                if ( m_mousePos.x < 0.5f )  m_motorTurn = -1.0f;
-                if ( m_mousePos.x > 0.5f )  m_motorTurn =  1.0f;
-
-                mouse = m_mousePos;
-                mouse.x = 0.5f;
-                m_engine->MoveMousePos(mouse);
-            }
-            else
-            {
-                m_addDirectionH = 0.0f;
-                m_addDirectionV = 0.0f;
-            }
-#endif
-        }
-    }
-
-    if ( m_mouseDirH != 0 || m_mouseDirV != 0 )
-    {
-        AbortCentering();  // special stops framing
-    }
-
-    // Increase the special framework.
-    centeringH = 0.0f;
-    centeringV = 0.0f;
-    centeringD = 0.0f;
-
-    if ( m_centeringPhase == CP_START )
-    {
-        m_centeringProgress += event.rTime/m_centeringTime;
-        if ( m_centeringProgress > 1.0f )  m_centeringProgress = 1.0f;
-        centeringH = m_centeringProgress;
-        centeringV = m_centeringProgress;
-        centeringD = m_centeringProgress;
-        if ( m_centeringProgress >= 1.0f )
-        {
-            m_centeringPhase = CP_WAIT;
-        }
-    }
-
-    if ( m_centeringPhase == CP_WAIT )
-    {
-        centeringH = 1.0f;
-        centeringV = 1.0f;
-        centeringD = 1.0f;
-    }
-
-    if ( m_centeringPhase == CP_STOP )
-    {
-        m_centeringProgress += event.rTime/m_centeringTime;
-        if ( m_centeringProgress > 1.0f )  m_centeringProgress = 1.0f;
-        centeringH = 1.0f-m_centeringProgress;
-        centeringV = 1.0f-m_centeringProgress;
-        centeringD = 1.0f-m_centeringProgress;
-        if ( m_centeringProgress >= 1.0f )
-        {
-            m_centeringPhase = CP_NULL;
-        }
-    }
-
-    if ( m_centeringAngleH == 99.9f )  centeringH = 0.0f;
-    if ( m_centeringAngleV == 99.9f )  centeringV = 0.0f;
-    if ( m_centeringDist   ==  0.0f )  centeringD = 0.0f;
-
-    if ( m_cameraObj != 0 )
-    {
-        vLookatPt = m_cameraObj->RetPosition(0);
-             if ( type == OBJECT_BASE  )  vLookatPt.y += 40.0f;
-        else if ( type == OBJECT_HUMAN )  vLookatPt.y +=  1.0f;
-        else if ( type == OBJECT_TECH  )  vLookatPt.y +=  1.0f;
-        else                              vLookatPt.y +=  4.0f;
-
-        h = -m_cameraObj->RetAngleY(0);  // angle vehicle / building
-
-        if ( type == OBJECT_DERRICK  ||
-             type == OBJECT_FACTORY  ||
-             type == OBJECT_REPAIR   ||
-             type == OBJECT_DESTROYER||
-             type == OBJECT_STATION  ||
-             type == OBJECT_CONVERT  ||
-             type == OBJECT_TOWER    ||
-             type == OBJECT_RESEARCH ||
-             type == OBJECT_RADAR    ||
-             type == OBJECT_INFO     ||
-             type == OBJECT_ENERGY   ||
-             type == OBJECT_LABO     ||
-             type == OBJECT_NUCLEAR  ||
-             type == OBJECT_PARA     ||
-             type == OBJECT_SAFE     ||
-             type == OBJECT_HUSTON   ||
-             type == OBJECT_START    ||
-             type == OBJECT_END      )  // building?
-        {
-            h += Math::PI*0.20f;  // nearly face
-        }
-        else    // vehicle?
-        {
-            h += Math::PI;  // back
-        }
-        h = Math::NormAngle(h)+m_remotePan;
-        v = 0.0f;  //?
-
-        h += m_centeringCurrentH;
-        h += m_addDirectionH*(1.0f-centeringH);
-        h = Math::NormAngle(h);
-
-        if ( type == OBJECT_MOBILEdr )  // designer?
-        {
-            v -= 0.3f;  // Camera top
-        }
-
-        v += m_centeringCurrentV;
-        v += m_addDirectionV*(1.0f-centeringV);
-
-        d = m_backDist;
-        d += m_centeringDist*centeringD;
-
-        m_centeringCurrentH = m_centeringAngleH*centeringH;
-        m_centeringCurrentV = m_centeringAngleV*centeringV;
-
-        m_eyePt = RotateView(vLookatPt, h, v, d);
-
-        physics = m_cameraObj->RetPhysics();
-        if ( physics != 0 && physics->RetLand() )  // ground?
-        {
-            pos = vLookatPt+(vLookatPt-m_eyePt);
-            floor = m_terrain->RetFloorHeight(pos)-4.0f;
-            if ( floor > 0.0f )
-            {
-                m_eyePt.y += floor;  // shows the descent in front
-            }
-        }
-
-        m_eyePt = ExcludeTerrain(m_eyePt, vLookatPt, h, v);
-        m_eyePt = ExcludeObject(m_eyePt, vLookatPt, h, v);
-
-        SetViewTime(m_eyePt, vLookatPt, event.rTime);
-
-        m_directionH = h+Math::PI/2.0f;
-        m_directionV = v;
-    }
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameFix(const Event &event)
-{
-    Math::Vector    pos, vLookatPt;
-    float       h, v, d;
-
-    // +/-.
-    if ( event.keyState & KS_NUMPLUS )
-    {
-        m_fixDist -= event.rTime*30.0f*m_speed;
-        if ( m_fixDist < 10.0f )  m_fixDist = 10.0f;
-    }
-    if ( event.keyState & KS_NUMMINUS )
-    {
-        m_fixDist += event.rTime*30.0f*m_speed;
-        if ( m_fixDist > 200.0f )  m_fixDist = 200.0f;
-    }
-
-    if ( m_bCameraScroll )
-    {
-        // Left/Right.
-        m_fixDirectionH += m_mouseDirH*event.rTime*1.0f*m_speed;
-        m_fixDirectionH = Math::NormAngle(m_fixDirectionH);
-
-        // Up/Down.
-//?     m_fixDist -= m_mouseDirV*event.rTime*30.0f*m_speed;
-//?     if ( m_fixDist <  10.0f )  m_fixDist =  10.0f;
-//?     if ( m_fixDist > 200.0f )  m_fixDist = 200.0f;
-    }
-
-    if ( m_mouseDirH != 0 || m_mouseDirV != 0 )
-    {
-        AbortCentering();  // special stops framing
-    }
-
-    if ( m_cameraObj != 0 )
-    {
-        vLookatPt = m_cameraObj->RetPosition(0);
-
-        h = m_fixDirectionH+m_remotePan;
-        v = m_fixDirectionV;
-
-        d = m_fixDist;
-//-     if ( m_type == CAMERA_PLANE )  d += 20.0f;
-        m_eyePt = RotateView(vLookatPt, h, v, d);
-//-     if ( m_type == CAMERA_PLANE )  m_eyePt.y += 50.0f;
-        if ( m_type == CAMERA_PLANE )  m_eyePt.y += m_fixDist/2.0f;
-        m_eyePt = ExcludeTerrain(m_eyePt, vLookatPt, h, v);
-        m_eyePt = ExcludeObject(m_eyePt, vLookatPt, h, v);
-
-        SetViewTime(m_eyePt, vLookatPt, event.rTime);
-
-        m_directionH = h+Math::PI/2.0f;
-        m_directionV = v;
-    }
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameExplo(const Event &event)
-{
-    Math::Vector    pos, vLookatPt;
-    float       factor;
-
-    factor = m_heightEye*0.5f+30.0f;
-
-    if ( m_mouseDirH != 0.0f )
-    {
-        m_directionH -= m_mouseDirH*event.rTime*0.7f*m_speed;
-    }
-
-    m_terrain->ValidPosition(m_eyePt, 10.0f);
-
-    if ( m_terrain->MoveOnFloor(m_eyePt, false) )
-    {
-        m_eyePt.y += m_heightEye;
-
-        pos = m_eyePt;
-        if ( m_terrain->MoveOnFloor(pos, false) )
-        {
-            pos.y += 2.0f;
-            if ( m_eyePt.y < pos.y )
-            {
-                m_eyePt.y = pos.y;
-            }
-        }
-
-    }
-
-    vLookatPt = Math::LookatPoint( m_eyePt, m_directionH, m_directionV, 50.0f );
-
-    if ( m_terrain->MoveOnFloor(vLookatPt, true) )
-    {
-        vLookatPt.y += m_heightLookat;
-    }
-
-    SetViewTime(m_eyePt, vLookatPt, event.rTime);
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameOnBoard(const Event &event)
-{
-    Math::Vector    vLookatPt, vUpVec, eye, lookat, pos;
-
-    if ( m_cameraObj != 0 )
-    {
-        m_cameraObj->SetViewFromHere(m_eyePt, m_directionH, m_directionV,
-                                     vLookatPt, vUpVec, m_type);
-        eye    = m_effectOffset*0.3f+m_eyePt;
-        lookat = m_effectOffset*0.3f+vLookatPt;
-
-        SetViewParams(eye, lookat, vUpVec);
-        m_actualEye    = eye;
-        m_actualLookat = lookat;
-    }
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameInfo(const Event &event)
-{
-    SetViewTime(Math::Vector(0.0f, 0.0f, 0.0f),
-                Math::Vector(0.0f, 0.0f, 1.0f),
-                event.rTime);
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameVisit(const Event &event)
-{
-    Math::Vector    eye;
-    float       angleH, angleV;
-
-    m_visitTime += event.rTime;
-
-    // +/-.
-    if ( event.keyState & KS_NUMPLUS )
-    {
-        m_visitDist -= event.rTime*50.0f*m_speed;
-        if ( m_visitDist < 20.0f )  m_visitDist = 20.0f;
-    }
-    if ( event.keyState & KS_NUMMINUS )
-    {
-        m_visitDist += event.rTime*50.0f*m_speed;
-        if ( m_visitDist > 200.0f )  m_visitDist = 200.0f;
-    }
-
-    // PageUp/Down.
-    if ( event.keyState & KS_PAGEUP )
-    {
-        m_visitDirectionV -= event.rTime*1.0f*m_speed;
-        if ( m_visitDirectionV < -Math::PI*0.40f )  m_visitDirectionV = -Math::PI*0.40f;
-    }
-    if ( event.keyState & KS_PAGEDOWN )
-    {
-        m_visitDirectionV += event.rTime*1.0f*m_speed;
-        if ( m_visitDirectionV > 0.0f )  m_visitDirectionV = 0.0f;
-    }
-
-    if ( m_bCameraScroll )
-    {
-        m_visitDist -= m_mouseDirV*event.rTime*30.0f*m_speed;
-        if ( m_visitDist <  20.0f )  m_visitDist =  20.0f;
-        if ( m_visitDist > 200.0f )  m_visitDist = 200.0f;
-    }
-
-    angleH = (m_visitTime/10.0f)*(Math::PI*2.0f);
-    angleV = m_visitDirectionV;
-    eye = RotateView(m_visitGoal, angleH, angleV, m_visitDist);
-    eye = ExcludeTerrain(eye, m_visitGoal, angleH, angleV);
-    eye = ExcludeObject(eye, m_visitGoal, angleH, angleV);
-    SetViewTime(eye, m_visitGoal, event.rTime);
-
-    return true;
-}
-
-// Moves the point of view.
-
-bool CCamera::EventFrameScript(const Event &event)
-{
-    SetViewTime(m_scriptEye+m_effectOffset,
-                m_scriptLookat+m_effectOffset, event.rTime);
-    return true;
-}
-
-void CCamera::SetScriptEye(Math::Vector eye)
-{
-    m_scriptEye = eye;
-}
-
-void CCamera::SetScriptLookat(Math::Vector lookat)
-{
-    m_scriptLookat = lookat;
-}
-
-
-// Specifies the location and direction of view.
-
-void CCamera::SetViewParams(const Math::Vector &eye, const Math::Vector &lookat,
-                            const Math::Vector &up)
-{
-    bool        bUnder;
-
-    m_engine->SetViewParams(eye, lookat, up, m_eyeDistance);
-
-    bUnder = (eye.y < m_water->RetLevel());  // Is it underwater?
-    if ( m_type == CAMERA_INFO )  bUnder = false;
-    m_engine->SetRankView(bUnder?1:0);
-}
-
-
-// Adjusts the camera not to enter the field.
-
-Math::Vector CCamera::ExcludeTerrain(Math::Vector eye, Math::Vector lookat,
-                                  float &angleH, float &angleV)
-{
-    Math::Vector    pos;
-    float       dist;
-
-    pos = eye;
-    if ( m_terrain->MoveOnFloor(pos) )
-    {
-        dist = Math::DistanceProjected(lookat, pos);
-        pos.y += 2.0f+dist*0.1f;
-        if ( pos.y > eye.y )
-        {
-            angleV = -Math::RotateAngle(dist, pos.y-lookat.y);
-            eye = RotateView(lookat, angleH, angleV, dist);
-        }
-    }
-    return eye;
-}
-
-// Adjusts the camera not to enter an object.
-
-Math::Vector CCamera::ExcludeObject(Math::Vector eye, Math::Vector lookat,
-                                 float &angleH, float &angleV)
-{
-    CObject*    pObj;
-    Math::Vector    oPos;
-    float       oRad, dist;
-    int         i, j;
-
-return eye;
-//?
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        j = 0;
-        while ( pObj->GetCrashSphere(j++, oPos, oRad) )
-        {
-            dist = Math::Distance(oPos, eye);
-            if ( dist < oRad+2.0f )
-            {
-                eye.y = oPos.y+oRad+2.0f;
-            }
-        }
-    }
-
-    return eye;
-}
-
-
diff --git a/src/old/camera.h b/src/old/camera.h
deleted file mode 100644
index 98e5420..0000000
--- a/src/old/camera.h
+++ /dev/null
@@ -1,269 +0,0 @@
-// * 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/.
-
-// camera.h
-
-#pragma once
-
-
-#include "common/event.h"
-#include "math/point.h"
-#include "old/d3dengine.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-class CTerrain;
-class CWater;
-class CObject;
-
-
-enum CameraType
-{
-    CAMERA_NULL     = 0,    // camera undefined
-    CAMERA_FREE     = 1,    // camera free (never in principle)
-    CAMERA_EDIT     = 2,    // camera while editing a program
-    CAMERA_ONBOARD      = 3,    // camera on board a robot
-    CAMERA_BACK     = 4,    // camera behind a robot
-    CAMERA_FIX      = 5,    // static camera following robot
-    CAMERA_EXPLO        = 6,    // camera steady after explosion
-    CAMERA_SCRIPT       = 7,    // camera during a film script
-    CAMERA_INFO     = 8,    // camera for displaying information
-    CAMERA_VISIT        = 9,    // visit instead of an error
-    CAMERA_DIALOG       = 10,   // camera for dialogue
-    CAMERA_PLANE        = 11,   // static camera height
-};
-
-enum CameraSmooth
-{
-    CS_NONE         = 0,    // sharp
-    CS_NORM         = 1,    // normal
-    CS_HARD         = 2,    // hard
-    CS_SPEC         = 3,    // special
-};
-
-enum CenteringPhase
-{
-    CP_NULL         = 0,
-    CP_START        = 1,
-    CP_WAIT         = 2,
-    CP_STOP         = 3,
-};
-
-enum CameraEffect
-{
-    CE_NULL         = 0,    // no effect
-    CE_TERRAFORM        = 1,    // digging in
-    CE_CRASH        = 2,    // Vehicle driving is severely
-    CE_EXPLO        = 3,    // explosion
-    CE_SHOT         = 4,    // not mortal shot
-    CE_VIBRATION        = 5,    // vibration during construction
-    CE_PET          = 6,    // spleen reactor
-};
-
-enum OverEffect
-{
-    OE_NULL         = 0,    // no effect
-    OE_BLOOD        = 1,    // flash red
-    OE_FADEINw      = 2,    // white -> nothing
-    OE_FADEOUTw     = 3,    // nothing -> white
-    OE_FADEOUTb     = 4,    // nothing -> blue
-    OE_BLITZ        = 5,    // lightning
-};
-
-
-
-class CCamera
-{
-public:
-    CCamera(CInstanceManager* iMan);
-    ~CCamera();
-
-    bool        EventProcess(const Event &event);
-
-    void        Init(Math::Vector eye, Math::Vector lookat, float delay);
-
-    void        SetObject(CObject* object);
-    CObject*    RetObject();
-
-    void        SetType(CameraType type);
-    CameraType  RetType();
-
-    void        SetSmooth(CameraSmooth type);
-    CameraSmooth RetSmoth();
-
-    void        SetDist(float dist);
-    float       RetDist();
-
-    void        SetFixDirection(float angle);
-    float       RetFixDirection();
-
-    void        SetRemotePan(float value);
-    float       RetRemotePan();
-
-    void        SetRemoteZoom(float value);
-    float       RetRemoteZoom();
-
-    void        StartVisit(Math::Vector goal, float dist);
-    void        StopVisit();
-
-    void        RetCamera(Math::Vector &eye, Math::Vector &lookat);
-
-    bool        StartCentering(CObject *object, float angleH, float angleV, float dist, float time);
-    bool        StopCentering(CObject *object, float time);
-    void        AbortCentering();
-
-    void        FlushEffect();
-    void        StartEffect(CameraEffect effect, Math::Vector pos, float force);
-
-    void        FlushOver();
-    void        SetOverBaseColor(D3DCOLORVALUE color);
-    void        StartOver(OverEffect effect, Math::Vector pos, float force);
-
-    void        FixCamera();
-    void        SetScriptEye(Math::Vector eye);
-    void        SetScriptLookat(Math::Vector lookat);
-
-    void        SetEffect(bool bEnable);
-    void        SetCameraScroll(bool bScroll);
-    void        SetCameraInvertX(bool bInvert);
-    void        SetCameraInvertY(bool bInvert);
-
-    float       RetMotorTurn();
-    D3DMouse    RetMouseDef(Math::Point pos);
-
-protected:
-    bool        EventMouseMove(const Event &event);
-    void        EventMouseWheel(int dir);
-    bool        EventFrame(const Event &event);
-    bool        EventFrameFree(const Event &event);
-    bool        EventFrameEdit(const Event &event);
-    bool        EventFrameDialog(const Event &event);
-    bool        EventFrameBack(const Event &event);
-    bool        EventFrameFix(const Event &event);
-    bool        EventFrameExplo(const Event &event);
-    bool        EventFrameOnBoard(const Event &event);
-    bool        EventFrameInfo(const Event &event);
-    bool        EventFrameVisit(const Event &event);
-    bool        EventFrameScript(const Event &event);
-
-    void        SetViewTime(const Math::Vector &vEyePt, const Math::Vector &vLookatPt, float rTime);
-    bool        IsCollision(Math::Vector &eye, Math::Vector lookat);
-    bool        IsCollisionBack(Math::Vector &eye, Math::Vector lookat);
-    bool        IsCollisionFix(Math::Vector &eye, Math::Vector lookat);
-
-    Math::Vector    ExcludeTerrain(Math::Vector eye, Math::Vector lookat, float &angleH, float &angleV);
-    Math::Vector    ExcludeObject(Math::Vector eye, Math::Vector lookat, float &angleH, float &angleV);
-
-    void        SetViewParams(const Math::Vector &eye, const Math::Vector &lookat, const Math::Vector &up);
-    void        EffectFrame(const Event &event);
-    void        OverFrame(const Event &event);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine* m_engine;
-    CTerrain*   m_terrain;
-    CWater*     m_water;
-
-    CameraType  m_type;         // the type of camera (CAMERA *)
-    CameraSmooth    m_smooth;       // type of smoothing
-    CObject*    m_cameraObj;        // object linked to the camera
-
-    float       m_eyeDistance;      // distance between the eyes
-    float       m_initDelay;        // time of initial centering
-
-    Math::Vector    m_actualEye;        // current eye
-    Math::Vector    m_actualLookat;     // aim current
-    Math::Vector    m_finalEye;     // final eye
-    Math::Vector    m_finalLookat;      // aim final
-    Math::Vector    m_normEye;      // normal eye
-    Math::Vector    m_normLookat;       // aim normal
-    float       m_focus;
-
-    bool        m_bRightDown;
-    Math::Point     m_rightPosInit;
-    Math::Point     m_rightPosCenter;
-    Math::Point     m_rightPosMove;
-
-    Math::Vector    m_eyePt;        // CAMERA_FREE: eye
-    float       m_directionH;       // CAMERA_FREE: horizontal direction
-    float       m_directionV;       // CAMERA_FREE: vertical direction
-    float       m_heightEye;        // CAMERA_FREE: height above the ground
-    float       m_heightLookat;     // CAMERA_FREE: height above the ground
-    float       m_speed;        // CAMERA_FREE: speed of movement
-
-    float       m_backDist;     // CAMERA_BACK: distance
-    float       m_backMin;      // CAMERA_BACK: distance minimal
-    float       m_addDirectionH;    // CAMERA_BACK: additional direction
-    float       m_addDirectionV;    // CAMERA_BACK: additional direction
-    bool        m_bTransparency;
-
-    float       m_fixDist;      // CAMERA_FIX: distance
-    float       m_fixDirectionH;    // CAMERA_FIX: direction
-    float       m_fixDirectionV;    // CAMERA_FIX: direction
-
-    Math::Vector    m_visitGoal;        // CAMERA_VISIT: target position
-    float       m_visitDist;        // CAMERA_VISIT: distance
-    float       m_visitTime;        // CAMERA_VISIT: relative time
-    CameraType  m_visitType;        // CAMERA_VISIT: initial type
-    float       m_visitDirectionH;  // CAMERA_VISIT: direction
-    float       m_visitDirectionV;  // CAMERA_VISIT: direction
-
-    float       m_editHeight;       // CAMERA_EDIT: height
-
-    float       m_remotePan;
-    float       m_remoteZoom;
-
-    Math::Point     m_mousePos;
-    float       m_mouseDirH;
-    float       m_mouseDirV;
-    float       m_mouseMarging;
-
-    float       m_motorTurn;
-
-    CenteringPhase m_centeringPhase;
-    float       m_centeringAngleH;
-    float       m_centeringAngleV;
-    float       m_centeringDist;
-    float       m_centeringCurrentH;
-    float       m_centeringCurrentV;
-    float       m_centeringTime;
-    float       m_centeringProgress;
-
-    CameraEffect m_effectType;
-    Math::Vector    m_effectPos;
-    float       m_effectForce;
-    float       m_effectProgress;
-    Math::Vector    m_effectOffset;
-
-    OverEffect  m_overType;
-    float       m_overForce;
-    float       m_overTime;
-    D3DCOLORVALUE m_overColorBase;
-    D3DCOLORVALUE m_overColor;
-    int         m_overMode;
-    float       m_overFadeIn;
-    float       m_overFadeOut;
-
-    Math::Vector    m_scriptEye;
-    Math::Vector    m_scriptLookat;
-
-    bool        m_bEffect;      // shocks if explosion?
-    bool        m_bCameraScroll;    // scroll in the edges?
-    bool        m_bCameraInvertX;   // X inversion in the edges?
-    bool        m_bCameraInvertY;   // Y inversion in the edges?
-};
-
diff --git a/src/old/ceebot.ini b/src/old/ceebot.ini
deleted file mode 100644
index 0de7a32..0000000
--- a/src/old/ceebot.ini
+++ /dev/null
@@ -1,66 +0,0 @@
-[Directory]

-scene=scene

-savegame=savegame

-public=program

-user=user

-files=files

-[Setup]

-TotoMode=1

-Tooltips=1

-InterfaceGlint=1

-NiceMouse=0

-Movies=1

-NiceReset=1

-HimselfDamage=1

-CameraScroll=0

-CameraInvertX=0

-InterfaceEffect=1

-GroundShadow=1

-GroundSpot=1

-ObjectDirty=1

-FogMode=1

-LensMode=1

-SkyMode=1

-PlanetMode=1

-LightMode=1

-UseJoystick=0

-ParticuleDensity=1.00

-ClippingDistance=1.00

-ObjectDetail=2.00

-GadgetQuantity=1.00

-TextureQuality=1

-AudioVolume=4

-MidiVolume=15

-Sound3D=0

-EditIndentMode=1

-EditIndentValue=4

-KeyMap=37+0 39+0 38+0 40+0 16+0 17+0 32+258 96+262 13+257 107+261 109+260 9+259 36+263 27+0 112+0 113+0 110+0 115+0 116+0 117+0                                                                                                                

-DeleteGamer=1

-Soluce4=1

-[Engine]

-AlphaMode=1

-StateColor=-1

-BlackSrcBlend=0

-BlackDestBlend=0

-WhiteSrcBlend=0

-WhiteDestBlend=0

-DiffuseSrcBlend=0

-DiffuseDestBlend=0

-AlphaSrcBlend=0

-AlphaDestBlend=0

-[Gamer]

-LastName=Linda

-[Edit]

-FontSize=9.00

-WindowPos.x=0.09

-WindowPos.y=0.08

-WindowDim.x=0.69

-WindowDim.y=0.84

-IOPos.x=0.36

-IOPos.y=0.15

-IODim.x=0.50

-IODim.y=0.55

-[Device]

-Name=Direct3D HAL

-Mode=1600 x 1200 x 32

-FullScreen=0

diff --git a/src/old/cloud.cpp b/src/old/cloud.cpp
deleted file mode 100644
index 8661cbd..0000000
--- a/src/old/cloud.cpp
+++ /dev/null
@@ -1,338 +0,0 @@
-// * 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/.
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "old/d3dutil.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/terrain.h"
-#include "object/object.h"
-#include "old/cloud.h"
-
-
-
-const int DIMEXPAND = 4;    // extension of the dimensions
-
-
-
-// Constructor of clouds.
-
-CCloud::CCloud(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_CLOUD, this);
-
-    m_engine = engine;
-    m_terrain = 0;
-
-    m_level = 0.0f;
-    m_wind  = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_subdiv = 8;
-    m_filename[0] = 0;
-    m_bEnable = true;
-}
-
-// Destructor of clouds.
-
-CCloud::~CCloud()
-{
-}
-
-
-bool CCloud::EventProcess(const Event &event)
-{
-    if ( event.event == EVENT_FRAME )
-    {
-        return EventFrame(event);
-    }
-
-    return true;
-}
-
-// Makes the clouds evolve.
-
-bool CCloud::EventFrame(const Event &event)
-{
-    if ( m_engine->RetPause() )  return true;
-
-    m_time += event.rTime;
-
-    if ( m_level == 0.0f )  return true;
-
-    if ( m_time-m_lastTest < 0.2f )  return true;
-    m_lastTest = m_time;
-
-    return true;
-}
-
-
-// Adjusts the position to normal, to imitate the clouds
-// at movement.
-
-void CCloud::AdjustLevel(Math::Vector &pos, Math::Vector &eye, float deep,
-                         Math::Point &uv1, Math::Point &uv2)
-{
-    float       dist, factor;
-
-    uv1.x = (pos.x+20000.0f)/1280.0f;
-    uv1.y = (pos.z+20000.0f)/1280.0f;
-    uv1.x -= m_time*(m_wind.x/100.0f);
-    uv1.y -= m_time*(m_wind.z/100.0f);
-
-    uv2.x = 0.0f;
-    uv2.y = 0.0f;
-
-    dist = Math::DistanceProjected(pos, eye);
-    factor = powf(dist/deep, 2.0f);
-    pos.y -= m_level*factor*10.0f;
-}
-
-inline DWORD F2DW( FLOAT f )
-{
-    return *((DWORD*)&f);
-}
-
-// Draw the clouds.
-
-void CCloud::Draw()
-{
-    LPDIRECT3DDEVICE7 device;
-    D3DVERTEX2*     vertex;
-    Math::Matrix*       matView;
-    D3DMATERIAL7    material;
-    Math::Matrix        matrix;
-    Math::Vector        n, pos, p, eye;
-    Math::Point         uv1, uv2;
-    float           iDeep, deep, size, fogStart, fogEnd;
-    int             i, j, u;
-
-    if ( !m_bEnable )  return;
-    if ( m_level == 0.0f )  return;
-    if ( m_lineUsed == 0 )  return;
-
-    vertex = (D3DVERTEX2*)malloc(sizeof(D3DVERTEX2)*(m_brick+2)*2);
-
-    iDeep = m_engine->RetDeepView();
-    deep = (m_brick*m_size)/2.0f;
-    m_engine->SetDeepView(deep);
-    m_engine->SetFocus(m_engine->RetFocus());
-    m_engine->UpdateMatProj();  // increases the depth of view
-
-//? fogStart = deep*0.10f;
-//? fogEnd   = deep*0.16f;
-    fogStart = deep*0.15f;
-    fogEnd   = deep*0.24f;
-
-    device = m_engine->RetD3DDevice();
-    device->SetRenderState(D3DRENDERSTATE_AMBIENT, 0x00000000);
-    device->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-    device->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-//? device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-    device->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-    device->SetRenderState(D3DRENDERSTATE_FOGSTART, F2DW(fogStart));
-    device->SetRenderState(D3DRENDERSTATE_FOGEND,   F2DW(fogEnd));
-
-    matView = m_engine->RetMatView();
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(*matView);
-      device->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-
-    ZeroMemory( &material, sizeof(D3DMATERIAL7) );
-    material.diffuse = m_diffuse;
-    material.ambient = m_ambient;
-    m_engine->SetMaterial(material);
-
-    m_engine->SetTexture(m_filename, 0);
-    m_engine->SetTexture(m_filename, 1);
-
-//? m_engine->SetState(D3DSTATETTb|D3DSTATEDUALw|D3DSTATEWRAP);
-    m_engine->SetState(D3DSTATETTb|D3DSTATEFOG|D3DSTATEWRAP);
-//? m_engine->SetState(D3DSTATEWRAP);
-
-    matrix.LoadIdentity();
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      device->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    size = m_size/2.0f;
-    eye = m_engine->RetEyePt();
-    n = Math::Vector(0.0f, -1.0f, 0.0f);
-
-    // Draws all the lines.
-    for ( i=0 ; i<m_lineUsed ; i++ )
-    {
-        pos.y = m_level;
-        pos.z = m_line[i].pz;
-        pos.x = m_line[i].px1;
-
-        u = 0;
-        p.x = pos.x-size;
-        p.z = pos.z+size;
-        p.y = pos.y;
-        AdjustLevel(p, eye, deep, uv1, uv2);
-        vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-        p.x = pos.x-size;
-        p.z = pos.z-size;
-        p.y = pos.y;
-        AdjustLevel(p, eye, deep, uv1, uv2);
-        vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-        for ( j=0 ; j<m_line[i].len ; j++ )
-        {
-            p.x = pos.x+size;
-            p.z = pos.z+size;
-            p.y = pos.y;
-            AdjustLevel(p, eye, deep, uv1, uv2);
-            vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-            p.x = pos.x+size;
-            p.z = pos.z-size;
-            p.y = pos.y;
-            AdjustLevel(p, eye, deep, uv1, uv2);
-            vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-            pos.x += size*2.0f;
-        }
-
-        device->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, u, NULL);
-        m_engine->AddStatisticTriangle(u-2);
-    }
-
-    m_engine->SetDeepView(iDeep);
-    m_engine->SetFocus(m_engine->RetFocus());
-    m_engine->UpdateMatProj();  // gives depth to initial
-
-    free(vertex);
-}
-
-
-// Updates the positions, relative to the ground.
-
-bool CCloud::CreateLine(int x, int y, int len)
-{
-    float   offset;
-
-    m_line[m_lineUsed].x   = x;
-    m_line[m_lineUsed].y   = y;
-    m_line[m_lineUsed].len = len;
-
-    offset = m_brick*m_size/2.0f - m_size/2.0f;
-
-    m_line[m_lineUsed].px1 = m_size* m_line[m_lineUsed].x - offset;
-    m_line[m_lineUsed].px2 = m_size*(m_line[m_lineUsed].x+m_line[m_lineUsed].len) - offset;
-    m_line[m_lineUsed].pz  = m_size* m_line[m_lineUsed].y - offset;
-
-    m_lineUsed ++;
-
-    return ( m_lineUsed < MAXCLOUDLINE );
-}
-
-// Creates all areas of cloud.
-
-bool CCloud::Create(const char *filename,
-                    D3DCOLORVALUE diffuse, D3DCOLORVALUE ambient,
-                    float level)
-{
-    int         y;
-
-    m_diffuse  = diffuse;
-    m_ambient  = ambient;
-    m_level    = level;
-    m_time     = 0.0f;
-    m_lastTest = 0.0f;
-    strcpy(m_filename, filename);
-
-    if ( m_filename[0] != 0 )
-    {
-        m_engine->LoadTexture(m_filename, 0);
-        m_engine->LoadTexture(m_filename, 1);
-    }
-
-    if ( m_terrain == 0 )
-    {
-        m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    }
-
-    m_wind = m_terrain->RetWind();
-
-    m_brick = m_terrain->RetBrick()*m_terrain->RetMosaic()*DIMEXPAND;
-    m_size  = m_terrain->RetSize();
-
-    m_brick /= m_subdiv*DIMEXPAND;
-    m_size  *= m_subdiv*DIMEXPAND;
-
-    if ( m_level == 0.0f )  return true;
-
-    m_lineUsed = 0;
-    for ( y=0 ; y<m_brick ; y++ )
-    {
-        CreateLine(0, y, m_brick);
-    }
-    return true;
-}
-
-// Removes all the clouds.
-
-void CCloud::Flush()
-{
-    m_level = 0.0f;
-}
-
-
-// Modifies the cloud level.
-
-bool CCloud::SetLevel(float level)
-{
-    m_level = level;
-
-    return Create(m_filename, m_diffuse, m_ambient,
-                  m_level);
-}
-
-// Returns the current level of clouds.
-
-float CCloud::RetLevel()
-{
-    return m_level;
-}
-
-
-// Activate management of clouds.
-
-void CCloud::SetEnable(bool bEnable)
-{
-    m_bEnable = bEnable;
-}
-
-bool CCloud::RetEnable()
-{
-    return m_bEnable;
-}
-
diff --git a/src/old/cloud.h b/src/old/cloud.h
deleted file mode 100644
index de6b39e..0000000
--- a/src/old/cloud.h
+++ /dev/null
@@ -1,88 +0,0 @@
-// * 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/.
-
-// cloud.h
-
-#pragma once
-
-
-#include "common/event.h"
-#include "math/point.h"
-#include "old/d3dengine.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-class CTerrain;
-
-
-
-const int MAXCLOUDLINE = 100;
-
-struct CloudLine
-{
-    short       x, y;       // beginning
-    short       len;        // in length x
-    float       px1, px2, pz;
-};
-
-
-class CCloud
-{
-public:
-    CCloud(CInstanceManager* iMan, CD3DEngine* engine);
-    ~CCloud();
-
-    bool        EventProcess(const Event &event);
-    void        Flush();
-    bool        Create(const char *filename, D3DCOLORVALUE diffuse, D3DCOLORVALUE ambient, float level);
-    void        Draw();
-
-    bool        SetLevel(float level);
-    float       RetLevel();
-
-    void        SetEnable(bool bEnable);
-    bool        RetEnable();
-
-protected:
-    bool        EventFrame(const Event &event);
-    void        AdjustLevel(Math::Vector &pos, Math::Vector &eye, float deep, Math::Point &uv1, Math::Point &uv2);
-    bool        CreateLine(int x, int y, int len);
-
-protected:
-    CInstanceManager*   m_iMan;
-    CD3DEngine*     m_engine;
-    CTerrain*       m_terrain;
-
-    char            m_filename[100];
-    float           m_level;        // overall level
-    Math::Point         m_speed;        // feedrate (wind)
-    D3DCOLORVALUE       m_diffuse;      // diffuse color
-    D3DCOLORVALUE       m_ambient;      // ambient color
-    float           m_time;
-    float           m_lastTest;
-    int             m_subdiv;
-
-    Math::Vector        m_wind;         // wind speed
-    int         m_brick;        // brick mosaic
-    float           m_size;         // size of a brick element
-
-    int         m_lineUsed;
-    CloudLine       m_line[MAXCLOUDLINE];
-
-    bool            m_bEnable;
-};
-
diff --git a/src/old/colobot.ini b/src/old/colobot.ini
deleted file mode 100644
index de547ec..0000000
--- a/src/old/colobot.ini
+++ /dev/null
@@ -1,75 +0,0 @@
-[Gamer]

-LastName=Joueur

-

-[Setup]

-TotoMode=1

-Tooltips=1

-InterfaceGlint=1

-NiceMouse=0

-Movies=1

-NiceReset=1

-HimselfDamage=1

-CameraScroll=1

-CameraInvertX=0

-InterfaceEffect=1

-GroundShadow=1

-GroundSpot=1

-ObjectDirty=1

-FogMode=1

-LensMode=1

-SkyMode=1

-PlanetMode=1

-LightMode=1

-UseJoystick=0

-ParticuleDensity=1.00

-ClippingDistance=1.00

-ObjectDetail=2.00

-GadgetQuantity=1.00

-TextureQuality=1

-AudioVolume=15

-MidiVolume=20

-Sound3D=0

-EditIndentMode=1

-EditIndentValue=4

-KeyMap=37+0 39+0 38+0 40+0 16+0 17+0 32+258 96+262 13+257 107+261 109+260 9+259 36+263 27+0 112+0 113+0 110+0 115+0 116+0 117+0                                                                                       

-FullScreenActivateEnable=0

-AccessMission=1

-AccessUser=1

-DeleteGamer=1

-Soluce4=1

-

-[Engine]

-StateColor=-1

-BlackSrcBlend=0

-BlackDestBlend=0

-WhiteSrcBlend=0

-WhiteDestBlend=0

-DiffuseSrcBlend=0

-DiffuseDestBlend=0

-AlphaSrcBlend=0

-AlphaDestBlend=0

-AlphaMode=1

-

-[Device]

-Name=Direct3D HAL

-Mode=1600 x 1200 x 32

-FullScreen=0

-

-[Edit]

-WindowPos.x=0.19

-WindowPos.y=0.15

-WindowDim.x=0.66

-WindowDim.y=0.69

-FontSize=9.00

-IOPos.x=0.29

-IOPos.y=0.34

-IODim.x=0.50

-IODim.y=0.55

-IOPublic=0

-

-[Directory]

-scene=scene

-savegame=savegame

-public=program

-user=user

-files=files

diff --git a/src/old/cur00001.cur b/src/old/cur00001.cur
deleted file mode 100644
index e19873e..0000000
--- a/src/old/cur00001.cur
+++ /dev/null
diff --git a/src/old/cur00002.cur b/src/old/cur00002.cur
deleted file mode 100644
index 2376e8e..0000000
--- a/src/old/cur00002.cur
+++ /dev/null
diff --git a/src/old/cur00003.cur b/src/old/cur00003.cur
deleted file mode 100644
index 8a4745a..0000000
--- a/src/old/cur00003.cur
+++ /dev/null
diff --git a/src/old/cursor1.cur b/src/old/cursor1.cur
deleted file mode 100644
index 1f51251..0000000
--- a/src/old/cursor1.cur
+++ /dev/null
diff --git a/src/old/cursorha.cur b/src/old/cursorha.cur
deleted file mode 100644
index 7b80435..0000000
--- a/src/old/cursorha.cur
+++ /dev/null
diff --git a/src/old/cursorsc.cur b/src/old/cursorsc.cur
deleted file mode 100644
index 52004ac..0000000
--- a/src/old/cursorsc.cur
+++ /dev/null
diff --git a/src/old/d3dapp.cpp b/src/old/d3dapp.cpp
deleted file mode 100644
index b44bf6f..0000000
--- a/src/old/d3dapp.cpp
+++ /dev/null
@@ -1,2451 +0,0 @@
-// * 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/.
-
-
-#include <windows.h>
-#include <winuser.h>
-#include <mmsystem.h>
-#include <stdio.h>
-#include <direct.h>
-#include <tchar.h>
-#include <zmouse.h>
-#include <dinput.h>
-
-#include "common/struct.h"
-#include "old/d3dtextr.h"
-#include "old/d3dengine.h"
-#include "common/language.h"
-#include "common/event.h"
-#include "common/profile.h"
-#include "common/iman.h"
-#include "common/restext.h"
-#include "old/math3d.h"
-#include "old/joystick.h"
-#include "object/robotmain.h"
-#include "old/sound.h"
-#include "old/d3dapp.h"
-
-// fix for "MSH_MOUSEWHEEL undefined" error
-#ifdef UNICODE
-#define MSH_MOUSEWHEEL L"MSWHEEL_ROLLMSG"
-#else
-#define MSH_MOUSEWHEEL "MSWHEEL_ROLLMSG"
-#endif
-
-
-const int AUDIO_TRACK = 13;     // total number of audio tracks on the CD
-const float MAX_STEP = 0.2f;        // maximum time for a step
-
-const int WINDOW_DX = (640+6);      // dimensions in windowed mode
-const int WINDOW_DY = (480+25);
-
-#define USE_THREAD      false       // true does not work!
-const float TIME_THREAD = 0.02f;
-
-
-
-
-// Limit the use of the controls keyboard & joystick.
-
-float AxeLimit(float value)
-{
-    if ( value < -1.0f )  value = -1.0f;
-    if ( value >  1.0f )  value =  1.0f;
-    return value;
-}
-
-
-// Entry point to the program. Initializes everything, and goes into a
-// message-processing loop. Idle time is used to render the scene.
-
-INT WINAPI WinMain( HINSTANCE hInst, HINSTANCE, LPSTR strCmdLine, INT )
-{
-    Error   err;
-    char    string[100];
-
-    CD3DApplication d3dApp;  // single instance of the application
-
-    err = d3dApp.CheckMistery(strCmdLine);
-    if ( err != ERR_OK )
-    {
-        GetResource(RES_ERR, err, string);
-#if _NEWLOOK
-        MessageBox( NULL, string, _T("CeeBot"), MB_ICONERROR|MB_OK );
-#else
-        MessageBox( NULL, string, _T("COLOBOT"), MB_ICONERROR|MB_OK );
-#endif
-        return 0;
-    }
-
-    if ( FAILED(d3dApp.Create(hInst, strCmdLine)) )
-    {
-        return 0;
-    }
-
-    return d3dApp.Run();  // execution of all
-}
-
-
-// Internal variables and function prototypes.
-
-enum APPMSGTYPE { MSG_NONE, MSGERR_APPMUSTEXIT, MSGWARN_SWITCHEDTOSOFTWARE };
-
-static INT     CALLBACK AboutProc( HWND, UINT, WPARAM, LPARAM );
-static LRESULT CALLBACK WndProc( HWND, UINT, WPARAM, LPARAM );
-
-static CD3DApplication* g_pD3DApp;
-
-
-
-// Constructor.
-
-CD3DApplication::CD3DApplication()
-{
-    int     i;
-
-    m_iMan = new(CInstanceManager);
-    m_event = new CEvent(m_iMan);
-
-    m_pD3DEngine = 0;
-    m_pRobotMain = 0;
-    m_pSound     = 0;
-    m_pFramework = 0;
-    m_instance   = 0;
-    m_hWnd       = 0;
-    m_pDD        = 0;
-    m_pD3D       = 0;
-    m_pD3DDevice = 0;
-
-    m_CDpath[0] = 0;
-
-    m_pddsRenderTarget = 0;
-    m_pddsDepthBuffer  = 0;
-
-    m_keyState = 0;
-    m_axeKey = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_axeJoy = Math::Vector(0.0f, 0.0f, 0.0f);
-
-    m_vidMemTotal  = 0;
-    m_bActive      = false;
-    m_bActivateApp = false;
-    m_bReady       = false;
-    m_bJoystick    = false;
-    m_aTime        = 0.0f;
-
-    for ( i=0 ; i<32 ; i++ )
-    {
-        m_bJoyButton[i] = false;
-    }
-
-#if _NEWLOOK
-    m_strWindowTitle  = _T("CeeBot");
-#else
-    m_strWindowTitle  = _T("COLOBOT");
-#endif
-    m_bAppUseZBuffer  = true;
-    m_bAppUseStereo   = true;
-    m_bShowStats      = false;
-    m_bDebugMode      = false;
-    m_bAudioState     = true;
-    m_bAudioTrack     = true;
-    m_bNiceMouse      = false;
-    m_bSetupMode      = true;
-    m_fnConfirmDevice = 0;
-
-    ResetKey();
-
-    g_pD3DApp = this;
-
-    // Request event sent by Logitech.
-    m_mshMouseWheel = RegisterWindowMessage(MSH_MOUSEWHEEL);
-
-    _mkdir("files\\");
-}
-
-
-// Destructor.
-
-CD3DApplication::~CD3DApplication()
-{
-    delete m_iMan;
-}
-
-
-
-// Returns the path of the CD.
-
-char* CD3DApplication::RetCDpath()
-{
-    return m_CDpath;
-}
-
-// Reads the information in the registry.
-
-Error CD3DApplication::RegQuery()
-{
-    FILE*   file = NULL;
-    HKEY    key;
-    LONG    i;
-    DWORD   type, len;
-    char    filename[100];
-
-#if _NEWLOOK
- #if _TEEN
-    i = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Epsitec\\CeeBot-Teen\\Setup",
- #else
-    i = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Epsitec\\CeeBot-A\\Setup",
- #endif
-#else
-    i = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Epsitec\\Colobot\\Setup",
-#endif
-                     0, KEY_READ, &key);
-    if ( i != ERROR_SUCCESS )  return ERR_INSTALL;
-
-    type = REG_SZ;
-    len  = sizeof(m_CDpath);
-    i = RegQueryValueEx(key, "CDpath", NULL, &type, (LPBYTE)m_CDpath, &len);
-    if ( i != ERROR_SUCCESS || type != REG_SZ )  return ERR_INSTALL;
-
-    filename[0] = m_CDpath[0];
-    filename[1] = ':';
-    filename[2] = '\\';
-    filename[3] = 0;
-    i = GetDriveType(filename);
-    if ( i != DRIVE_CDROM )  return ERR_NOCD;
-
-    strcat(filename, "install.ini");
-    file = fopen(filename, "rb");  // install.ini file exist?
-    if ( file == NULL )  return ERR_NOCD;
-    fclose(file);
-
-    return ERR_OK;
-}
-
-// Checks for audio tracks on the CD.
-
-Error CD3DApplication::AudioQuery()
-{
-    MCI_OPEN_PARMS      mciOpenParms;
-    MCI_STATUS_PARMS    mciStatusParms;
-    DWORD               dwReturn;
-    UINT                deviceID;
-    char                device[10];
-
-    // Open the device by specifying the device and filename.
-    // MCI will attempt to choose the MIDI mapper as the output port.
-    memset(&mciOpenParms, 0, sizeof(MCI_OPEN_PARMS));
-    mciOpenParms.lpstrDeviceType = (LPCTSTR)MCI_DEVTYPE_CD_AUDIO;
-    if ( m_CDpath[0] == 0 )
-    {
-        dwReturn = mciSendCommand(NULL,
-                                  MCI_OPEN,
-                                  MCI_OPEN_TYPE|MCI_OPEN_TYPE_ID,
-                                  (DWORD)(LPVOID)&mciOpenParms);
-    }
-    else
-    {
-        device[0] = m_CDpath[0];
-        device[1] = ':';
-        device[2] = 0;
-        mciOpenParms.lpstrElementName = device;
-        dwReturn = mciSendCommand(NULL,
-                                  MCI_OPEN,
-                                  MCI_OPEN_TYPE|MCI_OPEN_TYPE_ID|MCI_OPEN_ELEMENT,
-                                  (DWORD)(LPVOID)&mciOpenParms);
-    }
-    if ( dwReturn != 0 )
-    {
-        return ERR_NOCD;
-    }
-
-    // The device opened successfully; get the device ID.
-    deviceID = mciOpenParms.wDeviceID;
-
-    memset(&mciStatusParms, 0, sizeof(MCI_STATUS_PARMS));
-    mciStatusParms.dwItem = MCI_STATUS_NUMBER_OF_TRACKS;
-    dwReturn = mciSendCommand(deviceID,
-                              MCI_STATUS,
-                              MCI_WAIT|MCI_STATUS_ITEM,
-                              (DWORD)&mciStatusParms);
-    if ( dwReturn != 0 )
-    {
-        mciSendCommand(deviceID, MCI_CLOSE, 0, NULL);
-        return ERR_NOCD;
-    }
-
-    if ( mciStatusParms.dwReturn != AUDIO_TRACK )
-    {
-        mciSendCommand(deviceID, MCI_CLOSE, 0, NULL);
-        return ERR_NOCD;
-    }
-
-    mciSendCommand(deviceID, MCI_CLOSE, 0, NULL);
-    return ERR_OK;
-}
-
-// Checks for the key.
-
-Error CD3DApplication::CheckMistery(char *strCmdLine)
-{
-    if ( strstr(strCmdLine, "-debug") != 0 )
-    {
-        m_bShowStats = true;
-        SetDebugMode(true);
-    }
-
-    if ( strstr(strCmdLine, "-audiostate") != 0 )
-    {
-        m_bAudioState = false;
-    }
-
-    if ( strstr(strCmdLine, "-audiotrack") != 0 )
-    {
-        m_bAudioTrack = false;
-    }
-
-    m_CDpath[0] = 0;
-#if _FULL
-    if ( strstr(strCmdLine, "-nocd") == 0 && !m_bDebugMode )
-    {
-        Error   err;
-
-        err = RegQuery();
-        if ( err != ERR_OK )  return err;
-
-        //?err = AudioQuery();
-        //?if ( err != ERR_OK )  return err;
-    }
-#endif
-#if _SCHOOL & _EDU
-    if ( strstr(strCmdLine, "-nosetup") != 0 )
-    {
-        m_bSetupMode = false;
-    }
-    m_bAudioTrack = false;
-#endif
-#if _SCHOOL & _PERSO
-    Error err = RegQuery();
-    if ( err != ERR_OK )  return err;
-    m_bAudioTrack = false;
-#endif
-#if _SCHOOL & _CEEBOTDEMO
-    m_bAudioTrack = false;
-#endif
-#if _NET
-    m_bAudioTrack = false;
-#endif
-#if _DEMO
-    m_bAudioTrack = false;
-#endif
-
-    return ERR_OK;
-}
-
-
-// Returns the total amount of video memory for textures.
-
-int CD3DApplication::GetVidMemTotal()
-{
-    return m_vidMemTotal;
-}
-
-bool CD3DApplication::IsVideo8MB()
-{
-    if ( m_vidMemTotal == 0 )  return false;
-    return (m_vidMemTotal <= 8388608L);  // 8 Mb or less (2 ^ 23)?
-}
-
-bool CD3DApplication::IsVideo32MB()
-{
-    if ( m_vidMemTotal == 0 )  return false;
-    return (m_vidMemTotal > 16777216L);  // more than 16 Mb (2 ^ 24)?
-}
-
-
-void CD3DApplication::SetShowStat(bool bShow)
-{
-    m_bShowStats = bShow;
-}
-
-bool CD3DApplication::RetShowStat()
-{
-    return m_bShowStats;
-}
-
-
-void CD3DApplication::SetDebugMode(bool bMode)
-{
-    m_bDebugMode = bMode;
-    D3DTextr_SetDebugMode(m_bDebugMode);
-}
-
-bool CD3DApplication::RetDebugMode()
-{
-    return m_bDebugMode;
-}
-
-bool CD3DApplication::RetSetupMode()
-{
-    return m_bSetupMode;
-}
-
-
-
-
-// Son process of time management.
-
-DWORD WINAPI ThreadRoutine(LPVOID)
-{
-    Event   event;
-    float   time;
-    int     ms, start, end, delay;
-
-    ms = (int)(TIME_THREAD*1000.0f);
-    time = 0.0f;
-    while ( true )
-    {
-        start = timeGetTime();
-
-        g_pD3DApp->m_pD3DEngine->FrameMove(TIME_THREAD);
-
-        ZeroMemory(&event, sizeof(Event));
-        event.event = EVENT_FRAME;
-        event.rTime = TIME_THREAD;
-        event.axeX = AxeLimit(g_pD3DApp->m_axeKey.x + g_pD3DApp->m_axeJoy.x);
-        event.axeY = AxeLimit(g_pD3DApp->m_axeKey.y + g_pD3DApp->m_axeJoy.y);
-        event.axeZ = AxeLimit(g_pD3DApp->m_axeKey.z + g_pD3DApp->m_axeJoy.z);
-        event.keyState = g_pD3DApp->m_keyState;
-
-        if ( g_pD3DApp->m_pRobotMain != 0 )
-        {
-            g_pD3DApp->m_pRobotMain->EventProcess(event);
-        }
-
-        end = timeGetTime();
-
-        delay = ms-(end-start);
-        if ( delay > 0 )
-        {
-            Sleep(delay);  // waiting 20ms-used
-        }
-        time += TIME_THREAD;
-    }
-    return 0;
-}
-
-
-// Called during device intialization, this code checks the device
-// for some minimum set of capabilities.
-
-HRESULT CD3DApplication::ConfirmDevice( DDCAPS* pddDriverCaps,
-                                        D3DDEVICEDESC7* pd3dDeviceDesc )
-{
-//? if( pd3dDeviceDesc->wMaxVertexBlendMatrices < 2 )
-//?     return E_FAIL;
-
-    return S_OK;
-}
-
-// Create the application.
-
-HRESULT CD3DApplication::Create( HINSTANCE hInst, TCHAR* strCmdLine )
-{
-    HRESULT hr;
-    char    deviceName[100];
-    char    modeName[100];
-    int     iValue;
-    DWORD   style;
-    bool    bFull, b3D;
-
-    m_instance = hInst;
-
-    InitCurrentDirectory();
-
-    // Enumerate available D3D devices. The callback is used so the app can
-    // confirm/reject each enumerated device depending on its capabilities.
-    if( FAILED( hr = D3DEnum_EnumerateDevices( m_fnConfirmDevice ) ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        return hr;
-    }
-
-    if( FAILED( hr = D3DEnum_SelectDefaultDevice( &m_pDeviceInfo ) ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        return hr;
-    }
-
-    if ( !m_bDebugMode )
-    {
-        m_pDeviceInfo->bWindowed = false;  // full screen
-    }
-    if ( GetProfileInt("Device", "FullScreen", bFull) )
-    {
-        m_pDeviceInfo->bWindowed = !bFull;
-    }
-    m_pDeviceInfo->bWindowed = true;
-
-    // Create the 3D engine.
-    if( (m_pD3DEngine = new CD3DEngine(m_iMan, this)) == NULL )
-    {
-        DisplayFrameworkError( D3DENUMERR_ENGINE, MSGERR_APPMUSTEXIT );
-        return E_OUTOFMEMORY;
-    }
-    SetEngine(m_pD3DEngine);
-
-    // Initialize the app's custom scene stuff
-    if( FAILED( hr = m_pD3DEngine->OneTimeSceneInit() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        return hr;
-    }
-
-    // Create a new CD3DFramework class. This class does all of our D3D
-    // initialization and manages the common D3D objects.
-    if( (m_pFramework = new CD3DFramework7()) == NULL )
-    {
-        DisplayFrameworkError( E_OUTOFMEMORY, MSGERR_APPMUSTEXIT );
-        return E_OUTOFMEMORY;
-    }
-
-    // Create the sound instance.
-    if( (m_pSound = new CSound(m_iMan)) == NULL )
-    {
-        DisplayFrameworkError( D3DENUMERR_SOUND, MSGERR_APPMUSTEXIT );
-        return E_OUTOFMEMORY;
-    }
-
-    // Create the robot application.
-    if( (m_pRobotMain = new CRobotMain(m_iMan)) == NULL )
-    {
-        DisplayFrameworkError( D3DENUMERR_ROBOT, MSGERR_APPMUSTEXIT );
-        return E_OUTOFMEMORY;
-    }
-
-    // Register the window class
-    WNDCLASS wndClass = { 0, WndProc, 0, 0, hInst,
-                          LoadIcon( hInst, MAKEINTRESOURCE(IDI_MAIN_ICON) ),
-                          LoadCursor( NULL, IDC_ARROW ),
-                          (HBRUSH)GetStockObject(WHITE_BRUSH),
-                          NULL, _T("D3D Window") };
-    RegisterClass( &wndClass );
-
-    // Create the render window
-    style = WS_CAPTION|WS_VISIBLE;
-    if ( m_bDebugMode )  style |= WS_SYSMENU;  // close box
-    m_hWnd = CreateWindow( _T("D3D Window"), m_strWindowTitle,
-//?                        WS_OVERLAPPEDWINDOW|WS_VISIBLE,
-                           style, CW_USEDEFAULT, CW_USEDEFAULT,
-                           WINDOW_DX, WINDOW_DY, 0L,
-//?                        LoadMenu( hInst, MAKEINTRESOURCE(IDR_MENU) ),
-                           NULL,
-                           hInst, 0L );
-    UpdateWindow( m_hWnd );
-
-    if ( !GetProfileInt("Setup", "Sound3D", b3D) )
-    {
-        b3D = true;
-    }
-    m_pSound->SetDebugMode(m_bDebugMode);
-    m_pSound->Create(m_hWnd, b3D);
-    m_pSound->CacheAll();
-    m_pSound->SetState(m_bAudioState);
-    m_pSound->SetAudioTrack(m_bAudioTrack);
-    m_pSound->SetCDpath(m_CDpath);
-
-    // Initialize the 3D environment for the app
-    if( FAILED( hr = Initialize3DEnvironment() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        Cleanup3DEnvironment();
-        return E_FAIL;
-    }
-
-    // Change the display device driver.
-    GetProfileString("Device", "Name", deviceName, 100);
-    GetProfileString("Device", "Mode", modeName, 100);
-    GetProfileInt("Device", "FullScreen", bFull);
-    if ( deviceName[0] != 0 && modeName[0] != 0 && bFull )
-    {
-        ChangeDevice(deviceName, modeName, bFull);
-    }
-
-    // First execution?
-    if ( !GetProfileInt("Setup", "ObjectDirty", iValue) )
-    {
-        m_pD3DEngine->FirstExecuteAdapt(true);
-    }
-
-    // Creates the file colobot.ini at the first execution.
-    m_pRobotMain->CreateIni();
-
-#if _DEMO
-    m_pRobotMain->ChangePhase(PHASE_NAME);
-#else
-#if _NET | _SCHOOL
-    m_pRobotMain->ChangePhase(PHASE_WELCOME2);
-#else
-#if _FRENCH
-    m_pRobotMain->ChangePhase(PHASE_WELCOME2);
-#endif
-#if _ENGLISH
-    m_pRobotMain->ChangePhase(PHASE_WELCOME2);
-#endif
-#if _GERMAN
-    m_pRobotMain->ChangePhase(PHASE_WELCOME2);
-#endif
-#if _WG
-    m_pRobotMain->ChangePhase(PHASE_WELCOME1);
-#endif
-#if _POLISH
-    m_pRobotMain->ChangePhase(PHASE_WELCOME1);
-#endif
-#endif
-#endif
-    m_pD3DEngine->TimeInit();
-
-#if USE_THREAD
-    m_thread = CreateThread(NULL, 0, ThreadRoutine, this, 0, &m_threadId);
-    SetThreadPriority(m_thread, THREAD_PRIORITY_ABOVE_NORMAL);
-#endif
-
-    // The app is ready to go
-    m_bReady = true;
-
-    return S_OK;
-}
-
-
-// Message-processing loop. Idle time is used to render the scene.
-
-INT CD3DApplication::Run()
-{
-    // Load keyboard accelerators
-    HACCEL hAccel = LoadAccelerators( NULL, MAKEINTRESOURCE(IDR_MAIN_ACCEL) );
-
-    // Now we're ready to recieve and process Windows messages.
-    bool bGotMsg;
-    MSG  msg;
-    PeekMessage( &msg, NULL, 0U, 0U, PM_NOREMOVE );
-
-    while( WM_QUIT != msg.message  )
-    {
-        // Use PeekMessage() if the app is active, so we can use idle time to
-        // render the scene. Else, use GetMessage() to avoid eating CPU time.
-        if( m_bActive )
-            bGotMsg = PeekMessage( &msg, NULL, 0U, 0U, PM_REMOVE );
-        else
-            bGotMsg = GetMessage( &msg, NULL, 0U, 0U );
-
-        if( bGotMsg )
-        {
-            // Translate and dispatch the message
-            if( TranslateAccelerator( m_hWnd, hAccel, &msg ) == 0 )
-            {
-                TranslateMessage( &msg );
-                DispatchMessage( &msg );
-            }
-        }
-        else
-        {
-            // Render a frame during idle time (no messages are waiting)
-            if( m_bActive && m_bReady )
-            {
-                Event   event;
-
-                while ( m_event->GetEvent(event) )
-                {
-                    if ( event.event == EVENT_QUIT )
-                    {
-//?                     SendMessage( m_hWnd, WM_CLOSE, 0, 0 );
-                        m_pSound->StopMusic();
-                        Cleanup3DEnvironment();
-                        PostQuitMessage(0);
-                        return msg.wParam;
-                    }
-                    m_pRobotMain->EventProcess(event);
-                }
-
-                if ( !RetNiceMouse() )
-                {
-                    SetMouseType(m_pD3DEngine->RetMouseType());
-                }
-
-                if( FAILED( Render3DEnvironment() ) )
-                    DestroyWindow( m_hWnd );
-            }
-        }
-    }
-
-    return msg.wParam;
-}
-
-
-
-// Conversion of the position of the mouse.
-// x: 0=left, 1=right
-// y: 0=down, 1=up
-
-Math::Point CD3DApplication::ConvPosToInterface(HWND hWnd, LPARAM lParam)
-{
-    POINT   cpos;
-    Math::Point pos;
-    float   px, py, w, h;
-
-    cpos.x = (short)LOWORD(lParam);
-    cpos.y = (short)HIWORD(lParam);
-
-    if ( !m_pDeviceInfo->bWindowed )
-    {
-        ClientToScreen(hWnd, &cpos);
-    }
-
-    px = (float)cpos.x;
-    py = (float)cpos.y;
-    w  = (float)m_ddsdRenderTarget.dwWidth;
-    h  = (float)m_ddsdRenderTarget.dwHeight;
-
-    pos.x = px/w;
-    pos.y = 1.0f-py/h;
-
-    return pos;
-}
-
-// Physically moves the mouse.
-
-void CD3DApplication::SetMousePos(Math::Point pos)
-{
-    POINT   p;
-
-    pos.y = 1.0f-pos.y;
-
-    pos.x *= m_ddsdRenderTarget.dwWidth;
-    pos.y *= m_ddsdRenderTarget.dwHeight;
-
-    p.x = (int)pos.x;
-    p.y = (int)pos.y;
-    ClientToScreen(m_hWnd, &p);
-
-    SetCursorPos(p.x, p.y);
-}
-
-// Choosing the type of cursor for the mouse.
-
-void CD3DApplication::SetMouseType(D3DMouse type)
-{
-    HCURSOR     hc;
-
-    if ( type == D3DMOUSEHAND )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORHAND));
-    }
-    else if ( type == D3DMOUSECROSS )
-    {
-        hc = LoadCursor(NULL, IDC_CROSS);
-    }
-    else if ( type == D3DMOUSEEDIT )
-    {
-        hc = LoadCursor(NULL, IDC_IBEAM);
-    }
-    else if ( type == D3DMOUSENO )
-    {
-        hc = LoadCursor(NULL, IDC_NO);
-    }
-    else if ( type == D3DMOUSEMOVE )
-    {
-        hc = LoadCursor(NULL, IDC_SIZEALL);
-    }
-    else if ( type == D3DMOUSEMOVEH )
-    {
-        hc = LoadCursor(NULL, IDC_SIZEWE);
-    }
-    else if ( type == D3DMOUSEMOVEV )
-    {
-        hc = LoadCursor(NULL, IDC_SIZENS);
-    }
-    else if ( type == D3DMOUSEMOVED )
-    {
-        hc = LoadCursor(NULL, IDC_SIZENESW);
-    }
-    else if ( type == D3DMOUSEMOVEI )
-    {
-        hc = LoadCursor(NULL, IDC_SIZENWSE);
-    }
-    else if ( type == D3DMOUSEWAIT )
-    {
-        hc = LoadCursor(NULL, IDC_WAIT);
-    }
-    else if ( type == D3DMOUSESCROLLL )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORSCROLLL));
-    }
-    else if ( type == D3DMOUSESCROLLR )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORSCROLLR));
-    }
-    else if ( type == D3DMOUSESCROLLU )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORSCROLLU));
-    }
-    else if ( type == D3DMOUSESCROLLD )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORSCROLLD));
-    }
-    else if ( type == D3DMOUSETARGET )
-    {
-        hc = LoadCursor(m_instance, MAKEINTRESOURCE(IDC_CURSORTARGET));
-    }
-    else
-    {
-        hc = LoadCursor(NULL, IDC_ARROW);
-    }
-
-    if ( hc != NULL )
-    {
-        SetCursor(hc);
-    }
-}
-
-// Choice of mode for the mouse.
-
-void CD3DApplication::SetNiceMouse(bool bNice)
-{
-    if ( bNice == m_bNiceMouse )  return;
-    m_bNiceMouse = bNice;
-
-    if ( m_bNiceMouse )
-    {
-        ShowCursor(false);  // hides the ugly windows mouse
-        SetCursor(NULL);
-    }
-    else
-    {
-        ShowCursor(true);  // shows the ugly windows mouse
-        SetCursor(LoadCursor(NULL, IDC_ARROW));
-    }
-}
-
-// Whether to use the mouse pretty shaded.
-
-bool CD3DApplication::RetNiceMouse()
-{
-    if (  m_pDeviceInfo->bWindowed )  return false;
-    if ( !m_pDeviceInfo->bHardware )  return false;
-
-    return m_bNiceMouse;
-}
-
-// Indicates whether it is possible to use the mouse pretty shaded.
-
-bool CD3DApplication::RetNiceMouseCap()
-{
-    if (  m_pDeviceInfo->bWindowed )  return false;
-    if ( !m_pDeviceInfo->bHardware )  return false;
-
-    return true;
-}
-
-
-// Static msg handler which passes messages to the application class.
-
-LRESULT CALLBACK WndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
-{
-    if ( g_pD3DApp != 0 )
-    {
-        Event   event;
-        short   move;
-
-        ZeroMemory(&event, sizeof(Event));
-
-#if 0
-        if ( uMsg == WM_KEYDOWN ||
-             uMsg == WM_CHAR ||
-             uMsg == WM_XBUTTONDOWN ||
-             uMsg == WM_XBUTTONUP )
-        {
-            char s[100];
-            sprintf(s, "event: %d %d %d\n", uMsg, wParam, lParam);
-            OutputDebugString(s);
-        }
-#endif
-
-        if ( uMsg == WM_LBUTTONDOWN )  event.event = EVENT_LBUTTONDOWN;
-        if ( uMsg == WM_RBUTTONDOWN )  event.event = EVENT_RBUTTONDOWN;
-        if ( uMsg == WM_LBUTTONUP   )  event.event = EVENT_LBUTTONUP;
-        if ( uMsg == WM_RBUTTONUP   )  event.event = EVENT_RBUTTONUP;
-        if ( uMsg == WM_MOUSEMOVE   )  event.event = EVENT_MOUSEMOVE;
-        if ( uMsg == WM_KEYDOWN     )  event.event = EVENT_KEYDOWN;
-        if ( uMsg == WM_KEYUP       )  event.event = EVENT_KEYUP;
-        if ( uMsg == WM_CHAR        )  event.event = EVENT_CHAR;
-
-        if ( uMsg == WM_XBUTTONUP )
-        {
-            if ( (wParam>>16) == XBUTTON1 )  event.event = EVENT_HYPER_PREV;
-            if ( (wParam>>16) == XBUTTON2 )  event.event = EVENT_HYPER_NEXT;
-        }
-
-        event.param = wParam;
-        event.axeX = AxeLimit(g_pD3DApp->m_axeKey.x + g_pD3DApp->m_axeJoy.x);
-        event.axeY = AxeLimit(g_pD3DApp->m_axeKey.y + g_pD3DApp->m_axeJoy.y);
-        event.axeZ = AxeLimit(g_pD3DApp->m_axeKey.z + g_pD3DApp->m_axeJoy.z);
-        event.keyState = g_pD3DApp->m_keyState;
-
-        if ( uMsg == WM_LBUTTONDOWN ||
-             uMsg == WM_RBUTTONDOWN ||
-             uMsg == WM_LBUTTONUP   ||
-             uMsg == WM_RBUTTONUP   ||
-             uMsg == WM_MOUSEMOVE   )  // mouse event?
-        {
-            event.pos = g_pD3DApp->ConvPosToInterface(hWnd, lParam);
-            g_pD3DApp->m_mousePos = event.pos;
-            g_pD3DApp->m_pD3DEngine->SetMousePos(event.pos);
-        }
-
-        if ( uMsg == WM_MOUSEWHEEL )  // mouse wheel?
-        {
-            event.event = EVENT_KEYDOWN;
-            event.pos = g_pD3DApp->m_mousePos;
-            move = HIWORD(wParam);
-            if ( move/WHEEL_DELTA > 0 )  event.param = VK_WHEELUP;
-            if ( move/WHEEL_DELTA < 0 )  event.param = VK_WHEELDOWN;
-        }
-        if ( g_pD3DApp->m_mshMouseWheel != 0 &&
-             uMsg == g_pD3DApp->m_mshMouseWheel )  // Logitech mouse wheel?
-        {
-            event.event = EVENT_KEYDOWN;
-            event.pos = g_pD3DApp->m_mousePos;
-            move = LOWORD(wParam);
-            if ( move/WHEEL_DELTA > 0 )  event.param = VK_WHEELUP;
-            if ( move/WHEEL_DELTA < 0 )  event.param = VK_WHEELDOWN;
-        }
-
-        if ( event.event == EVENT_KEYDOWN ||
-             event.event == EVENT_KEYUP   ||
-             event.event == EVENT_CHAR    )
-        {
-            if ( event.param == 0 )
-            {
-                event.event = EVENT_NULL;
-            }
-        }
-
-        if ( g_pD3DApp->m_pRobotMain != 0 && event.event != 0 )
-        {
-            g_pD3DApp->m_pRobotMain->EventProcess(event);
-//?         if ( !g_pD3DApp->RetNiceMouse() )
-//?         {
-//?             g_pD3DApp->SetMouseType(g_pD3DApp->m_pD3DEngine->RetMouseType());
-//?         }
-        }
-        if ( g_pD3DApp->m_pD3DEngine != 0 )
-        {
-            g_pD3DApp->m_pD3DEngine->MsgProc( hWnd, uMsg, wParam, lParam );
-        }
-        return g_pD3DApp->MsgProc( hWnd, uMsg, wParam, lParam );
-    }
-
-    return DefWindowProc( hWnd, uMsg, wParam, lParam );
-}
-
-
-// Minimal message proc function for the about box.
-
-BOOL CALLBACK AboutProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM )
-{
-    if( WM_COMMAND == uMsg )
-        if( IDOK == LOWORD(wParam) || IDCANCEL == LOWORD(wParam) )
-            EndDialog( hWnd, TRUE );
-
-    return WM_INITDIALOG == uMsg ? TRUE : FALSE;
-}
-
-
-
-// Ignore keypresses.
-
-void CD3DApplication::FlushPressKey()
-{
-    m_keyState = 0;
-    m_axeKey = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_axeJoy = Math::Vector(0.0f, 0.0f, 0.0f);
-}
-
-// Resets the default keys.
-
-void CD3DApplication::ResetKey()
-{
-    int     i;
-
-    for ( i=0 ; i<50 ; i++ )
-    {
-        m_key[i][0] = 0;
-        m_key[i][1] = 0;
-    }
-    m_key[KEYRANK_LEFT   ][0] = VK_LEFT;
-    m_key[KEYRANK_RIGHT  ][0] = VK_RIGHT;
-    m_key[KEYRANK_UP     ][0] = VK_UP;
-    m_key[KEYRANK_DOWN   ][0] = VK_DOWN;
-    m_key[KEYRANK_GUP    ][0] = VK_SHIFT;
-    m_key[KEYRANK_GDOWN  ][0] = VK_CONTROL;
-    m_key[KEYRANK_CAMERA ][0] = VK_SPACE;
-    m_key[KEYRANK_CAMERA ][1] = VK_BUTTON2;
-    m_key[KEYRANK_DESEL  ][0] = VK_NUMPAD0;
-    m_key[KEYRANK_DESEL  ][1] = VK_BUTTON6;
-    m_key[KEYRANK_ACTION ][0] = VK_RETURN;
-    m_key[KEYRANK_ACTION ][1] = VK_BUTTON1;
-    m_key[KEYRANK_NEAR   ][0] = VK_ADD;
-    m_key[KEYRANK_NEAR   ][1] = VK_BUTTON5;
-    m_key[KEYRANK_AWAY   ][0] = VK_SUBTRACT;
-    m_key[KEYRANK_AWAY   ][1] = VK_BUTTON4;
-    m_key[KEYRANK_NEXT   ][0] = VK_TAB;
-    m_key[KEYRANK_NEXT   ][1] = VK_BUTTON3;
-    m_key[KEYRANK_HUMAN  ][0] = VK_HOME;
-    m_key[KEYRANK_HUMAN  ][1] = VK_BUTTON7;
-    m_key[KEYRANK_QUIT   ][0] = VK_ESCAPE;
-    m_key[KEYRANK_HELP   ][0] = VK_F1;
-    m_key[KEYRANK_PROG   ][0] = VK_F2;
-    m_key[KEYRANK_CBOT   ][0] = VK_F3;
-    m_key[KEYRANK_VISIT  ][0] = VK_DECIMAL;
-    m_key[KEYRANK_SPEED10][0] = VK_F4;
-    m_key[KEYRANK_SPEED15][0] = VK_F5;
-    m_key[KEYRANK_SPEED20][0] = VK_F6;
-//  m_key[KEYRANK_SPEED30][0] = VK_F7;
-}
-
-// Modifies a button.
-
-void CD3DApplication::SetKey(int keyRank, int option, int key)
-{
-    if ( keyRank <  0  ||
-         keyRank >= 50 )  return;
-
-    if ( option <  0 ||
-         option >= 2 )  return;
-
-    m_key[keyRank][option] = key;
-}
-
-// Gives a hint.
-
-int CD3DApplication::RetKey(int keyRank, int option)
-{
-    if ( keyRank <  0  ||
-         keyRank >= 50 )  return 0;
-
-    if ( option <  0 ||
-         option >= 2 )  return 0;
-
-    return m_key[keyRank][option];
-}
-
-
-
-// Use the joystick or keyboard.
-
-void CD3DApplication::SetJoystick(bool bEnable)
-{
-    m_bJoystick = bEnable;
-
-    if ( m_bJoystick )  // joystick ?
-    {
-        if ( !InitDirectInput(m_instance, m_hWnd) )  // initialise joystick
-        {
-            m_bJoystick = false;
-        }
-        else
-        {
-            SetAcquire(true);
-            SetTimer(m_hWnd, 0, 1000/30, NULL);
-        }
-    }
-    else    // keyboard?
-    {
-        KillTimer(m_hWnd, 0);
-        SetAcquire(false);
-        FreeDirectInput();
-    }
-}
-
-bool CD3DApplication::RetJoystick()
-{
-    return m_bJoystick;
-}
-
-
-// Message handling function.
-
-LRESULT CD3DApplication::MsgProc( HWND hWnd, UINT uMsg, WPARAM wParam,
-                                  LPARAM lParam )
-{
-    HRESULT     hr;
-    DIJOYSTATE  js;
-    int         i;
-
-    // The F10 key sends another message to activate
-    // menu in standard Windows applications!
-    if ( uMsg == WM_SYSKEYDOWN && wParam == VK_F10 )
-    {
-        uMsg = WM_KEYDOWN;
-    }
-    if ( uMsg == WM_SYSKEYUP && wParam == VK_F10 )
-    {
-        uMsg = WM_KEYUP;
-    }
-
-    // Mange event "menu" sent by Alt or F10.
-    if ( uMsg == WM_SYSCOMMAND && wParam == SC_KEYMENU )
-    {
-        return 0;
-    }
-
-    if ( uMsg == WM_KEYDOWN || uMsg == WM_KEYUP )
-    {
-        if ( GetKeyState(VK_SHIFT) & 0x8000 )
-        {
-            m_keyState |= KS_SHIFT;
-        }
-        else
-        {
-            m_keyState &= ~KS_SHIFT;
-        }
-
-        if ( GetKeyState(VK_CONTROL) & 0x8000 )
-        {
-            m_keyState |= KS_CONTROL;
-        }
-        else
-        {
-            m_keyState &= ~KS_CONTROL;
-        }
-    }
-
-    switch( uMsg )
-    {
-        case WM_KEYDOWN:
-            if ( wParam == m_key[KEYRANK_UP   ][0] )  m_axeKey.y =  1.0f;
-            if ( wParam == m_key[KEYRANK_UP   ][1] )  m_axeKey.y =  1.0f;
-            if ( wParam == m_key[KEYRANK_DOWN ][0] )  m_axeKey.y = -1.0f;
-            if ( wParam == m_key[KEYRANK_DOWN ][1] )  m_axeKey.y = -1.0f;
-            if ( wParam == m_key[KEYRANK_LEFT ][0] )  m_axeKey.x = -1.0f;
-            if ( wParam == m_key[KEYRANK_LEFT ][1] )  m_axeKey.x = -1.0f;
-            if ( wParam == m_key[KEYRANK_RIGHT][0] )  m_axeKey.x =  1.0f;
-            if ( wParam == m_key[KEYRANK_RIGHT][1] )  m_axeKey.x =  1.0f;
-            if ( wParam == m_key[KEYRANK_GUP  ][0] )  m_axeKey.z =  1.0f;
-            if ( wParam == m_key[KEYRANK_GUP  ][1] )  m_axeKey.z =  1.0f;
-            if ( wParam == m_key[KEYRANK_GDOWN][0] )  m_axeKey.z = -1.0f;
-            if ( wParam == m_key[KEYRANK_GDOWN][1] )  m_axeKey.z = -1.0f;
-            if ( wParam == m_key[KEYRANK_NEAR ][0] )  m_keyState |= KS_NUMPLUS;
-            if ( wParam == m_key[KEYRANK_NEAR ][1] )  m_keyState |= KS_NUMPLUS;
-            if ( wParam == m_key[KEYRANK_AWAY ][0] )  m_keyState |= KS_NUMMINUS;
-            if ( wParam == m_key[KEYRANK_AWAY ][1] )  m_keyState |= KS_NUMMINUS;
-            if ( wParam == VK_PRIOR                )  m_keyState |= KS_PAGEUP;
-            if ( wParam == VK_NEXT                 )  m_keyState |= KS_PAGEDOWN;
-//?         if ( wParam == VK_SHIFT                )  m_keyState |= KS_SHIFT;
-//?         if ( wParam == VK_CONTROL              )  m_keyState |= KS_CONTROL;
-            if ( wParam == VK_NUMPAD8              )  m_keyState |= KS_NUMUP;
-            if ( wParam == VK_NUMPAD2              )  m_keyState |= KS_NUMDOWN;
-            if ( wParam == VK_NUMPAD4              )  m_keyState |= KS_NUMLEFT;
-            if ( wParam == VK_NUMPAD6              )  m_keyState |= KS_NUMRIGHT;
-            break;
-
-        case WM_KEYUP:
-            if ( wParam == m_key[KEYRANK_UP   ][0] )  m_axeKey.y = 0.0f;
-            if ( wParam == m_key[KEYRANK_UP   ][1] )  m_axeKey.y = 0.0f;
-            if ( wParam == m_key[KEYRANK_DOWN ][0] )  m_axeKey.y = 0.0f;
-            if ( wParam == m_key[KEYRANK_DOWN ][1] )  m_axeKey.y = 0.0f;
-            if ( wParam == m_key[KEYRANK_LEFT ][0] )  m_axeKey.x = 0.0f;
-            if ( wParam == m_key[KEYRANK_LEFT ][1] )  m_axeKey.x = 0.0f;
-            if ( wParam == m_key[KEYRANK_RIGHT][0] )  m_axeKey.x = 0.0f;
-            if ( wParam == m_key[KEYRANK_RIGHT][1] )  m_axeKey.x = 0.0f;
-            if ( wParam == m_key[KEYRANK_GUP  ][0] )  m_axeKey.z = 0.0f;
-            if ( wParam == m_key[KEYRANK_GUP  ][1] )  m_axeKey.z = 0.0f;
-            if ( wParam == m_key[KEYRANK_GDOWN][0] )  m_axeKey.z = 0.0f;
-            if ( wParam == m_key[KEYRANK_GDOWN][1] )  m_axeKey.z = 0.0f;
-            if ( wParam == m_key[KEYRANK_NEAR ][0] )  m_keyState &= ~KS_NUMPLUS;
-            if ( wParam == m_key[KEYRANK_NEAR ][1] )  m_keyState &= ~KS_NUMPLUS;
-            if ( wParam == m_key[KEYRANK_AWAY ][0] )  m_keyState &= ~KS_NUMMINUS;
-            if ( wParam == m_key[KEYRANK_AWAY ][1] )  m_keyState &= ~KS_NUMMINUS;
-            if ( wParam == VK_PRIOR                )  m_keyState &= ~KS_PAGEUP;
-            if ( wParam == VK_NEXT                 )  m_keyState &= ~KS_PAGEDOWN;
-//?         if ( wParam == VK_SHIFT                )  m_keyState &= ~KS_SHIFT;
-//?         if ( wParam == VK_CONTROL              )  m_keyState &= ~KS_CONTROL;
-            if ( wParam == VK_NUMPAD8              )  m_keyState &= ~KS_NUMUP;
-            if ( wParam == VK_NUMPAD2              )  m_keyState &= ~KS_NUMDOWN;
-            if ( wParam == VK_NUMPAD4              )  m_keyState &= ~KS_NUMLEFT;
-            if ( wParam == VK_NUMPAD6              )  m_keyState &= ~KS_NUMRIGHT;
-            break;
-
-        case WM_LBUTTONDOWN:
-            m_keyState |= KS_MLEFT;
-            break;
-
-        case WM_RBUTTONDOWN:
-            m_keyState |= KS_MRIGHT;
-            break;
-
-        case WM_LBUTTONUP:
-            m_keyState &= ~KS_MLEFT;
-            break;
-
-        case WM_RBUTTONUP:
-            m_keyState &= ~KS_MRIGHT;
-            break;
-
-        case WM_PAINT:
-            // Handle paint messages when the app is not ready
-            if( m_pFramework && !m_bReady )
-            {
-                if( m_pDeviceInfo->bWindowed )
-                    m_pFramework->ShowFrame();
-                else
-                    m_pFramework->FlipToGDISurface( true );
-            }
-            break;
-
-        case WM_MOVE:
-            // If in windowed mode, move the Framework's window
-            if( m_pFramework && m_bActive && m_bReady && m_pDeviceInfo->bWindowed )
-                m_pFramework->Move( (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam) );
-            break;
-
-        case WM_SIZE:
-            // Check to see if we are losing our window...
-            if( SIZE_MAXHIDE==wParam || SIZE_MINIMIZED==wParam )
-            {
-                m_bActive = false;
-            }
-            else
-            {
-                m_bActive = true;
-            }
-//?         char s[100];
-//?         sprintf(s, "WM_SIZE %d %d %d\n", m_bActive, m_bReady, m_pDeviceInfo->bWindowed);
-//?         OutputDebugString(s);
-
-            // A new window size will require a new backbuffer
-            // size, so the 3D structures must be changed accordingly.
-            if( m_bActive && m_bReady && m_pDeviceInfo->bWindowed )
-            {
-                m_bReady = false;
-
-//?             OutputDebugString("WM_SIZE Change3DEnvironment\n");
-                if( FAILED( hr = Change3DEnvironment() ) )
-                    return 0;
-
-                m_bReady = true;
-            }
-            break;
-
-        case WM_TIMER:
-            if ( m_bActivateApp && m_bJoystick )
-            {
-                if ( UpdateInputState(js) )
-                {
-                    m_axeJoy.x =  js.lX/1000.0f+js.lRz/1000.0f;  // tourner
-                    m_axeJoy.y = -js.lY/1000.0f;  // avancer
-                    m_axeJoy.z = -js.rglSlider[0]/1000.0f;  // monter
-
-                    m_axeJoy.x = Math::Neutral(m_axeJoy.x, 0.2f);
-                    m_axeJoy.y = Math::Neutral(m_axeJoy.y, 0.2f);
-                    m_axeJoy.z = Math::Neutral(m_axeJoy.z, 0.2f);
-
-//?                 char s[100];
-//?                 sprintf(s, "x=%d y=%d z=%  x=%d y=%d z=%d\n", js.lX,js.lY,js.lZ,js.lRx,js.lRy,js.lRz);
-//?                 OutputDebugString(s);
-
-                    for ( i=0 ; i<32 ; i++ )
-                    {
-                        if ( js.rgbButtons[i] != 0 && !m_bJoyButton[i] )
-                        {
-                            m_bJoyButton[i] = true;
-                            PostMessage(m_hWnd, WM_KEYDOWN, VK_BUTTON1+i, 0);
-                        }
-                        if ( js.rgbButtons[i] == 0 && m_bJoyButton[i] )
-                        {
-                            m_bJoyButton[i] = false;
-                            PostMessage(m_hWnd, WM_KEYUP, VK_BUTTON1+i, 0);
-                        }
-                    }
-                }
-                else
-                {
-                    OutputDebugString("UpdateInputState error\n");
-                }
-            }
-            break;
-
-        case WM_ACTIVATE:
-            if( LOWORD(wParam) == WA_INACTIVE )
-            {
-                m_bActivateApp = false;
-            }
-            else
-            {
-                m_bActivateApp = true;
-            }
-
-            if ( m_bActivateApp && m_bJoystick )
-            {
-                SetAcquire(true);  // re-enables the joystick
-            }
-            break;
-
-        case MM_MCINOTIFY:
-            if ( wParam == MCI_NOTIFY_SUCCESSFUL )
-            {
-                OutputDebugString("Event MM_MCINOTIFY\n");
-                m_pSound->SuspendMusic();
-                m_pSound->RestartMusic();
-            }
-            break;
-
-        case WM_SETCURSOR:
-            // Prevent a cursor in fullscreen mode
-            if( m_bActive && m_bReady && !m_pDeviceInfo->bWindowed )
-            {
-//?             SetCursor(NULL);
-                return 1;
-            }
-            break;
-
-        case WM_ENTERMENULOOP:
-            // Pause the app when menus are displayed
-            Pause(true);
-            break;
-        case WM_EXITMENULOOP:
-            Pause(false);
-            break;
-
-        case WM_ENTERSIZEMOVE:
-            // Halt frame movement while the app is sizing or moving
-            m_pD3DEngine->TimeEnterGel();
-            break;
-        case WM_EXITSIZEMOVE:
-            m_pD3DEngine->TimeExitGel();
-            break;
-
-        case WM_NCHITTEST:
-            // Prevent the user from selecting the menu in fullscreen mode
-            if( !m_pDeviceInfo->bWindowed )
-                return HTCLIENT;
-
-            break;
-
-        case WM_POWERBROADCAST:
-            switch( wParam )
-            {
-                case PBT_APMQUERYSUSPEND:
-                    // At this point, the app should save any data for open
-                    // network connections, files, etc.., and prepare to go into
-                    // a suspended mode.
-                    return OnQuerySuspend( (DWORD)lParam );
-
-                case PBT_APMRESUMESUSPEND:
-                    // At this point, the app should recover any data, network
-                    // connections, files, etc.., and resume running from when
-                    // the app was suspended.
-                    return OnResumeSuspend( (DWORD)lParam );
-            }
-            break;
-
-        case WM_SYSCOMMAND:
-            // Prevent moving/sizing and power loss in fullscreen mode
-            switch( wParam )
-            {
-                case SC_MOVE:
-                case SC_SIZE:
-                case SC_MAXIMIZE:
-                case SC_MONITORPOWER:
-                    if( false == m_pDeviceInfo->bWindowed )
-                        return 1;
-                    break;
-            }
-            break;
-
-        case WM_COMMAND:
-            switch( LOWORD(wParam) )
-            {
-                case IDM_CHANGEDEVICE:
-                    // Display the device-selection dialog box.
-                    if( m_bActive && m_bReady )
-                    {
-                        Pause(true);
-
-                        if( SUCCEEDED( D3DEnum_UserChangeDevice( &m_pDeviceInfo ) ) )
-                        {
-                            if( FAILED( hr = Change3DEnvironment() ) )
-                                return 0;
-                        }
-                        Pause(false);
-                    }
-                    return 0;
-
-                case IDM_ABOUT:
-                    // Display the About box
-                    Pause(true);
-                    DialogBox( (HINSTANCE)GetWindowLong( hWnd, GWL_HINSTANCE ),
-                               MAKEINTRESOURCE(IDD_ABOUT), hWnd, AboutProc );
-                    Pause(false);
-                    return 0;
-
-                case IDM_EXIT:
-                    // Recieved key/menu command to exit app
-                    SendMessage( hWnd, WM_CLOSE, 0, 0 );
-                    return 0;
-            }
-            break;
-
-        case WM_GETMINMAXINFO:
-            ((MINMAXINFO*)lParam)->ptMinTrackSize.x = 100;
-            ((MINMAXINFO*)lParam)->ptMinTrackSize.y = 100;
-            break;
-
-        case WM_CLOSE:
-            DestroyWindow( hWnd );
-            return 0;
-
-        case WM_DESTROY:
-            Cleanup3DEnvironment();
-            PostQuitMessage(0);
-            return 0;
-    }
-
-    return DefWindowProc( hWnd, uMsg, wParam, lParam );
-}
-
-
-// Enumeration function to report valid pixel formats for z-buffers.
-
-HRESULT WINAPI EnumZBufferFormatsCallback(DDPIXELFORMAT* pddpf,
-                                          VOID* pContext)
-{
-    DDPIXELFORMAT* pddpfOut = (DDPIXELFORMAT*)pContext;
-
-    char s[100];
-    sprintf(s, "EnumZBufferFormatsCallback %d\n", pddpf->dwRGBBitCount);
-    OutputDebugString(s);
-
-    if( pddpfOut->dwRGBBitCount == pddpf->dwRGBBitCount )
-    {
-        (*pddpfOut) = (*pddpf);
-        return D3DENUMRET_CANCEL;
-    }
-
-    return D3DENUMRET_OK;
-}
-
-// Internal function called by Create() to make and attach a zbuffer
-// to the renderer.
-
-HRESULT CD3DApplication::CreateZBuffer(GUID* pDeviceGUID)
-{
-    HRESULT hr;
-
-    // Check if the device supports z-bufferless hidden surface removal. If so,
-    // we don't really need a z-buffer
-    D3DDEVICEDESC7 ddDesc;
-    m_pD3DDevice->GetCaps( &ddDesc );
-    if( ddDesc.dpcTriCaps.dwRasterCaps & D3DPRASTERCAPS_ZBUFFERLESSHSR )
-        return S_OK;
-
-    // Get z-buffer dimensions from the render target
-    DDSURFACEDESC2 ddsd;
-    ddsd.dwSize = sizeof(ddsd);
-    m_pddsRenderTarget->GetSurfaceDesc( &ddsd );
-
-    // Setup the surface desc for the z-buffer.
-    ddsd.dwFlags        = DDSD_WIDTH | DDSD_HEIGHT | DDSD_CAPS | DDSD_PIXELFORMAT;
-    ddsd.ddsCaps.dwCaps = DDSCAPS_ZBUFFER | DDSCAPS_VIDEOMEMORY;
-    ddsd.ddpfPixelFormat.dwSize = 0;  // Tag the pixel format as unitialized
-
-    // Get an appropiate pixel format from enumeration of the formats. On the
-    // first pass, we look for a zbuffer dpeth which is equal to the frame
-    // buffer depth (as some cards unfornately require this).
-    m_pD3D->EnumZBufferFormats( *pDeviceGUID, EnumZBufferFormatsCallback,
-                                (VOID*)&ddsd.ddpfPixelFormat );
-    if( 0 == ddsd.ddpfPixelFormat.dwSize )
-    {
-        // Try again, just accepting any 16-bit zbuffer
-        ddsd.ddpfPixelFormat.dwRGBBitCount = 16;
-        m_pD3D->EnumZBufferFormats( *pDeviceGUID, EnumZBufferFormatsCallback,
-                                    (VOID*)&ddsd.ddpfPixelFormat );
-
-        if( 0 == ddsd.ddpfPixelFormat.dwSize )
-        {
-            DEBUG_MSG( _T("Device doesn't support requested zbuffer format") );
-            return D3DFWERR_NOZBUFFER;
-        }
-    }
-
-    // Create and attach a z-buffer
-    if( FAILED( hr = m_pDD->CreateSurface( &ddsd, &m_pddsDepthBuffer, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't create a ZBuffer surface") );
-        if( hr != DDERR_OUTOFVIDEOMEMORY )
-            return D3DFWERR_NOZBUFFER;
-        DEBUG_MSG( _T("Error: Out of video memory") );
-        return DDERR_OUTOFVIDEOMEMORY;
-    }
-
-    if( FAILED( m_pddsRenderTarget->AddAttachedSurface( m_pddsDepthBuffer ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't attach zbuffer to render surface") );
-        return D3DFWERR_NOZBUFFER;
-    }
-
-    // Finally, this call rebuilds internal structures
-    if( FAILED( m_pD3DDevice->SetRenderTarget( m_pddsRenderTarget, 0L ) ) )
-    {
-        DEBUG_MSG( _T("Error: SetRenderTarget() failed after attaching zbuffer!") );
-        return D3DFWERR_NOZBUFFER;
-    }
-
-    return S_OK;
-}
-
-// Initializes the sample framework, then calls the app-specific function
-// to initialize device specific objects. This code is structured to
-// handled any errors that may occur duing initialization.
-
-HRESULT CD3DApplication::Initialize3DEnvironment()
-{
-    HRESULT     hr;
-    DDSCAPS2    ddsCaps2;
-    DWORD       dwFrameworkFlags = 0L;
-    DWORD       dwTotal;
-    DWORD       dwFree;
-
-    dwFrameworkFlags |= ( !m_pDeviceInfo->bWindowed ? D3DFW_FULLSCREEN : 0L );
-    dwFrameworkFlags |= (  m_pDeviceInfo->bStereo   ? D3DFW_STEREO     : 0L );
-    dwFrameworkFlags |= (  m_bAppUseZBuffer         ? D3DFW_ZBUFFER    : 0L );
-
-    // Initialize the D3D framework
-    if( SUCCEEDED( hr = m_pFramework->Initialize( m_hWnd,
-                     m_pDeviceInfo->pDriverGUID, m_pDeviceInfo->pDeviceGUID,
-                     &m_pDeviceInfo->ddsdFullscreenMode, dwFrameworkFlags ) ) )
-    {
-        m_pDD        = m_pFramework->GetDirectDraw();
-        m_pD3D       = m_pFramework->GetDirect3D();
-        m_pD3DDevice = m_pFramework->GetD3DDevice();
-
-        m_pD3DEngine->SetD3DDevice(m_pD3DDevice);
-
-        m_pddsRenderTarget = m_pFramework->GetRenderSurface();
-
-        m_ddsdRenderTarget.dwSize = sizeof(m_ddsdRenderTarget);
-        m_pddsRenderTarget->GetSurfaceDesc( &m_ddsdRenderTarget );
-
-        // Request the amount of video memory.
-        ZeroMemory(&ddsCaps2, sizeof(ddsCaps2));
-        ddsCaps2.dwCaps = DDSCAPS_TEXTURE;
-        dwTotal = 0;
-        hr = m_pDD->GetAvailableVidMem(&ddsCaps2, &dwTotal, &dwFree);
-        m_vidMemTotal = dwTotal;
-
-        // Let the app run its startup code which creates the 3d scene.
-        if( SUCCEEDED( hr = m_pD3DEngine->InitDeviceObjects() ) )
-        {
-//?         CreateZBuffer(m_pDeviceInfo->pDeviceGUID);
-            return S_OK;
-        }
-        else
-        {
-            DeleteDeviceObjects();
-            m_pFramework->DestroyObjects();
-        }
-    }
-
-    // If we get here, the first initialization passed failed. If that was with a
-    // hardware device, try again using a software rasterizer instead.
-    if( m_pDeviceInfo->bHardware )
-    {
-        // Try again with a software rasterizer
-        DisplayFrameworkError( hr, MSGWARN_SWITCHEDTOSOFTWARE );
-        D3DEnum_SelectDefaultDevice( &m_pDeviceInfo, D3DENUM_SOFTWAREONLY );
-        return Initialize3DEnvironment();
-    }
-
-    return hr;
-}
-
-
-// Handles driver, device, and/or mode changes for the app.
-
-HRESULT CD3DApplication::Change3DEnvironment()
-{
-#if 0
-    HRESULT hr;
-    static bool  bOldWindowedState = true;
-    static DWORD dwSavedStyle;
-    static RECT  rcSaved;
-
-    // Release all scene objects that will be re-created for the new device
-    DeleteDeviceObjects();
-
-    // Release framework objects, so a new device can be created
-    if( FAILED( hr = m_pFramework->DestroyObjects() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        SendMessage( m_hWnd, WM_CLOSE, 0, 0 );
-        return hr;
-    }
-
-    // Check if going from fullscreen to windowed mode, or vice versa.
-    if( bOldWindowedState != m_pDeviceInfo->bWindowed )
-    {
-        if( m_pDeviceInfo->bWindowed )
-        {
-            // Coming from fullscreen mode, so restore window properties
-            SetWindowLong( m_hWnd, GWL_STYLE, dwSavedStyle );
-            SetWindowPos( m_hWnd, HWND_NOTOPMOST, rcSaved.left, rcSaved.top,
-                          ( rcSaved.right - rcSaved.left ),
-                          ( rcSaved.bottom - rcSaved.top ), SWP_SHOWWINDOW );
-        }
-        else
-        {
-            // Going to fullscreen mode, save/set window properties as needed
-            dwSavedStyle = GetWindowLong( m_hWnd, GWL_STYLE );
-            GetWindowRect( m_hWnd, &rcSaved );
-            SetWindowLong( m_hWnd, GWL_STYLE, WS_POPUP|WS_SYSMENU|WS_VISIBLE );
-        }
-
-        bOldWindowedState = m_pDeviceInfo->bWindowed;
-    }
-
-    // Inform the framework class of the driver change. It will internally
-    // re-create valid surfaces, a d3ddevice, etc.
-    if( FAILED( hr = Initialize3DEnvironment() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        SendMessage( m_hWnd, WM_CLOSE, 0, 0 );
-        return hr;
-    }
-
-    return S_OK;
-#else
-    HRESULT hr;
-
-    // Release all scene objects that will be re-created for the new device
-    DeleteDeviceObjects();
-
-    // Release framework objects, so a new device can be created
-    if( FAILED( hr = m_pFramework->DestroyObjects() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        SendMessage( m_hWnd, WM_CLOSE, 0, 0 );
-        return hr;
-    }
-
-    if( m_pDeviceInfo->bWindowed )
-    {
-        SetWindowPos(m_hWnd, HWND_NOTOPMOST, 10, 10, WINDOW_DX, WINDOW_DY, SWP_SHOWWINDOW);
-    }
-
-    // Inform the framework class of the driver change. It will internally
-    // re-create valid surfaces, a d3ddevice, etc.
-    if( FAILED( hr = Initialize3DEnvironment() ) )
-    {
-        DisplayFrameworkError( hr, MSGERR_APPMUSTEXIT );
-        SendMessage( m_hWnd, WM_CLOSE, 0, 0 );
-        return hr;
-    }
-
-    m_pD3DEngine->ChangeLOD();
-
-    if( m_pDeviceInfo->bWindowed )
-    {
-        SetNiceMouse(false);  // hides the ugly windows mouse
-    }
-
-    return S_OK;
-#endif
-}
-
-
-
-// Evolved throughout the game
-
-void CD3DApplication::StepSimul(float rTime)
-{
-    Event   event;
-
-    if ( m_pRobotMain == 0 )  return;
-
-    ZeroMemory(&event, sizeof(Event));
-    event.event = EVENT_FRAME;  // funny bug release "Maximize speed"!
-    event.rTime = rTime;
-    event.axeX = AxeLimit(m_axeKey.x + m_axeJoy.x);
-    event.axeY = AxeLimit(m_axeKey.y + m_axeJoy.y);
-    event.axeZ = AxeLimit(m_axeKey.z + m_axeJoy.z);
-    event.keyState = m_keyState;
-
-//?char s[100];
-//?sprintf(s, "StepSimul %.3f\n", event.rTime);
-//?OutputDebugString(s);
-    m_pRobotMain->EventProcess(event);
-}
-
-
-// Draws the scene.
-
-HRESULT CD3DApplication::Render3DEnvironment()
-{
-    HRESULT hr;
-    float   rTime;
-
-    // Check the cooperative level before rendering
-    if( FAILED( hr = m_pDD->TestCooperativeLevel() ) )
-    {
-        switch( hr )
-        {
-            case DDERR_EXCLUSIVEMODEALREADYSET:
-            case DDERR_NOEXCLUSIVEMODE:
-                OutputDebugString("DDERR_EXCLUSIVEMODEALREADYSET\n");
-                // Do nothing because some other app has exclusive mode
-                return S_OK;
-
-            case DDERR_WRONGMODE:
-                OutputDebugString("DDERR_WRONGMODE\n");
-                // The display mode changed on us. Resize accordingly
-                if( m_pDeviceInfo->bWindowed )
-                    return Change3DEnvironment();
-                break;
-        }
-        return hr;
-    }
-
-    // Get the relative time, in seconds
-    rTime = m_pD3DEngine->TimeGet();
-    if ( rTime > MAX_STEP )  rTime = MAX_STEP;  // never more than 0.5s!
-    m_aTime += rTime;
-
-#if !USE_THREAD
-    if( FAILED( hr = m_pD3DEngine->FrameMove(rTime) ) )
-        return hr;
-
-    // FrameMove (animate) the scene
-    StepSimul(rTime);
-#endif
-
-    // Render the scene.
-    if( FAILED( hr = m_pD3DEngine->Render() ) )
-        return hr;
-
-    DrawSuppl();
-
-    // Show the frame rate, etc.
-    if( m_bShowStats )
-        ShowStats();
-
-    // Show the frame on the primary surface.
-    if( FAILED( hr = m_pFramework->ShowFrame() ) )
-    {
-        if( DDERR_SURFACELOST != hr )
-            return hr;
-
-        m_pFramework->RestoreSurfaces();
-        m_pD3DEngine->RestoreSurfaces();
-    }
-
-    return S_OK;
-}
-
-
-// Cleanup scene objects
-
-VOID CD3DApplication::Cleanup3DEnvironment()
-{
-    m_bActive = false;
-    m_bReady  = false;
-
-    if( m_pFramework )
-    {
-        DeleteDeviceObjects();
-        SAFE_DELETE( m_pFramework );
-
-        m_pD3DEngine->FinalCleanup();
-    }
-
-    D3DEnum_FreeResources();
-//? FreeDirectInput();
-}
-
-// Called when the app is exitting, or the device is being changed,
-// this function deletes any device dependant objects.
-
-VOID CD3DApplication::DeleteDeviceObjects()
-{
-    if( m_pFramework )
-    {
-        m_pD3DEngine->DeleteDeviceObjects();
-        SAFE_RELEASE( m_pddsDepthBuffer );
-    }
-}
-
-
-
-// Called in to toggle the pause state of the app. This function
-// brings the GDI surface to the front of the display, so drawing
-// output like message boxes and menus may be displayed.
-
-VOID CD3DApplication::Pause( bool bPause )
-{
-    static DWORD dwAppPausedCount = 0L;
-
-    dwAppPausedCount += ( bPause ? +1 : -1 );
-    m_bReady          = ( dwAppPausedCount ? false : true );
-
-    // Handle the first pause request (of many, nestable pause requests)
-    if( bPause && ( 1 == dwAppPausedCount ) )
-    {
-        // Get a surface for the GDI
-        if( m_pFramework )
-            m_pFramework->FlipToGDISurface( true );
-
-        // Stop the scene from animating
-        m_pD3DEngine->TimeEnterGel();
-    }
-
-    if( 0 == dwAppPausedCount )
-    {
-        // Restart the scene
-        m_pD3DEngine->TimeExitGel();
-    }
-}
-
-
-// Called when the app receives a PBT_APMQUERYSUSPEND message, meaning
-// the computer is about to be suspended. At this point, the app should
-// save any data for open network connections, files, etc.., and prepare
-// to go into a suspended mode.
-
-LRESULT CD3DApplication::OnQuerySuspend( DWORD dwFlags )
-{
-    OutputDebugString("OnQuerySuspend\n");
-    Pause(true);
-    return true;
-}
-
-
-// Called when the app receives a PBT_APMRESUMESUSPEND message, meaning
-// the computer has just resumed from a suspended state. At this point,
-// the app should recover any data, network connections, files, etc..,
-// and resume running from when the app was suspended.
-
-LRESULT CD3DApplication::OnResumeSuspend( DWORD dwData )
-{
-    OutputDebugString("OnResumeSuspend\n");
-    Pause(false);
-    return true;
-}
-
-
-// Draw all the additional graphic elements.
-
-void CD3DApplication::DrawSuppl()
-{
-    HDC         hDC;
-    Math::Point     p1, p2;
-    POINT       list[3];
-    RECT        rect;
-    HPEN        hPen;
-    HGDIOBJ     old;
-    Math::Point     pos;
-    float       d;
-    int         nbOut;
-
-    if ( FAILED(m_pddsRenderTarget->GetDC(&hDC)) )  return;
-
-    // Displays the selection rectangle.
-    if ( m_pD3DEngine->GetHilite(p1, p2) )
-    {
-        nbOut = 0;
-        if ( p1.x < 0.0f || p1.x > 1.0f )  nbOut ++;
-        if ( p1.y < 0.0f || p1.y > 1.0f )  nbOut ++;
-        if ( p2.x < 0.0f || p2.x > 1.0f )  nbOut ++;
-        if ( p2.y < 0.0f || p2.y > 1.0f )  nbOut ++;
-        if ( nbOut <= 2 )
-        {
-#if 0
-            time = Math::Mod(m_aTime, 0.5f);
-            if ( time < 0.25f )  d = time*4.0f;
-            else                 d = (2.0f-time*4.0f);
-#endif
-#if 0
-            time = Math::Mod(m_aTime, 0.5f);
-            if ( time < 0.4f )  d = time/0.4f;
-            else                d = 1.0f-(time-0.4f)/0.1f;
-#endif
-#if 1
-            d = 0.5f+sinf(m_aTime*6.0f)*0.5f;
-#endif
-            d *= (p2.x-p1.x)*0.1f;
-            p1.x += d;
-            p1.y += d;
-            p2.x -= d;
-            p2.y -= d;
-
-            hPen = CreatePen(PS_SOLID, 1, RGB(255,255,0));  // yellow
-            old = SelectObject(hDC, hPen);
-
-            rect.left   = (int)(p1.x*m_ddsdRenderTarget.dwWidth);
-            rect.right  = (int)(p2.x*m_ddsdRenderTarget.dwWidth);
-            rect.top    = (int)((1.0f-p2.y)*m_ddsdRenderTarget.dwHeight);
-            rect.bottom = (int)((1.0f-p1.y)*m_ddsdRenderTarget.dwHeight);
-
-            list[0].x = rect.left;
-            list[0].y = rect.top+(rect.bottom-rect.top)/5;
-            list[1].x = rect.left;
-            list[1].y = rect.top;
-            list[2].x = rect.left+(rect.right-rect.left)/5;
-            list[2].y = rect.top;
-            Polyline(hDC, list, 3);
-
-            list[0].x = rect.right;
-            list[0].y = rect.top+(rect.bottom-rect.top)/5;
-            list[1].x = rect.right;
-            list[1].y = rect.top;
-            list[2].x = rect.right+(rect.left-rect.right)/5;
-            list[2].y = rect.top;
-            Polyline(hDC, list, 3);
-
-            list[0].x = rect.left;
-            list[0].y = rect.bottom+(rect.top-rect.bottom)/5;
-            list[1].x = rect.left;
-            list[1].y = rect.bottom;
-            list[2].x = rect.left+(rect.right-rect.left)/5;
-            list[2].y = rect.bottom;
-            Polyline(hDC, list, 3);
-
-            list[0].x = rect.right;
-            list[0].y = rect.bottom+(rect.top-rect.bottom)/5;
-            list[1].x = rect.right;
-            list[1].y = rect.bottom;
-            list[2].x = rect.right+(rect.left-rect.right)/5;
-            list[2].y = rect.bottom;
-            Polyline(hDC, list, 3);
-
-            if ( old != 0 )  SelectObject(hDC, old);
-            DeleteObject(hPen);
-        }
-    }
-
-    m_pddsRenderTarget->ReleaseDC(hDC);
-}
-
-// Shows frame rate and dimensions of the rendering device.
-
-VOID CD3DApplication::ShowStats()
-{
-    static FLOAT fFPS      = 0.0f;
-    static FLOAT fLastTime = 0.0f;
-    static DWORD dwFrames  = 0L;
-
-    // Keep track of the time lapse and frame count
-    FLOAT fTime = timeGetTime() * 0.001f; // Get current time in seconds
-    ++dwFrames;
-
-    // Update the frame rate once per second
-    if( fTime - fLastTime > 1.0f )
-    {
-        fFPS      = dwFrames / (fTime - fLastTime);
-        fLastTime = fTime;
-        dwFrames  = 0L;
-    }
-
-    int t = m_pD3DEngine->RetStatisticTriangle();
-
-    // Setup the text buffer to write out dimensions
-    TCHAR buffer[100];
-    sprintf( buffer, _T("%7.02f fps T=%d (%dx%dx%d)"), fFPS, t,
-             m_ddsdRenderTarget.dwWidth, m_ddsdRenderTarget.dwHeight,
-             m_ddsdRenderTarget.ddpfPixelFormat.dwRGBBitCount );
-    OutputText( 400, 2, buffer );
-
-    int x, y, i;
-    if ( m_pD3DEngine->GetSpriteCoord(x, y) )
-    {
-        OutputText( x, y, "+" );
-    }
-
-    for ( i=0 ; i<10 ; i++ )
-    {
-        char* info = m_pD3DEngine->RetInfoText(i);
-        x = 50;
-        y = m_ddsdRenderTarget.dwHeight-20-i*20;
-        OutputText( x, y, info );
-    }
-}
-
-
-// Draws text on the window.
-
-VOID CD3DApplication::OutputText( DWORD x, DWORD y, TCHAR* str )
-{
-    HDC hDC;
-
-    // Get a DC for the surface. Then, write out the buffer
-    if( m_pddsRenderTarget )
-    {
-        if( SUCCEEDED( m_pddsRenderTarget->GetDC(&hDC) ) )
-        {
-            SetTextColor( hDC, RGB(255,255,0) );
-            SetBkMode( hDC, TRANSPARENT );
-            ExtTextOut( hDC, x, y, 0, NULL, str, lstrlen(str), NULL );
-            m_pddsRenderTarget->ReleaseDC(hDC);
-        }
-    }
-}
-
-
-
-
-// Defines a function that allocates memory for and initializes
-// members within a BITMAPINFOHEADER structure
-
-PBITMAPINFO CD3DApplication::CreateBitmapInfoStruct(HBITMAP hBmp)
-{
-    BITMAP      bmp;
-    PBITMAPINFO pbmi;
-    WORD        cClrBits;
-
-    // Retrieve the bitmap's color format, width, and height.
-    if ( !GetObject(hBmp, sizeof(BITMAP), (LPSTR)&bmp) )
-        return 0;
-
-    // Convert the color format to a count of bits.
-    cClrBits = (WORD)(bmp.bmPlanes * bmp.bmBitsPixel);
-
-         if ( cClrBits ==  1 )  cClrBits =  1;
-    else if ( cClrBits <=  4 )  cClrBits =  4;
-    else if ( cClrBits <=  8 )  cClrBits =  8;
-    else if ( cClrBits <= 16 )  cClrBits = 16;
-    else if ( cClrBits <= 24 )  cClrBits = 24;
-    else                        cClrBits = 32;
-
-    // Allocate memory for the BITMAPINFO structure. (This structure
-    // contains a BITMAPINFOHEADER structure and an array of RGBQUAD data
-    // structures.)
-    if ( cClrBits != 24 )
-    {
-         pbmi = (PBITMAPINFO)LocalAlloc(LPTR,
-                    sizeof(BITMAPINFOHEADER) +
-                    sizeof(RGBQUAD) * (2^cClrBits));
-    }
-    // There is no RGBQUAD array for the 24-bit-per-pixel format.
-    else
-    {
-         pbmi = (PBITMAPINFO)LocalAlloc(LPTR,
-                    sizeof(BITMAPINFOHEADER));
-    }
-
-    // Initialize the fields in the BITMAPINFO structure.
-    pbmi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
-    pbmi->bmiHeader.biWidth = bmp.bmWidth;
-    pbmi->bmiHeader.biHeight = bmp.bmHeight;
-    pbmi->bmiHeader.biPlanes = bmp.bmPlanes;
-    pbmi->bmiHeader.biBitCount = bmp.bmBitsPixel;
-    if ( cClrBits < 24 )
-        pbmi->bmiHeader.biClrUsed = 2^cClrBits;
-
-    // If the bitmap is not compressed, set the BI_RGB flag.
-    pbmi->bmiHeader.biCompression = BI_RGB;
-
-    // Compute the number of bytes in the array of color
-    // indices and store the result in biSizeImage.
-    pbmi->bmiHeader.biSizeImage = (pbmi->bmiHeader.biWidth + 7) /8
-                                  * pbmi->bmiHeader.biHeight
-                                  * cClrBits;
-
-    // Set biClrImportant to 0, indicating that all of the
-    // device colors are important.
-    pbmi->bmiHeader.biClrImportant = 0;
-
-    return pbmi;
-}
-
-// Defines a function that initializes the remaining structures,
-// retrieves the array of palette indices, opens the file, copies
-// the data, and closes the file.
-
-bool CD3DApplication::CreateBMPFile(LPTSTR pszFile, PBITMAPINFO pbi, HBITMAP hBMP, HDC hDC)
-{
-    FILE*               file;       // file handle
-    BITMAPFILEHEADER    hdr;        // bitmap file-header
-    PBITMAPINFOHEADER   pbih;       // bitmap info-header
-    LPBYTE              lpBits;     // memory pointer
-    DWORD               dwTotal;    // total count of bytes
-
-    pbih = (PBITMAPINFOHEADER)pbi;
-    lpBits = (LPBYTE)GlobalAlloc(GMEM_FIXED, pbih->biSizeImage);
-    if ( !lpBits )  return false;
-
-    // Retrieve the color table (RGBQUAD array) and the bits
-    // (array of palette indices) from the DIB.
-    if ( !GetDIBits(hDC, hBMP, 0, (WORD)pbih->biHeight,
-                    lpBits, pbi, DIB_RGB_COLORS) )
-        return false;
-
-    // Create the .BMP file.
-    file = fopen(pszFile, "wb");
-    if ( file == NULL )  return false;
-
-    hdr.bfType = 0x4d42; // 0x42 = "B" 0x4d = "M"
-
-    // Compute the size of the entire file.
-    hdr.bfSize = (DWORD)(sizeof(BITMAPFILEHEADER) +
-                         pbih->biSize + pbih->biClrUsed
-                         * sizeof(RGBQUAD) + pbih->biSizeImage);
-
-    hdr.bfReserved1 = 0;
-    hdr.bfReserved2 = 0;
-
-    // Compute the offset to the array of color indices.
-    hdr.bfOffBits = (DWORD)sizeof(BITMAPFILEHEADER) +
-                    pbih->biSize + pbih->biClrUsed
-                    * sizeof (RGBQUAD);
-
-    // Copy the BITMAPFILEHEADER into the .BMP file.
-    fwrite(&hdr, sizeof(BITMAPFILEHEADER), 1, file);
-
-    // Copy the BITMAPINFOHEADER and RGBQUAD array into the file.
-    fwrite(pbih, sizeof(BITMAPINFOHEADER)+pbih->biClrUsed*sizeof(RGBQUAD), 1, file);
-
-    // Copy the array of color indices into the .BMP file.
-    dwTotal = pbih->biSizeImage;
-    fwrite(lpBits, dwTotal, 1, file);
-
-    // Close the .BMP file.
-    fclose(file);
-
-    // Free memory.
-    GlobalFree((HGLOBAL)lpBits);
-    return true;
-}
-
-// Write a file. BMP screenshot.
-
-bool CD3DApplication::WriteScreenShot(char *filename, int width, int height)
-{
-    D3DVIEWPORT7    vp;
-    HDC             hDC;
-    HDC             hDCImage;
-    HBITMAP         hb;
-    PBITMAPINFO     info;
-    int             dx, dy;
-
-    m_pD3DDevice->GetViewport(&vp);
-    dx = vp.dwWidth;
-    dy = vp.dwHeight;
-
-    if ( FAILED(m_pddsRenderTarget->GetDC(&hDC)) )  return false;
-
-    hDCImage = CreateCompatibleDC(hDC);
-    if ( hDCImage == 0 )
-    {
-        m_pddsRenderTarget->ReleaseDC(hDC);
-        return false;
-    }
-
-    hb = CreateCompatibleBitmap(hDC, width, height);
-    if ( hb == 0 )
-    {
-        DeleteDC(hDCImage);
-        m_pddsRenderTarget->ReleaseDC(hDC);
-        return false;
-    }
-
-    SelectObject(hDCImage, hb);
-    StretchBlt(hDCImage, 0, 0, width, height, hDC, 0, 0, dx, dy, SRCCOPY);
-
-    info = CreateBitmapInfoStruct(hb);
-    if ( info == 0 )
-    {
-        DeleteObject(hb);
-        DeleteDC(hDCImage);
-        m_pddsRenderTarget->ReleaseDC(hDC);
-        return false;
-    }
-
-    CreateBMPFile(filename, info, hb, hDCImage);
-
-    DeleteObject(hb);
-    DeleteDC(hDCImage);
-    m_pddsRenderTarget->ReleaseDC(hDC);
-    return true;
-}
-
-
-// Initializes an hDC on the rendering surface.
-
-bool CD3DApplication::GetRenderDC(HDC &hDC)
-{
-    if ( FAILED(m_pddsRenderTarget->GetDC(&hDC)) )  return false;
-    return true;
-}
-
-// Frees the hDC of the rendering surface.
-
-bool CD3DApplication::ReleaseRenderDC(HDC &hDC)
-{
-    m_pddsRenderTarget->ReleaseDC(hDC);
-    return true;
-}
-
-
-
-
-// Perform the list of all graphics devices available.
-// For the device selected, lists the full screen modes
-// possible.
-// buf* --> nom1<0> nom2<0> <0>
-
-bool CD3DApplication::EnumDevices(char *bufDevices,  int lenDevices,
-                                  char *bufModes,    int lenModes,
-                                  int &totalDevices, int &selectDevices,
-                                  int &totalModes,   int &selectModes)
-{
-    D3DEnum_DeviceInfo* pDeviceList;
-    D3DEnum_DeviceInfo* pDevice;
-    DDSURFACEDESC2*     pddsdMode;
-    DWORD               numDevices, device, mode;
-    int                 len;
-    char                text[100];
-
-    D3DEnum_GetDevices(&pDeviceList, &numDevices);
-
-    selectDevices = -1;
-    selectModes = -1;
-    totalModes = 0;
-    for( device=0 ; device<numDevices ; device++ )
-    {
-        pDevice = &pDeviceList[device];
-
-        len = strlen(pDevice->strDesc)+1;
-        if ( len >= lenDevices )  break;  // bufDevices full!
-        strcpy(bufDevices, pDevice->strDesc);
-        bufDevices += len;
-        lenDevices -= len;
-
-        if ( pDevice == m_pDeviceInfo )  // select device ?
-        {
-            selectDevices = device;
-
-            for( mode=0 ; mode<pDevice->dwNumModes ; mode++ )
-            {
-                pddsdMode = &pDevice->pddsdModes[mode];
-
-                sprintf(text, "%ld x %ld x %ld",
-                                pddsdMode->dwWidth,
-                                pddsdMode->dwHeight,
-                                pddsdMode->ddpfPixelFormat.dwRGBBitCount);
-
-                len = strlen(text)+1;
-                if ( len >= lenModes )  break;  // bufModes full !
-                strcpy(bufModes, text);
-                bufModes += len;
-                lenModes -= len;
-
-                if ( mode == m_pDeviceInfo->dwCurrentMode )  // select mode ?
-                {
-                    selectModes = mode;
-                }
-            }
-            bufModes[0] = 0;
-            totalModes = pDevice->dwNumModes;
-        }
-    }
-    bufDevices[0] = 0;
-    totalDevices = numDevices;
-
-    return true;
-}
-
-// Indicates whether it is in full screen mode.
-
-bool CD3DApplication::RetFullScreen()
-{
-    return !m_pDeviceInfo->bWindowed;
-}
-
-// Change the graphics mode.
-
-bool CD3DApplication::ChangeDevice(char *deviceName, char *modeName,
-                                   bool bFull)
-{
-    D3DEnum_DeviceInfo* pDeviceList;
-    D3DEnum_DeviceInfo* pDevice;
-    DDSURFACEDESC2*     pddsdMode;
-    DWORD               numDevices, device, mode;
-    HRESULT             hr;
-    char                text[100];
-
-    D3DEnum_GetDevices(&pDeviceList, &numDevices);
-
-    for( device=0 ; device<numDevices ; device++ )
-    {
-        pDevice = &pDeviceList[device];
-
-        if ( strcmp(pDevice->strDesc, deviceName) == 0 )  // device found ?
-        {
-            for( mode=0 ; mode<pDevice->dwNumModes ; mode++ )
-            {
-                pddsdMode = &pDevice->pddsdModes[mode];
-
-                sprintf(text, "%ld x %ld x %ld",
-                                pddsdMode->dwWidth,
-                                pddsdMode->dwHeight,
-                                pddsdMode->ddpfPixelFormat.dwRGBBitCount);
-
-                if ( strcmp(text, modeName) == 0 )  // mode found ?
-                {
-                    m_pDeviceInfo               = pDevice;
-                    pDevice->bWindowed          = !bFull;
-                    pDevice->dwCurrentMode      = mode;
-                    pDevice->ddsdFullscreenMode = pDevice->pddsdModes[mode];
-
-                    m_bReady = false;
-
-                    if ( FAILED( hr = Change3DEnvironment() ) )
-                    {
-                        return false;
-                    }
-
-                    SetProfileString("Device", "Name", deviceName);
-                    SetProfileString("Device", "Mode", modeName);
-                    SetProfileInt("Device", "FullScreen", bFull);
-                    m_bReady = true;
-                    return true;
-                }
-            }
-        }
-    }
-
-    return false;
-}
-
-
-
-// Displays error messages in a message box.
-
-VOID CD3DApplication::DisplayFrameworkError( HRESULT hr, DWORD dwType )
-{
-    TCHAR strMsg[512];
-
-    switch( hr )
-    {
-        case D3DENUMERR_ENGINE:
-            lstrcpy( strMsg, _T("Could not create 3D Engine application!") );
-            break;
-        case D3DENUMERR_ROBOT:
-            lstrcpy( strMsg, _T("Could not create Robot application!") );
-            break;
-        case D3DENUMERR_NODIRECTDRAW:
-            lstrcpy( strMsg, _T("Could not create DirectDraw!") );
-            break;
-        case D3DENUMERR_NOCOMPATIBLEDEVICES:
-            lstrcpy( strMsg, _T("Could not find any compatible Direct3D\n"
-                     "devices.") );
-            break;
-        case D3DENUMERR_SUGGESTREFRAST:
-            lstrcpy( strMsg, _T("Could not find any compatible devices.\n\n"
-                     "Try enabling the reference rasterizer using\n"
-                     "EnableRefRast.reg.") );
-            break;
-        case D3DENUMERR_ENUMERATIONFAILED:
-            lstrcpy( strMsg, _T("Enumeration failed. Your system may be in an\n"
-                     "unstable state and need to be rebooted") );
-            break;
-        case D3DFWERR_INITIALIZATIONFAILED:
-            lstrcpy( strMsg, _T("Generic initialization error.\n\nEnable "
-                     "debug output for detailed information.") );
-            break;
-        case D3DFWERR_NODIRECTDRAW:
-            lstrcpy( strMsg, _T("No DirectDraw") );
-            break;
-        case D3DFWERR_NODIRECT3D:
-            lstrcpy( strMsg, _T("No Direct3D") );
-            break;
-        case D3DFWERR_INVALIDMODE:
-            lstrcpy( strMsg, _T("COLOBOT requires a 16-bit (or higher) "
-                                "display mode\nto run in a window.\n\nPlease "
-                                "switch your desktop settings accordingly.") );
-            break;
-        case D3DFWERR_COULDNTSETCOOPLEVEL:
-            lstrcpy( strMsg, _T("Could not set Cooperative Level") );
-            break;
-        case D3DFWERR_NO3DDEVICE:
-            lstrcpy( strMsg, _T("Could not create the Direct3DDevice object.") );
-
-            if( MSGWARN_SWITCHEDTOSOFTWARE == dwType )
-                lstrcat( strMsg, _T("\nThe 3D hardware chipset may not support"
-                                    "\nrendering in the current display mode.") );
-            break;
-        case D3DFWERR_NOZBUFFER:
-            lstrcpy( strMsg, _T("No ZBuffer") );
-            break;
-        case D3DFWERR_INVALIDZBUFFERDEPTH:
-            lstrcpy( strMsg, _T("Invalid Z-buffer depth. Try switching modes\n"
-                     "from 16- to 32-bit (or vice versa)") );
-            break;
-        case D3DFWERR_NOVIEWPORT:
-            lstrcpy( strMsg, _T("No Viewport") );
-            break;
-        case D3DFWERR_NOPRIMARY:
-            lstrcpy( strMsg, _T("No primary") );
-            break;
-        case D3DFWERR_NOCLIPPER:
-            lstrcpy( strMsg, _T("No Clipper") );
-            break;
-        case D3DFWERR_BADDISPLAYMODE:
-            lstrcpy( strMsg, _T("Bad display mode") );
-            break;
-        case D3DFWERR_NOBACKBUFFER:
-            lstrcpy( strMsg, _T("No backbuffer") );
-            break;
-        case D3DFWERR_NONZEROREFCOUNT:
-            lstrcpy( strMsg, _T("A DDraw object has a non-zero reference\n"
-                     "count (meaning it was not properly cleaned up)." ) );
-            break;
-        case D3DFWERR_NORENDERTARGET:
-            lstrcpy( strMsg, _T("No render target") );
-            break;
-        case E_OUTOFMEMORY:
-            lstrcpy( strMsg, _T("Not enough memory!") );
-            break;
-        case DDERR_OUTOFVIDEOMEMORY:
-            lstrcpy( strMsg, _T("There was insufficient video memory "
-                     "to use the\nhardware device.") );
-            break;
-        default:
-            lstrcpy( strMsg, _T("Generic application error.\n\nEnable "
-                     "debug output for detailed information.") );
-    }
-
-    if( MSGERR_APPMUSTEXIT == dwType )
-    {
-        lstrcat( strMsg, _T("\n\nCOLOBOT will now exit.") );
-        MessageBox( NULL, strMsg, m_strWindowTitle, MB_ICONERROR|MB_OK );
-    }
-    else
-    {
-        if( MSGWARN_SWITCHEDTOSOFTWARE == dwType )
-            lstrcat( strMsg, _T("\n\nSwitching to software rasterizer.") );
-        MessageBox( NULL, strMsg, m_strWindowTitle, MB_ICONWARNING|MB_OK );
-    }
-}
-
-
diff --git a/src/old/d3dapp.h b/src/old/d3dapp.h
deleted file mode 100644
index 7e217d4..0000000
--- a/src/old/d3dapp.h
+++ /dev/null
@@ -1,166 +0,0 @@
-// * 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/.
-
-// d3dapp.h
-
-#pragma once
-
-
-#define  D3D_OVERLOADS
-#include <d3d.h>
-
-#include "math/vector.h"
-#include "old/d3dengine.h"
-#include "old/d3dframe.h"
-#include "old/d3denum.h"
-#include "old/d3dutil.h"
-#include "old/d3dres.h"
-#include "common/misc.h"
-#include "common/struct.h"
-
-
-class CInstanceManager;
-class CEvent;
-class CRobotMain;
-class CSound;
-
-
-
-class CD3DApplication
-{
-public:
-    CD3DApplication();
-    ~CD3DApplication();
-
-protected:
-    LRESULT     OnQuerySuspend( DWORD dwFlags );
-    LRESULT     OnResumeSuspend( DWORD dwData );
-
-public:
-    Error       RegQuery();
-    Error       AudioQuery();
-    Error       CheckMistery(char *strCmdLine);
-    int         GetVidMemTotal();
-    bool        IsVideo8MB();
-    bool        IsVideo32MB();
-    HRESULT     Create( HINSTANCE, TCHAR* );
-    INT         Run();
-    LRESULT     MsgProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam );
-    VOID        Pause( bool bPause );
-    Math::Point     ConvPosToInterface(HWND hWnd, LPARAM lParam);
-    void        SetMousePos(Math::Point pos);
-    void        StepSimul(float rTime);
-    char*       RetCDpath();
-
-    void        SetShowStat(bool bShow);
-    bool        RetShowStat();
-    void        SetDebugMode(bool bMode);
-    bool        RetDebugMode();
-    bool        RetSetupMode();
-
-    bool        EnumDevices(char *bufDevices, int lenDevices, char *bufModes, int lenModes, int &totalDevices, int &selectDevices, int &totalModes, int &selectModes);
-    bool        RetFullScreen();
-    bool        ChangeDevice(char *device, char *mode, bool bFull);
-
-    void        FlushPressKey();
-    void        ResetKey();
-    void        SetKey(int keyRank, int option, int key);
-    int         RetKey(int keyRank, int option);
-
-    void        SetJoystick(bool bEnable);
-    bool        RetJoystick();
-
-    void        SetMouseType(D3DMouse type);
-    void        SetNiceMouse(bool bNice);
-    bool        RetNiceMouse();
-    bool        RetNiceMouseCap();
-
-    bool        WriteScreenShot(char *filename, int width, int height);
-
-    bool        GetRenderDC(HDC &hDC);
-    bool        ReleaseRenderDC(HDC &hDC);
-    PBITMAPINFO CreateBitmapInfoStruct(HBITMAP hBmp);
-    bool        CreateBMPFile(LPTSTR pszFile, PBITMAPINFO pbi, HBITMAP hBMP, HDC hDC);
-
-protected:
-    HRESULT     ConfirmDevice( DDCAPS* pddDriverCaps, D3DDEVICEDESC7* pd3dDeviceDesc );
-    HRESULT     Initialize3DEnvironment();
-    HRESULT     Change3DEnvironment();
-    HRESULT     CreateZBuffer(GUID* pDeviceGUID);
-    HRESULT     Render3DEnvironment();
-    VOID        Cleanup3DEnvironment();
-    VOID        DeleteDeviceObjects();
-    VOID        DisplayFrameworkError( HRESULT, DWORD );
-
-    void        InitText();
-    void        DrawSuppl();
-    VOID        ShowStats();
-    VOID        OutputText( DWORD x, DWORD y, TCHAR* str );
-
-protected:
-    CInstanceManager*       m_iMan;
-    CEvent*                 m_event;
-
-    HINSTANCE               m_instance;
-    HWND                    m_hWnd;
-    D3DEnum_DeviceInfo*     m_pDeviceInfo;
-    LPDIRECTDRAW7           m_pDD;
-    LPDIRECT3D7             m_pD3D;
-    LPDIRECT3DDEVICE7       m_pD3DDevice;
-    LPDIRECTDRAWSURFACE7    m_pddsRenderTarget;
-    DDSURFACEDESC2          m_ddsdRenderTarget;
-    LPDIRECTDRAWSURFACE7    m_pddsDepthBuffer;
-
-    HANDLE          m_thread;
-    DWORD           m_threadId;
-
-    char            m_CDpath[100];
-
-    CD3DFramework7* m_pFramework;
-    bool            m_bActive;
-    bool            m_bActivateApp;
-    bool            m_bReady;
-    bool            m_bJoystick;
-
-    DWORD           m_vidMemTotal;
-    TCHAR*          m_strWindowTitle;
-    bool            m_bAppUseZBuffer;
-    bool            m_bAppUseStereo;
-    bool            m_bShowStats;
-    bool            m_bDebugMode;
-    bool            m_bAudioState;
-    bool            m_bAudioTrack;
-    bool            m_bNiceMouse;
-    bool            m_bSetupMode;
-    HRESULT         (*m_fnConfirmDevice)(DDCAPS*, D3DDEVICEDESC7*);
-
-public:
-    CD3DEngine*     m_pD3DEngine;
-    CRobotMain*     m_pRobotMain;
-    CSound*         m_pSound;
-
-    int             m_keyState;
-    Math::Vector        m_axeKey;
-    Math::Vector        m_axeJoy;
-    bool            m_bJoyButton[32];
-    Math::Point         m_mousePos;
-    DWORD           m_mshMouseWheel;
-
-    float           m_aTime;
-    DWORD           m_key[50][2];
-};
-
-
diff --git a/src/old/d3dengine.cpp b/src/old/d3dengine.cpp
deleted file mode 100644
index f9e953d..0000000
--- a/src/old/d3dengine.cpp
+++ /dev/null
@@ -1,5825 +0,0 @@
-// * 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/.
-
-// d3dengine.cpp
-
-
-#include <stdio.h>
-#include <math.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dapp.h"
-#include "old/d3dtextr.h"
-#include "old/d3dutil.h"
-#include "old/d3dmath.h"
-#include "old/d3dengine.h"
-#include "common/language.h"
-#include "common/iman.h"
-#include "common/event.h"
-#include "common/profile.h"
-#include "old/math3d.h"
-#include "object/object.h"
-#include "ui/interface.h"
-#include "old/light.h"
-#include "old/text.h"
-#include "old/particule.h"
-#include "old/terrain.h"
-#include "old/water.h"
-#include "old/cloud.h"
-#include "old/blitz.h"
-#include "old/planet.h"
-#include "old/sound.h"
-
-
-
-const int SIZEBLOC_TEXTURE      = 50;
-const int SIZEBLOC_TRANSFORM    = 100;
-const int SIZEBLOC_MINMAX       = 5;
-const int SIZEBLOC_LIGHT        = 10;
-const int SIZEBLOC_MATERIAL     = 100;
-const int SIZEBLOC_TRIANGLE     = 200;
-
-
-
-#if 0
-static int debug_blend1 = 1;
-static int debug_blend2 = 3;
-static int debug_blend3 = 8;
-static int debug_blend4 = 0;
-
-static int table_blend[13] =
-{
-    D3DBLEND_ZERO,              // 0
-    D3DBLEND_ONE,               // 1
-    D3DBLEND_SRCCOLOR,          // 2
-    D3DBLEND_INVSRCCOLOR,       // 3
-    D3DBLEND_SRCALPHA,          // 4
-    D3DBLEND_INVSRCALPHA,       // 5
-    D3DBLEND_DESTALPHA,         // 6
-    D3DBLEND_INVDESTALPHA,      // 7
-    D3DBLEND_DESTCOLOR,         // 8
-    D3DBLEND_INVDESTCOLOR,      // 9
-    D3DBLEND_SRCALPHASAT,       // 10
-    D3DBLEND_BOTHSRCALPHA,      // 11
-    D3DBLEND_BOTHINVSRCALPHA,   // 12
-};
-#endif
-
-static int s_resol = 0;
-
-
-
-// Converts a FLOAT to a DWORD for use in SetRenderState() calls.
-
-inline DWORD F2DW( FLOAT f )
-{
-    return *((DWORD*)&f);
-}
-
-
-
-
-// Application constructor. Sets attributes for the app.
-
-CD3DEngine::CD3DEngine(CInstanceManager *iMan, CD3DApplication *app)
-{
-    int     i;
-
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_ENGINE, this);
-    m_app = app;
-
-    m_light      = new CLight(m_iMan, this);
-    m_text       = new CText(m_iMan, this);
-    m_particule  = new CParticule(m_iMan, this);
-    m_water      = new CWater(m_iMan, this);
-    m_cloud      = new CCloud(m_iMan, this);
-    m_blitz      = new CBlitz(m_iMan, this);
-    m_planet     = new CPlanet(m_iMan, this);
-    m_pD3DDevice = 0;
-    m_sound      = 0;
-    m_terrain    = 0;
-
-    m_dim.x = 640;
-    m_dim.y = 480;
-    m_lastDim = m_dim;
-    m_focus = 0.75f;
-    m_baseTime = 0;
-    m_lastTime = 0;
-    m_absTime = 0.0f;
-    m_rankView        = 0;
-    m_ambiantColor[0] = 0x80808080;
-    m_ambiantColor[1] = 0x80808080;
-    m_fogColor[0]     = 0xffffffff;  // white
-    m_fogColor[1]     = 0xffffffff;  // white
-    m_deepView[0]     = 1000.0f;
-    m_deepView[1]     = 1000.0f;
-    m_fogStart[0]     = 0.75f;
-    m_fogStart[1]     = 0.75f;
-    m_waterAddColor.r = 0.0f;
-    m_waterAddColor.g = 0.0f;
-    m_waterAddColor.b = 0.0f;
-    m_waterAddColor.a = 0.0f;
-    m_bPause          = false;
-    m_bRender         = true;
-    m_bMovieLock      = false;
-    m_bShadow         = true;
-    m_bGroundSpot     = true;
-    m_bDirty          = true;
-    m_bFog            = true;
-    m_speed           = 1.0f;
-    m_secondTexNum    = 0;
-    m_eyeDirH         = 0.0f;
-    m_eyeDirV         = 0.0f;
-    m_backgroundName[0] = 0;  // no background image
-    m_backgroundColorUp   = 0;
-    m_backgroundColorDown = 0;
-    m_backgroundCloudUp   = 0;
-    m_backgroundCloudDown = 0;
-    m_bBackgroundFull = false;
-    m_bBackgroundQuarter = false;
-    m_bOverFront = true;
-    m_overColor = 0;
-    m_overMode  = D3DSTATETCb;
-    m_frontsizeName[0] = 0;  // no front image
-    m_hiliteRank[0] = -1;  // empty list
-    m_mousePos = Math::Point(0.5f, 0.5f);
-    m_mouseType = D3DMOUSENORM;
-    m_bMouseHide = false;
-    m_imageSurface = 0;
-    m_imageCopy = 0;
-    m_eyePt    = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_lookatPt = Math::Vector(0.0f, 0.0f, 1.0f);
-    m_bDrawWorld = true;
-    m_bDrawFront = false;
-    m_limitLOD[0] = 100.0f;
-    m_limitLOD[1] = 200.0f;
-    m_particuleDensity = 1.0f;
-    m_clippingDistance = 1.0f;
-    m_lastClippingDistance = m_clippingDistance;
-    m_objectDetail = 1.0f;
-    m_lastObjectDetail = m_objectDetail;
-    m_terrainVision = 1000.0f;
-    m_gadgetQuantity = 1.0f;
-    m_textureQuality = 1;
-    m_bTotoMode = true;
-    m_bLensMode = true;
-    m_bWaterMode = true;
-    m_bSkyMode = true;
-    m_bBackForce = true;
-    m_bPlanetMode = true;
-    m_bLightMode = true;
-    m_bEditIndentMode = true;
-    m_editIndentValue = 4;
-    m_tracePrecision = 1.0f;
-
-    m_alphaMode = 1;
-    if ( GetProfileInt("Engine", "AlphaMode", i) )
-    {
-        m_alphaMode = i;
-    }
-
-    if ( GetProfileInt("Engine", "StateColor", i) && i != -1 )
-    {
-        m_bForceStateColor = true;
-        m_bStateColor = i;
-    }
-    else
-    {
-        m_bForceStateColor = false;
-        m_bStateColor = false;
-    }
-
-    m_blackSrcBlend[0]    = 0;
-    m_blackDestBlend[0]   = 0;
-    m_whiteSrcBlend[0]    = 0;
-    m_whiteDestBlend[0]   = 0;
-    m_diffuseSrcBlend[0]  = 0;
-    m_diffuseDestBlend[0] = 0;
-    m_alphaSrcBlend[0]    = 0;
-    m_alphaDestBlend[0]   = 0;
-
-    if ( GetProfileInt("Engine", "BlackSrcBlend",    i) )  m_blackSrcBlend[0]    = i;
-    if ( GetProfileInt("Engine", "BlackDestBlend",   i) )  m_blackDestBlend[0]   = i;
-    if ( GetProfileInt("Engine", "WhiteSrcBlend",    i) )  m_whiteSrcBlend[0]    = i;
-    if ( GetProfileInt("Engine", "WhiteDestBlend",   i) )  m_whiteDestBlend[0]   = i;
-    if ( GetProfileInt("Engine", "DiffuseSrcBlend",  i) )  m_diffuseSrcBlend[0]  = i;
-    if ( GetProfileInt("Engine", "DiffuseDestBlend", i) )  m_diffuseDestBlend[0] = i;
-    if ( GetProfileInt("Engine", "AlphaSrcBlend",    i) )  m_alphaSrcBlend[0]    = i;
-    if ( GetProfileInt("Engine", "AlphaDestBlend",   i) )  m_alphaDestBlend[0]   = i;
-
-    m_bUpdateGeometry = false;
-
-    for ( i=0 ; i<10 ; i++ )
-    {
-        m_infoText[i][0] = 0;
-    }
-
-    m_objectPointer = 0;
-    MemSpace1(m_objectPointer, 0);
-
-    m_objectParam = (D3DObject*)malloc(sizeof(D3DObject)*D3DMAXOBJECT);
-    ZeroMemory(m_objectParam, sizeof(D3DObject)*D3DMAXOBJECT);
-    m_objectParamTotal = 0;
-
-    m_shadow = (D3DShadow*)malloc(sizeof(D3DShadow)*D3DMAXSHADOW);
-    ZeroMemory(m_shadow, sizeof(D3DShadow)*D3DMAXSHADOW);
-    m_shadowTotal = 0;
-
-    m_groundSpot = (D3DGroundSpot*)malloc(sizeof(D3DGroundSpot)*D3DMAXGROUNDSPOT);
-    ZeroMemory(m_groundSpot, sizeof(D3DGroundSpot)*D3DMAXGROUNDSPOT);
-
-    ZeroMemory(&m_groundMark, sizeof(D3DGroundMark));
-
-    D3DTextr_SetTexturePath("textures\\");
-}
-
-// Application destructor. Free memory.
-
-CD3DEngine::~CD3DEngine()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             l1, l2, l3, l4, l5;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-                        free(p6);
-                    }
-                    free(p5);
-                }
-                free(p4);
-            }
-            free(p3);
-        }
-        free(p2);
-    }
-    free(p1);
-
-    delete m_light;
-    delete m_particule;
-    delete m_water;
-    delete m_cloud;
-    delete m_blitz;
-    delete m_planet;
-}
-
-
-
-void CD3DEngine::SetD3DDevice(LPDIRECT3DDEVICE7 device)
-{
-    D3DDEVICEDESC7  ddDesc;
-
-    m_pD3DDevice = device;
-    m_light->SetD3DDevice(device);
-    m_text->SetD3DDevice(device);
-    m_particule->SetD3DDevice(device);
-
-    if ( !m_bForceStateColor )
-    {
-        m_pD3DDevice->GetCaps(&ddDesc);
-        if( ddDesc.dpcTriCaps.dwTextureBlendCaps & D3DPTBLENDCAPS_ADD )
-        {
-            m_bStateColor = true;
-        }
-        else
-        {
-            m_bStateColor = false;
-        }
-    }
-
-    m_blackSrcBlend[1]    = D3DBLEND_ONE;          // = 2
-    m_blackDestBlend[1]   = D3DBLEND_INVSRCCOLOR;  // = 4
-    m_whiteSrcBlend[1]    = D3DBLEND_DESTCOLOR;    // = 9
-    m_whiteDestBlend[1]   = D3DBLEND_ZERO;         // = 1
-    m_diffuseSrcBlend[1]  = D3DBLEND_SRCALPHA;     // = 5
-    m_diffuseDestBlend[1] = D3DBLEND_DESTALPHA;    // = 7
-    m_alphaSrcBlend[1]    = D3DBLEND_ONE;          // = 2
-    m_alphaDestBlend[1]   = D3DBLEND_INVSRCCOLOR;  // = 4
-
-//? if ( !m_bStateColor )  m_whiteDestBlend[1] = D3DBLEND_INVSRCALPHA;  // = 6
-
-// Fix for the graphics bug:
-    //if ( m_blackSrcBlend[0]    )  m_blackSrcBlend[1]    = m_blackSrcBlend[0];
-    //if ( m_blackDestBlend[0]   )  m_blackDestBlend[1]   = m_blackDestBlend[0];
-    //if ( m_whiteSrcBlend[0]    )  m_whiteSrcBlend[1]    = m_whiteSrcBlend[0];
-    //if ( m_whiteDestBlend[0]   )  m_whiteDestBlend[1]   = m_whiteDestBlend[0];
-
-    if ( m_diffuseSrcBlend[0]  )  m_diffuseSrcBlend[1]  = m_diffuseSrcBlend[0];
-    if ( m_diffuseDestBlend[0] )  m_diffuseDestBlend[1] = m_diffuseDestBlend[0];
-    if ( m_alphaSrcBlend[0]    )  m_alphaSrcBlend[1]    = m_alphaSrcBlend[0];
-    if ( m_alphaDestBlend[0]   )  m_alphaDestBlend[1]   = m_alphaDestBlend[0];
-
-#if 0
-    DWORD   pass;
-    m_pD3DDevice->ValidateDevice(&pass);
-    char s[100];
-    sprintf(s, "NbPass=%d", pass);
-    SetInfoText(3, s);
-#endif
-}
-
-LPDIRECT3DDEVICE7 CD3DEngine::RetD3DDevice()
-{
-    return m_pD3DDevice;
-}
-
-
-// Gives the pointer to the existing terrain.
-
-void CD3DEngine::SetTerrain(CTerrain* terrain)
-{
-    m_terrain = terrain;
-}
-
-
-// Saving the state of the graphics engine in COLOBOT.INI.
-
-bool CD3DEngine::WriteProfile()
-{
-    SetProfileInt("Engine", "AlphaMode", m_alphaMode);
-
-    if ( m_bForceStateColor )
-    {
-        SetProfileInt("Engine", "StateColor", m_bStateColor);
-    }
-    else
-    {
-        SetProfileInt("Engine", "StateColor", -1);
-    }
-
-    SetProfileInt("Engine", "BlackSrcBlend",    m_blackSrcBlend[0]);
-    SetProfileInt("Engine", "BlackDestBlend",   m_blackDestBlend[0]);
-    SetProfileInt("Engine", "WhiteSrcBlend",    m_whiteSrcBlend[0]);
-    SetProfileInt("Engine", "WhiteDestBlend",   m_whiteDestBlend[0]);
-    SetProfileInt("Engine", "DiffuseSrcBlend",  m_diffuseSrcBlend[0]);
-    SetProfileInt("Engine", "DiffuseDestBlend", m_diffuseDestBlend[0]);
-    SetProfileInt("Engine", "AlphaSrcBlend",    m_alphaSrcBlend[0]);
-    SetProfileInt("Engine", "AlphaDestBlend",   m_alphaDestBlend[0]);
-
-    return true;
-}
-
-
-// Setup the app so it can support single-stepping.
-
-void CD3DEngine::TimeInit()
-{
-    m_baseTime = timeGetTime();
-    m_lastTime = 0;
-    m_absTime = 0.0f;
-}
-
-void CD3DEngine::TimeEnterGel()
-{
-    m_stopTime = timeGetTime();
-}
-
-void CD3DEngine::TimeExitGel()
-{
-    m_baseTime += timeGetTime() - m_stopTime;
-}
-
-float CD3DEngine::TimeGet()
-{
-    float   aTime, rTime;
-
-    aTime = (timeGetTime()-m_baseTime)*0.001f;  // in ms
-    rTime = (aTime - m_lastTime)*m_speed;
-    m_absTime += rTime;
-    m_lastTime = aTime;
-
-    return rTime;
-}
-
-
-void CD3DEngine::SetPause(bool bPause)
-{
-    m_bPause = bPause;
-}
-
-bool CD3DEngine::RetPause()
-{
-    return m_bPause;
-}
-
-
-void CD3DEngine::SetMovieLock(bool bLock)
-{
-    m_bMovieLock = bLock;
-}
-
-bool CD3DEngine::RetMovieLock()
-{
-    return m_bMovieLock;
-}
-
-
-void CD3DEngine::SetShowStat(bool bShow)
-{
-    m_app->SetShowStat(bShow);
-}
-
-bool CD3DEngine::RetShowStat()
-{
-    return m_app->RetShowStat();
-}
-
-
-void CD3DEngine::SetRenderEnable(bool bEnable)
-{
-    m_bRender = bEnable;
-}
-
-
-// Prepare a structure to add D3DObjLevel6
-// qq D3DVERTEX2 elements.
-
-void CD3DEngine::MemSpace6(D3DObjLevel6 *&p, int nb)
-{
-    D3DObjLevel6*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_TRIANGLE+nb;
-        size = sizeof(D3DObjLevel6)+sizeof(D3DVERTEX2)*(total-1);
-        p = (D3DObjLevel6*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_TRIANGLE+nb;
-        size = sizeof(D3DObjLevel6)+sizeof(D3DVERTEX2)*(total-1);
-        pp = (D3DObjLevel6*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel6)+sizeof(D3DVERTEX2)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-// Prepare a structure to add D3DObjLevel5
-// qq elements D3DObjLevel6.
-
-void CD3DEngine::MemSpace5(D3DObjLevel5 *&p, int nb)
-{
-    D3DObjLevel5*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_MATERIAL+nb;
-        size = sizeof(D3DObjLevel5)+sizeof(D3DObjLevel6*)*(total-1);
-        p = (D3DObjLevel5*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_MATERIAL+nb;
-        size = sizeof(D3DObjLevel5)+sizeof(D3DObjLevel6*)*(total-1);
-        pp = (D3DObjLevel5*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel5)+sizeof(D3DObjLevel6*)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-// Prepare a structure to add D3DObjLevel4
-// qq D3DObjLevel5 elements.
-
-void CD3DEngine::MemSpace4(D3DObjLevel4 *&p, int nb)
-{
-    D3DObjLevel4*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_LIGHT+nb;
-        size = sizeof(D3DObjLevel4)+sizeof(D3DObjLevel5*)*(total-1);
-        p = (D3DObjLevel4*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_LIGHT+nb;
-        size = sizeof(D3DObjLevel4)+sizeof(D3DObjLevel5*)*(total-1);
-        pp = (D3DObjLevel4*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel4)+sizeof(D3DObjLevel5*)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-// Prepare a structure to add D3DObjLevel3
-// qq D3DObjLevel4 elements.
-
-void CD3DEngine::MemSpace3(D3DObjLevel3 *&p, int nb)
-{
-    D3DObjLevel3*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_MINMAX+nb;
-        size = sizeof(D3DObjLevel3)+sizeof(D3DObjLevel4*)*(total-1);
-        p = (D3DObjLevel3*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_MINMAX+nb;
-        size = sizeof(D3DObjLevel3)+sizeof(D3DObjLevel4*)*(total-1);
-        pp = (D3DObjLevel3*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel3)+sizeof(D3DObjLevel4*)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-// Prepare a structure to add D3DObjLevel2
-// qq D3DObjLevel3 elements.
-
-void CD3DEngine::MemSpace2(D3DObjLevel2 *&p, int nb)
-{
-    D3DObjLevel2*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_TRANSFORM+nb;
-        size = sizeof(D3DObjLevel2)+sizeof(D3DObjLevel3*)*(total-1);
-        p = (D3DObjLevel2*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_TRANSFORM+nb;
-        size = sizeof(D3DObjLevel2)+sizeof(D3DObjLevel3*)*(total-1);
-        pp = (D3DObjLevel2*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel2)+sizeof(D3DObjLevel3*)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-// Prepare a structure to add D3DObjLevel1
-// qq D3DObjLevel2 elements.
-
-void CD3DEngine::MemSpace1(D3DObjLevel1 *&p, int nb)
-{
-    D3DObjLevel1*   pp;
-    int             total, size;
-
-    if ( p == 0 )
-    {
-        total = SIZEBLOC_TEXTURE+nb;
-        size = sizeof(D3DObjLevel1)+sizeof(D3DObjLevel2*)*(total-1);
-        p = (D3DObjLevel1*)malloc(size);
-        ZeroMemory(p, size);
-        p->totalPossible = total;
-        return;
-    }
-
-    if ( p->totalUsed+nb > p->totalPossible )
-    {
-        total = p->totalPossible+SIZEBLOC_TEXTURE+nb;
-        size = sizeof(D3DObjLevel1)+sizeof(D3DObjLevel2*)*(total-1);
-        pp = (D3DObjLevel1*)malloc(size);
-        ZeroMemory(pp, size);
-        CopyMemory(pp, p, sizeof(D3DObjLevel1)+sizeof(D3DObjLevel2*)*(p->totalPossible-1));
-        pp->totalPossible = total;
-        free(p);
-        p = pp;
-    }
-}
-
-
-// Returns the number of objects that can still be created.
-
-int CD3DEngine::RetRestCreate()
-{
-    return D3DMAXOBJECT-m_objectParamTotal-2;
-}
-
-// Creates a new object. Returns its rank or -1 on error.
-
-int CD3DEngine::CreateObject()
-{
-    Math::Matrix    mat;
-    int         i;
-
-    for ( i=0 ; i<D3DMAXOBJECT ; i++ )
-    {
-        if ( m_objectParam[i].bUsed == false )
-        {
-            ZeroMemory(&m_objectParam[i], sizeof(D3DObject));
-            m_objectParam[i].bUsed = true;
-
-            mat.LoadIdentity();
-            SetObjectTransform(i, mat);
-
-            m_objectParam[i].bDrawWorld = true;
-            m_objectParam[i].distance = 0.0f;
-            m_objectParam[i].bboxMin = Math::Vector(0.0f, 0.0f, 0.0f);
-            m_objectParam[i].bboxMax = Math::Vector(0.0f, 0.0f, 0.0f);
-            m_objectParam[i].shadowRank = -1;
-
-            if ( i >= m_objectParamTotal )
-            {
-                m_objectParamTotal = i+1;
-            }
-            return i;
-        }
-    }
-    OutputDebugString("CD3DEngine::CreateObject() -> Too many object\n");
-    return -1;
-}
-
-
-// Removes all objects.
-
-void CD3DEngine::FlushObject()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             l1, l2, l3, l4, l5, i;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-                        free(p6);
-                    }
-                    free(p5);
-                }
-                free(p4);
-            }
-            free(p3);
-        }
-        free(p2);
-        p1->table[l1] = 0;
-    }
-    p1->totalUsed = 0;
-
-    for ( i=0 ; i<D3DMAXOBJECT ; i++ )
-    {
-        m_objectParam[i].bUsed = false;
-    }
-    m_objectParamTotal = 0;
-
-    ZeroMemory(m_shadow, sizeof(D3DShadow)*D3DMAXSHADOW);
-    m_shadowTotal = 0;
-
-    GroundSpotFlush();
-}
-
-// Destroys an existing object.
-
-bool CD3DEngine::DeleteObject(int objRank)
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             l1, l2, l3, l4, l5, i;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            if ( p3->objRank != objRank )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-                        free(p6);
-                    }
-                    free(p5);
-                }
-                free(p4);
-            }
-            free(p3);
-            p2->table[l2] = 0;
-        }
-    }
-
-    ShadowDelete(objRank);  // removes the shadow
-
-    m_objectParam[objRank].bUsed = false;
-
-    m_objectParamTotal = 0;
-    for ( i=0 ; i<D3DMAXOBJECT ; i++ )
-    {
-        if ( m_objectParam[i].bUsed )
-        {
-            m_objectParamTotal = i+1;
-        }
-    }
-
-    return true;
-}
-
-
-// Indicates whether an object should be drawn underneath the interface.
-
-bool CD3DEngine::SetDrawWorld(int objRank, bool bDraw)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    m_objectParam[objRank].bDrawWorld = bDraw;
-    return true;
-}
-
-// Indicates whether an object should be drawn over the interface.
-
-bool CD3DEngine::SetDrawFront(int objRank, bool bDraw)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    m_objectParam[objRank].bDrawFront = bDraw;
-    return true;
-}
-
-
-// Prepare Level 1 to add a triangle.
-
-D3DObjLevel2* CD3DEngine::AddLevel1(D3DObjLevel1 *&p1, char* texName1, char* texName2)
-{
-    D3DObjLevel2*   p2;
-    int             l1;
-
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        if ( strcmp(p2->texName1, texName1) == 0 &&
-             strcmp(p2->texName2, texName2) == 0 )
-        {
-            MemSpace2(p1->table[l1], 1);
-            return p1->table[l1];
-        }
-    }
-
-    MemSpace1(p1, 1);
-    l1 = p1->totalUsed++;
-    p1->table[l1] = 0;
-
-    MemSpace2(p1->table[l1], 1);
-    strcpy(p1->table[l1]->texName1, texName1);
-    strcpy(p1->table[l1]->texName2, texName2);
-    return p1->table[l1];
-}
-
-// Prepare Level 2 to add a triangle.
-
-D3DObjLevel3* CD3DEngine::AddLevel2(D3DObjLevel2 *&p2, int objRank)
-{
-    D3DObjLevel3*   p3;
-    int             l2;
-
-    for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-    {
-        p3 = p2->table[l2];
-        if ( p3 == 0 )  continue;
-        if ( p3->objRank == objRank )
-        {
-            MemSpace3(p2->table[l2], 1);
-            return p2->table[l2];
-        }
-    }
-
-    MemSpace2(p2, 1);
-    l2 = p2->totalUsed++;
-    p2->table[l2] = 0;
-
-    MemSpace3(p2->table[l2], 1);
-    p2->table[l2]->objRank = objRank;
-    return p2->table[l2];
-}
-
-// Prepare Level 3 to add a triangle.
-
-D3DObjLevel4* CD3DEngine::AddLevel3(D3DObjLevel3 *&p3, float min, float max)
-{
-    D3DObjLevel4*   p4;
-    int             l3;
-
-    for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-    {
-        p4 = p3->table[l3];
-        if ( p4 == 0 )  continue;
-        if ( p4->min == min && p4->max == max )
-        {
-            MemSpace4(p3->table[l3], 1);
-            return p3->table[l3];
-        }
-    }
-
-    MemSpace3(p3, 1);
-    l3 = p3->totalUsed++;
-    p3->table[l3] = 0;
-
-    MemSpace4(p3->table[l3], 1);
-    p3->table[l3]->min = min;
-    p3->table[l3]->max = max;
-    return p3->table[l3];
-}
-
-// Prepare Level 4 to add a triangle.
-
-D3DObjLevel5* CD3DEngine::AddLevel4(D3DObjLevel4 *&p4, int reserve)
-{
-    D3DObjLevel5*   p5;
-    int             l4;
-
-    for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-    {
-        p5 = p4->table[l4];
-        if ( p5 == 0 )  continue;
-        if ( p5->reserve == reserve )
-        {
-            MemSpace5(p4->table[l4], 1);
-            return p4->table[l4];
-        }
-    }
-
-    MemSpace4(p4, 1);
-    l4 = p4->totalUsed++;
-    p4->table[l4] = 0;
-
-    MemSpace5(p4->table[l4], 1);
-    p4->table[l4]->reserve = reserve;
-    return p4->table[l4];
-}
-
-// Prepares Level 5 to add vertices.
-
-D3DObjLevel6* CD3DEngine::AddLevel5(D3DObjLevel5 *&p5, D3DTypeTri type,
-                                    const D3DMATERIAL7 &mat, int state,
-                                    int nb)
-{
-    D3DObjLevel6*   p6;
-    int             l5;
-
-    if ( type == D3DTYPE6T )
-    {
-        for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-        {
-            p6 = p5->table[l5];
-            if ( p6 == 0 )  continue;
-            if ( p6->type == type &&
-                 memcmp(&p6->material, &mat, sizeof(D3DMATERIAL7)) == 0 &&
-                 p6->state == state )
-            {
-                MemSpace6(p5->table[l5], nb);
-                return p5->table[l5];
-            }
-        }
-    }
-
-    MemSpace5(p5, 1);
-    l5 = p5->totalUsed++;
-    p5->table[l5] = 0;
-
-    MemSpace6(p5->table[l5], nb);
-    p5->table[l5]->type     = type;
-    p5->table[l5]->material = mat;
-    p5->table[l5]->state    = state;
-    return p5->table[l5];
-}
-
-// Adds one or more triangles to an existing object.
-// The number must be divisible by 3.
-
-bool CD3DEngine::AddTriangle(int objRank, D3DVERTEX2* vertex, int nb,
-                             const D3DMATERIAL7 &mat, int state,
-                             char* texName1, char* texName2,
-                             float min, float max, bool bGlobalUpdate)
-{
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             i;
-
-    m_lastDim = m_dim;
-    m_lastObjectDetail = m_objectDetail;
-    m_lastClippingDistance = m_clippingDistance;
-
-    p2 = AddLevel1(m_objectPointer, texName1, texName2);
-    p3 = AddLevel2(p2, objRank);
-    p4 = AddLevel3(p3, min, max);
-    p5 = AddLevel4(p4, 0);
-    p6 = AddLevel5(p5, D3DTYPE6T, mat, state, nb);  // place for number of vertex
-
-    CopyMemory(&p6->vertex[p6->totalUsed], vertex, sizeof(D3DVERTEX2)*nb);
-    p6->totalUsed += nb;
-
-    if ( bGlobalUpdate )
-    {
-        m_bUpdateGeometry = true;
-    }
-    else
-    {
-        for ( i=0 ; i<nb ; i++ )
-        {
-            m_objectParam[objRank].bboxMin.x = Math::Min(vertex[i].x, m_objectParam[objRank].bboxMin.x);
-            m_objectParam[objRank].bboxMin.y = Math::Min(vertex[i].y, m_objectParam[objRank].bboxMin.y);
-            m_objectParam[objRank].bboxMin.z = Math::Min(vertex[i].z, m_objectParam[objRank].bboxMin.z);
-            m_objectParam[objRank].bboxMax.x = Math::Max(vertex[i].x, m_objectParam[objRank].bboxMax.x);
-            m_objectParam[objRank].bboxMax.y = Math::Max(vertex[i].y, m_objectParam[objRank].bboxMax.y);
-            m_objectParam[objRank].bboxMax.z = Math::Max(vertex[i].z, m_objectParam[objRank].bboxMax.z);
-        }
-
-        m_objectParam[objRank].radius = Math::Max(m_objectParam[objRank].bboxMin.Length(),
-                                                  m_objectParam[objRank].bboxMax.Length());
-    }
-    m_objectParam[objRank].totalTriangle += nb/3;
-
-    return true;
-}
-
-// Adds a surface consisting of triangles joined.
-
-bool CD3DEngine::AddSurface(int objRank, D3DVERTEX2* vertex, int nb,
-                            const D3DMATERIAL7 &mat, int state,
-                            char* texName1, char* texName2,
-                            float min, float max, bool bGlobalUpdate)
-{
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             i;
-
-    p2 = AddLevel1(m_objectPointer, texName1, texName2);
-    p3 = AddLevel2(p2, objRank);
-    p4 = AddLevel3(p3, min, max);
-    p5 = AddLevel4(p4, 0);
-    p6 = AddLevel5(p5, D3DTYPE6S, mat, state, nb);  // place for number of vertex
-
-    CopyMemory(&p6->vertex[p6->totalUsed], vertex, sizeof(D3DVERTEX2)*nb);
-    p6->totalUsed += nb;
-
-    if ( bGlobalUpdate )
-    {
-        m_bUpdateGeometry = true;
-    }
-    else
-    {
-        for ( i=0 ; i<nb ; i++ )
-        {
-            m_objectParam[objRank].bboxMin.x = Math::Min(vertex[i].x, m_objectParam[objRank].bboxMin.x);
-            m_objectParam[objRank].bboxMin.y = Math::Min(vertex[i].y, m_objectParam[objRank].bboxMin.y);
-            m_objectParam[objRank].bboxMin.z = Math::Min(vertex[i].z, m_objectParam[objRank].bboxMin.z);
-            m_objectParam[objRank].bboxMax.x = Math::Max(vertex[i].x, m_objectParam[objRank].bboxMax.x);
-            m_objectParam[objRank].bboxMax.y = Math::Max(vertex[i].y, m_objectParam[objRank].bboxMax.y);
-            m_objectParam[objRank].bboxMax.z = Math::Max(vertex[i].z, m_objectParam[objRank].bboxMax.z);
-        }
-
-        m_objectParam[objRank].radius = Math::Max(m_objectParam[objRank].bboxMin.Length(),
-                                                  m_objectParam[objRank].bboxMax.Length());
-    }
-    m_objectParam[objRank].totalTriangle += nb-2;
-
-    return true;
-}
-
-// Adds a surface consisting of triangles joined.
-// The buffer is not copied.
-
-bool CD3DEngine::AddQuick(int objRank, D3DObjLevel6* buffer,
-                          char* texName1, char* texName2,
-                          float min, float max, bool bGlobalUpdate)
-{
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    int             l5, i;
-
-    p2 = AddLevel1(m_objectPointer, texName1, texName2);
-    p3 = AddLevel2(p2, objRank);
-    p4 = AddLevel3(p3, min, max);
-    p5 = AddLevel4(p4, 0);
-
-    MemSpace5(p5, 1);
-    l5 = p5->totalUsed++;
-    p5->table[l5] = buffer;
-
-    if ( bGlobalUpdate )
-    {
-        m_bUpdateGeometry = true;
-    }
-    else
-    {
-        for ( i=0 ; i<buffer->totalUsed ; i++ )
-        {
-            m_objectParam[objRank].bboxMin.x = Math::Min(buffer->vertex[i].x, m_objectParam[objRank].bboxMin.x);
-            m_objectParam[objRank].bboxMin.y = Math::Min(buffer->vertex[i].y, m_objectParam[objRank].bboxMin.y);
-            m_objectParam[objRank].bboxMin.z = Math::Min(buffer->vertex[i].z, m_objectParam[objRank].bboxMin.z);
-            m_objectParam[objRank].bboxMax.x = Math::Max(buffer->vertex[i].x, m_objectParam[objRank].bboxMax.x);
-            m_objectParam[objRank].bboxMax.y = Math::Max(buffer->vertex[i].y, m_objectParam[objRank].bboxMax.y);
-            m_objectParam[objRank].bboxMax.z = Math::Max(buffer->vertex[i].z, m_objectParam[objRank].bboxMax.z);
-        }
-
-        m_objectParam[objRank].radius = Math::Max(m_objectParam[objRank].bboxMin.Length(),
-                                                  m_objectParam[objRank].bboxMax.Length());
-    }
-    m_objectParam[objRank].totalTriangle += buffer->totalUsed-2;
-
-    return true;
-}
-
-
-// Looking for a list of triangles.
-
-void CD3DEngine::ChangeLOD()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    int             l1, l2, l3;
-    float           oldLimit[2], newLimit[2];
-    float           oldTerrain, newTerrain;
-
-    oldLimit[0] = RetLimitLOD(0, true);
-    oldLimit[1] = RetLimitLOD(1, true);
-
-    newLimit[0] = RetLimitLOD(0, false);
-    newLimit[1] = RetLimitLOD(1, false);
-
-    oldTerrain = m_terrainVision*m_lastClippingDistance;
-    newTerrain = m_terrainVision*m_clippingDistance;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-
-                if ( Math::IsEqual(p4->min, 0.0f       ) &&
-                     Math::IsEqual(p4->max, oldLimit[0]) )
-                {
-                    p4->max = newLimit[0];
-                }
-                else if ( Math::IsEqual(p4->min, oldLimit[0]) &&
-                          Math::IsEqual(p4->max, oldLimit[1]) )
-                {
-                    p4->min = newLimit[0];
-                    p4->max = newLimit[1];
-                }
-                else if ( Math::IsEqual(p4->min, oldLimit[1]) &&
-                          Math::IsEqual(p4->max, 1000000.0f ) )
-                {
-                    p4->min = newLimit[1];
-                }
-                else if ( Math::IsEqual(p4->min, 0.0f      ) &&
-                          Math::IsEqual(p4->max, oldTerrain) )
-                {
-                    p4->max = newTerrain;
-                }
-            }
-        }
-    }
-
-    m_lastDim = m_dim;
-    m_lastObjectDetail = m_objectDetail;
-    m_lastClippingDistance = m_clippingDistance;
-}
-
-// Looking for a list of triangles.
-
-D3DObjLevel6* CD3DEngine::SearchTriangle(int objRank,
-                                         const D3DMATERIAL7 &mat, int state,
-                                         char* texName1, char* texName2,
-                                         float min, float max)
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             l1, l2, l3, l4, l5;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-//?     if ( strcmp(p2->texName1, texName1) != 0 ||
-//?          strcmp(p2->texName2, texName2) != 0 )  continue;
-        if ( strcmp(p2->texName1, texName1) != 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            if ( p3->objRank != objRank )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                if ( p4->min != min ||
-                     p4->max != max )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-//?                     if ( p6->state != state ||
-                        if ( (p6->state&(~(D3DSTATEDUALb|D3DSTATEDUALw))) != state ||
-                             memcmp(&p6->material, &mat, sizeof(D3DMATERIAL7)) != 0 )  continue;
-                        return p6;
-                    }
-                }
-            }
-        }
-    }
-    return 0;
-}
-
-// Secondary changes the texture of an object.
-
-bool CD3DEngine::ChangeSecondTexture(int objRank, char* texName2)
-{
-    D3DObjLevel2*   newp2;
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    int             l1, l2;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        if ( strcmp(p2->texName2, texName2) == 0 )  continue;  // already new
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            if ( p3->objRank != objRank )  continue;
-
-            newp2 = AddLevel1(m_objectPointer, p2->texName1, texName2);
-
-            if ( newp2->totalUsed >= newp2->totalPossible )  continue;  // to do better!!!
-            newp2->table[newp2->totalUsed++] = p3;
-
-            p2->table[l2] = 0;
-        }
-    }
-    return true;
-}
-
-
-// Returns the number of triangles of the object.
-
-int CD3DEngine::RetTotalTriangles(int objRank)
-{
-    return m_objectParam[objRank].totalTriangle;
-}
-
-// Return qq triangles of an object.
-// qq triangles used to extract an object that explodes.
-// "Percent" is between 0 and 1.
-
-int CD3DEngine::GetTriangles(int objRank, float min, float max,
-                              D3DTriangle* buffer, int size, float percent)
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    D3DVERTEX2*     pv;
-    int             l1, l2, l3, l4, l5, l6, i, rank;
-
-    rank = 0;
-    i = 0;
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-//?     if ( p2->texName[0] == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            if ( p3->objRank != objRank )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                if ( p4->min != min ||
-                     p4->max != max )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-                        if ( p6->type == D3DTYPE6T )
-                        {
-                            pv = &p6->vertex[0];
-                            for ( l6=0 ; l6<p6->totalUsed/3 ; l6++ )
-                            {
-                                if ( (float)i/rank <= percent )
-                                {
-                                    if ( i >= size )  break;
-                                    buffer[i].triangle[0] = pv[0];
-                                    buffer[i].triangle[1] = pv[1];
-                                    buffer[i].triangle[2] = pv[2];
-                                    buffer[i].material = p6->material;
-                                    buffer[i].state = p6->state;
-                                    strcpy(buffer[i].texName1, p2->texName1);
-                                    strcpy(buffer[i].texName2, p2->texName2);
-                                    i ++;
-                                }
-                                rank ++;
-                                pv += 3;
-                            }
-                        }
-                        if ( p6->type == D3DTYPE6S )
-                        {
-                            pv = &p6->vertex[0];
-                            for ( l6=0 ; l6<p6->totalUsed-2 ; l6++ )
-                            {
-                                if ( (float)i/rank <= percent )
-                                {
-                                    if ( i >= size )  break;
-                                    buffer[i].triangle[0] = pv[0];
-                                    buffer[i].triangle[1] = pv[1];
-                                    buffer[i].triangle[2] = pv[2];
-                                    buffer[i].material = p6->material;
-                                    buffer[i].state = p6->state;
-                                    strcpy(buffer[i].texName1, p2->texName1);
-                                    strcpy(buffer[i].texName2, p2->texName2);
-                                    i ++;
-                                }
-                                rank ++;
-                                pv += 1;
-                            }
-                        }
-                    }
-                }
-            }
-        }
-    }
-    return i;
-}
-
-// Give the box of an object.
-
-bool CD3DEngine::GetBBox(int objRank, Math::Vector &min, Math::Vector &max)
-{
-    min = m_objectParam[objRank].bboxMin;
-    max = m_objectParam[objRank].bboxMax;
-    return true;
-}
-
-
-// Change the texture mapping for a list of triangles.
-
-bool CD3DEngine::ChangeTextureMapping(int objRank,
-                                      const D3DMATERIAL7 &mat, int state,
-                                      char* texName1, char* texName2,
-                                      float min, float max,
-                                      D3DMaping mode,
-                                      float au, float bu,
-                                      float av, float bv)
-{
-    D3DObjLevel6*   p6;
-    D3DVERTEX2*     pv;
-    int             l6, nb;
-
-    p6 = SearchTriangle(objRank, mat, state, texName1, texName2, min, max);
-    if ( p6 == 0 )  return false;
-
-    pv = &p6->vertex[0];
-    nb = p6->totalUsed;
-
-    if ( mode == D3DMAPPINGX )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tu = pv->z*au+bu;
-            pv->tv = pv->y*av+bv;
-            pv ++;
-        }
-    }
-
-    if ( mode == D3DMAPPINGY )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tu = pv->x*au+bu;
-            pv->tv = pv->z*av+bv;
-            pv ++;
-        }
-    }
-
-    if ( mode == D3DMAPPINGZ )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tu = pv->x*au+bu;
-            pv->tv = pv->y*av+bv;
-            pv ++;
-        }
-    }
-
-    if ( mode == D3DMAPPING1X )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tu = pv->x*au+bu;
-            pv ++;
-        }
-    }
-
-    if ( mode == D3DMAPPING1Y )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tv = pv->y*au+bu;
-            pv ++;
-        }
-    }
-
-    if ( mode == D3DMAPPING1Z )
-    {
-        for ( l6=0 ; l6<nb ; l6++ )
-        {
-            pv->tu = pv->z*au+bu;
-            pv ++;
-        }
-    }
-
-    return true;
-}
-
-// Change the texture mapping for a list of triangles
-// to simulate a caterpillar that turns.
-// Only the mapping as "u" is changed.
-//
-//  pos: position on the periphery [p]
-//  tl:  length repetitive element of the texture [t]
-//  ts:  beginning of the texture[t]
-//  tt:  total width of the texture [t]
-//
-//  [p] = distance in the 3D world
-//  [t] = position in the texture (pixels)
-
-//  ^ y         5
-//  |   6  o---------o  4
-//  |    /             \
-//  |   o               o
-//  | 7 |               | 3
-//  |   o  current      o
-//  |    \ |           /
-//  |   0  o---------o  2
-//  |           1
-// -o-----------------------> x
-//  |
-//
-// Quand l6=1 :
-//     0      1     2  3  4  ...  7
-//    o--o---------o--o--o--o-//-o--o development track
-//    |ps|         |
-//    <-->  pe     |
-//    <------------>
-//
-// Texture :
-//   o---------------o
-//   |               |
-//   |     o-o-o-o-o |
-//   |     | | | | |<--- texture of the track
-//   |     o-o-o-o-o |
-//   |     | | tl    |
-//   |   ->|-|<---   |
-//   |     |         |
-//   o-----|---------o--> u
-//   | ts  |         |
-//   <-----> tt      |
-//   <--------------->
-
-bool CD3DEngine::TrackTextureMapping(int objRank,
-                                     const D3DMATERIAL7 &mat, int state,
-                                     char* texName1, char* texName2,
-                                     float min, float max,
-                                     D3DMaping mode, float pos, float factor,
-                                     float tl, float ts, float tt)
-{
-    D3DObjLevel6*   p6;
-    D3DVERTEX2*     pv;
-    Math::Vector        current;
-    float           ps, pe, pps, ppe, offset;
-    int             l6, nb, i, j, s, e;
-    int             is[6], ie[6];
-
-    p6 = SearchTriangle(objRank, mat, state, texName1, texName2, min, max);
-    if ( p6 == 0 )  return false;
-
-    pv = &p6->vertex[0];
-    nb = p6->totalUsed;
-
-    if ( nb < 12 || nb%6 != 0 )  return false;
-
-    while ( pos < 0.0f )
-    {
-        pos += 1000000.0f;  // never negative!
-    }
-
-    for ( i=0 ; i<6 ; i++ )
-    {
-        for ( j=0 ; j<6 ; j++ )
-        {
-            if ( pv[i].x == pv[j+6].x &&
-                 pv[i].y == pv[j+6].y )
-            {
-                current.x = pv[i].x;  // position end link
-                current.y = pv[i].y;
-                break;
-            }
-        }
-    }
-
-    ps = 0.0f;  // start position on the periphery
-    for ( l6=0 ; l6<nb/6 ; l6++ )
-    {
-        s = e = 0;
-        for ( i=0 ; i<6 ; i++ )
-        {
-            if ( fabs(pv[i].x-current.x) < 0.0001f &&
-                 fabs(pv[i].y-current.y) < 0.0001f )
-            {
-                ie[e++] = i;
-            }
-            else
-            {
-                is[s++] = i;
-            }
-        }
-        if ( s == 3 && e == 3 )
-        {
-            pe = ps+Math::Point(pv[is[0]].x-pv[ie[0]].x,
-                                pv[is[0]].y-pv[ie[0]].y).Length() / factor;  // end position on the periphery
-
-            pps = ps+pos;
-            ppe = pe+pos;
-            offset = (float)((int)pps);
-            pps -= offset;
-            ppe -= offset;
-
-            for ( i=0 ; i<3 ; i++ )
-            {
-                pv[is[i]].tu = ((pps*tl)+ts)/tt;
-                pv[ie[i]].tu = ((ppe*tl)+ts)/tt;
-            }
-        }
-
-        if ( l6 >= (nb/6)-1 )  break;
-        for ( i=0 ; i<6 ; i++ )
-        {
-            if ( fabs(pv[i+6].x-current.x) > 0.0001f ||
-                 fabs(pv[i+6].y-current.y) > 0.0001f )
-            {
-                current.x = pv[i+6].x;  // end next link
-                current.y = pv[i+6].y;
-                break;
-            }
-        }
-        ps = pe;  // following start position on the periphery
-        pv += 6;
-    }
-
-    return true;
-}
-
-
-// Updates all the geometric parameters of objects.
-
-void CD3DEngine::UpdateGeometry()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    int             l1, l2, l3, l4, l5, objRank, i;
-
-    if ( !m_bUpdateGeometry )  return;
-
-    for ( i=0 ; i<m_objectParamTotal ; i++ )
-    {
-        m_objectParam[i].bboxMin.x = 0;
-        m_objectParam[i].bboxMin.y = 0;
-        m_objectParam[i].bboxMin.z = 0;
-        m_objectParam[i].bboxMax.x = 0;
-        m_objectParam[i].bboxMax.y = 0;
-        m_objectParam[i].bboxMax.z = 0;
-        m_objectParam[i].radius = 0;
-    }
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            objRank = p3->objRank;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-
-                        for ( i=0 ; i<p6->totalUsed ; i++ )
-                        {
-                            m_objectParam[objRank].bboxMin.x = Math::Min(p6->vertex[i].x, m_objectParam[objRank].bboxMin.x);
-                            m_objectParam[objRank].bboxMin.y = Math::Min(p6->vertex[i].y, m_objectParam[objRank].bboxMin.y);
-                            m_objectParam[objRank].bboxMin.z = Math::Min(p6->vertex[i].z, m_objectParam[objRank].bboxMin.z);
-                            m_objectParam[objRank].bboxMax.x = Math::Max(p6->vertex[i].x, m_objectParam[objRank].bboxMax.x);
-                            m_objectParam[objRank].bboxMax.y = Math::Max(p6->vertex[i].y, m_objectParam[objRank].bboxMax.y);
-                            m_objectParam[objRank].bboxMax.z = Math::Max(p6->vertex[i].z, m_objectParam[objRank].bboxMax.z);
-                        }
-
-                        m_objectParam[objRank].radius = Math::Max(m_objectParam[objRank].bboxMin.Length(),
-                                                                  m_objectParam[objRank].bboxMax.Length());
-                    }
-                }
-            }
-        }
-    }
-
-    m_bUpdateGeometry = false;
-}
-
-
-// Determines whether an object is visible, even partially.
-// Transformation of "world" must be done​​!
-
-bool CD3DEngine::IsVisible(int objRank)
-{
-    Math::Vector    center;
-    DWORD       flags;
-    float       radius;
-
-    radius = m_objectParam[objRank].radius;
-    center = Math::Vector(0.0f, 0.0f, 0.0f);
-    {
-        D3DVECTOR centerD3D = VEC_TO_D3DVEC(center);
-        m_pD3DDevice->ComputeSphereVisibility(&centerD3D, &radius, 1, 0, &flags);
-    }
-
-    if ( flags & D3DSTATUS_CLIPINTERSECTIONALL )
-    {
-        m_objectParam[objRank].bVisible = false;
-        return false;
-    }
-    m_objectParam[objRank].bVisible = true;
-    return true;
-}
-
-
-// Detects the target object with the mouse.
-// Returns the rank of the object or -1.
-
-int CD3DEngine::DetectObject(Math::Point mouse)
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    D3DVERTEX2*     pv;
-    int             l1, l2, l3, l4, l5, i, objRank, nearest;
-    float           dist, min;
-
-    min = 1000000.0f;
-    nearest = -1;
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-        if ( p2 == 0 )  continue;
-        for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-        {
-            p3 = p2->table[l2];
-            if ( p3 == 0 )  continue;
-            objRank = p3->objRank;
-            if ( m_objectParam[objRank].type == TYPETERRAIN )  continue;
-            if ( !DetectBBox(objRank, mouse) )  continue;
-            for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-            {
-                p4 = p3->table[l3];
-                if ( p4 == 0 )  continue;
-                if ( p4->min != 0.0f )  continue;  // LOD B or C?
-                for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                {
-                    p5 = p4->table[l4];
-                    if ( p5 == 0 )  continue;
-                    for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                    {
-                        p6 = p5->table[l5];
-                        if ( p6 == 0 )  continue;
-
-                        if ( p6->type == D3DTYPE6T )
-                        {
-                            pv = &p6->vertex[0];
-                            for ( i=0 ; i<p6->totalUsed/3 ; i++ )
-                            {
-                                if ( DetectTriangle(mouse, pv, objRank, dist) &&
-                                     dist < min )
-                                {
-                                    min = dist;
-                                    nearest = objRank;
-                                }
-                                pv += 3;
-                            }
-                        }
-                        if ( p6->type == D3DTYPE6S )
-                        {
-                            pv = &p6->vertex[0];
-                            for ( i=0 ; i<p6->totalUsed-2 ; i++ )
-                            {
-                                if ( DetectTriangle(mouse, pv, objRank, dist) &&
-                                     dist < min )
-                                {
-                                    min = dist;
-                                    nearest = objRank;
-                                }
-                                pv += 1;
-                            }
-                        }
-                    }
-                }
-            }
-        }
-    }
-    return nearest;
-}
-
-// Detects whether the mouse is in a triangle.
-
-bool CD3DEngine::DetectTriangle(Math::Point mouse, D3DVERTEX2 *triangle,
-                                int objRank, float &dist)
-{
-    Math::Vector    p2D[3], p3D;
-    Math::Point     a, b, c;
-    int         i;
-
-    for ( i=0 ; i<3 ; i++ )
-    {
-        p3D.x = triangle[i].x;
-        p3D.y = triangle[i].y;
-        p3D.z = triangle[i].z;
-        if ( !TransformPoint(p2D[i], objRank, p3D) )  return false;
-    }
-
-    if ( mouse.x < p2D[0].x &&
-         mouse.x < p2D[1].x &&
-         mouse.x < p2D[2].x )  return false;
-    if ( mouse.x > p2D[0].x &&
-         mouse.x > p2D[1].x &&
-         mouse.x > p2D[2].x )  return false;
-    if ( mouse.y < p2D[0].y &&
-         mouse.y < p2D[1].y &&
-         mouse.y < p2D[2].y )  return false;
-    if ( mouse.y > p2D[0].y &&
-         mouse.y > p2D[1].y &&
-         mouse.y > p2D[2].y )  return false;
-
-    a.x = p2D[0].x;
-    a.y = p2D[0].y;
-    b.x = p2D[1].x;
-    b.y = p2D[1].y;
-    c.x = p2D[2].x;
-    c.y = p2D[2].y;
-    if ( !Math::IsInsideTriangle(a, b, c, mouse) )  return false;
-
-    dist = (p2D[0].z+p2D[1].z+p2D[2].z)/3.0f;
-    return true;
-}
-
-// Detects whether an object is affected by the mouse.
-
-bool CD3DEngine::DetectBBox(int objRank, Math::Point mouse)
-{
-    Math::Vector    p, pp;
-    Math::Point     min, max;
-    int         i;
-
-    min.x =  1000000.0f;
-    min.y =  1000000.0f;
-    max.x = -1000000.0f;
-    max.y = -1000000.0f;
-
-    for ( i=0 ; i<8 ; i++ )
-    {
-        if ( i & (1<<0) )  p.x = m_objectParam[objRank].bboxMin.x;
-        else               p.x = m_objectParam[objRank].bboxMax.x;
-        if ( i & (1<<1) )  p.y = m_objectParam[objRank].bboxMin.y;
-        else               p.y = m_objectParam[objRank].bboxMax.y;
-        if ( i & (1<<2) )  p.z = m_objectParam[objRank].bboxMin.z;
-        else               p.z = m_objectParam[objRank].bboxMax.z;
-        if ( TransformPoint(pp, objRank, p) )
-        {
-            if ( pp.x < min.x )  min.x = pp.x;
-            if ( pp.x > max.x )  max.x = pp.x;
-            if ( pp.y < min.y )  min.y = pp.y;
-            if ( pp.y > max.y )  max.y = pp.y;
-        }
-    }
-
-    return ( mouse.x >= min.x &&
-             mouse.x <= max.x &&
-             mouse.y >= min.y &&
-             mouse.y <= max.y );
-}
-
-// Transforms a 3D point (x, y, z) in 2D space (x, y, -) of the window.
-// The coordinated p2D.z gives the distance.
-
-bool CD3DEngine::TransformPoint(Math::Vector &p2D, int objRank, Math::Vector p3D)
-{
-    p3D = Math::Transform(m_objectParam[objRank].transform, p3D);
-    p3D = Math::Transform(m_matView, p3D);
-
-    if ( p3D.z < 2.0f )  return false;  // behind?
-
-    p2D.x = (p3D.x/p3D.z)*m_matProj.Get(1,1);
-    p2D.y = (p3D.y/p3D.z)*m_matProj.Get(2,2);
-    p2D.z = p3D.z;
-
-    p2D.x = (p2D.x+1.0f)/2.0f;  // [-1..1] -> [0..1]
-    p2D.y = (p2D.y+1.0f)/2.0f;
-
-    return true;
-}
-
-
-// Calculating the distances between the viewpoint and the origin
-// of different objects.
-
-void CD3DEngine::ComputeDistance()
-{
-    Math::Vector    v;
-    int         i;
-    float       distance;
-
-    if ( s_resol == 0 )
-    {
-        for ( i=0 ; i<m_objectParamTotal ; i++ )
-        {
-            if ( m_objectParam[i].bUsed == false )  continue;
-
-            v.x = m_eyePt.x - m_objectParam[i].transform.Get(1,4);
-            v.y = m_eyePt.y - m_objectParam[i].transform.Get(2,4);
-            v.z = m_eyePt.z - m_objectParam[i].transform.Get(3,4);
-            m_objectParam[i].distance = v.Length();
-        }
-    }
-    else
-    {
-        if ( s_resol == 1 )
-        {
-            distance = 100000.0f;
-        }
-        if ( s_resol == 2 )
-        {
-            distance = (RetLimitLOD(0)+RetLimitLOD(1))/2.0f;
-        }
-        if ( s_resol == 3 )
-        {
-            distance = 0.0f;
-        }
-
-        for ( i=0 ; i<m_objectParamTotal ; i++ )
-        {
-            if ( m_objectParam[i].bUsed == false )  continue;
-
-            if ( m_objectParam[i].type == TYPETERRAIN )
-            {
-                v.x = m_eyePt.x - m_objectParam[i].transform.Get(1,4);
-                v.y = m_eyePt.y - m_objectParam[i].transform.Get(2,4);
-                v.z = m_eyePt.z - m_objectParam[i].transform.Get(3,4);
-                m_objectParam[i].distance = v.Length();
-            }
-            else
-            {
-                m_objectParam[i].distance = distance;
-            }
-        }
-    }
-}
-
-
-// Adjusts settings when first run.
-
-void CD3DEngine::FirstExecuteAdapt(bool bFirst)
-{
-    if ( m_app->IsVideo8MB() )
-    {
-        SetGroundSpot(false);
-        SetSkyMode(false);
-    }
-
-    if ( m_app->IsVideo32MB() && bFirst )
-    {
-        SetObjectDetail(2.0f);
-    }
-}
-
-// Returns the total amount of video memory for textures.
-
-int CD3DEngine::GetVidMemTotal()
-{
-    return m_app->GetVidMemTotal();
-}
-
-bool CD3DEngine::IsVideo8MB()
-{
-    return m_app->IsVideo8MB();
-}
-
-bool CD3DEngine::IsVideo32MB()
-{
-    return m_app->IsVideo32MB();
-}
-
-
-// Perform the list of all graphics devices available.
-
-bool CD3DEngine::EnumDevices(char *bufDevices, int lenDevices,
-                             char *bufModes, int lenModes,
-                             int &totalDevices, int &selectDevices,
-                             int &totalModes, int &selectModes)
-{
-    return m_app->EnumDevices(bufDevices, lenDevices,
-                              bufModes, lenModes,
-                              totalDevices, selectDevices,
-                              totalModes, selectModes);
-}
-
-bool CD3DEngine::RetFullScreen()
-{
-    return m_app->RetFullScreen();
-}
-
-bool CD3DEngine::ChangeDevice(char *device, char *mode, bool bFull)
-{
-    return m_app->ChangeDevice(device, mode, bFull);
-}
-
-
-
-Math::Matrix* CD3DEngine::RetMatView()
-{
-    return &m_matView;
-}
-
-Math::Matrix* CD3DEngine::RetMatLeftView()
-{
-    return &m_matLeftView;
-}
-
-Math::Matrix* CD3DEngine::RetMatRightView()
-{
-    return &m_matRightView;
-}
-
-
-// Specifies the location and direction of view.
-
-void CD3DEngine::SetViewParams(const Math::Vector &vEyePt,
-                               const Math::Vector &vLookatPt,
-                               const Math::Vector &vUpVec,
-                               FLOAT fEyeDistance)
-{
-#if 0
-    m_eyePt = vEyePt;
-
-    // Adjust camera position for left or right eye along the axis
-    // perpendicular to the view direction vector and the up vector.
-    Math::Vector vView = (vLookatPt) - (vEyePt);
-    vView = CrossProduct( vView, (vUpVec) );
-    vView = Normalize( vView ) * fEyeDistance;
-
-    Math::Vector vLeftEyePt  = (vEyePt) + vView;
-    Math::Vector vRightEyePt = (vEyePt) - vView;
-
-    // Set the view matrices
-    Math::LoadViewMatrix( m_matLeftView,  (Math::Vector)vLeftEyePt,  (Math::Vector)vLookatPt, (Math::Vector)vUpVec );
-    Math::LoadViewMatrix( m_matRightView, (Math::Vector)vRightEyePt, (Math::Vector)vLookatPt, (Math::Vector)vUpVec );
-    Math::LoadViewMatrix( m_matView,      (Math::Vector)vEyePt,      (Math::Vector)vLookatPt, (Math::Vector)vUpVec );
-#else
-    m_eyePt = vEyePt;
-    m_lookatPt = vLookatPt;
-    m_eyeDirH = Math::RotateAngle(vEyePt.x-vLookatPt.x, vEyePt.z-vLookatPt.z);
-    m_eyeDirV = Math::RotateAngle(Math::DistanceProjected(vEyePt, vLookatPt), vEyePt.y-vLookatPt.y);
-
-    Math::LoadViewMatrix(m_matView, vEyePt, vLookatPt, vUpVec);
-
-    if ( m_sound == 0 )
-    {
-        m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
-    }
-    m_sound->SetListener(vEyePt, vLookatPt);
-#endif
-}
-
-
-// Specifies the transformation matrix of an object.
-
-bool CD3DEngine::SetObjectTransform(int objRank, const Math::Matrix &transform)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    m_objectParam[objRank].transform = transform;
-    return true;
-}
-
-// Gives the transformation matrix of an object.
-
-bool CD3DEngine::GetObjectTransform(int objRank, Math::Matrix &transform)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    transform = m_objectParam[objRank].transform;
-    return true;
-}
-
-// Specifies the type of an object.
-
-bool CD3DEngine::SetObjectType(int objRank, D3DTypeObj type)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    m_objectParam[objRank].type = type;
-    return true;
-}
-
-// Returns the type of an object.
-
-D3DTypeObj CD3DEngine::RetObjectType(int objRank)
-{
-    return m_objectParam[objRank].type;
-}
-
-// Specifies the transparency of an object.
-
-bool CD3DEngine::SetObjectTransparency(int objRank, float value)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    m_objectParam[objRank].transparency = value;
-    return true;
-}
-
-
-// Allocates a table for shade, if necessary.
-
-bool CD3DEngine::ShadowCreate(int objRank)
-{
-    int     i;
-
-    // Already allocated?
-    if ( m_objectParam[objRank].shadowRank != -1 )  return true;
-
-    for ( i=0 ; i<D3DMAXSHADOW ; i++ )
-    {
-        if ( m_shadow[i].bUsed == false )  // Free?
-        {
-            ZeroMemory(&m_shadow[i], sizeof(D3DShadow));
-
-            m_shadow[i].bUsed = true;
-            m_shadow[i].objRank = objRank;
-            m_shadow[i].height = 0.0f;
-
-            m_objectParam[objRank].shadowRank = i;
-
-            if ( m_shadowTotal < i+1 )
-            {
-                m_shadowTotal = i+1;
-            }
-            return true;
-        }
-    }
-    return false;  // not found
-}
-
-// Removes the shadow associated with an object.
-
-void CD3DEngine::ShadowDelete(int objRank)
-{
-    int     i;
-
-    if ( objRank == -1 )  return;
-
-    i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return;
-
-    m_shadow[i].bUsed = false;
-    m_shadow[i].objRank = -1;
-    m_shadow[i].pos = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_shadow[i].type = D3DSHADOWNORM;
-
-    m_objectParam[objRank].shadowRank = -1;
-
-    m_shadowTotal = 0;
-    for ( i=0 ; i<D3DMAXSHADOW ; i++ )
-    {
-        if ( m_shadow[i].bUsed )  m_shadowTotal = i+1;
-    }
-}
-
-// Specifies if the shadow is visible.
-// For example, when an object is carried, he has no shadow.
-
-bool CD3DEngine::SetObjectShadowHide(int objRank, bool bHide)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].bHide = bHide;
-    return true;
-}
-
-// Specifies the type of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowType(int objRank, D3DShadowType type)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].type = type;
-    return true;
-}
-
-// Specifies the position of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowPos(int objRank, const Math::Vector &pos)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].pos = pos;
-    return true;
-}
-
-// Specifies the normal shadow to the field of the object.
-
-bool CD3DEngine::SetObjectShadowNormal(int objRank, const Math::Vector &n)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].normal = n;
-    return true;
-}
-
-// Specifies the angle of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowAngle(int objRank, float angle)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].angle = angle;
-    return true;
-}
-
-// Specifies the radius of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowRadius(int objRank, float radius)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].radius = radius;
-    return true;
-}
-
-// Returns the radius of the shadow of the object.
-
-float CD3DEngine::RetObjectShadowRadius(int objRank)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return 0.0f;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    return m_shadow[i].radius;
-}
-
-// Specifies the intensity of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowIntensity(int objRank, float intensity)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].intensity = intensity;
-    return true;
-}
-
-// Specifies the height of the shadow of the object.
-
-bool CD3DEngine::SetObjectShadowHeight(int objRank, float h)
-{
-    if ( objRank < 0 || objRank >= D3DMAXOBJECT )  return false;
-
-    int i = m_objectParam[objRank].shadowRank;
-    if ( i == -1 )  return false;
-
-    m_shadow[i].height = h;
-    return true;
-}
-
-
-// Clears all marks on the ground.
-
-void CD3DEngine::GroundSpotFlush()
-{
-    LPDIRECTDRAWSURFACE7    surface;
-    DDSURFACEDESC2          ddsd;
-    WORD*                   pbSurf;
-    char                    texName[20];
-    int                     s, y;
-
-    ZeroMemory(m_groundSpot, sizeof(D3DGroundSpot)*D3DMAXGROUNDSPOT);
-    m_bFirstGroundSpot = true;  // drawing power first
-
-    for ( s=0 ; s<16 ; s++ )
-    {
-        sprintf(texName, "shadow%.2d.tga", s);
-        surface = D3DTextr_GetSurface(texName);
-        if ( surface == 0 )  continue;
-
-        ZeroMemory(&ddsd, sizeof(DDSURFACEDESC2));
-        ddsd.dwSize = sizeof(DDSURFACEDESC2);
-        if ( surface->Lock(NULL, &ddsd, DDLOCK_WAIT, NULL) != DD_OK )  continue;
-
-        if ( ddsd.ddpfPixelFormat.dwRGBBitCount != 16 )  continue;
-
-        for ( y=0 ; y<(int)ddsd.dwHeight ; y++ )
-        {
-            pbSurf = (WORD*)ddsd.lpSurface;
-            pbSurf += ddsd.lPitch*y/2;
-            memset(pbSurf, -1, ddsd.lPitch);  // all blank
-        }
-
-        surface->Unlock(NULL);
-    }
-}
-
-// Allocates a table for a mark on the ground, if necessary.
-
-int CD3DEngine::GroundSpotCreate()
-{
-    int     i;
-
-    for ( i=0 ; i<D3DMAXGROUNDSPOT ; i++ )
-    {
-        if ( m_groundSpot[i].bUsed == false )  // free?
-        {
-            ZeroMemory(&m_groundSpot[i], sizeof(D3DGroundSpot));
-            m_groundSpot[i].bUsed = true;
-            m_groundSpot[i].smooth = 1.0f;
-            return i;
-        }
-    }
-    return -1;  // not found
-}
-
-// Removes a mark on the ground.
-
-void CD3DEngine::GroundSpotDelete(int rank)
-{
-    m_groundSpot[rank].bUsed = false;
-    m_groundSpot[rank].pos = Math::Vector(0.0f, 0.0f, 0.0f);
-}
-
-// Specifies the position of surface marking of the object.
-
-bool CD3DEngine::SetObjectGroundSpotPos(int rank, const Math::Vector &pos)
-{
-    m_groundSpot[rank].pos = pos;
-    return true;
-}
-
-// Specifies the radius of surface marking of the object.
-
-bool CD3DEngine::SetObjectGroundSpotRadius(int rank, float radius)
-{
-    m_groundSpot[rank].radius = radius;
-    return true;
-}
-
-// Specifies the color of a mark on the ground.
-
-bool CD3DEngine::SetObjectGroundSpotColor(int rank, D3DCOLORVALUE color)
-{
-    m_groundSpot[rank].color = color;
-    return true;
-}
-
-// Specifies the height min / max.
-
-bool CD3DEngine::SetObjectGroundSpotMinMax(int rank, float min, float max)
-{
-    m_groundSpot[rank].min = min;
-    m_groundSpot[rank].max = max;
-    return true;
-}
-
-// Specifies the transition factor.
-
-bool CD3DEngine::SetObjectGroundSpotSmooth(int rank, float smooth)
-{
-    m_groundSpot[rank].smooth = smooth;
-    return true;
-}
-
-
-// Creates ground marks.
-
-int CD3DEngine::GroundMarkCreate(Math::Vector pos, float radius,
-                                 float delay1, float delay2, float delay3,
-                                 int dx, int dy, char* table)
-{
-    ZeroMemory(&m_groundMark, sizeof(D3DGroundMark));
-    m_groundMark.bUsed     = true;
-    m_groundMark.phase     = 1;
-    m_groundMark.delay[0]  = delay1;
-    m_groundMark.delay[1]  = delay2;
-    m_groundMark.delay[2]  = delay3;
-    m_groundMark.pos       = pos;
-    m_groundMark.radius    = radius;
-    m_groundMark.intensity = 0.0f;
-    m_groundMark.dx        = dx;
-    m_groundMark.dy        = dy;
-    m_groundMark.table     = table;
-    return 0;
-}
-
-// Clears the ground.
-
-bool CD3DEngine::GroundMarkDelete(int rank)
-{
-    ZeroMemory(&m_groundMark, sizeof(D3DGroundMark));
-    return true;
-}
-
-
-// Border management (distance limits) depends of the resolution.
-// LOD = level-of-detail.
-
-void CD3DEngine::SetLimitLOD(int rank, float limit)
-{
-    m_limitLOD[rank] = limit;
-}
-
-float CD3DEngine::RetLimitLOD(int rank, bool bLast)
-{
-    float   limit;
-
-    if ( bLast )
-    {
-        limit = m_limitLOD[rank];
-        limit *= m_lastDim.x/640.0f;  // limit further if large window!
-//?     limit += m_limitLOD[0]*(m_lastObjectDetail*2.0f-1.0f);
-        limit += m_limitLOD[0]*(m_lastObjectDetail*2.0f);
-    }
-    else
-    {
-        limit = m_limitLOD[rank];
-        limit *= m_dim.x/640.0f;  // limit further if large window!
-//?     limit += m_limitLOD[0]*(m_objectDetail*2.0f-1.0f);
-        limit += m_limitLOD[0]*(m_objectDetail*2.0f);
-    }
-    if ( limit < 0.0f )  limit = 0.0f;
-
-    return limit;
-}
-
-
-// Definition of the distance field of vision.
-
-void CD3DEngine::SetTerrainVision(float vision)
-{
-    m_terrainVision = vision;
-}
-
-
-// Management of the global mode of shading.
-
-void CD3DEngine::SetShadow(bool bMode)
-{
-    m_bShadow = bMode;
-}
-
-bool CD3DEngine::RetShadow()
-{
-    return m_bShadow;
-}
-
-
-// Management of the global mode of marking.
-
-void CD3DEngine::SetGroundSpot(bool bMode)
-{
-    m_bGroundSpot = bMode;
-}
-
-bool CD3DEngine::RetGroundSpot()
-{
-    return m_bGroundSpot;
-}
-
-
-// Management of the global mode of contamination.
-
-void CD3DEngine::SetDirty(bool bMode)
-{
-    m_bDirty = bMode;
-}
-
-bool CD3DEngine::RetDirty()
-{
-    return m_bDirty;
-}
-
-
-// Management of the global mode of horizontal fog patches.
-
-void CD3DEngine::SetFog(bool bMode)
-{
-    m_bFog = bMode;
-}
-
-bool CD3DEngine::RetFog()
-{
-    return m_bFog;
-}
-
-
-// ndicates whether it is possible to give a color SetState.
-
-bool CD3DEngine::RetStateColor()
-{
-    return m_bStateColor;
-}
-
-
-// Management of the global mode of secondary texturing.
-
-void CD3DEngine::SetSecondTexture(int texNum)
-{
-    m_secondTexNum = texNum;
-}
-
-int CD3DEngine::RetSecondTexture()
-{
-    return m_secondTexNum;
-}
-
-
-// Choice of the rank of the active view.
-
-void CD3DEngine::SetRankView(int rank)
-{
-    if ( rank < 0 )  rank = 0;
-    if ( rank > 1 )  rank = 1;
-
-    if ( m_rankView == 0 && rank == 1 )  // enters the water?
-    {
-        m_light->AdaptLightColor(m_waterAddColor, +1.0f);
-    }
-
-    if ( m_rankView == 1 && rank == 0 )  // out of the water?
-    {
-        m_light->AdaptLightColor(m_waterAddColor, -1.0f);
-    }
-
-    m_rankView = rank;
-}
-
-int CD3DEngine::RetRankView()
-{
-    return m_rankView;
-}
-
-// Whether to draw the world from the interface.
-
-void CD3DEngine::SetDrawWorld(bool bDraw)
-{
-    m_bDrawWorld = bDraw;
-}
-
-// Whether to draw the world on the interface.
-
-void CD3DEngine::SetDrawFront(bool bDraw)
-{
-    m_bDrawFront = bDraw;
-}
-
-// Color management ambient.
-// color = 0x00rrggbb
-//  rr: red
-//  gg: green
-//  bb: blue
-
-void CD3DEngine::SetAmbiantColor(D3DCOLOR color, int rank)
-{
-    m_ambiantColor[rank] = color;
-}
-
-D3DCOLOR CD3DEngine::RetAmbiantColor(int rank)
-{
-    return m_ambiantColor[rank];
-}
-
-
-// Color management under water.
-
-void CD3DEngine::SetWaterAddColor(D3DCOLORVALUE color)
-{
-    m_waterAddColor = color;
-}
-
-D3DCOLORVALUE CD3DEngine::RetWaterAddColor()
-{
-    return m_waterAddColor;
-}
-
-
-// Management of the fog color.
-
-void CD3DEngine::SetFogColor(D3DCOLOR color, int rank)
-{
-    m_fogColor[rank] = color;
-}
-
-D3DCOLOR CD3DEngine::RetFogColor(int rank)
-{
-    return m_fogColor[rank];
-}
-
-
-// Management of the depth of field.
-// Beyond this distance, nothing is visible.
-// Shortly (according SetFogStart), one enters the fog.
-
-void CD3DEngine::SetDeepView(float length, int rank, bool bRef)
-{
-    if ( bRef )
-    {
-        length *= m_clippingDistance;
-    }
-
-    m_deepView[rank] = length;
-}
-
-float CD3DEngine::RetDeepView(int rank)
-{
-    return m_deepView[rank];
-}
-
-
-// Management the start of fog.
-// With 0.0, the fog from the point of view (fog max).
-// With 1.0, the fog from the depth of field (no fog).
-
-void CD3DEngine::SetFogStart(float start, int rank)
-{
-    m_fogStart[rank] = start;
-}
-
-float CD3DEngine::RetFogStart(int rank)
-{
-    return m_fogStart[rank];
-}
-
-
-// Gives the background image to use.
-
-void CD3DEngine::SetBackground(char *name, D3DCOLOR up, D3DCOLOR down,
-                               D3DCOLOR cloudUp, D3DCOLOR cloudDown,
-                               bool bFull, bool bQuarter)
-{
-    strcpy(m_backgroundName, name);
-    m_backgroundColorUp   = up;
-    m_backgroundColorDown = down;
-    m_backgroundCloudUp   = cloudUp;
-    m_backgroundCloudDown = cloudDown;
-    m_bBackgroundFull     = bFull;
-    m_bBackgroundQuarter  = bQuarter;
-}
-
-// Gives the background image used.
-
-void CD3DEngine::RetBackground(char *name, D3DCOLOR &up, D3DCOLOR &down,
-                               D3DCOLOR &cloudUp, D3DCOLOR &cloudDown,
-                               bool &bFull, bool &bQuarter)
-{
-    strcpy(name, m_backgroundName);
-    up        = m_backgroundColorUp;
-    down      = m_backgroundColorDown;
-    cloudUp   = m_backgroundCloudUp;
-    cloudDown = m_backgroundCloudDown;
-    bFull     = m_bBackgroundFull;
-    bQuarter  = m_bBackgroundQuarter;
-}
-
-// Gives the foreground image to use.
-
-void CD3DEngine::SetFrontsizeName(char *name)
-{
-    if ( m_frontsizeName[0] != 0 )
-    {
-        FreeTexture(m_frontsizeName);
-    }
-
-    strcpy(m_frontsizeName, name);
-}
-
-// Specifies whether to draw the foreground.
-
-void CD3DEngine::SetOverFront(bool bFront)
-{
-    m_bOverFront = bFront;
-}
-
-// Gives color to the foreground.
-
-void CD3DEngine::SetOverColor(D3DCOLOR color, int mode)
-{
-    m_overColor = color;
-    m_overMode  = mode;
-}
-
-
-
-// Management of the particle density.
-
-void CD3DEngine::SetParticuleDensity(float value)
-{
-    if ( value < 0.0f )  value = 0.0f;
-    if ( value > 2.0f )  value = 2.0f;
-    m_particuleDensity = value;
-}
-
-float CD3DEngine::RetParticuleDensity()
-{
-    return m_particuleDensity;
-}
-
-float CD3DEngine::ParticuleAdapt(float factor)
-{
-    if ( m_particuleDensity == 0.0f )
-    {
-        return 1000000.0f;
-    }
-    return factor/m_particuleDensity;
-}
-
-// Management of the distance of clipping.
-
-void CD3DEngine::SetClippingDistance(float value)
-{
-    if ( value < 0.5f )  value = 0.5f;
-    if ( value > 2.0f )  value = 2.0f;
-    m_clippingDistance = value;
-}
-
-float CD3DEngine::RetClippingDistance()
-{
-    return m_clippingDistance;
-}
-
-// Management of objects detals.
-
-void CD3DEngine::SetObjectDetail(float value)
-{
-    if ( value < 0.0f )  value = 0.0f;
-    if ( value > 2.0f )  value = 2.0f;
-    m_objectDetail = value;
-}
-
-float CD3DEngine::RetObjectDetail()
-{
-    return m_objectDetail;
-}
-
-// The amount of management objects gadgets.
-
-void CD3DEngine::SetGadgetQuantity(float value)
-{
-    if ( value < 0.0f )  value = 0.0f;
-    if ( value > 1.0f )  value = 1.0f;
-
-    m_gadgetQuantity = value;
-}
-
-float CD3DEngine::RetGadgetQuantity()
-{
-    return m_gadgetQuantity;
-}
-
-// Managing the quality of textures.
-
-void CD3DEngine::SetTextureQuality(int value)
-{
-    if ( value < 0 )  value = 0;
-    if ( value > 2 )  value = 2;
-
-    if ( value != m_textureQuality )
-    {
-        m_textureQuality = value;
-        LoadAllTexture();
-    }
-}
-
-int CD3DEngine::RetTextureQuality()
-{
-    return m_textureQuality;
-}
-
-
-// Management mode of toto.
-
-void CD3DEngine::SetTotoMode(bool bPresent)
-{
-    m_bTotoMode = bPresent;
-}
-
-bool CD3DEngine::RetTotoMode()
-{
-    return m_bTotoMode;
-}
-
-
-// Managing the mode of foreground.
-
-void CD3DEngine::SetLensMode(bool bPresent)
-{
-    m_bLensMode = bPresent;
-}
-
-bool CD3DEngine::RetLensMode()
-{
-    return m_bLensMode;
-}
-
-
-// Managing the mode of water.
-
-void CD3DEngine::SetWaterMode(bool bPresent)
-{
-    m_bWaterMode = bPresent;
-}
-
-bool CD3DEngine::RetWaterMode()
-{
-    return m_bWaterMode;
-}
-
-
-// Managing the mode of sky.
-
-void CD3DEngine::SetSkyMode(bool bPresent)
-{
-    m_bSkyMode = bPresent;
-}
-
-bool CD3DEngine::RetSkyMode()
-{
-    return m_bSkyMode;
-}
-
-
-// Managing the mode of background.
-
-void CD3DEngine::SetBackForce(bool bPresent)
-{
-    m_bBackForce = bPresent;
-}
-
-bool CD3DEngine::RetBackForce()
-{
-    return m_bBackForce;
-}
-
-
-// Managing the mode of planets.
-
-void CD3DEngine::SetPlanetMode(bool bPresent)
-{
-    m_bPlanetMode = bPresent;
-}
-
-bool CD3DEngine::RetPlanetMode()
-{
-    return m_bPlanetMode;
-}
-
-
-// Managing the mode of dymanic lights.
-
-void CD3DEngine::SetLightMode(bool bPresent)
-{
-    m_bLightMode = bPresent;
-}
-
-bool CD3DEngine::RetLightMode()
-{
-    return m_bLightMode;
-}
-
-
-// Management of the indentation mode while editing (CEdit).
-
-void CD3DEngine::SetEditIndentMode(bool bAuto)
-{
-    m_bEditIndentMode = bAuto;
-}
-
-bool CD3DEngine::RetEditIndentMode()
-{
-    return m_bEditIndentMode;
-}
-
-
-// Management in advance of a tab when editing (CEdit).
-
-void CD3DEngine::SetEditIndentValue(int value)
-{
-    m_editIndentValue = value;
-}
-
-int CD3DEngine::RetEditIndentValue()
-{
-    return m_editIndentValue;
-}
-
-
-void CD3DEngine::SetSpeed(float speed)
-{
-    m_speed = speed;
-}
-
-float CD3DEngine::RetSpeed()
-{
-    return m_speed;
-}
-
-
-void CD3DEngine::SetTracePrecision(float factor)
-{
-    m_tracePrecision = factor;
-}
-
-float CD3DEngine::RetTracePrecision()
-{
-    return m_tracePrecision;
-}
-
-
-// Updates the scene after a change of parameters.
-
-void CD3DEngine::ApplyChange()
-{
-    m_deepView[0] /= m_lastClippingDistance;
-    m_deepView[1] /= m_lastClippingDistance;
-
-    SetFocus(m_focus);
-    ChangeLOD();
-
-    m_deepView[0] *= m_clippingDistance;
-    m_deepView[1] *= m_clippingDistance;
-}
-
-
-
-// Returns the point of view of the user.
-
-Math::Vector CD3DEngine::RetEyePt()
-{
-    return m_eyePt;
-}
-
-Math::Vector CD3DEngine::RetLookatPt()
-{
-    return m_lookatPt;
-}
-
-float CD3DEngine::RetEyeDirH()
-{
-    return m_eyeDirH;
-}
-
-float CD3DEngine::RetEyeDirV()
-{
-    return m_eyeDirV;
-}
-
-POINT CD3DEngine::RetDim()
-{
-    return m_dim;
-}
-
-
-// Generates an image name of the watch.
-
-void QuarterName(char *buffer, char *name, int quarter)
-{
-    while ( *name != 0 )
-    {
-        if ( *name == '.' )
-        {
-            *buffer++ = 'a'+quarter;
-        }
-        *buffer++ = *name++;
-    }
-    *buffer++ = 0;
-}
-
-// Frees texture.
-
-bool CD3DEngine::FreeTexture(char* name)
-{
-    if ( name[0] == 0 )  return true;
-
-    if ( D3DTextr_DestroyTexture(name) != S_OK )
-    {
-        return false;
-    }
-    return true;
-}
-
-// Load a texture.
-
-bool CD3DEngine::LoadTexture(char* name, int stage)
-{
-    DWORD   mode;
-
-    if ( name[0] == 0 )  return true;
-
-    if ( D3DTextr_GetSurface(name) == NULL )
-    {
-        if ( strstr(name, ".tga") == 0 )
-        {
-            mode = 0;
-        }
-        else
-        {
-            mode = D3DTEXTR_CREATEWITHALPHA;
-        }
-
-        if ( D3DTextr_CreateTextureFromFile(name, stage, mode) != S_OK )
-        {
-            return false;
-        }
-
-        if ( D3DTextr_Restore(name, m_pD3DDevice) != S_OK )
-        {
-            return false;
-        }
-    }
-    return true;
-}
-
-// Load all the textures of the scene.
-
-bool CD3DEngine::LoadAllTexture()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    int             l1, i;
-    char            name[50];
-    bool            bOK = true;
-
-#if _POLISH
-    LoadTexture("textp.tga");
-#else
-    LoadTexture("text.tga");
-#endif
-    LoadTexture("mouse.tga");
-    LoadTexture("button1.tga");
-    LoadTexture("button2.tga");
-    LoadTexture("button3.tga");
-    LoadTexture("effect00.tga");
-    LoadTexture("effect01.tga");
-    LoadTexture("effect02.tga");
-    LoadTexture("map.tga");
-
-    if ( m_backgroundName[0] != 0 )
-    {
-        if ( m_bBackgroundQuarter )  // image into 4 pieces?
-        {
-            for ( i=0 ; i<4 ; i++ )
-            {
-                QuarterName(name, m_backgroundName, i);
-                LoadTexture(name);
-            }
-        }
-        else
-        {
-            LoadTexture(m_backgroundName);
-        }
-    }
-    if ( m_frontsizeName[0] != 0 )
-    {
-        LoadTexture(m_frontsizeName);
-    }
-
-    m_planet->LoadTexture();
-
-    p1 = m_objectPointer;
-    for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-    {
-        p2 = p1->table[l1];
-
-        if ( p2 == 0 || p2->texName1[0] != 0 )
-        {
-            if ( !LoadTexture(p2->texName1, 0) )  bOK = false;
-        }
-
-        if ( p2 == 0 || p2->texName2[0] != 0 )
-        {
-            if ( !LoadTexture(p2->texName2, 1) )  bOK = false;
-        }
-    }
-    return bOK;
-}
-
-
-// Called during initial app startup, this function performs all the
-// permanent initialization.
-
-HRESULT CD3DEngine::OneTimeSceneInit()
-{
-    return S_OK;
-}
-
-
-// Updated after creating objects.
-
-void CD3DEngine::Update()
-{
-    ComputeDistance();
-    UpdateGeometry();
-}
-
-// Called once per frame, the call is the entry point for animating
-// the scene.
-
-HRESULT CD3DEngine::FrameMove(float rTime)
-{
-    m_light->FrameLight(rTime);
-    m_particule->FrameParticule(rTime);
-    ComputeDistance();
-    UpdateGeometry();
-
-    if ( m_groundMark.bUsed )
-    {
-        if ( m_groundMark.phase == 1 )  // growing?
-        {
-            m_groundMark.intensity += rTime*(1.0f/m_groundMark.delay[0]);
-            if ( m_groundMark.intensity >= 1.0f )
-            {
-                m_groundMark.intensity = 1.0f;
-                m_groundMark.fix = 0.0f;
-                m_groundMark.phase = 2;
-            }
-        }
-        else if ( m_groundMark.phase == 2 )  // fixed?
-        {
-            m_groundMark.fix += rTime*(1.0f/m_groundMark.delay[1]);
-            if ( m_groundMark.fix >= 1.0f )
-            {
-                m_groundMark.phase = 3;
-            }
-        }
-        else if ( m_groundMark.phase == 3 )  // decay?
-        {
-            m_groundMark.intensity -= rTime*(1.0f/m_groundMark.delay[2]);
-            if ( m_groundMark.intensity < 0.0f )
-            {
-                m_groundMark.intensity = 0.0f;
-                m_groundMark.phase     = 0;
-                m_groundMark.bUsed     = false;
-            }
-        }
-    }
-
-    if ( m_sound == 0 )
-    {
-        m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
-    }
-    m_sound->FrameMove(rTime);
-
-    return S_OK;
-}
-
-// Evolved throughout the game
-
-void CD3DEngine::StepSimul(float rTime)
-{
-    m_app->StepSimul(rTime);
-}
-
-
-
-// Changes the state associated with a material.
-// (*) Does not work without this instruction, mystery!
-
-void CD3DEngine::SetState(int state, D3DCOLOR color)
-{
-    bool    bSecond;
-
-    if ( state == m_lastState &&
-         color == m_lastColor )  return;
-    m_lastState = state;
-    m_lastColor = color;
-
-    if ( m_alphaMode != 1 && (state & D3DSTATEALPHA) )
-    {
-        state &= ~D3DSTATEALPHA;
-
-        if ( m_alphaMode == 2 )
-        {
-            state |= D3DSTATETTb;
-        }
-    }
-
-    if ( state & D3DSTATETTb )  // The transparent black texture?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_blackSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_blackDestBlend[1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  table_blend[debug_blend1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, table_blend[debug_blend2]);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_TEXTUREFACTOR, color);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_MODULATE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_TEXTURE);  // (*)
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_TFACTOR);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-    else if ( state & D3DSTATETTw )  // The transparent white texture?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_whiteSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_whiteDestBlend[1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  table_blend[debug_blend3]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, table_blend[debug_blend4]);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_TEXTUREFACTOR, ~color);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_ADD);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_TEXTURE);  // (*)
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_TFACTOR);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-    else if ( state & D3DSTATETCb )  // The transparent black color?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_blackSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_blackDestBlend[1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  table_blend[debug_blend1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, table_blend[debug_blend2]);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_TEXTUREFACTOR, color);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_DISABLE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-    else if ( state & D3DSTATETCw )  // The transparent white color?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_whiteSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_whiteDestBlend[1]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  table_blend[debug_blend3]);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, table_blend[debug_blend4]);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_TEXTUREFACTOR, ~color);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_DISABLE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-    else if ( state & D3DSTATETD )  // diffuse color as transparent?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_diffuseSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_diffuseDestBlend[1]);
-
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_SELECTARG1);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-    else if ( state & D3DSTATEALPHA )  // image with alpha channel?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHAFUNC, D3DCMP_GREATER);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHAREF,  (DWORD)(128));
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SRCBLEND,  m_alphaSrcBlend[1]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DESTBLEND, m_alphaSrcBlend[1]);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_TEXTUREFACTOR, color);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_MODULATE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_DIFFUSE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_SELECTARG1);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAARG1, D3DTA_TEXTURE);
-    }
-    else    // normal ?
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ALPHATESTENABLE, false);
-
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLOROP,   D3DTOP_MODULATE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_COLORARG2, D3DTA_DIFFUSE);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-    }
-
-    if ( state & D3DSTATEFOG )
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-    }
-
-    bSecond = m_bGroundSpot|m_bDirty;
-    if ( !m_bGroundSpot && (state & D3DSTATESECOND) != 0 )  bSecond = false;
-    if ( !m_bDirty      && (state & D3DSTATESECOND) == 0 )  bSecond = false;
-
-    if ( (state & D3DSTATEDUALb) && bSecond )
-    {
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLOROP,   D3DTOP_MODULATE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLORARG2, D3DTA_CURRENT);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_TEXCOORDINDEX, 1);
-    }
-    else if ( (state & D3DSTATEDUALw) && bSecond )
-    {
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLOROP,   D3DTOP_ADD);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLORARG1, D3DTA_TEXTURE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLORARG2, D3DTA_CURRENT);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ALPHAOP,   D3DTOP_DISABLE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_TEXCOORDINDEX, 1);
-    }
-    else
-    {
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_COLOROP, D3DTOP_DISABLE);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ALPHAOP, D3DTOP_DISABLE);
-    }
-
-    if ( state & D3DSTATEWRAP )
-    {
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_WRAP0, D3DWRAP_U|D3DWRAP_V);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ADDRESS, D3DTADDRESS_WRAP);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ADDRESS, D3DTADDRESS_WRAP);
-    }
-    else if ( state & D3DSTATECLAMP )
-    {
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_WRAP0, 0);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ADDRESS, D3DTADDRESS_CLAMP);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ADDRESS, D3DTADDRESS_CLAMP);
-    }
-    else
-    {
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_WRAP0, 0);
-        m_pD3DDevice->SetTextureStageState(0, D3DTSS_ADDRESS, D3DTADDRESS_CLAMP);
-        m_pD3DDevice->SetTextureStageState(1, D3DTSS_ADDRESS, D3DTADDRESS_CLAMP);
-    }
-
-    if ( state & D3DSTATE2FACE )
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_CULLMODE, D3DCULL_NONE);
-    }
-    else
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_CULLMODE, D3DCULL_CCW);
-    }
-
-    if ( state & D3DSTATELIGHT )
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    }
-    else
-    {
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, m_ambiantColor[m_rankView]);
-    }
-}
-
-// Specifies a texture to use.
-
-void CD3DEngine::SetTexture(char *name, int stage)
-{
-//? if ( stage == 1 && !m_bDirty )  return;
-//? if ( stage == 1 && !m_bShadow )  return;
-
-    if ( strcmp(name, m_lastTexture[stage]) == 0 )  return;
-    strcpy(m_lastTexture[stage], name);
-
-    m_pD3DDevice->SetTexture(stage, D3DTextr_GetSurface(name));
-}
-
-// Specifies the material to use.
-
-void CD3DEngine::SetMaterial(const D3DMATERIAL7 &mat)
-{
-    if ( memcmp(&mat, &m_lastMaterial, sizeof(D3DMATERIAL7)) == 0 )  return;
-    m_lastMaterial = mat;
-
-    m_pD3DDevice->SetMaterial(&m_lastMaterial);
-}
-
-
-// Deletes a point in a surface (draw in white).
-
-inline void ClearDot(DDSURFACEDESC2* ddsd, int x, int y)
-{
-    WORD*       pbSurf;
-
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount != 16 )  return;
-
-    pbSurf = (WORD*)ddsd->lpSurface;
-    pbSurf += ddsd->lPitch*y/2;
-    pbSurf += x;
-
-    *pbSurf = 0xffff;  // white
-}
-
-// Deletes a point in a surface (draw in white)
-
-void AddDot(DDSURFACEDESC2* ddsd, int x, int y, D3DCOLORVALUE color)
-{
-    WORD*       pbSurf;
-    WORD        r,g,b, w;
-
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount != 16 )  return;
-
-    if ( color.r < 0.0f )  color.r = 0.0f;
-    if ( color.r > 1.0f )  color.r = 1.0f;
-    r = (int)(color.r*32.0f);
-    if ( r >= 32 )  r = 31;  // 5 bits
-
-    if ( color.g < 0.0f )  color.g = 0.0f;
-    if ( color.g > 1.0f )  color.g = 1.0f;
-    g = (int)(color.g*32.0f);
-    if ( g >= 32 )  g = 31;  // 5 bits
-
-    if ( color.b < 0.0f )  color.b = 0.0f;
-    if ( color.b > 1.0f )  color.b = 1.0f;
-    b = (int)(color.b*32.0f);
-    if ( b >= 32 )  b = 31;  // 5 bits
-
-    if ( ddsd->ddpfPixelFormat.dwRBitMask == 0xf800 )  // 565 ?
-    {
-        w = (r<<11)|(g<<6)|b;
-    }
-    else if ( ddsd->ddpfPixelFormat.dwRBitMask == 0x7c00 )  // 555 ?
-    {
-        w = (r<<10)|(g<<5)|b;
-    }
-    else
-    {
-        w = -1;  // blank
-    }
-
-    pbSurf = (WORD*)ddsd->lpSurface;
-    pbSurf += ddsd->lPitch*y/2;
-    pbSurf += x;
-
-    *pbSurf &= w;
-}
-
-// Displays a point in a surface.
-
-void SetDot(DDSURFACEDESC2* ddsd, int x, int y, D3DCOLORVALUE color)
-{
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount == 16 )
-    {
-        WORD*       pbSurf;
-        WORD        r,g,b, w;
-
-        if ( color.r < 0.0f )  color.r = 0.0f;
-        if ( color.r > 1.0f )  color.r = 1.0f;
-        if ( color.g < 0.0f )  color.g = 0.0f;
-        if ( color.g > 1.0f )  color.g = 1.0f;
-        if ( color.b < 0.0f )  color.b = 0.0f;
-        if ( color.b > 1.0f )  color.b = 1.0f;
-
-        r = (int)(color.r*32.0f);
-        g = (int)(color.g*32.0f);
-        b = (int)(color.b*32.0f);
-
-        if ( r >= 32 )  r = 31;  // 5 bits
-        if ( g >= 32 )  g = 31;  // 5 bits
-        if ( b >= 32 )  b = 31;  // 5 bits
-
-        if ( ddsd->ddpfPixelFormat.dwRBitMask == 0xf800 )  // 565 ?
-        {
-            w = (r<<11)|(g<<6)|b;
-        }
-        else if ( ddsd->ddpfPixelFormat.dwRBitMask == 0x7c00 )  // 555 ?
-        {
-            w = (r<<10)|(g<<5)|b;
-        }
-        else
-        {
-            w = -1;  // blank
-        }
-
-        pbSurf = (WORD*)ddsd->lpSurface;
-        pbSurf += ddsd->lPitch*y/2;
-        pbSurf += x;
-
-        *pbSurf = w;
-    }
-
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount == 32 )  // image .tga ?
-    {
-        LONG*       pbSurf;
-        LONG        r,g,b, w;
-
-        if ( color.r < 0.0f )  color.r = 0.0f;
-        if ( color.r > 1.0f )  color.r = 1.0f;
-        if ( color.g < 0.0f )  color.g = 0.0f;
-        if ( color.g > 1.0f )  color.g = 1.0f;
-        if ( color.b < 0.0f )  color.b = 0.0f;
-        if ( color.b > 1.0f )  color.b = 1.0f;
-
-        r = (int)(color.r*256.0f);
-        g = (int)(color.g*256.0f);
-        b = (int)(color.b*256.0f);
-
-        if ( r >= 256 )  r = 255;  // 8 bits
-        if ( g >= 256 )  g = 255;  // 8 bits
-        if ( b >= 256 )  b = 255;  // 8 bits
-
-        if ( ddsd->ddpfPixelFormat.dwRBitMask == 0xff0000 )
-        {
-            w = (r<<16)|(g<<8)|b;
-
-            pbSurf = (LONG*)ddsd->lpSurface;
-            pbSurf += ddsd->lPitch*y/4;
-            pbSurf += x;
-
-            *pbSurf &= 0xff000000;  // keeps alpha channel
-            *pbSurf |= w;
-        }
-    }
-}
-
-// Gives a point in a surface.
-
-D3DCOLORVALUE GetDot(DDSURFACEDESC2* ddsd, int x, int y)
-{
-    D3DCOLORVALUE   color;
-
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount == 16 )
-    {
-        WORD*       pbSurf;
-        WORD        r,g,b, w;
-
-        pbSurf = (WORD*)ddsd->lpSurface;
-        pbSurf += ddsd->lPitch*y/2;
-        pbSurf += x;
-
-        w = *pbSurf;
-
-        if ( ddsd->ddpfPixelFormat.dwRBitMask == 0xf800 )  // 565 ?
-        {
-            r = (w>>10)&0x003e;
-            g = (w>> 5)&0x003f;
-            b = (w<< 1)&0x003e;
-        }
-        else if ( ddsd->ddpfPixelFormat.dwRBitMask == 0x7c00 )  // 555 ?
-        {
-            r = (w>> 9)&0x003e;
-            g = (w>> 4)&0x003e;
-            b = (w<< 1)&0x003e;
-        }
-        else
-        {
-            r = 0;
-            g = 0;
-            b = 0;  // black
-        }
-
-        color.r = (float)r/63.0f;
-        color.g = (float)g/63.0f;
-        color.b = (float)b/63.0f;
-        color.a = 0.0f;
-        return color;
-    }
-
-    if ( ddsd->ddpfPixelFormat.dwRGBBitCount == 32 )  // image .tga ?
-    {
-        LONG*       pbSurf;
-        LONG        r,g,b, w;
-
-        pbSurf = (LONG*)ddsd->lpSurface;
-        pbSurf += ddsd->lPitch*y/4;
-        pbSurf += x;
-
-        w = *pbSurf;
-
-        if ( ddsd->ddpfPixelFormat.dwRBitMask == 0xff0000 )
-        {
-            r = (w>>16)&0x00ff;
-            g = (w>> 8)&0x00ff;
-            b = (w<< 0)&0x00ff;
-        }
-        else
-        {
-            r = 0;
-            g = 0;
-            b = 0;  // black
-        }
-
-        color.r = (float)r/255.0f;
-        color.g = (float)g/255.0f;
-        color.b = (float)b/255.0f;
-        color.a = 0.0f;
-        return color;
-    }
-
-    color.r = 0.0f;
-    color.g = 0.0f;
-    color.b = 0.0f;
-    color.a = 0.0f;  // black
-    return color;
-}
-
-// Draw all the shadows.
-
-// There is a pixel collection around each of the 16 surfaces:
-//
-//      |<----------------------->|<----------------------->|<---- ...
-//    0 | 1   2            253 254|255                      |
-//  |---|---|---|-- ... --|---|---|---|                     |
-//                              0 | 1   2            253 254|255
-//                            |---|---|---|-- ... --|---|---|---|
-//
-// So we draw in 254x254 pixels surfaces.
-// The pixel margin around it is drawn twice (in two adjacent surfaces),
-// so that the filter produces the same results!
-
-void CD3DEngine::RenderGroundSpot()
-{
-    LPDIRECTDRAWSURFACE7    surface;
-    DDSURFACEDESC2          ddsd;
-    WORD*                   pbSurf;
-    D3DCOLORVALUE           color;
-    Math::Vector                pos;
-    Math::Point                 min, max;
-    int                     s, i, j, dot, ix, iy, y;
-    float                   tu, tv, cx, cy, px, py, ppx, ppy;
-    float                   intensity, level;
-    char                    texName[20];
-    bool                    bClear, bSet;
-
-    if ( !m_bFirstGroundSpot                                  &&
-         m_groundMark.drawPos.x     == m_groundMark.pos.x     &&
-         m_groundMark.drawPos.z     == m_groundMark.pos.z     &&
-         m_groundMark.drawRadius    == m_groundMark.radius    &&
-         m_groundMark.drawIntensity == m_groundMark.intensity )  return;
-
-    for ( s=0 ; s<16 ; s++ )
-    {
-        min.x = (s%4)*254.0f-1.0f;  // 1 pixel cover
-        min.y = (s/4)*254.0f-1.0f;
-        max.x = min.x+254.0f+2.0f;
-        max.y = min.y+254.0f+2.0f;
-
-        bClear = false;
-        bSet   = false;
-
-        // Calculate the area to be erased.
-        dot = (int)(m_groundMark.drawRadius/2.0f);
-
-        tu = (m_groundMark.drawPos.x+1600.0f)/3200.0f;
-        tv = (m_groundMark.drawPos.z+1600.0f)/3200.0f;  // 0..1
-
-        cx = (tu*254.0f*4.0f)-0.5f;
-        cy = (tv*254.0f*4.0f)-0.5f;
-
-        if ( dot == 0 )
-        {
-            cx += 0.5f;
-            cy += 0.5f;
-        }
-
-        px = cx-Math::Mod(cx, 1.0f);
-        py = cy-Math::Mod(cy, 1.0f);  // multiple of 1
-
-        if ( m_bFirstGroundSpot ||
-             ( m_groundMark.drawRadius != 0.0f    &&
-               px+dot >= min.x && py+dot >= min.y &&
-               px-dot <= max.x && py-dot <= max.y ) )
-        {
-            bClear = true;
-        }
-
-        // Calculate the area to draw.
-        dot = (int)(m_groundMark.radius/2.0f);
-
-        tu = (m_groundMark.pos.x+1600.0f)/3200.0f;
-        tv = (m_groundMark.pos.z+1600.0f)/3200.0f;  // 0..1
-
-        cx = (tu*254.0f*4.0f)-0.5f;
-        cy = (tv*254.0f*4.0f)-0.5f;
-
-        if ( dot == 0 )
-        {
-            cx += 0.5f;
-            cy += 0.5f;
-        }
-
-        px = cx-Math::Mod(cx, 1.0f);
-        py = cy-Math::Mod(cy, 1.0f);  // multiple of 1
-
-        if ( m_groundMark.bUsed                 &&
-             px+dot >= min.x && py+dot >= min.y &&
-             px-dot <= max.x && py-dot <= max.y )
-        {
-            bSet = true;
-        }
-
-        if ( bClear || bSet )
-        {
-            // Load the song.
-            sprintf(texName, "shadow%.2d.tga", s);
-            surface = D3DTextr_GetSurface(texName);
-            if ( surface == 0 )  continue;
-
-            ZeroMemory(&ddsd, sizeof(DDSURFACEDESC2));
-            ddsd.dwSize = sizeof(DDSURFACEDESC2);
-            if ( surface->Lock(NULL, &ddsd, DDLOCK_WAIT, NULL) != DD_OK )  continue;
-
-            // Clears in blank whole piece.
-            if ( ddsd.ddpfPixelFormat.dwRGBBitCount == 16 )
-            {
-                for ( y=0 ; y<(int)ddsd.dwHeight ; y++ )
-                {
-                    pbSurf = (WORD*)ddsd.lpSurface;
-                    pbSurf += ddsd.lPitch*y/2;
-                    memset(pbSurf, -1, ddsd.lPitch);  // all blank
-                }
-            }
-
-            // Draw the new shadows.
-            for ( i=0 ; i<D3DMAXGROUNDSPOT ; i++ )
-            {
-                if ( m_groundSpot[i].bUsed == false ||
-                     m_groundSpot[i].radius == 0.0f )  continue;
-
-                if ( m_groundSpot[i].min == 0.0f &&
-                     m_groundSpot[i].max == 0.0f )
-                {
-                    dot = (int)(m_groundSpot[i].radius/2.0f);
-
-                    tu = (m_groundSpot[i].pos.x+1600.0f)/3200.0f;
-                    tv = (m_groundSpot[i].pos.z+1600.0f)/3200.0f;  // 0..1
-
-                    cx = (tu*254.0f*4.0f)-0.5f;
-                    cy = (tv*254.0f*4.0f)-0.5f;
-
-                    if ( dot == 0 )
-                    {
-                        cx += 0.5f;
-                        cy += 0.5f;
-                    }
-
-                    px = cx-Math::Mod(cx, 1.0f);
-                    py = cy-Math::Mod(cy, 1.0f);  // multiple of 1
-
-                    if ( px+dot < min.x || py+dot < min.y ||
-                         px-dot > max.x || py-dot > max.y )  continue;
-
-                    for ( iy=-dot ; iy<=dot ; iy++ )
-                    {
-                        for ( ix=-dot ; ix<=dot ; ix++ )
-                        {
-                            ppx = px+ix;
-                            ppy = py+iy;
-
-                            if ( ppx <  min.x || ppy <  min.y ||
-                                 ppx >= max.x || ppy >= max.y )  continue;
-
-                            if ( dot == 0 )
-                            {
-                                intensity = 0.0f;
-                            }
-                            else
-                            {
-                                intensity = Math::Point(ppx-cx, ppy-cy).Length()/dot;
-    //?                         intensity = powf(intensity, m_groundSpot[i].smooth);
-                            }
-
-                            color.r = m_groundSpot[i].color.r+intensity;
-                            color.g = m_groundSpot[i].color.g+intensity;
-                            color.b = m_groundSpot[i].color.b+intensity;
-
-                            ppx -= min.x;  // on the texture
-                            ppy -= min.y;
-                            AddDot(&ddsd, (int)ppx, (int)ppy, color);
-                        }
-                    }
-                }
-                else
-                {
-                    for ( iy=0 ; iy<256 ; iy++ )
-                    {
-                        for ( ix=0 ; ix<256 ; ix++ )
-                        {
-                            pos.x = (256.0f*(s%4)+ix)*3200.0f/1024.0f - 1600.0f;
-                            pos.z = (256.0f*(s/4)+iy)*3200.0f/1024.0f - 1600.0f;
-                            pos.y = 0.0f;
-                            level = m_terrain->RetFloorLevel(pos, true);
-                            if ( level < m_groundSpot[i].min ||
-                                 level > m_groundSpot[i].max )  continue;
-
-                            if ( level > (m_groundSpot[i].max+m_groundSpot[i].min)/2.0f )
-                            {
-                                intensity = 1.0f-(m_groundSpot[i].max-level)/m_groundSpot[i].smooth;
-                            }
-                            else
-                            {
-                                intensity = 1.0f-(level-m_groundSpot[i].min)/m_groundSpot[i].smooth;
-                            }
-                            if ( intensity < 0.0f )  intensity = 0.0f;
-
-                            color.r = m_groundSpot[i].color.r+intensity;
-                            color.g = m_groundSpot[i].color.g+intensity;
-                            color.b = m_groundSpot[i].color.b+intensity;
-
-                            AddDot(&ddsd, ix, iy, color);
-                        }
-                    }
-                }
-            }
-
-            if ( bSet )
-            {
-                dot = (int)(m_groundMark.radius/2.0f);
-
-                tu = (m_groundMark.pos.x+1600.0f)/3200.0f;
-                tv = (m_groundMark.pos.z+1600.0f)/3200.0f;  // 0..1
-
-                cx = (tu*254.0f*4.0f)-0.5f;
-                cy = (tv*254.0f*4.0f)-0.5f;
-
-                if ( dot == 0 )
-                {
-                    cx += 0.5f;
-                    cy += 0.5f;
-                }
-
-                px = cx-Math::Mod(cx, 1.0f);
-                py = cy-Math::Mod(cy, 1.0f);  // multiple of 1
-
-                for ( iy=-dot ; iy<=dot ; iy++ )
-                {
-                    for ( ix=-dot ; ix<=dot ; ix++ )
-                    {
-                        ppx = px+ix;
-                        ppy = py+iy;
-
-                        if ( ppx <  min.x || ppy <  min.y ||
-                             ppx >= max.x || ppy >= max.y )  continue;
-
-                        ppx -= min.x;  // on the texture
-                        ppy -= min.y;
-
-                        intensity = 1.0f-Math::Point((float)ix, (float)iy).Length()/dot;
-                        if ( intensity <= 0.0f )  continue;
-                        intensity *= m_groundMark.intensity;
-
-                        j = (ix+dot) + (iy+dot)*m_groundMark.dx;
-                        if ( m_groundMark.table[j] == 1 )  // green ?
-                        {
-                            color.r = 1.0f-intensity;
-                            color.g = 1.0f;
-                            color.b = 1.0f-intensity;
-                            AddDot(&ddsd, (int)ppx, (int)ppy, color);
-                        }
-                        if ( m_groundMark.table[j] == 2 )  // red ?
-                        {
-                            color.r = 1.0f;
-                            color.g = 1.0f-intensity;
-                            color.b = 1.0f-intensity;
-                            AddDot(&ddsd, (int)ppx, (int)ppy, color);
-                        }
-                    }
-                }
-            }
-
-            surface->Unlock(NULL);
-        }
-    }
-
-    for ( i=0 ; i<D3DMAXGROUNDSPOT ; i++ )
-    {
-        if ( m_groundSpot[i].bUsed == false ||
-             m_groundSpot[i].radius == 0.0f )
-        {
-            m_groundSpot[i].drawRadius = 0.0f;
-        }
-        else
-        {
-            m_groundSpot[i].drawPos    = m_groundSpot[i].pos;
-            m_groundSpot[i].drawRadius = m_groundSpot[i].radius;
-        }
-    }
-
-    m_groundMark.drawPos       = m_groundMark.pos;
-    m_groundMark.drawRadius    = m_groundMark.radius;
-    m_groundMark.drawIntensity = m_groundMark.intensity;
-
-    m_bFirstGroundSpot = false;
-}
-
-// Draw all the shadows.
-
-void CD3DEngine::DrawShadow()
-{
-    D3DVERTEX2      vertex[4];  // 2 triangles
-    Math::Vector        corner[4], n, pos;
-    D3DMATERIAL7    material;
-    Math::Matrix        matrix;
-    Math::Point         ts, ti, rot;
-    float           startDeepView, endDeepView;
-    float           intensity, lastIntensity, hFactor, radius, max, height;
-    float           dp, h, d, D;
-    int             i;
-
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-
-    matrix.LoadIdentity();
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    ZeroMemory( &material, sizeof(D3DMATERIAL7) );
-    material.diffuse.r = 1.0f;
-    material.diffuse.g = 1.0f;
-    material.diffuse.b = 1.0f;  // white
-    material.ambient.r = 0.5f;
-    material.ambient.g = 0.5f;
-    material.ambient.b = 0.5f;
-    SetMaterial(material);
-
-#if _POLISH
-    SetTexture("textp.tga");
-#else
-    SetTexture("text.tga");
-#endif
-
-    dp = 0.5f/256.0f;
-    ts.y = 192.0f/256.0f;
-    ti.y = 224.0f/256.0f;
-    ts.y += dp;
-    ti.y -= dp;
-
-    n = Math::Vector(0.0f, 1.0f, 0.0f);
-
-    startDeepView = m_deepView[m_rankView]*m_fogStart[m_rankView];
-    endDeepView = m_deepView[m_rankView];
-
-    lastIntensity = -1.0f;
-    for ( i=0 ; i<m_shadowTotal ; i++ )
-    {
-        if ( !m_shadow[i].bUsed )  continue;
-        if ( m_shadow[i].bHide )  continue;
-
-        pos = m_shadow[i].pos;  // pos = center of the shadow on the ground
-
-        if ( m_eyePt.y == pos.y )  continue;  // camera at the same level?
-
-        // h is the height above the ground to which the shadow
-        // will be drawn.
-        if ( m_eyePt.y > pos.y )  // camera on?
-        {
-            height = m_eyePt.y-pos.y;
-            h = m_shadow[i].radius;
-            max = height*0.5f;
-            if ( h > max  )  h = max;
-            if ( h > 4.0f )  h = 4.0f;
-
-            D = Math::Distance(m_eyePt, pos);
-            if ( D >= endDeepView )  continue;
-            d = D*h/height;
-
-            pos.x += (m_eyePt.x-pos.x)*d/D;
-            pos.z += (m_eyePt.z-pos.z)*d/D;
-            pos.y += h;
-        }
-        else    // camera underneath?
-        {
-            height = pos.y-m_eyePt.y;
-            h = m_shadow[i].radius;
-            max = height*0.1f;
-            if ( h > max  )  h = max;
-            if ( h > 4.0f )  h = 4.0f;
-
-            D = Math::Distance(m_eyePt, pos);
-            if ( D >= endDeepView )  continue;
-            d = D*h/height;
-
-            pos.x += (m_eyePt.x-pos.x)*d/D;
-            pos.z += (m_eyePt.z-pos.z)*d/D;
-            pos.y -= h;
-        }
-
-        // The hFactor decreases the intensity and size increases more
-        // the object is high relative to the ground.
-        hFactor = m_shadow[i].height/20.0f;
-        if ( hFactor < 0.0f )  hFactor = 0.0f;
-        if ( hFactor > 1.0f )  hFactor = 1.0f;
-        hFactor = powf(1.0f-hFactor, 2.0f);
-        if ( hFactor < 0.2f )  hFactor = 0.2f;
-
-        radius = m_shadow[i].radius*1.5f;
-        radius *= 2.0f-hFactor;  // greater if high
-        radius *= 1.0f-d/D;  // smaller if close
-
-        if ( m_shadow[i].type == D3DSHADOWNORM )
-        {
-            corner[0].x = +radius;
-            corner[0].z = +radius;
-            corner[0].y = 0.0f;
-
-            corner[1].x = -radius;
-            corner[1].z = +radius;
-            corner[1].y = 0.0f;
-
-            corner[2].x = +radius;
-            corner[2].z = -radius;
-            corner[2].y = 0.0f;
-
-            corner[3].x = -radius;
-            corner[3].z = -radius;
-            corner[3].y = 0.0f;
-
-            ts.x =  64.0f/256.0f;
-            ti.x =  96.0f/256.0f;
-        }
-        else
-        {
-            rot = Math::RotatePoint(-m_shadow[i].angle, Math::Point(radius, radius));
-            corner[0].x = rot.x;
-            corner[0].z = rot.y;
-            corner[0].y = 0.0f;
-
-            rot = Math::RotatePoint(-m_shadow[i].angle, Math::Point(-radius, radius));
-            corner[1].x = rot.x;
-            corner[1].z = rot.y;
-            corner[1].y = 0.0f;
-
-            rot = Math::RotatePoint(-m_shadow[i].angle, Math::Point(radius, -radius));
-            corner[2].x = rot.x;
-            corner[2].z = rot.y;
-            corner[2].y = 0.0f;
-
-            rot = Math::RotatePoint(-m_shadow[i].angle, Math::Point(-radius, -radius));
-            corner[3].x = rot.x;
-            corner[3].z = rot.y;
-            corner[3].y = 0.0f;
-
-            if ( m_shadow[i].type == D3DSHADOWWORM )
-            {
-                ts.x =  96.0f/256.0f;
-                ti.x = 128.0f/256.0f;
-            }
-            else
-            {
-                ts.x =  64.0f/256.0f;
-                ti.x =  96.0f/256.0f;
-            }
-        }
-
-        corner[0] = Math::CrossProduct(corner[0], m_shadow[i].normal);
-        corner[1] = Math::CrossProduct(corner[1], m_shadow[i].normal);
-        corner[2] = Math::CrossProduct(corner[2], m_shadow[i].normal);
-        corner[3] = Math::CrossProduct(corner[3], m_shadow[i].normal);
-
-        corner[0] += pos;
-        corner[1] += pos;
-        corner[2] += pos;
-        corner[3] += pos;
-
-        ts.x += dp;
-        ti.x -= dp;
-
-        vertex[0] = D3DVERTEX2(corner[1], n, ts.x, ts.y);
-        vertex[1] = D3DVERTEX2(corner[0], n, ti.x, ts.y);
-        vertex[2] = D3DVERTEX2(corner[3], n, ts.x, ti.y);
-        vertex[3] = D3DVERTEX2(corner[2], n, ti.x, ti.y);
-
-        intensity = (0.5f+m_shadow[i].intensity*0.5f)*hFactor;
-
-        // Decreases the intensity of the shade if you're in the area
-        // between the beginning and the end of the fog.
-        if ( D > startDeepView )
-        {
-            intensity *= 1.0f-(D-startDeepView)/(endDeepView-startDeepView);
-        }
-
-        // Decreases if the intensity is almost horizontal
-        // with shade (shade very platte).
-//?     if ( height < 4.0f )  intensity *= height/4.0f;
-
-        if ( intensity == 0.0f )  continue;
-
-        if ( lastIntensity != intensity )  // intensity changed?
-        {
-            lastIntensity = intensity;
-            SetState(D3DSTATETTw, RetColor(intensity));
-        }
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        AddStatisticTriangle(2);
-    }
-
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-}
-
-
-// Called ounces per frame, the call is the entry point for 3d rendering.
-// This function sets up render states, clears the
-// viewport, and renders the scene.
-
-HRESULT CD3DEngine::Render()
-{
-    D3DObjLevel1*   p1;
-    D3DObjLevel2*   p2;
-    D3DObjLevel3*   p3;
-    D3DObjLevel4*   p4;
-    D3DObjLevel5*   p5;
-    D3DObjLevel6*   p6;
-    D3DVERTEX2*     pv;
-    int             l1, l2, l3, l4, l5, objRank, tState;
-    CInterface*     pInterface;
-    bool            bTransparent;
-    D3DCOLOR        color, tColor;
-
-    if ( !m_bRender )  return S_OK;
-
-    m_statisticTriangle = 0;
-    m_lastState = -1;
-    m_lastColor = 999;
-    m_lastTexture[0][0] = 0;
-    m_lastTexture[1][0] = 0;
-    ZeroMemory(&m_lastMaterial, sizeof(D3DMATERIAL7));
-
-    if ( m_bGroundSpot )
-    {
-        RenderGroundSpot();
-    }
-
-    // Clear the viewport
-    if ( m_bSkyMode && m_cloud->RetLevel() != 0.0f )  // clouds?
-    {
-        color = m_backgroundCloudDown;
-    }
-    else
-    {
-        color = m_backgroundColorDown;
-    }
-    m_pD3DDevice->Clear( 0, NULL, D3DCLEAR_TARGET|D3DCLEAR_ZBUFFER,
-                         color, 1.0f, 0L );
-
-    m_light->LightUpdate();
-
-    // Begin the scene
-    if( FAILED( m_pD3DDevice->BeginScene() ) )  return S_OK;
-
-    if ( m_bDrawWorld )
-    {
-        DrawBackground();  // draws the background
-        if ( m_bPlanetMode )  DrawPlanet();  // draws the planets
-        if ( m_bSkyMode )  m_cloud->Draw();  // draws the clouds
-
-        // Display the objects
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, true);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZBIAS, F2DW(16));
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZFUNC, D3DCMP_LESSEQUAL);
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matProj);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-        }
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGCOLOR, m_fogColor[m_rankView]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGVERTEXMODE, D3DFOG_LINEAR);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGSTART, F2DW(m_deepView[m_rankView]*m_fogStart[m_rankView]));
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGEND,   F2DW(m_deepView[m_rankView]));
-
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matView);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-        }
-
-        if ( m_bWaterMode )  m_water->DrawBack();  // draws water
-
-        if ( m_bShadow )
-        {
-            // Draw the field.
-            p1 = m_objectPointer;
-            for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-            {
-                p2 = p1->table[l1];
-                if ( p2 == 0 )  continue;
-                SetTexture(p2->texName1, 0);
-                SetTexture(p2->texName2, 1);
-                for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-                {
-                    p3 = p2->table[l2];
-                    if ( p3 == 0 )  continue;
-                    objRank = p3->objRank;
-                    if ( m_objectParam[objRank].type != TYPETERRAIN )  continue;
-                    if ( !m_objectParam[objRank].bDrawWorld )  continue;
-
-                    {
-                        D3DMATRIX mat = MAT_TO_D3DMAT(m_objectParam[objRank].transform);
-                        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-                    }
-
-                    if ( !IsVisible(objRank) )  continue;
-                    m_light->LightUpdate(m_objectParam[objRank].type);
-                    for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-                    {
-                        p4 = p3->table[l3];
-                        if ( p4 == 0 )  continue;
-                        if ( m_objectParam[objRank].distance <  p4->min ||
-                             m_objectParam[objRank].distance >= p4->max )  continue;
-                        for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                        {
-                            p5 = p4->table[l4];
-                            if ( p5 == 0 )  continue;
-                            for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                            {
-                                p6 = p5->table[l5];
-                                if ( p6 == 0 )  continue;
-                                SetMaterial(p6->material);
-                                SetState(p6->state);
-                                if ( p6->type == D3DTYPE6T )
-                                {
-                                    pv = &p6->vertex[0];
-                                    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLELIST,
-                                                                D3DFVF_VERTEX2,
-                                                                pv, p6->totalUsed,
-                                                                NULL);
-                                    m_statisticTriangle += p6->totalUsed/3;
-                                }
-                                if ( p6->type == D3DTYPE6S )
-                                {
-                                    pv = &p6->vertex[0];
-                                    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP,
-                                                                D3DFVF_VERTEX2,
-                                                                pv, p6->totalUsed,
-                                                                NULL);
-                                    m_statisticTriangle += p6->totalUsed-2;
-                                }
-                            }
-                        }
-                    }
-                }
-            }
-
-            DrawShadow();  // draws the shadows
-        }
-
-        // Draw objects.
-        bTransparent = false;
-        p1 = m_objectPointer;
-        for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-        {
-            p2 = p1->table[l1];
-            if ( p2 == 0 )  continue;
-            SetTexture(p2->texName1, 0);
-            SetTexture(p2->texName2, 1);
-            for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-            {
-                p3 = p2->table[l2];
-                if ( p3 == 0 )  continue;
-                objRank = p3->objRank;
-                if ( m_bShadow && m_objectParam[objRank].type == TYPETERRAIN )  continue;
-                if ( !m_objectParam[objRank].bDrawWorld )  continue;
-
-                {
-                    D3DMATRIX mat = MAT_TO_D3DMAT(m_objectParam[objRank].transform);
-                    m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-                }
-
-                if ( !IsVisible(objRank) )  continue;
-                m_light->LightUpdate(m_objectParam[objRank].type);
-                for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-                {
-                    p4 = p3->table[l3];
-                    if ( p4 == 0 )  continue;
-                    if ( m_objectParam[objRank].distance <  p4->min ||
-                         m_objectParam[objRank].distance >= p4->max )  continue;
-                    for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                    {
-                        p5 = p4->table[l4];
-                        if ( p5 == 0 )  continue;
-                        for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                        {
-                            p6 = p5->table[l5];
-                            if ( p6 == 0 )  continue;
-                            SetMaterial(p6->material);
-                            if ( m_objectParam[objRank].transparency != 0.0f )  // transparent ?
-                            {
-                                bTransparent = true;
-                                continue;
-                            }
-                            SetState(p6->state);
-                            if ( p6->type == D3DTYPE6T )
-                            {
-                                pv = &p6->vertex[0];
-                                m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLELIST,
-                                                            D3DFVF_VERTEX2,
-                                                            pv, p6->totalUsed,
-                                                            NULL);
-                                m_statisticTriangle += p6->totalUsed/3;
-                            }
-                            if ( p6->type == D3DTYPE6S )
-                            {
-                                pv = &p6->vertex[0];
-                                m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP,
-                                                            D3DFVF_VERTEX2,
-                                                            pv, p6->totalUsed,
-                                                            NULL);
-                                m_statisticTriangle += p6->totalUsed-2;
-                            }
-                        }
-                    }
-                }
-            }
-        }
-
-        if ( bTransparent )
-        {
-            if ( m_bStateColor )
-            {
-                tState = D3DSTATETTb|D3DSTATE2FACE;
-                tColor = 0x44444444;
-            }
-            else
-            {
-                tState = D3DSTATETTb;
-                tColor = 0x88888888;
-            }
-
-            // Draw transparent objects.
-            p1 = m_objectPointer;
-            for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-            {
-                p2 = p1->table[l1];
-                if ( p2 == 0 )  continue;
-                SetTexture(p2->texName1, 0);
-                SetTexture(p2->texName2, 1);
-                for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-                {
-                    p3 = p2->table[l2];
-                    if ( p3 == 0 )  continue;
-                    objRank = p3->objRank;
-                    if ( m_bShadow && m_objectParam[objRank].type == TYPETERRAIN )  continue;
-                    if ( !m_objectParam[objRank].bDrawWorld )  continue;
-
-                    {
-                        D3DMATRIX mat = MAT_TO_D3DMAT(m_objectParam[objRank].transform);
-                        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-                    }
-
-                    if ( !IsVisible(objRank) )  continue;
-                    m_light->LightUpdate(m_objectParam[objRank].type);
-                    for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-                    {
-                        p4 = p3->table[l3];
-                        if ( p4 == 0 )  continue;
-                        if ( m_objectParam[objRank].distance <  p4->min ||
-                             m_objectParam[objRank].distance >= p4->max )  continue;
-                        for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                        {
-                            p5 = p4->table[l4];
-                            if ( p5 == 0 )  continue;
-                            for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                            {
-                                p6 = p5->table[l5];
-                                if ( p6 == 0 )  continue;
-                                SetMaterial(p6->material);
-                                if ( m_objectParam[objRank].transparency == 0.0f )  continue;
-                                SetState(tState, tColor);
-                                if ( p6->type == D3DTYPE6T )
-                                {
-                                    pv = &p6->vertex[0];
-                                    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLELIST,
-                                                                D3DFVF_VERTEX2,
-                                                                pv, p6->totalUsed,
-                                                                NULL);
-                                    m_statisticTriangle += p6->totalUsed/3;
-                                }
-                                if ( p6->type == D3DTYPE6S )
-                                {
-                                    pv = &p6->vertex[0];
-                                    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP,
-                                                                D3DFVF_VERTEX2,
-                                                                pv, p6->totalUsed,
-                                                                NULL);
-                                    m_statisticTriangle += p6->totalUsed-2;
-                                }
-                            }
-                        }
-                    }
-                }
-            }
-        }
-
-        m_light->LightUpdate(TYPETERRAIN);
-        if ( m_bWaterMode )  m_water->DrawSurf();  // draws water
-//?     m_cloud->Draw();  // draws the clouds
-
-        m_particule->DrawParticule(SH_WORLD);  // draws the particles of the 3D world
-        m_blitz->Draw();  // draws lightning
-        if ( m_bLensMode )  DrawFrontsize();  // draws the foreground
-        if ( !m_bOverFront )  DrawOverColor();  // draws the foreground color
-    }
-
-    // Draw the user interface over the scene.
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    pInterface = (CInterface*)m_iMan->SearchInstance(CLASS_INTERFACE);
-    if ( pInterface != 0 )
-    {
-        pInterface->Draw();  // draws the entire interface
-    }
-    m_particule->DrawParticule(SH_INTERFACE);  // draws the particles of the interface
-
-    if ( m_bDrawFront )
-    {
-        // Display the objects
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, true);
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZBIAS, F2DW(16));
-//?     m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZFUNC, D3DCMP_LESSEQUAL);
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matProj);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-        }
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, m_ambiantColor[m_rankView]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGCOLOR, m_fogColor[m_rankView]);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGVERTEXMODE, D3DFOG_LINEAR);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGSTART, F2DW(m_deepView[m_rankView]*m_fogStart[m_rankView]));
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGEND,   F2DW(m_deepView[m_rankView]));
-
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matView);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-        }
-
-        p1 = m_objectPointer;
-        for ( l1=0 ; l1<p1->totalUsed ; l1++ )
-        {
-            p2 = p1->table[l1];
-            if ( p2 == 0 )  continue;
-            SetTexture(p2->texName1, 0);
-            SetTexture(p2->texName2, 1);
-            for ( l2=0 ; l2<p2->totalUsed ; l2++ )
-            {
-                p3 = p2->table[l2];
-                if ( p3 == 0 )  continue;
-                objRank = p3->objRank;
-                if ( !m_objectParam[objRank].bDrawFront )  continue;
-
-                {
-                    D3DMATRIX mat = MAT_TO_D3DMAT(m_objectParam[objRank].transform);
-                    m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-                }
-
-                if ( !IsVisible(objRank) )  continue;
-                m_light->LightUpdate(m_objectParam[objRank].type);
-                for ( l3=0 ; l3<p3->totalUsed ; l3++ )
-                {
-                    p4 = p3->table[l3];
-                    if ( p4 == 0 )  continue;
-                    if ( m_objectParam[objRank].distance <  p4->min ||
-                         m_objectParam[objRank].distance >= p4->max )  continue;
-                    for ( l4=0 ; l4<p4->totalUsed ; l4++ )
-                    {
-                        p5 = p4->table[l4];
-                        if ( p5 == 0 )  continue;
-                        for ( l5=0 ; l5<p5->totalUsed ; l5++ )
-                        {
-                            p6 = p5->table[l5];
-                            if ( p6 == 0 )  continue;
-                            SetMaterial(p6->material);
-                            SetState(p6->state);
-                            if ( p6->type == D3DTYPE6T )
-                            {
-                                pv = &p6->vertex[0];
-                                m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLELIST,
-                                                            D3DFVF_VERTEX2,
-                                                            pv, p6->totalUsed,
-                                                            NULL);
-                                m_statisticTriangle += p6->totalUsed/3;
-                            }
-                            if ( p6->type == D3DTYPE6S )
-                            {
-                                pv = &p6->vertex[0];
-                                m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP,
-                                                            D3DFVF_VERTEX2,
-                                                            pv, p6->totalUsed,
-                                                            NULL);
-                                m_statisticTriangle += p6->totalUsed-2;
-                            }
-                        }
-                    }
-                }
-            }
-        }
-
-        m_particule->DrawParticule(SH_FRONT);  // draws the particles of the 3D world
-
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-        m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-        }
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-        }
-        {
-            D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-            m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-        }
-    }
-
-    if ( m_bOverFront )  DrawOverColor();  // draws the foreground color
-
-    if ( m_mouseType != D3DMOUSEHIDE )
-    {
-        DrawMouse();
-    }
-
-    // End the scene.
-    m_pD3DDevice->EndScene();
-
-    DrawHilite();
-    return S_OK;
-}
-
-
-// Draw the gradient background.
-
-void CD3DEngine::DrawBackground()
-{
-    if ( m_bSkyMode && m_cloud->RetLevel() != 0.0f )  // clouds ?
-    {
-        if ( m_backgroundCloudUp != m_backgroundCloudDown )  // degraded?
-        {
-            DrawBackgroundGradient(m_backgroundCloudUp, m_backgroundCloudDown);
-        }
-    }
-    else
-    {
-        if ( m_backgroundColorUp != m_backgroundColorDown )  // degraded?
-        {
-            DrawBackgroundGradient(m_backgroundColorUp, m_backgroundColorDown);
-        }
-    }
-
-    if ( m_bBackForce || (m_bSkyMode && m_backgroundName[0] != 0) )
-    {
-        DrawBackgroundImage();  // image
-    }
-}
-
-// Draw the gradient background.
-
-void CD3DEngine::DrawBackgroundGradient(D3DCOLOR up, D3DCOLOR down)
-{
-    D3DLVERTEX  vertex[4];  // 2 triangles
-    D3DCOLOR    color[3];
-    Math::Point     p1, p2;
-
-    p1.x = 0.0f;
-    p1.y = 0.5f;
-    p2.x = 1.0f;
-    p2.y = 1.0f;
-
-    color[0] = up;
-    color[1] = down;
-    color[2] = 0x00000000;
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    SetTexture("xxx.tga");  // no texture
-    SetState(D3DSTATENORMAL);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    vertex[0] = D3DLVERTEX(D3DVECTOR(p1.x, p1.y, 0.0f), color[1],color[2], 0.0f,0.0f);
-    vertex[1] = D3DLVERTEX(D3DVECTOR(p1.x, p2.y, 0.0f), color[0],color[2], 0.0f,0.0f);
-    vertex[2] = D3DLVERTEX(D3DVECTOR(p2.x, p1.y, 0.0f), color[1],color[2], 0.0f,0.0f);
-    vertex[3] = D3DLVERTEX(D3DVECTOR(p2.x, p2.y, 0.0f), color[0],color[2], 0.0f,0.0f);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_LVERTEX, vertex, 4, NULL);
-    AddStatisticTriangle(2);
-}
-
-// Draws a portion of the image background.
-
-void CD3DEngine::DrawBackgroundImageQuarter(Math::Point p1, Math::Point p2, char *name)
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    n;
-    float       u1, u2, v1, v2, h, a;
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-
-    if ( m_bBackgroundFull )
-    {
-        u1 = 0.0f;
-        v1 = 0.0f;
-        u2 = 1.0f;
-        v2 = 1.0f;
-
-        if ( m_bBackgroundQuarter )
-        {
-            u1 += 0.5f/512.0f;
-            v1 += 0.5f/384.0f;
-            u2 -= 0.5f/512.0f;
-            v2 -= 0.5f/384.0f;
-        }
-    }
-    else
-    {
-        h = 0.5f;  // visible area vertically (1=all)
-        a = m_eyeDirV-Math::PI*0.15f;
-        if ( a >  Math::PI      )  a -= Math::PI*2.0f;  // a = -Math::PI..Math::PI
-        if ( a >  Math::PI/4.0f )  a =  Math::PI/4.0f;
-        if ( a < -Math::PI/4.0f )  a = -Math::PI/4.0f;
-
-        u1 = -m_eyeDirH/Math::PI;
-        u2 = u1+1.0f/Math::PI;
-//?     u1 = -m_eyeDirH/(Math::PI*2.0f);
-//?     u2 = u1+1.0f/(Math::PI*2.0f);
-
-        v1 = (1.0f-h)*(0.5f+a/(2.0f*Math::PI/4.0f))+0.1f;
-        v2 = v1+h;
-    }
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    SetTexture(name);
-    SetState(D3DSTATEWRAP);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    AddStatisticTriangle(2);
-}
-
-// Draws the image background.
-
-void CD3DEngine::DrawBackgroundImage()
-{
-    Math::Point p1, p2;
-    char    name[50];
-
-    if ( m_bBackgroundQuarter )
-    {
-        p1.x = 0.0f;
-        p1.y = 0.5f;
-        p2.x = 0.5f;
-        p2.y = 1.0f;
-        QuarterName(name, m_backgroundName, 0);
-        DrawBackgroundImageQuarter(p1, p2, name);
-
-        p1.x = 0.5f;
-        p1.y = 0.5f;
-        p2.x = 1.0f;
-        p2.y = 1.0f;
-        QuarterName(name, m_backgroundName, 1);
-        DrawBackgroundImageQuarter(p1, p2, name);
-
-        p1.x = 0.0f;
-        p1.y = 0.0f;
-        p2.x = 0.5f;
-        p2.y = 0.5f;
-        QuarterName(name, m_backgroundName, 2);
-        DrawBackgroundImageQuarter(p1, p2, name);
-
-        p1.x = 0.5f;
-        p1.y = 0.0f;
-        p2.x = 1.0f;
-        p2.y = 0.5f;
-        QuarterName(name, m_backgroundName, 3);
-        DrawBackgroundImageQuarter(p1, p2, name);
-    }
-    else
-    {
-        p1.x = 0.0f;
-        p1.y = 0.0f;
-        p2.x = 1.0f;
-        p2.y = 1.0f;
-        DrawBackgroundImageQuarter(p1, p2, m_backgroundName);
-    }
-}
-
-// Draws all the planets.
-
-void CD3DEngine::DrawPlanet()
-{
-    if ( !m_planet->PlanetExist() )  return;
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    m_planet->Draw();  // draws the planets
-}
-
-// Draws the image foreground.
-
-void CD3DEngine::DrawFrontsize()
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    n;
-    Math::Point     p1, p2;
-    float       u1, u2, v1, v2;
-
-    if ( m_frontsizeName[0] == 0 )  return;
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-
-    p1.x = 0.0f;
-    p1.y = 0.0f;
-    p2.x = 1.0f;
-    p2.y = 1.0f;
-
-    u1 = -m_eyeDirH/(Math::PI*0.6f)+Math::PI*0.5f;
-    u2 = u1+0.50f;
-
-    v1 = 0.2f;
-    v2 = 1.0f;
-
-#if 0
-    char s[100];
-    sprintf(s, "h=%.2f v=%.2f u=%.2f;%.2f v=%.2f;%.2f", m_eyeDirH, m_eyeDirV, u1, u2, v1, v2);
-    SetInfoText(3, s);
-#endif
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    SetTexture(m_frontsizeName);
-    SetState(D3DSTATECLAMP|D3DSTATETTb);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    AddStatisticTriangle(2);
-}
-
-// Draws the foreground color.
-
-void CD3DEngine::DrawOverColor()
-{
-    D3DLVERTEX  vertex[4];  // 2 triangles
-    D3DCOLOR    color[3];
-    Math::Point     p1, p2;
-
-    if ( !m_bStateColor )  return;
-    if ( (m_overColor == 0x00000000 && m_overMode == D3DSTATETCb) ||
-         (m_overColor == 0xffffffff && m_overMode == D3DSTATETCw) )  return;
-
-    p1.x = 0.0f;
-    p1.y = 0.0f;
-    p2.x = 1.0f;
-    p2.y = 1.0f;
-
-    color[0] = m_overColor;
-    color[1] = m_overColor;
-    color[2] = 0x00000000;
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false );
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FOGENABLE, false);
-
-    SetTexture("xxx.tga");  // no texture
-    SetState(m_overMode);
-
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matViewInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_VIEW, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matProjInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-    }
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(m_matWorldInterface);
-        m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    vertex[0] = D3DLVERTEX(D3DVECTOR(p1.x, p1.y, 0.0f), color[1],color[2], 0.0f,0.0f);
-    vertex[1] = D3DLVERTEX(D3DVECTOR(p1.x, p2.y, 0.0f), color[0],color[2], 0.0f,0.0f);
-    vertex[2] = D3DLVERTEX(D3DVECTOR(p2.x, p1.y, 0.0f), color[1],color[2], 0.0f,0.0f);
-    vertex[3] = D3DLVERTEX(D3DVECTOR(p2.x, p2.y, 0.0f), color[0],color[2], 0.0f,0.0f);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_LVERTEX, vertex, 4, NULL);
-    AddStatisticTriangle(2);
-}
-
-
-// Lists the ranks of objects and subobjects selected.
-
-void CD3DEngine::SetHiliteRank(int *rankList)
-{
-    int     i;
-
-    i = 0;
-    while ( *rankList != -1 )
-    {
-        m_hiliteRank[i++] = *rankList++;
-    }
-    m_hiliteRank[i] = -1;  // terminator
-}
-
-// Give the box in the 2D screen of any object.
-
-bool CD3DEngine::GetBBox2D(int objRank, Math::Point &min, Math::Point &max)
-{
-    Math::Vector    p, pp;
-    int         i;
-
-    min.x =  1000000.0f;
-    min.y =  1000000.0f;
-    max.x = -1000000.0f;
-    max.y = -1000000.0f;
-
-    for ( i=0 ; i<8 ; i++ )
-    {
-        if ( i & (1<<0) )  p.x = m_objectParam[objRank].bboxMin.x;
-        else               p.x = m_objectParam[objRank].bboxMax.x;
-        if ( i & (1<<1) )  p.y = m_objectParam[objRank].bboxMin.y;
-        else               p.y = m_objectParam[objRank].bboxMax.y;
-        if ( i & (1<<2) )  p.z = m_objectParam[objRank].bboxMin.z;
-        else               p.z = m_objectParam[objRank].bboxMax.z;
-        if ( TransformPoint(pp, objRank, p) )
-        {
-            if ( pp.x < min.x )  min.x = pp.x;
-            if ( pp.x > max.x )  max.x = pp.x;
-            if ( pp.y < min.y )  min.y = pp.y;
-            if ( pp.y > max.y )  max.y = pp.y;
-        }
-    }
-
-    if ( min.x ==  1000000.0f ||
-         min.y ==  1000000.0f ||
-         max.x == -1000000.0f ||
-         max.y == -1000000.0f )  return false;
-
-    return true;
-}
-
-// Determines the rectangle of the object highlighted, which will be designed by CD3DApplication.
-
-void CD3DEngine::DrawHilite()
-{
-    Math::Point min, max, omin, omax;
-    int     i;
-
-    min.x =  1000000.0f;
-    min.y =  1000000.0f;
-    max.x = -1000000.0f;
-    max.y = -1000000.0f;
-
-    i = 0;
-    while ( m_hiliteRank[i] != -1 )
-    {
-        if ( GetBBox2D(m_hiliteRank[i++], omin, omax) )
-        {
-            min.x = Math::Min(min.x, omin.x);
-            min.y = Math::Min(min.y, omin.y);
-            max.x = Math::Max(max.x, omax.x);
-            max.y = Math::Max(max.y, omax.y);
-        }
-    }
-
-    if ( min.x ==  1000000.0f ||
-         min.y ==  1000000.0f ||
-         max.x == -1000000.0f ||
-         max.y == -1000000.0f )
-    {
-        m_bHilite = false;  // not highlighted
-    }
-    else
-    {
-        m_hiliteP1 = min;
-        m_hiliteP2 = max;
-        m_bHilite = true;
-    }
-}
-
-// Give the rectangle highlighted by drawing CD3DApplication.
-
-bool CD3DEngine::GetHilite(Math::Point &p1, Math::Point &p2)
-{
-    p1 = m_hiliteP1;
-    p2 = m_hiliteP2;
-    return m_bHilite;
-}
-
-
-// Triangles adds qq records for statistics.
-
-void CD3DEngine::AddStatisticTriangle(int nb)
-{
-    m_statisticTriangle += nb;
-}
-
-// Returns the number of triangles rendered.
-
-int CD3DEngine::RetStatisticTriangle()
-{
-    return m_statisticTriangle;
-}
-
-bool CD3DEngine::GetSpriteCoord(int &x, int &y)
-{
-    D3DVIEWPORT7    vp;
-    Math::Vector        v, vv;
-
-    return false;
-    //?
-    vv = Math::Vector(0.0f, 0.0f, 0.0f);
-    if ( !TransformPoint(v, 20*20+1, vv) )  return false;
-
-    m_pD3DDevice->GetViewport(&vp);
-    v.x *= vp.dwWidth/2;
-    v.y *= vp.dwHeight/2;
-    v.x = v.x+vp.dwWidth/2;
-    v.y = vp.dwHeight-(v.y+vp.dwHeight/2);
-
-    x = (int)v.x;
-    y = (int)v.y;
-    return true;
-}
-
-
-// Tests whether to exclude a point.
-
-bool IsExcludeColor(Math::Point *pExclu, int x, int y)
-{
-    int     i;
-
-    i = 0;
-    while ( pExclu[i+0].x != 0.0f || pExclu[i+0].y != 0.0f ||
-            pExclu[i+1].y != 0.0f || pExclu[i+1].y != 0.0f )
-    {
-        if ( x >= (int)(pExclu[i+0].x*256.0f) &&
-             x <  (int)(pExclu[i+1].x*256.0f) &&
-             y >= (int)(pExclu[i+0].y*256.0f) &&
-             y <  (int)(pExclu[i+1].y*256.0f) )  return true;  // exclude
-
-        i += 2;
-    }
-
-    return false;  // point to include
-}
-
-// Change the color of a texture.
-
-bool CD3DEngine::ChangeColor(char *name,
-                             D3DCOLORVALUE colorRef1, D3DCOLORVALUE colorNew1,
-                             D3DCOLORVALUE colorRef2, D3DCOLORVALUE colorNew2,
-                             float tolerance1, float tolerance2,
-                             Math::Point ts, Math::Point ti,
-                             Math::Point *pExclu, float shift, bool bHSV)
-{
-    LPDIRECTDRAWSURFACE7    surface;
-    DDSURFACEDESC2          ddsd;
-    D3DCOLORVALUE           color;
-    ColorHSV                cr1, cn1, cr2, cn2, c;
-    int                     dx, dy, x, y, sx, sy, ex, ey;
-
-    D3DTextr_Invalidate(name);
-    LoadTexture(name);  // reloads the initial texture
-
-    if ( colorRef1.r == colorNew1.r &&
-         colorRef1.g == colorNew1.g &&
-         colorRef1.b == colorNew1.b &&
-         colorRef2.r == colorNew2.r &&
-         colorRef2.g == colorNew2.g &&
-         colorRef2.b == colorNew2.b )  return true;
-
-    surface = D3DTextr_GetSurface(name);
-    if ( surface == 0 )  return false;
-
-    ZeroMemory(&ddsd, sizeof(DDSURFACEDESC2));
-    ddsd.dwSize = sizeof(DDSURFACEDESC2);
-    if ( surface->Lock(NULL, &ddsd, DDLOCK_WAIT, NULL) != DD_OK )  return false;
-
-    dx = ddsd.dwWidth;
-    dy = ddsd.dwHeight;
-
-    sx = (int)(ts.x*dx);
-    sy = (int)(ts.y*dy);
-    ex = (int)(ti.x*dx);
-    ey = (int)(ti.y*dy);
-
-    RGB2HSV(colorRef1, cr1);
-    RGB2HSV(colorNew1, cn1);
-    RGB2HSV(colorRef2, cr2);
-    RGB2HSV(colorNew2, cn2);
-
-    for ( y=sy ; y<ey ; y++ )
-    {
-        for ( x=sx ; x<ex ; x++ )
-        {
-            if ( pExclu != 0 && IsExcludeColor(pExclu, x,y) )  continue;
-
-            color = GetDot(&ddsd, x, y);
-
-            if ( bHSV )
-            {
-                RGB2HSV(color, c);
-                if ( c.s > 0.01f && fabs(c.h-cr1.h) < tolerance1 )
-                {
-                    c.h += cn1.h-cr1.h;
-                    c.s += cn1.s-cr1.s;
-                    c.v += cn1.v-cr1.v;
-                    if ( c.h < 0.0f )  c.h -= 1.0f;
-                    if ( c.h > 1.0f )  c.h += 1.0f;
-                    HSV2RGB(c, color);
-                    color.r += shift;
-                    color.g += shift;
-                    color.b += shift;
-                    ::SetDot(&ddsd, x, y, color);
-                }
-                else
-                if ( tolerance2 != -1.0f &&
-                     c.s > 0.01f && fabs(c.h-cr2.h) < tolerance2 )
-                {
-                    c.h += cn2.h-cr2.h;
-                    c.s += cn2.s-cr2.s;
-                    c.v += cn2.v-cr2.v;
-                    if ( c.h < 0.0f )  c.h -= 1.0f;
-                    if ( c.h > 1.0f )  c.h += 1.0f;
-                    HSV2RGB(c, color);
-                    color.r += shift;
-                    color.g += shift;
-                    color.b += shift;
-                    ::SetDot(&ddsd, x, y, color);
-                }
-            }
-            else
-            {
-                if ( fabs(color.r-colorRef1.r)+
-                     fabs(color.g-colorRef1.g)+
-                     fabs(color.b-colorRef1.b) < tolerance1*3.0f )
-                {
-                    color.r = colorNew1.r+color.r-colorRef1.r+shift;
-                    color.g = colorNew1.g+color.g-colorRef1.g+shift;
-                    color.b = colorNew1.b+color.b-colorRef1.b+shift;
-                    ::SetDot(&ddsd, x, y, color);
-                }
-                else
-                if ( tolerance2 != -1 &&
-                     fabs(color.r-colorRef2.r)+
-                     fabs(color.g-colorRef2.g)+
-                     fabs(color.b-colorRef2.b) < tolerance2*3.0f )
-                {
-                    color.r = colorNew2.r+color.r-colorRef2.r+shift;
-                    color.g = colorNew2.g+color.g-colorRef2.g+shift;
-                    color.b = colorNew2.b+color.b-colorRef2.b+shift;
-                    ::SetDot(&ddsd, x, y, color);
-                }
-            }
-        }
-    }
-
-    surface->Unlock(NULL);
-    return true;
-}
-
-
-// Open an image to work directly in it.
-
-bool CD3DEngine::OpenImage(char *name)
-{
-//? D3DTextr_Invalidate(name);
-//? LoadTexture(name);
-
-    m_imageSurface = D3DTextr_GetSurface(name);
-    if ( m_imageSurface == 0 )  return false;
-
-    ZeroMemory(&m_imageDDSD, sizeof(DDSURFACEDESC2));
-    m_imageDDSD.dwSize = sizeof(DDSURFACEDESC2);
-    if ( m_imageSurface->Lock(NULL, &m_imageDDSD, DDLOCK_WAIT, NULL) != DD_OK )
-    {
-        return false;
-    }
-
-    if ( m_imageDDSD.ddpfPixelFormat.dwRGBBitCount != 16 )
-    {
-        m_imageSurface->Unlock(NULL);
-        return false;
-    }
-
-    m_imageDX = m_imageDDSD.dwWidth;
-    m_imageDY = m_imageDDSD.dwHeight;
-
-    return true;
-}
-
-// Copy the working image.
-
-bool CD3DEngine::CopyImage()
-{
-    WORD*       pbSurf;
-    int         y;
-
-    if ( m_imageCopy == 0 )
-    {
-        m_imageCopy = (WORD*)malloc(m_imageDX*m_imageDY*sizeof(WORD));
-    }
-
-    for ( y=0 ; y<m_imageDY ; y++ )
-    {
-        pbSurf = (WORD*)m_imageDDSD.lpSurface;
-        pbSurf += m_imageDDSD.lPitch*y/2;
-        memcpy(m_imageCopy+y*m_imageDX, pbSurf, m_imageDX*sizeof(WORD));
-    }
-    return true;
-}
-
-// Restores the image work.
-
-bool CD3DEngine::LoadImage()
-{
-    WORD*       pbSurf;
-    int         y;
-
-    if ( m_imageCopy == 0 )  return false;
-
-    for ( y=0 ; y<m_imageDY ; y++ )
-    {
-        pbSurf = (WORD*)m_imageDDSD.lpSurface;
-        pbSurf += m_imageDDSD.lPitch*y/2;
-        memcpy(pbSurf, m_imageCopy+y*m_imageDX, m_imageDX*sizeof(WORD));
-    }
-    return true;
-}
-
-// Scroll the copy of the working image.
-
-bool CD3DEngine::ScrollImage(int dx, int dy)
-{
-    int     x, y;
-
-    if ( dx > 0 )
-    {
-        for ( y=0 ; y<m_imageDY ; y++ )
-        {
-            for ( x=0 ; x<m_imageDX-dx ; x++ )
-            {
-                m_imageCopy[x+y*m_imageDX] = m_imageCopy[x+dx+y*m_imageDX];
-            }
-        }
-    }
-
-    if ( dx < 0 )
-    {
-        for ( y=0 ; y<m_imageDY ; y++ )
-        {
-            for ( x=m_imageDX-1 ; x>=-dx ; x-- )
-            {
-                m_imageCopy[x+y*m_imageDX] = m_imageCopy[x+dx+y*m_imageDX];
-            }
-        }
-    }
-
-    if ( dy > 0 )
-    {
-        for ( y=0 ; y<m_imageDY-dy ; y++ )
-        {
-            memcpy(m_imageCopy+y*m_imageDX, m_imageCopy+(y+dy)*m_imageDX, m_imageDX*sizeof(WORD));
-        }
-    }
-
-    if ( dy < 0 )
-    {
-        for ( y=m_imageDY-1 ; y>=-dy ; y-- )
-        {
-            memcpy(m_imageCopy+y*m_imageDX, m_imageCopy+(y+dy)*m_imageDX, m_imageDX*sizeof(WORD));
-        }
-    }
-
-    return true;
-}
-
-// Draws a point in the image work.
-
-bool CD3DEngine::SetDot(int x, int y, D3DCOLORVALUE color)
-{
-    WORD*       pbSurf;
-    WORD        r,g,b, w;
-
-    if ( x < 0 || x >= m_imageDX ||
-         y < 0 || y >= m_imageDY )  return false;
-
-#if 1
-    if ( color.r < 0.0f )  color.r = 0.0f;
-    if ( color.r > 1.0f )  color.r = 1.0f;
-    if ( color.g < 0.0f )  color.g = 0.0f;
-    if ( color.g > 1.0f )  color.g = 1.0f;
-    if ( color.b < 0.0f )  color.b = 0.0f;
-    if ( color.b > 1.0f )  color.b = 1.0f;
-
-    r = (int)(color.r*32.0f);
-    g = (int)(color.g*32.0f);
-    b = (int)(color.b*32.0f);
-
-    if ( r >= 32 )  r = 31;  // 5 bits
-    if ( g >= 32 )  g = 31;  // 5 bits
-    if ( b >= 32 )  b = 31;  // 5 bits
-#else
-    r = (int)(color.r*31.0f);
-    g = (int)(color.g*31.0f);
-    b = (int)(color.b*31.0f);
-#endif
-
-    if ( m_imageDDSD.ddpfPixelFormat.dwRBitMask == 0xf800 )  // 565 ?
-    {
-        w = (r<<11)|(g<<6)|b;
-    }
-    else if ( m_imageDDSD.ddpfPixelFormat.dwRBitMask == 0x7c00 )  // 555 ?
-    {
-        w = (r<<10)|(g<<5)|b;
-    }
-    else
-    {
-        w = -1;  // blank
-    }
-
-    pbSurf = (WORD*)m_imageDDSD.lpSurface;
-    pbSurf += m_imageDDSD.lPitch*y/2;
-    pbSurf += x;
-
-    *pbSurf = w;
-    return true;
-}
-
-// Closes the working image.
-
-bool CD3DEngine::CloseImage()
-{
-    m_imageSurface->Unlock(NULL);
-    return true;
-}
-
-
-// Writes a .BMP screenshot.
-
-bool CD3DEngine::WriteScreenShot(char *filename, int width, int height)
-{
-    return m_app->WriteScreenShot(filename, width, height);
-}
-
-// Initializes an hDC on the rendering surface.
-
-bool CD3DEngine::GetRenderDC(HDC &hDC)
-{
-    return m_app->GetRenderDC(hDC);
-}
-
-// Frees the hDC of the rendering surface.
-
-bool CD3DEngine::ReleaseRenderDC(HDC &hDC)
-{
-    return m_app->ReleaseRenderDC(hDC);
-}
-
-PBITMAPINFO CD3DEngine::CreateBitmapInfoStruct(HBITMAP hBmp)
-{
-    return m_app->CreateBitmapInfoStruct(hBmp);
-}
-
-bool CD3DEngine::CreateBMPFile(LPTSTR pszFile, PBITMAPINFO pbi, HBITMAP hBMP, HDC hDC)
-{
-    return m_app->CreateBMPFile(pszFile, pbi, hBMP, hDC);
-}
-
-// Returns the pointer to the class cText.
-
-CText* CD3DEngine::RetText()
-{
-    return m_text;
-}
-
-
-// Managing of information text displayed in the window.
-
-void CD3DEngine::SetInfoText(int line, char* text)
-{
-    strcpy(m_infoText[line], text);
-}
-
-char* CD3DEngine::RetInfoText(int line)
-{
-    return m_infoText[line];
-}
-
-
-
-// Specifies the length of the camera.
-//  0.75 = normal
-//  1.50 = wide-angle
-
-void CD3DEngine::SetFocus(float focus)
-{
-    D3DVIEWPORT7    vp;
-    float           fAspect;
-
-    m_focus = focus;
-
-    if ( m_pD3DDevice != 0 )
-    {
-        m_pD3DDevice->GetViewport(&vp);
-        m_dim.x = vp.dwWidth;
-        m_dim.y = vp.dwHeight;
-    }
-
-    fAspect = ((float)m_dim.y) / m_dim.x;
-//? Math::LoadProjectionMatrix(m_matProj, m_focus, fAspect, 0.5f, m_deepView[m_rankView]);
-    Math::LoadProjectionMatrix(m_matProj, m_focus, fAspect, 0.5f, m_deepView[0]);
-}
-
-float CD3DEngine::RetFocus()
-{
-    return m_focus;
-}
-
-//
-
-void CD3DEngine::UpdateMatProj()
-{
-    D3DMATRIX mat = MAT_TO_D3DMAT(m_matProj);
-    m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_PROJECTION, &mat);
-}
-
-
-
-// Ignores key presses.
-
-void CD3DEngine::FlushPressKey()
-{
-    m_app->FlushPressKey();
-}
-
-// Resets the default keys.
-
-void CD3DEngine::ResetKey()
-{
-    m_app->ResetKey();
-}
-
-// Modifies a button.
-
-void CD3DEngine::SetKey(int keyRank, int option, int key)
-{
-    m_app->SetKey(keyRank, option, key);
-}
-
-// Gives a key.
-
-int CD3DEngine::RetKey(int keyRank, int option)
-{
-    return m_app->RetKey(keyRank, option);
-}
-
-
-// Use the joystick or keyboard.
-
-void CD3DEngine::SetJoystick(bool bEnable)
-{
-    m_app->SetJoystick(bEnable);
-}
-
-bool CD3DEngine::RetJoystick()
-{
-    return m_app->RetJoystick();
-}
-
-
-void CD3DEngine::SetDebugMode(bool bMode)
-{
-    m_app->SetDebugMode(bMode);
-}
-
-bool CD3DEngine::RetDebugMode()
-{
-    return m_app->RetDebugMode();
-}
-
-bool CD3DEngine::RetSetupMode()
-{
-    return m_app->RetSetupMode();
-}
-
-
-// Indicates whether a point is visible.
-
-bool CD3DEngine::IsVisiblePoint(const Math::Vector &pos)
-{
-    return ( Math::Distance(m_eyePt, pos) <= m_deepView[0] );
-}
-
-
-// Initialize scene objects.
-
-HRESULT CD3DEngine::InitDeviceObjects()
-{
-    // Set miscellaneous render states.
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_DITHERENABLE,   true);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SPECULARENABLE, true);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_SHADEMODE, D3DSHADE_GOURAUD);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_FILLMODE, D3DFILL_SOLID);
-
-    // Set up the textures.
-    D3DTextr_RestoreAllTextures(m_pD3DDevice);
-    m_pD3DDevice->SetTextureStageState(0, D3DTSS_MINFILTER, D3DTFN_LINEAR);
-    m_pD3DDevice->SetTextureStageState(0, D3DTSS_MAGFILTER, D3DTFG_LINEAR);
-    m_pD3DDevice->SetTextureStageState(1, D3DTSS_MINFILTER, D3DTFN_LINEAR);
-    m_pD3DDevice->SetTextureStageState(1, D3DTSS_MAGFILTER, D3DTFG_LINEAR);
-
-    SetFocus(m_focus);
-
-    // Definitions of the matrices for the interface.
-    m_matWorldInterface.LoadIdentity();
-
-    m_matViewInterface.LoadIdentity();
-    m_matViewInterface.Set(1, 4, -0.5f);
-    m_matViewInterface.Set(2, 4, -0.5f);
-    m_matViewInterface.Set(3, 4,  1.0f);
-
-    m_matProjInterface.LoadIdentity();
-    m_matProjInterface.Set(1, 1,  2.0f);
-    m_matProjInterface.Set(2, 2,  2.0f);
-    m_matProjInterface.Set(4, 3,  1.0f);
-    m_matProjInterface.Set(3, 4, -1.0f);
-    m_matProjInterface.Set(4, 4,  0.0f);
-
-    return S_OK;
-}
-
-
-// Restore all surfaces.
-
-HRESULT CD3DEngine::RestoreSurfaces()
-{
-    return S_OK;
-}
-
-
-// Called when the app is exitting, or the device is being changed,
-// this function deletes any device dependant objects.
-
-HRESULT CD3DEngine::DeleteDeviceObjects()
-{
-    D3DTextr_InvalidateAllTextures();
-    return S_OK;
-}
-
-
-// Called before the app exits, this function gives the app the chance
-// to cleanup after itself.
-
-HRESULT CD3DEngine::FinalCleanup()
-{
-    return S_OK;
-}
-
-
-// Overrrides the main WndProc, so the sample can do custom message
-// handling (e.g. processing mouse, keyboard, or menu commands).
-
-LRESULT CD3DEngine::MsgProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
-{
-#if 0
-    if ( uMsg == WM_KEYDOWN )  // Alt+key ?
-    {
-        if ( wParam == 'Q' )
-        {
-            debug_blend1 ++;
-            if ( debug_blend1 > 13 )  debug_blend1 = 0;
-        }
-        if ( wParam == 'W' )
-        {
-            debug_blend2 ++;
-            if ( debug_blend2 > 13 )  debug_blend2 = 0;
-        }
-        if ( wParam == 'E' )
-        {
-            debug_blend3 ++;
-            if ( debug_blend3 > 13 )  debug_blend3 = 0;
-        }
-        if ( wParam == 'R' )
-        {
-            debug_blend4 ++;
-            if ( debug_blend4 > 13 )  debug_blend4 = 0;
-        }
-        char s[100];
-        sprintf(s, "src=%d, dest=%d, src=%d, dest=%d", debug_blend1, debug_blend2, debug_blend3, debug_blend4);
-        SetInfoText(4, s);
-    }
-#endif
-
-#if 1
-    if ( uMsg == WM_SYSKEYDOWN )  // Alt+key ?
-    {
-        if ( wParam == VK_F7 )  // Alt+F7 ?
-        {
-            s_resol = 0;
-        }
-        if ( wParam == VK_F8 )  // Alt+F8 ?
-        {
-            s_resol = 1;
-        }
-        if ( wParam == VK_F9 )  // Alt+F9 ?
-        {
-            s_resol = 2;
-        }
-        if ( wParam == VK_F10 )  // Alt+F10 ?
-        {
-            s_resol = 3;
-        }
-    }
-#endif
-
-    return 0;
-}
-
-
-// Mouse control.
-
-void CD3DEngine::MoveMousePos(Math::Point pos)
-{
-    m_mousePos = pos;
-    m_app->SetMousePos(pos);
-}
-
-void CD3DEngine::SetMousePos(Math::Point pos)
-{
-    m_mousePos = pos;
-}
-
-Math::Point CD3DEngine::RetMousePos()
-{
-    return m_mousePos;
-}
-
-void CD3DEngine::SetMouseType(D3DMouse type)
-{
-    m_mouseType = type;
-}
-
-D3DMouse CD3DEngine::RetMouseType()
-{
-    return m_mouseType;
-}
-
-void CD3DEngine::SetMouseHide(bool bHide)
-{
-    if ( m_bMouseHide == bHide )  return;
-
-    if ( bHide )  // hide the mouse?
-    {
-        m_bNiceMouse = m_app->RetNiceMouse();
-        if ( !m_bNiceMouse )
-        {
-            m_app->SetNiceMouse(true);
-        }
-        m_bMouseHide = true;
-    }
-    else    // shows the mouse?
-    {
-        if ( !m_bNiceMouse )
-        {
-            m_app->SetNiceMouse(false);
-        }
-        m_bMouseHide = false;
-    }
-}
-
-bool CD3DEngine::RetMouseHide()
-{
-    return m_bMouseHide;
-}
-
-void CD3DEngine::SetNiceMouse(bool bNice)
-{
-    m_app->SetNiceMouse(bNice);
-}
-
-bool CD3DEngine::RetNiceMouse()
-{
-    return m_app->RetNiceMouse();
-}
-
-bool CD3DEngine::RetNiceMouseCap()
-{
-    return m_app->RetNiceMouseCap();
-}
-
-// Draws the sprite of the mouse.
-
-void CD3DEngine::DrawMouse()
-{
-    D3DMATERIAL7    material;
-    Math::Point         pos, ppos, dim;
-    int             i;
-
-    struct Mouse
-    {
-        D3DMouse    type;
-        int         icon1, icon2, iconShadow;
-        int         mode1, mode2;
-        float       hotx, hoty;
-    };
-
-    static Mouse table[] =
-    {
-        { D3DMOUSENORM,     0, 1,32, D3DSTATETTw, D3DSTATETTb,  1.0f,  1.0f},
-        { D3DMOUSEWAIT,     2, 3,33, D3DSTATETTw, D3DSTATETTb,  8.0f, 12.0f},
-        { D3DMOUSEHAND,     4, 5,34, D3DSTATETTw, D3DSTATETTb,  7.0f,  2.0f},
-        { D3DMOUSENO,       6, 7,35, D3DSTATETTw, D3DSTATETTb, 10.0f, 10.0f},
-        { D3DMOUSEEDIT,     8, 9,-1, D3DSTATETTb, D3DSTATETTw,  6.0f, 10.0f},
-        { D3DMOUSECROSS,   10,11,-1, D3DSTATETTb, D3DSTATETTw, 10.0f, 10.0f},
-        { D3DMOUSEMOVEV,   12,13,-1, D3DSTATETTb, D3DSTATETTw,  5.0f, 11.0f},
-        { D3DMOUSEMOVEH,   14,15,-1, D3DSTATETTb, D3DSTATETTw, 11.0f,  5.0f},
-        { D3DMOUSEMOVED,   16,17,-1, D3DSTATETTb, D3DSTATETTw,  9.0f,  9.0f},
-        { D3DMOUSEMOVEI,   18,19,-1, D3DSTATETTb, D3DSTATETTw,  9.0f,  9.0f},
-        { D3DMOUSEMOVE,    20,21,-1, D3DSTATETTb, D3DSTATETTw, 11.0f, 11.0f},
-        { D3DMOUSETARGET,  22,23,-1, D3DSTATETTb, D3DSTATETTw, 15.0f, 15.0f},
-        { D3DMOUSESCROLLL, 24,25,43, D3DSTATETTb, D3DSTATETTw,  2.0f,  9.0f},
-        { D3DMOUSESCROLLR, 26,27,44, D3DSTATETTb, D3DSTATETTw, 17.0f,  9.0f},
-        { D3DMOUSESCROLLU, 28,29,45, D3DSTATETTb, D3DSTATETTw,  9.0f,  2.0f},
-        { D3DMOUSESCROLLD, 30,31,46, D3DSTATETTb, D3DSTATETTw,  9.0f, 17.0f},
-        { D3DMOUSEHIDE },
-    };
-
-    if ( m_bMouseHide )  return;
-    if ( !m_app->RetNiceMouse() )  return;  // mouse windows?
-
-    ZeroMemory( &material, sizeof(D3DMATERIAL7) );
-    material.diffuse.r = 1.0f;
-    material.diffuse.g = 1.0f;
-    material.diffuse.b = 1.0f;
-    material.ambient.r = 0.5f;
-    material.ambient.g = 0.5f;
-    material.ambient.b = 0.5f;
-    SetMaterial(material);
-
-    SetTexture("mouse.tga");
-
-    i = 0;
-    while ( table[i].type != D3DMOUSEHIDE )
-    {
-        if ( m_mouseType == table[i].type )
-        {
-            dim.x = 0.05f*0.75f;
-            dim.y = 0.05f;
-
-            pos.x = m_mousePos.x - (table[i].hotx*dim.x)/32.0f;
-            pos.y = m_mousePos.y - ((32.0f-table[i].hoty)*dim.y)/32.0f;
-
-            ppos.x = pos.x+(4.0f/640.0f);
-            ppos.y = pos.y-(3.0f/480.0f);
-            SetState(D3DSTATETTw);
-            DrawSprite(ppos, dim, table[i].iconShadow);
-
-            SetState(table[i].mode1);
-            DrawSprite(pos, dim, table[i].icon1);
-
-            SetState(table[i].mode2);
-            DrawSprite(pos, dim, table[i].icon2);
-            break;
-        }
-        i ++;
-    }
-}
-
-// Draws the sprite of the mouse.
-
-void CD3DEngine::DrawSprite(Math::Point pos, Math::Point dim, int icon)
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Point     p1, p2;
-    Math::Vector    n;
-    float       u1, u2, v1, v2, dp;
-
-    if ( icon == -1 )  return;
-
-    p1.x = pos.x;
-    p1.y = pos.y;
-    p2.x = pos.x + dim.x;
-    p2.y = pos.y + dim.y;
-
-    u1 = (32.0f/256.0f)*(icon%8);
-    v1 = (32.0f/256.0f)*(icon/8);  // u-v texture
-    u2 = (32.0f/256.0f)+u1;
-    v2 = (32.0f/256.0f)+v1;
-
-    dp = 0.5f/256.0f;
-    u1 += dp;
-    v1 += dp;
-    u2 -= dp;
-    v2 -= dp;
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    AddStatisticTriangle(2);
-}
-
diff --git a/src/old/d3dengine.h b/src/old/d3dengine.h
deleted file mode 100644
index 3e073c3..0000000
--- a/src/old/d3dengine.h
+++ /dev/null
@@ -1,678 +0,0 @@
-// * 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/.
-
-// d3dengine.h
-
-#pragma once
-
-
-#include <d3d.h>
-
-#include "math/point.h"
-#include "math/vector.h"
-#include "math/matrix.h"
-#include "common/struct.h"
-
-
-class CD3DApplication;
-class CInstanceManager;
-class CObject;
-class CLight;
-class CText;
-class CParticule;
-class CWater;
-class CCloud;
-class CBlitz;
-class CPlanet;
-class CSound;
-class CTerrain;
-
-
-const int D3DMAXOBJECT      = 1200;
-const int D3DMAXSHADOW      = 500;
-const int D3DMAXGROUNDSPOT  = 100;
-
-
-enum D3DTypeObj
-{
-    TYPENULL        = 0,        // object doesn't exist
-    TYPETERRAIN     = 1,        // terrain
-    TYPEFIX         = 2,        // fixed object
-    TYPEVEHICULE        = 3,        // moving object
-    TYPEDESCENDANT      = 4,        // part of a moving object
-    TYPEQUARTZ      = 5,        // fixed object type quartz
-    TYPEMETAL       = 6,        // fixed object type metal
-};
-
-enum D3DTypeTri
-{
-    D3DTYPE6T       = 1,        // triangles
-    D3DTYPE6S       = 2,        // surfaces
-};
-
-enum D3DMaping
-{
-    D3DMAPPINGX     = 1,
-    D3DMAPPINGY     = 2,
-    D3DMAPPINGZ     = 3,
-    D3DMAPPING1X    = 4,
-    D3DMAPPING1Y    = 5,
-    D3DMAPPING1Z    = 6,
-};
-
-enum D3DMouse
-{
-    D3DMOUSEHIDE    = 0,        // no mouse
-    D3DMOUSENORM    = 1,
-    D3DMOUSEWAIT    = 2,
-    D3DMOUSEEDIT    = 3,
-    D3DMOUSEHAND    = 4,
-    D3DMOUSECROSS   = 5,
-    D3DMOUSESHOW    = 6,
-    D3DMOUSENO  = 7,
-    D3DMOUSEMOVE    = 8,        // +
-    D3DMOUSEMOVEH   = 9,        // -
-    D3DMOUSEMOVEV   = 10,       // |
-    D3DMOUSEMOVED   = 11,       // /
-    D3DMOUSEMOVEI   = 12,       // \ //
-    D3DMOUSESCROLLL = 13,       // <<
-    D3DMOUSESCROLLR = 14,       // >>
-    D3DMOUSESCROLLU = 15,       // ^
-    D3DMOUSESCROLLD = 16,       // v
-    D3DMOUSETARGET  = 17,
-};
-
-enum D3DShadowType
-{
-    D3DSHADOWNORM   = 0,
-    D3DSHADOWWORM   = 1,
-};
-
-
-const int D3DSTATENORMAL    = 0;        // normal opaque materials
-const int D3DSTATETTb       = (1<<0);   // the transparent texture (black = no)
-const int D3DSTATETTw       = (1<<1);   // the transparent texture (white = no)
-const int D3DSTATETD        = (1<<2);   // the transparent diffuse color
-const int D3DSTATEWRAP      = (1<<3);   // texture wrappe
-const int D3DSTATECLAMP     = (1<<4);   // texture borders with solid color
-const int D3DSTATELIGHT     = (1<<5);   // light texture (ambient max)
-const int D3DSTATEDUALb     = (1<<6);   // double black texturing
-const int D3DSTATEDUALw     = (1<<7);   // double white texturing
-const int D3DSTATEPART1     = (1<<8);   // part 1 (no change in. MOD!)
-const int D3DSTATEPART2     = (1<<9);   // part 2
-const int D3DSTATEPART3     = (1<<10);  // part 3
-const int D3DSTATEPART4     = (1<<11);  // part 4
-const int D3DSTATE2FACE     = (1<<12);  // double-sided face
-const int D3DSTATEALPHA     = (1<<13);  // image using alpha channel
-const int D3DSTATESECOND    = (1<<14);  // always use 2nd floor texturing
-const int D3DSTATEFOG       = (1<<15);  // causes the fog
-const int D3DSTATETCb       = (1<<16);  // the transparent color (black = no)
-const int D3DSTATETCw       = (1<<17);  // the transparent color (white = no)
-
-
-struct D3DTriangle
-{
-    D3DVERTEX2      triangle[3];
-    D3DMATERIAL7    material;
-    int             state;
-    char            texName1[20];
-    char            texName2[20];
-};
-
-
-struct D3DObjLevel6
-{
-    int             totalPossible;
-    int             totalUsed;
-    D3DMATERIAL7    material;
-    int             state;
-    D3DTypeTri      type;       // D3DTYPE6x
-    D3DVERTEX2      vertex[1];
-};
-
-struct D3DObjLevel5
-{
-    int             totalPossible;
-    int             totalUsed;
-    int             reserve;
-    D3DObjLevel6*   table[1];
-};
-
-struct D3DObjLevel4
-{
-    int             totalPossible;
-    int             totalUsed;
-    float           min, max;
-    D3DObjLevel5*   table[1];
-};
-
-struct D3DObjLevel3
-{
-    int             totalPossible;
-    int             totalUsed;
-    int             objRank;
-    D3DObjLevel4*   table[1];
-};
-
-struct D3DObjLevel2
-{
-    int             totalPossible;
-    int             totalUsed;
-    char            texName1[20];
-    char            texName2[20];
-    D3DObjLevel3*   table[1];
-};
-
-struct D3DObjLevel1
-{
-    int             totalPossible;
-    int             totalUsed;
-    D3DObjLevel2*   table[1];
-};
-
-
-struct D3DObject
-{
-    char        bUsed;          // true -> object exists
-    char        bVisible;       // true -> visible object
-    char        bDrawWorld;     // true -> shape behind the interface
-    char        bDrawFront;     // true -> shape before the interface
-    int     totalTriangle;      // number of triangles used
-    D3DTypeObj  type;           // type of the object (TYPE*)
-    Math::Matrix    transform;      // transformation matrix
-    float       distance;       // distance point of view - original
-    Math::Vector    bboxMin;        // bounding box of the object
-    Math::Vector    bboxMax;        // (the origin 0, 0, 0 is always included)
-    float       radius;         // radius of the sphere at the origin
-    int     shadowRank;     // rank of the associated shadow
-    float       transparency;       // transparency of the object (0 .. 1)
-};
-
-struct D3DShadow
-{
-    char        bUsed;          // true -> object exists
-    char        bHide;          // true -> invisible shadow (object carried by ex.)
-    int     objRank;        // rank of the object
-    D3DShadowType   type;           // type of shadow
-    Math::Vector    pos;            // position for the shadow
-    Math::Vector    normal;         // normal terrain
-    float       angle;          // angle of the shadow
-    float       radius;         // radius of the shadow
-    float       intensity;      // intensity of the shadow
-    float       height;         // height from the ground
-};
-
-struct D3DGroundSpot
-{
-    char        bUsed;          // true -> object exists
-    D3DCOLORVALUE   color;          // color of the shadow
-    float       min, max;       // altitudes min / max
-    float       smooth;         // transition area
-    Math::Vector    pos;            // position for the shadow
-    float       radius;         // radius of the shadow
-    Math::Vector    drawPos;        // drawn to position the shade
-    float       drawRadius;     // radius of the shadow drawn
-};
-
-struct D3DGroundMark
-{
-    char        bUsed;          // true -> object exists
-    char        bDraw;          // true -> drawn mark
-    int     phase;          // 1 = increase, 2 = fixed, 3 = decrease
-    float       delay[3];       // time for 3 phases
-    float       fix;            // fixed time
-    Math::Vector    pos;            // position for marks
-    float       radius;         // radius of marks
-    float       intensity;      // color intensity
-    Math::Vector    drawPos;        // drawn in position marks
-    float       drawRadius;     // radius marks drawn
-    float       drawIntensity;      // current drawn
-    int     dx, dy;         // dimensions table
-    char*       table;          // pointer to the table
-};
-
-
-
-class CD3DEngine
-{
-public:
-    CD3DEngine(CInstanceManager *iMan, CD3DApplication *app);
-    ~CD3DEngine();
-
-    void        SetD3DDevice(LPDIRECT3DDEVICE7 device);
-    LPDIRECT3DDEVICE7 RetD3DDevice();
-
-    void        SetTerrain(CTerrain* terrain);
-
-    bool        WriteProfile();
-
-    void        SetPause(bool bPause);
-    bool        RetPause();
-
-    void        SetMovieLock(bool bLock);
-    bool        RetMovieLock();
-
-    void        SetShowStat(bool bShow);
-    bool        RetShowStat();
-
-    void        SetRenderEnable(bool bEnable);
-
-    HRESULT     OneTimeSceneInit();
-    HRESULT     InitDeviceObjects();
-    HRESULT     DeleteDeviceObjects();
-    HRESULT     RestoreSurfaces();
-    HRESULT     Render();
-    HRESULT     FrameMove(float rTime);
-    void        StepSimul(float rTime);
-    HRESULT     FinalCleanup();
-    void        AddStatisticTriangle(int nb);
-    int         RetStatisticTriangle();
-    void        SetHiliteRank(int *rankList);
-    bool        GetHilite(Math::Point &p1, Math::Point &p2);
-    bool        GetSpriteCoord(int &x, int &y);
-    void        SetInfoText(int line, char* text);
-    char*       RetInfoText(int line);
-    LRESULT     MsgProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
-    void        FirstExecuteAdapt(bool bFirst);
-    int         GetVidMemTotal();
-    bool        IsVideo8MB();
-    bool        IsVideo32MB();
-
-    bool        EnumDevices(char *bufDevices, int lenDevices, char *bufModes, int lenModes, int &totalDevices, int &selectDevices, int &totalModes, int &selectModes);
-    bool        RetFullScreen();
-    bool        ChangeDevice(char *device, char *mode, bool bFull);
-
-    Math::Matrix*   RetMatView();
-    Math::Matrix*   RetMatLeftView();
-    Math::Matrix*   RetMatRightView();
-
-    void        TimeInit();
-    void        TimeEnterGel();
-    void        TimeExitGel();
-    float       TimeGet();
-
-    int         RetRestCreate();
-    int         CreateObject();
-    void        FlushObject();
-    bool        DeleteObject(int objRank);
-    bool        SetDrawWorld(int objRank, bool bDraw);
-    bool        SetDrawFront(int objRank, bool bDraw);
-    bool        AddTriangle(int objRank, D3DVERTEX2* vertex, int nb, const D3DMATERIAL7 &mat, int state, char* texName1, char* texName2, float min, float max, bool bGlobalUpdate);
-    bool        AddSurface(int objRank, D3DVERTEX2* vertex, int nb, const D3DMATERIAL7 &mat, int state, char* texName1, char* texName2, float min, float max, bool bGlobalUpdate);
-    bool        AddQuick(int objRank, D3DObjLevel6* buffer, char* texName1, char* texName2, float min, float max, bool bGlobalUpdate);
-    D3DObjLevel6* SearchTriangle(int objRank, const D3DMATERIAL7 &mat, int state, char* texName1, char* texName2, float min, float max);
-    void        ChangeLOD();
-    bool        ChangeSecondTexture(int objRank, char* texName2);
-    int         RetTotalTriangles(int objRank);
-    int         GetTriangles(int objRank, float min, float max, D3DTriangle* buffer, int size, float percent);
-    bool        GetBBox(int objRank, Math::Vector &min, Math::Vector &max);
-    bool        ChangeTextureMapping(int objRank, const D3DMATERIAL7 &mat, int state, char* texName1, char* texName2, float min, float max, D3DMaping mode, float au, float bu, float av, float bv);
-    bool        TrackTextureMapping(int objRank, const D3DMATERIAL7 &mat, int state, char* texName1, char* texName2, float min, float max, D3DMaping mode, float pos, float factor, float tl, float ts, float tt);
-    bool        SetObjectTransform(int objRank, const Math::Matrix &transform);
-    bool        GetObjectTransform(int objRank, Math::Matrix &transform);
-    bool        SetObjectType(int objRank, D3DTypeObj type);
-    D3DTypeObj  RetObjectType(int objRank);
-    bool        SetObjectTransparency(int objRank, float value);
-
-    bool        ShadowCreate(int objRank);
-    void        ShadowDelete(int objRank);
-    bool        SetObjectShadowHide(int objRank, bool bHide);
-    bool        SetObjectShadowType(int objRank, D3DShadowType type);
-    bool        SetObjectShadowPos(int objRank, const Math::Vector &pos);
-    bool        SetObjectShadowNormal(int objRank, const Math::Vector &n);
-    bool        SetObjectShadowAngle(int objRank, float angle);
-    bool        SetObjectShadowRadius(int objRank, float radius);
-    bool        SetObjectShadowIntensity(int objRank, float intensity);
-    bool        SetObjectShadowHeight(int objRank, float h);
-    float       RetObjectShadowRadius(int objRank);
-
-    void        GroundSpotFlush();
-    int         GroundSpotCreate();
-    void        GroundSpotDelete(int rank);
-    bool        SetObjectGroundSpotPos(int rank, const Math::Vector &pos);
-    bool        SetObjectGroundSpotRadius(int rank, float radius);
-    bool        SetObjectGroundSpotColor(int rank, D3DCOLORVALUE color);
-    bool        SetObjectGroundSpotMinMax(int rank, float min, float max);
-    bool        SetObjectGroundSpotSmooth(int rank, float smooth);
-
-    int         GroundMarkCreate(Math::Vector pos, float radius, float delay1, float delay2, float delay3, int dx, int dy, char* table);
-    bool        GroundMarkDelete(int rank);
-
-    void        Update();
-
-    void        SetViewParams(const Math::Vector &vEyePt, const Math::Vector &vLookatPt, const Math::Vector &vUpVec, FLOAT fEyeDistance);
-
-    bool        FreeTexture(char* name);
-    bool        LoadTexture(char* name, int stage=0);
-    bool        LoadAllTexture();
-
-    void        SetLimitLOD(int rank, float limit);
-    float       RetLimitLOD(int rank, bool bLast=false);
-
-    void        SetTerrainVision(float vision);
-
-    void        SetGroundSpot(bool bMode);
-    bool        RetGroundSpot();
-    void        SetShadow(bool bMode);
-    bool        RetShadow();
-    void        SetDirty(bool bMode);
-    bool        RetDirty();
-    void        SetFog(bool bMode);
-    bool        RetFog();
-    bool        RetStateColor();
-
-    void        SetSecondTexture(int texNum);
-    int         RetSecondTexture();
-
-    void        SetRankView(int rank);
-    int         RetRankView();
-
-    void        SetDrawWorld(bool bDraw);
-    void        SetDrawFront(bool bDraw);
-
-    void        SetAmbiantColor(D3DCOLOR color, int rank=0);
-    D3DCOLOR    RetAmbiantColor(int rank=0);
-
-    void        SetWaterAddColor(D3DCOLORVALUE color);
-    D3DCOLORVALUE RetWaterAddColor();
-
-    void        SetFogColor(D3DCOLOR color, int rank=0);
-    D3DCOLOR    RetFogColor(int rank=0);
-
-    void        SetDeepView(float length, int rank=0, bool bRef=false);
-    float       RetDeepView(int rank=0);
-
-    void        SetFogStart(float start, int rank=0);
-    float       RetFogStart(int rank=0);
-
-    void        SetBackground(char *name, D3DCOLOR up=0, D3DCOLOR down=0, D3DCOLOR cloudUp=0, D3DCOLOR cloudDown=0, bool bFull=false, bool bQuarter=false);
-    void        RetBackground(char *name, D3DCOLOR &up, D3DCOLOR &down, D3DCOLOR &cloudUp, D3DCOLOR &cloudDown, bool &bFull, bool &bQuarter);
-    void        SetFrontsizeName(char *name);
-    void        SetOverFront(bool bFront);
-    void        SetOverColor(D3DCOLOR color=0, int mode=D3DSTATETCb);
-
-    void        SetParticuleDensity(float value);
-    float       RetParticuleDensity();
-    float       ParticuleAdapt(float factor);
-
-    void        SetClippingDistance(float value);
-    float       RetClippingDistance();
-
-    void        SetObjectDetail(float value);
-    float       RetObjectDetail();
-
-    void        SetGadgetQuantity(float value);
-    float       RetGadgetQuantity();
-
-    void        SetTextureQuality(int value);
-    int         RetTextureQuality();
-
-    void        SetTotoMode(bool bPresent);
-    bool        RetTotoMode();
-
-    void        SetLensMode(bool bPresent);
-    bool        RetLensMode();
-
-    void        SetWaterMode(bool bPresent);
-    bool        RetWaterMode();
-
-    void        SetBlitzMode(bool bPresent);
-    bool        RetBlitzMode();
-
-    void        SetSkyMode(bool bPresent);
-    bool        RetSkyMode();
-
-    void        SetBackForce(bool bPresent);
-    bool        RetBackForce();
-
-    void        SetPlanetMode(bool bPresent);
-    bool        RetPlanetMode();
-
-    void        SetLightMode(bool bPresent);
-    bool        RetLightMode();
-
-    void        SetEditIndentMode(bool bAuto);
-    bool        RetEditIndentMode();
-
-    void        SetEditIndentValue(int value);
-    int         RetEditIndentValue();
-
-    void        SetSpeed(float speed);
-    float       RetSpeed();
-
-    void        SetTracePrecision(float factor);
-    float       RetTracePrecision();
-
-    void        SetFocus(float focus);
-    float       RetFocus();
-    Math::Vector    RetEyePt();
-    Math::Vector    RetLookatPt();
-    float       RetEyeDirH();
-    float       RetEyeDirV();
-    POINT       RetDim();
-    void        UpdateMatProj();
-
-    void        ApplyChange();
-
-    void        FlushPressKey();
-    void        ResetKey();
-    void        SetKey(int keyRank, int option, int key);
-    int         RetKey(int keyRank, int option);
-
-    void        SetJoystick(bool bEnable);
-    bool        RetJoystick();
-
-    void        SetDebugMode(bool bMode);
-    bool        RetDebugMode();
-    bool        RetSetupMode();
-
-    bool        IsVisiblePoint(const Math::Vector &pos);
-
-    int         DetectObject(Math::Point mouse);
-    void        SetState(int state, D3DCOLOR color=0xffffffff);
-    void        SetTexture(char *name, int stage=0);
-    void        SetMaterial(const D3DMATERIAL7 &mat);
-
-    void        MoveMousePos(Math::Point pos);
-    void        SetMousePos(Math::Point pos);
-    Math::Point     RetMousePos();
-    void        SetMouseType(D3DMouse type);
-    D3DMouse    RetMouseType();
-    void        SetMouseHide(bool bHide);
-    bool        RetMouseHide();
-    void        SetNiceMouse(bool bNice);
-    bool        RetNiceMouse();
-    bool        RetNiceMouseCap();
-
-    CText*      RetText();
-
-    bool        ChangeColor(char *name, D3DCOLORVALUE colorRef1, D3DCOLORVALUE colorNew1, D3DCOLORVALUE colorRef2, D3DCOLORVALUE colorNew2, float tolerance1, float tolerance2, Math::Point ts, Math::Point ti, Math::Point *pExclu=0, float shift=0.0f, bool bHSV=false);
-    bool        OpenImage(char *name);
-    bool        CopyImage();
-    bool        LoadImage();
-    bool        ScrollImage(int dx, int dy);
-    bool        SetDot(int x, int y, D3DCOLORVALUE color);
-    bool        CloseImage();
-    bool        WriteScreenShot(char *filename, int width, int height);
-    bool        GetRenderDC(HDC &hDC);
-    bool        ReleaseRenderDC(HDC &hDC);
-    PBITMAPINFO CreateBitmapInfoStruct(HBITMAP hBmp);
-    bool        CreateBMPFile(LPTSTR pszFile, PBITMAPINFO pbi, HBITMAP hBMP, HDC hDC);
-
-protected:
-    void        MemSpace1(D3DObjLevel1 *&p, int nb);
-    void        MemSpace2(D3DObjLevel2 *&p, int nb);
-    void        MemSpace3(D3DObjLevel3 *&p, int nb);
-    void        MemSpace4(D3DObjLevel4 *&p, int nb);
-    void        MemSpace5(D3DObjLevel5 *&p, int nb);
-    void        MemSpace6(D3DObjLevel6 *&p, int nb);
-
-    D3DObjLevel2* AddLevel1(D3DObjLevel1 *&p1, char* texName1, char* texName2);
-    D3DObjLevel3* AddLevel2(D3DObjLevel2 *&p2, int objRank);
-    D3DObjLevel4* AddLevel3(D3DObjLevel3 *&p3, float min, float max);
-    D3DObjLevel5* AddLevel4(D3DObjLevel4 *&p4, int reserve);
-    D3DObjLevel6* AddLevel5(D3DObjLevel5 *&p5, D3DTypeTri type, const D3DMATERIAL7 &mat, int state, int nb);
-
-    bool        IsVisible(int objRank);
-    bool        DetectBBox(int objRank, Math::Point mouse);
-    bool        DetectTriangle(Math::Point mouse, D3DVERTEX2 *triangle, int objRank, float &dist);
-    bool        TransformPoint(Math::Vector &p2D, int objRank, Math::Vector p3D);
-    void        ComputeDistance();
-    void        UpdateGeometry();
-    void        RenderGroundSpot();
-    void        DrawShadow();
-    void        DrawBackground();
-    void        DrawBackgroundGradient(D3DCOLOR up, D3DCOLOR down);
-    void        DrawBackgroundImageQuarter(Math::Point p1, Math::Point p2, char *name);
-    void        DrawBackgroundImage();
-    void        DrawPlanet();
-    void        DrawFrontsize();
-    void        DrawOverColor();
-    bool        GetBBox2D(int objRank, Math::Point &min, Math::Point &max);
-    void        DrawHilite();
-    void        DrawMouse();
-    void        DrawSprite(Math::Point pos, Math::Point dim, int icon);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DApplication* m_app;
-    LPDIRECT3DDEVICE7 m_pD3DDevice;
-    CText*          m_text;
-    CLight*         m_light;
-    CParticule*     m_particule;
-    CWater*         m_water;
-    CCloud*         m_cloud;
-    CBlitz*         m_blitz;
-    CPlanet*        m_planet;
-    CSound*         m_sound;
-    CTerrain*       m_terrain;
-
-    int             m_blackSrcBlend[2];
-    int             m_blackDestBlend[2];
-    int             m_whiteSrcBlend[2];
-    int             m_whiteDestBlend[2];
-    int             m_diffuseSrcBlend[2];
-    int             m_diffuseDestBlend[2];
-    int             m_alphaSrcBlend[2];
-    int             m_alphaDestBlend[2];
-
-    Math::Matrix        m_matProj;
-    Math::Matrix        m_matLeftView;
-    Math::Matrix        m_matRightView;
-    Math::Matrix        m_matView;
-    float           m_focus;
-
-    Math::Matrix        m_matWorldInterface;
-    Math::Matrix        m_matProjInterface;
-    Math::Matrix        m_matViewInterface;
-
-    DWORD           m_baseTime;
-    DWORD           m_stopTime;
-    float           m_absTime;
-    float           m_lastTime;
-    float           m_speed;
-    bool            m_bPause;
-    bool            m_bRender;
-    bool            m_bMovieLock;
-
-    POINT           m_dim;
-    POINT           m_lastDim;
-    D3DObjLevel1*   m_objectPointer;
-    int             m_objectParamTotal;
-    D3DObject*      m_objectParam;
-    int             m_shadowTotal;
-    D3DShadow*      m_shadow;
-    D3DGroundSpot*  m_groundSpot;
-    D3DGroundMark   m_groundMark;
-    Math::Vector        m_eyePt;
-    Math::Vector        m_lookatPt;
-    float           m_eyeDirH;
-    float           m_eyeDirV;
-    int             m_rankView;
-    D3DCOLOR        m_ambiantColor[2];
-    D3DCOLOR        m_backColor[2];
-    D3DCOLOR        m_fogColor[2];
-    float           m_deepView[2];
-    float           m_fogStart[2];
-    D3DCOLORVALUE   m_waterAddColor;
-    int             m_statisticTriangle;
-    bool            m_bUpdateGeometry;
-    char            m_infoText[10][200];
-    int             m_alphaMode;
-    bool            m_bStateColor;
-    bool            m_bForceStateColor;
-    bool            m_bGroundSpot;
-    bool            m_bShadow;
-    bool            m_bDirty;
-    bool            m_bFog;
-    bool            m_bFirstGroundSpot;
-    int             m_secondTexNum;
-    char            m_backgroundName[50];
-    D3DCOLOR        m_backgroundColorUp;
-    D3DCOLOR        m_backgroundColorDown;
-    D3DCOLOR        m_backgroundCloudUp;
-    D3DCOLOR        m_backgroundCloudDown;
-    bool            m_bBackgroundFull;
-    bool            m_bBackgroundQuarter;
-    bool            m_bOverFront;
-    D3DCOLOR        m_overColor;
-    int             m_overMode;
-    char            m_frontsizeName[50];
-    bool            m_bDrawWorld;
-    bool            m_bDrawFront;
-    float           m_limitLOD[2];
-    float           m_particuleDensity;
-    float           m_clippingDistance;
-    float           m_lastClippingDistance;
-    float           m_objectDetail;
-    float           m_lastObjectDetail;
-    float           m_terrainVision;
-    float           m_gadgetQuantity;
-    int             m_textureQuality;
-    bool            m_bTotoMode;
-    bool            m_bLensMode;
-    bool            m_bWaterMode;
-    bool            m_bSkyMode;
-    bool            m_bBackForce;
-    bool            m_bPlanetMode;
-    bool            m_bLightMode;
-    bool            m_bEditIndentMode;
-    int             m_editIndentValue;
-    float           m_tracePrecision;
-
-    int             m_hiliteRank[100];
-    bool            m_bHilite;
-    Math::Point         m_hiliteP1;
-    Math::Point         m_hiliteP2;
-
-    int             m_lastState;
-    D3DCOLOR        m_lastColor;
-    char            m_lastTexture[2][50];
-    D3DMATERIAL7    m_lastMaterial;
-
-    Math::Point         m_mousePos;
-    D3DMouse        m_mouseType;
-    bool            m_bMouseHide;
-    bool            m_bNiceMouse;
-
-    LPDIRECTDRAWSURFACE7 m_imageSurface;
-    DDSURFACEDESC2  m_imageDDSD;
-    WORD*           m_imageCopy;
-    int             m_imageDX;
-    int             m_imageDY;
-};
-
-
diff --git a/src/old/d3denum.cpp b/src/old/d3denum.cpp
deleted file mode 100644
index 1f02eb2..0000000
--- a/src/old/d3denum.cpp
+++ /dev/null
@@ -1,620 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DEnum.cpp
-//
-// Desc: Functions to enumerate DDraw/D3D drivers, devices, and modes.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-#include <windowsx.h>
-#include <stdio.h>
-#include <tchar.h>
-#include "old/d3denum.h"
-#include "old/d3dutil.h" // For DEBUG_MSG
-#include "old/d3dres.h"  // For dialog controls
-
-
-
-
-//-----------------------------------------------------------------------------
-// Global data for the enumerator functions
-//-----------------------------------------------------------------------------
-static HRESULT (*g_fnAppConfirmFn)(DDCAPS*, D3DDEVICEDESC7*) = NULL;
-
-static D3DEnum_DeviceInfo g_pDeviceList[20];
-static DWORD g_dwNumDevicesEnumerated = 0L;
-static DWORD g_dwNumDevices           = 0L;
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: SortModesCallback()
-// Desc: Callback function for sorting display modes.
-//-----------------------------------------------------------------------------
-int SortModesCallback( const VOID* arg1, const VOID* arg2 )
-{
-    DDSURFACEDESC2* p1 = (DDSURFACEDESC2*)arg1;
-    DDSURFACEDESC2* p2 = (DDSURFACEDESC2*)arg2;
-
-    if( p1->dwWidth < p2->dwWidth )
-        return -1;
-    if( p1->dwWidth > p2->dwWidth )
-        return +1;
-
-    if( p1->dwHeight < p2->dwHeight )
-        return -1;
-    if( p1->dwHeight > p2->dwHeight )
-        return +1;
-
-    if( p1->ddpfPixelFormat.dwRGBBitCount < p2->ddpfPixelFormat.dwRGBBitCount )
-        return -1;
-    if( p1->ddpfPixelFormat.dwRGBBitCount > p2->ddpfPixelFormat.dwRGBBitCount )
-        return +1;
-
-    return 0;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: ModeEnumCallback()
-// Desc: Callback function for enumerating display modes.
-//-----------------------------------------------------------------------------
-static HRESULT WINAPI ModeEnumCallback( DDSURFACEDESC2* pddsd,
-                                        VOID* pParentInfo )
-{
-    D3DEnum_DeviceInfo* pDevice = (D3DEnum_DeviceInfo*)pParentInfo;
-
-    // Reallocate storage for the modes
-    DDSURFACEDESC2* pddsdNewModes = new DDSURFACEDESC2[pDevice->dwNumModes+1];
-    memcpy( pddsdNewModes, pDevice->pddsdModes,
-            pDevice->dwNumModes * sizeof(DDSURFACEDESC2) );
-    delete pDevice->pddsdModes;
-    pDevice->pddsdModes = pddsdNewModes;
-
-    // Add the new mode
-    pDevice->pddsdModes[pDevice->dwNumModes++] = (*pddsd);
-
-    return DDENUMRET_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: DeviceEnumCallback()
-// Desc: Callback function for enumerating devices
-//-----------------------------------------------------------------------------
-static HRESULT WINAPI DeviceEnumCallback( TCHAR* strDesc, TCHAR* strName,
-                                          D3DDEVICEDESC7* pDesc,
-                                          VOID* pParentInfo )
-{
-    DWORD i;
-
-    // Keep track of # of devices that were enumerated
-    g_dwNumDevicesEnumerated++;
-
-    D3DEnum_DeviceInfo* pDriverInfo = (D3DEnum_DeviceInfo*)pParentInfo;
-    D3DEnum_DeviceInfo* pDeviceInfo = &g_pDeviceList[g_dwNumDevices];
-    ZeroMemory( pDeviceInfo, sizeof(D3DEnum_DeviceInfo) );
-
-    // Select either the HAL or HEL device desc:
-    pDeviceInfo->bHardware = pDesc->dwDevCaps & D3DDEVCAPS_HWRASTERIZATION;
-    memcpy( &pDeviceInfo->ddDeviceDesc, pDesc, sizeof(D3DDEVICEDESC7) );
-
-    // Set up device info for this device
-    pDeviceInfo->bDesktopCompatible = pDriverInfo->bDesktopCompatible;
-    pDeviceInfo->ddDriverCaps       = pDriverInfo->ddDriverCaps;
-    pDeviceInfo->ddHELCaps          = pDriverInfo->ddHELCaps;
-    pDeviceInfo->guidDevice         = pDesc->deviceGUID;
-    pDeviceInfo->pDeviceGUID        = &pDeviceInfo->guidDevice;
-    pDeviceInfo->pddsdModes         = new DDSURFACEDESC2[pDriverInfo->dwNumModes];
-
-    // Copy the driver GUID and description for the device
-    if( pDriverInfo->pDriverGUID )
-    {
-        pDeviceInfo->guidDriver  = pDriverInfo->guidDriver;
-        pDeviceInfo->pDriverGUID = &pDeviceInfo->guidDriver;
-        lstrcpyn( pDeviceInfo->strDesc, pDriverInfo->strDesc, 39 );
-    }
-    else
-    {
-        pDeviceInfo->pDriverGUID = NULL;
-        lstrcpyn( pDeviceInfo->strDesc, strName, 39 );
-    }
-
-//? if( strstr(strName, "T&L") != 0 )  return D3DENUMRET_OK;
-
-    // Avoid duplicates: only enum HW devices for secondary DDraw drivers.
-    if( NULL != pDeviceInfo->pDriverGUID && false == pDeviceInfo->bHardware )
-            return D3DENUMRET_OK;
-
-    // Give the app a chance to accept or reject this device.
-    if( g_fnAppConfirmFn )
-        if( FAILED( g_fnAppConfirmFn( &pDeviceInfo->ddDriverCaps,
-                                      &pDeviceInfo->ddDeviceDesc ) ) )
-            return D3DENUMRET_OK;
-
-    // Build list of supported modes for the device
-    for( i=0; i<pDriverInfo->dwNumModes; i++ )
-    {
-        DDSURFACEDESC2 ddsdMode = pDriverInfo->pddsdModes[i];
-        DWORD dwRenderDepths    = pDeviceInfo->ddDeviceDesc.dwDeviceRenderBitDepth;
-        DWORD dwDepth           = ddsdMode.ddpfPixelFormat.dwRGBBitCount;
-
-        // Accept modes that are compatable with the device
-        if( ( ( dwDepth == 32 ) && ( dwRenderDepths & DDBD_32 ) ) ||
-            ( ( dwDepth == 24 ) && ( dwRenderDepths & DDBD_24 ) ) ||
-            ( ( dwDepth == 16 ) && ( dwRenderDepths & DDBD_16 ) ) )
-        {
-            // Copy compatible modes to the list of device-supported modes
-            pDeviceInfo->pddsdModes[pDeviceInfo->dwNumModes++] = ddsdMode;
-
-            // Record whether the device has any stereo modes
-            if( ddsdMode.ddsCaps.dwCaps2 & DDSCAPS2_STEREOSURFACELEFT )
-                pDeviceInfo->bStereoCompatible = true;
-        }
-    }
-
-    // Bail if the device has no supported modes
-    if( 0 == pDeviceInfo->dwNumModes )
-        return D3DENUMRET_OK;
-
-    // Find a 640x480x16 mode for the default fullscreen mode
-    for( i=0; i<pDeviceInfo->dwNumModes; i++ )
-    {
-        if( ( pDeviceInfo->pddsdModes[i].dwWidth == 640 ) &&
-            ( pDeviceInfo->pddsdModes[i].dwHeight == 480 ) &&
-            ( pDeviceInfo->pddsdModes[i].ddpfPixelFormat.dwRGBBitCount == 16 ) )
-        {
-            pDeviceInfo->ddsdFullscreenMode = pDeviceInfo->pddsdModes[i];
-            pDeviceInfo->dwCurrentMode      = i;
-        }
-    }
-
-    // Select whether the device is initially windowed
-    pDeviceInfo->bWindowed = pDeviceInfo->bDesktopCompatible;
-
-    // Accept the device and return
-    g_dwNumDevices++;
-
-    return D3DENUMRET_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: DriverEnumCallback()
-// Desc: Callback function for enumerating drivers.
-//-----------------------------------------------------------------------------
-static bool WINAPI DriverEnumCallback( GUID* pGUID, TCHAR* strDesc,
-                                       TCHAR* strName, VOID*, HMONITOR )
-{
-    D3DEnum_DeviceInfo d3dDeviceInfo;
-    LPDIRECTDRAW7      pDD;
-    LPDIRECT3D7        pD3D;
-    HRESULT            hr;
-
-    // Use the GUID to create the DirectDraw object
-    hr = DirectDrawCreateEx( pGUID, (VOID**)&pDD, IID_IDirectDraw7, NULL );
-    if( FAILED(hr) )
-    {
-        DEBUG_MSG( _T("Can't create DDraw during enumeration!") );
-        return D3DENUMRET_OK;
-    }
-
-    // Create a D3D object, to enumerate the d3d devices
-    hr = pDD->QueryInterface( IID_IDirect3D7, (VOID**)&pD3D );
-    if( FAILED(hr) )
-    {
-        pDD->Release();
-        DEBUG_MSG( _T("Can't query IDirect3D7 during enumeration!") );
-        return D3DENUMRET_OK;
-    }
-
-    // Copy data to a device info structure
-    ZeroMemory( &d3dDeviceInfo, sizeof(d3dDeviceInfo) );
-    lstrcpyn( d3dDeviceInfo.strDesc, strDesc, 39 );
-    d3dDeviceInfo.ddDriverCaps.dwSize = sizeof(DDCAPS);
-    d3dDeviceInfo.ddHELCaps.dwSize    = sizeof(DDCAPS);
-    pDD->GetCaps( &d3dDeviceInfo.ddDriverCaps, &d3dDeviceInfo.ddHELCaps );
-    if( pGUID )
-    {
-        d3dDeviceInfo.guidDriver = (*pGUID);
-        d3dDeviceInfo.pDriverGUID = &d3dDeviceInfo.guidDriver;
-    }
-
-    // Record whether the device can render into a desktop window
-    if( d3dDeviceInfo.ddDriverCaps.dwCaps2 & DDCAPS2_CANRENDERWINDOWED )
-        if( NULL == d3dDeviceInfo.pDriverGUID )
-            d3dDeviceInfo.bDesktopCompatible = true;
-
-    // Enumerate the fullscreen display modes.
-    pDD->EnumDisplayModes( 0, NULL, &d3dDeviceInfo, ModeEnumCallback );
-
-    // Sort list of display modes
-    qsort( d3dDeviceInfo.pddsdModes, d3dDeviceInfo.dwNumModes,
-           sizeof(DDSURFACEDESC2), SortModesCallback );
-
-    // Now, enumerate all the 3D devices
-    pD3D->EnumDevices( DeviceEnumCallback, &d3dDeviceInfo );
-
-    // Clean up and return
-    SAFE_DELETE( d3dDeviceInfo.pddsdModes );
-    pD3D->Release();
-    pDD->Release();
-
-    return DDENUMRET_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_EnumerateDevices()
-// Desc: Enumerates all drivers, devices, and modes. The callback function is
-//       called each device, to confirm that the device supports the feature
-//       set required by the app.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_EnumerateDevices( HRESULT (*AppConfirmFn)(DDCAPS*, D3DDEVICEDESC7*) )
-{
-    // Store the device enumeration callback function
-    g_fnAppConfirmFn = AppConfirmFn;
-
-    // Enumerate drivers, devices, and modes
-    DirectDrawEnumerateEx( DriverEnumCallback, NULL,
-                           DDENUM_ATTACHEDSECONDARYDEVICES |
-                           DDENUM_DETACHEDSECONDARYDEVICES |
-                           DDENUM_NONDISPLAYDEVICES );
-
-    // Make sure devices were actually enumerated
-    if( 0 == g_dwNumDevicesEnumerated )
-    {
-        DEBUG_MSG( _T("No devices and/or modes were enumerated!") );
-        return D3DENUMERR_ENUMERATIONFAILED;
-    }
-    if( 0 == g_dwNumDevices )
-    {
-        DEBUG_MSG( _T("No enumerated devices were accepted!") );
-        DEBUG_MSG( _T("Try enabling the D3D Reference Rasterizer.") );
-        return D3DENUMERR_SUGGESTREFRAST;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_FreeResources()
-// Desc: Cleans up any memory allocated during device enumeration
-//-----------------------------------------------------------------------------
-VOID D3DEnum_FreeResources()
-{
-    for( DWORD i=0; i<g_dwNumDevices; i++ )
-    {
-        SAFE_DELETE( g_pDeviceList[i].pddsdModes );
-    }
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_GetDevices()
-// Desc: Returns a ptr to the array of D3DEnum_DeviceInfo structures.
-//-----------------------------------------------------------------------------
-VOID D3DEnum_GetDevices( D3DEnum_DeviceInfo** ppDevices, DWORD* pdwCount )
-{
-    if( ppDevices )
-        (*ppDevices) = g_pDeviceList;
-    if( pdwCount )
-        (*pdwCount)  = g_dwNumDevices;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: UpdateDialogControls()
-// Desc: Builds the list of devices and modes for the combo boxes in the device
-//       select dialog box.
-//-----------------------------------------------------------------------------
-static VOID UpdateDialogControls( HWND hDlg, D3DEnum_DeviceInfo* pCurrentDevice,
-                                  DWORD dwCurrentMode, bool bWindowed,
-                                  bool bStereo )
-{
-    // Get access to the enumerated device list
-    D3DEnum_DeviceInfo* pDeviceList;
-    DWORD               dwNumDevices;
-    D3DEnum_GetDevices( &pDeviceList, &dwNumDevices );
-
-    // Access to UI controls
-    HWND hwndDevice         = GetDlgItem( hDlg, IDC_DEVICE_COMBO );
-    HWND hwndMode           = GetDlgItem( hDlg, IDC_MODE_COMBO );
-    HWND hwndWindowed       = GetDlgItem( hDlg, IDC_WINDOWED_CHECKBOX );
-    HWND hwndStereo         = GetDlgItem( hDlg, IDC_STEREO_CHECKBOX );
-    HWND hwndFullscreenText = GetDlgItem( hDlg, IDC_FULLSCREEN_TEXT );
-
-    // Reset the content in each of the combo boxes
-    ComboBox_ResetContent( hwndDevice );
-    ComboBox_ResetContent( hwndMode );
-
-    // Don't let non-GDI devices be windowed
-    if( false == pCurrentDevice->bDesktopCompatible )
-        bWindowed = false;
-
-    // Add a list of devices to the device combo box
-    for( DWORD device = 0; device < dwNumDevices; device++ )
-    {
-        D3DEnum_DeviceInfo* pDevice = &pDeviceList[device];
-
-        // Add device name to the combo box
-        DWORD dwItem = ComboBox_AddString( hwndDevice, pDevice->strDesc );
-
-        // Set the remaining UI states for the current device
-        if( pDevice == pCurrentDevice )
-        {
-            // Set the combobox selection on the current device
-            ComboBox_SetCurSel( hwndDevice, dwItem );
-
-            // Enable/set the fullscreen checkbox, as appropriate
-            if( hwndWindowed )
-            {
-                EnableWindow( hwndWindowed, pDevice->bDesktopCompatible );
-                Button_SetCheck( hwndWindowed, bWindowed );
-            }
-
-            // Enable/set the stereo checkbox, as appropriate
-            if( hwndStereo )
-            {
-                EnableWindow( hwndStereo, pDevice->bStereoCompatible && !bWindowed );
-                Button_SetCheck( hwndStereo, bStereo );
-            }
-
-            // Enable/set the fullscreen modes combo, as appropriate
-            EnableWindow( hwndMode, !bWindowed );
-            EnableWindow( hwndFullscreenText, !bWindowed );
-
-            // Build the list of fullscreen modes
-            for( DWORD mode = 0; mode < pDevice->dwNumModes; mode++ )
-            {
-                DDSURFACEDESC2* pddsdMode = &pDevice->pddsdModes[mode];
-
-                // Skip non-stereo modes, if the device is in stereo mode
-                if( 0 == (pddsdMode->ddsCaps.dwCaps2&DDSCAPS2_STEREOSURFACELEFT) )
-                    if( bStereo )
-                        continue;
-
-                TCHAR strMode[80];
-                wsprintf( strMode, _T("%ld x %ld x %ld"),
-                          pddsdMode->dwWidth, pddsdMode->dwHeight,
-                          pddsdMode->ddpfPixelFormat.dwRGBBitCount );
-
-                // Add mode desc to the combo box
-                DWORD dwItem = ComboBox_AddString( hwndMode, strMode );
-
-                // Set the item data to identify this mode
-                ComboBox_SetItemData( hwndMode, dwItem, mode );
-
-                // Set the combobox selection on the current mode
-                if( mode == dwCurrentMode )
-                    ComboBox_SetCurSel( hwndMode, dwItem );
-
-                // Since not all modes support stereo, select a default mode in
-                // case none was chosen yet.
-                if( bStereo && ( CB_ERR == ComboBox_GetCurSel( hwndMode ) ) )
-                    ComboBox_SetCurSel( hwndMode, dwItem );
-            }
-        }
-    }
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: ChangeDeviceProc()
-// Desc: Windows message handling function for the device select dialog
-//-----------------------------------------------------------------------------
-static INT_PTR CALLBACK ChangeDeviceProc( HWND hDlg, UINT uiMsg, WPARAM wParam,
-                                       LPARAM lParam )
-{
-    static D3DEnum_DeviceInfo** ppDeviceArg;
-    static D3DEnum_DeviceInfo* pCurrentDevice;
-    static DWORD dwCurrentMode;
-    static bool  bCurrentWindowed;
-    static bool  bCurrentStereo;
-
-    // Get access to the enumerated device list
-    D3DEnum_DeviceInfo* pDeviceList;
-    DWORD               dwNumDevices;
-    D3DEnum_GetDevices( &pDeviceList, &dwNumDevices );
-
-    // Handle the initialization message
-    if( WM_INITDIALOG == uiMsg )
-    {
-        // Get the app's current device, passed in as an lParam argument
-        ppDeviceArg = (D3DEnum_DeviceInfo**)lParam;
-        if( NULL == ppDeviceArg )
-            return false;
-
-        // Setup temp storage pointers for dialog
-        pCurrentDevice = (*ppDeviceArg);
-        dwCurrentMode    = pCurrentDevice->dwCurrentMode;
-        bCurrentWindowed = pCurrentDevice->bWindowed;
-        bCurrentStereo   = pCurrentDevice->bStereo;
-
-        UpdateDialogControls( hDlg, pCurrentDevice, dwCurrentMode,
-                              bCurrentWindowed, bCurrentStereo );
-
-        return true;
-    }
-    else if( WM_COMMAND == uiMsg )
-    {
-        HWND hwndDevice   = GetDlgItem( hDlg, IDC_DEVICE_COMBO );
-        HWND hwndMode     = GetDlgItem( hDlg, IDC_MODE_COMBO );
-        HWND hwndWindowed = GetDlgItem( hDlg, IDC_WINDOWED_CHECKBOX );
-        HWND hwndStereo   = GetDlgItem( hDlg, IDC_STEREO_CHECKBOX );
-
-        // Get current UI state
-        DWORD dwDevice   = ComboBox_GetCurSel( hwndDevice );
-        DWORD dwModeItem = ComboBox_GetCurSel( hwndMode );
-        DWORD dwMode     = ComboBox_GetItemData( hwndMode, dwModeItem );
-        bool  bWindowed  = hwndWindowed ? Button_GetCheck( hwndWindowed ) : 0;
-        bool  bStereo    = hwndStereo   ? Button_GetCheck( hwndStereo )   : 0;
-
-        D3DEnum_DeviceInfo* pDevice = &pDeviceList[dwDevice];
-
-        if( IDOK == LOWORD(wParam) )
-        {
-            // Handle the case when the user hits the OK button. Check if any
-            // of the options were changed
-            if( pDevice != pCurrentDevice || dwMode != dwCurrentMode ||
-                bWindowed != bCurrentWindowed || bStereo != bCurrentStereo )
-            {
-                // Return the newly selected device and its new properties
-                (*ppDeviceArg)              = pDevice;
-                pDevice->bWindowed          = bWindowed;
-                pDevice->bStereo            = bStereo;
-                pDevice->dwCurrentMode      = dwMode;
-                pDevice->ddsdFullscreenMode = pDevice->pddsdModes[dwMode];
-
-                EndDialog( hDlg, IDOK );
-            }
-            else
-                EndDialog( hDlg, IDCANCEL );
-
-            return true;
-        }
-        else if( IDCANCEL == LOWORD(wParam) )
-        {
-            // Handle the case when the user hits the Cancel button
-            EndDialog( hDlg, IDCANCEL );
-            return true;
-        }
-        else if( CBN_SELENDOK == HIWORD(wParam) )
-        {
-            if( LOWORD(wParam) == IDC_DEVICE_COMBO )
-            {
-                // Handle the case when the user chooses the device combo
-                dwMode    = pDeviceList[dwDevice].dwCurrentMode;
-                bWindowed = pDeviceList[dwDevice].bWindowed;
-                bStereo   = pDeviceList[dwDevice].bStereo;
-            }
-        }
-
-        // Keep the UI current
-        UpdateDialogControls( hDlg, &pDeviceList[dwDevice], dwMode, bWindowed, bStereo );
-        return true;
-    }
-
-    return false;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_UserChangeDevice()
-// Desc: Pops up a dialog which allows the user to select a new device.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_UserChangeDevice( D3DEnum_DeviceInfo** ppDevice )
-{
-    if( IDOK == DialogBoxParam( (HINSTANCE)GetModuleHandle(NULL),
-                                MAKEINTRESOURCE(IDD_CHANGEDEVICE),
-                                GetForegroundWindow(),
-                                ChangeDeviceProc, (LPARAM)ppDevice ) )
-        return S_OK;
-
-    return E_FAIL;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_SelectDefaultDevice()
-// Desc: Pick a default device, preferably hardware and desktop compatible.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_SelectDefaultDevice( D3DEnum_DeviceInfo** ppDevice,
-                                     DWORD dwFlags )
-{
-    // Check arguments
-    if( NULL == ppDevice )
-        return E_INVALIDARG;
-
-    // Get access to the enumerated device list
-    D3DEnum_DeviceInfo* pDeviceList;
-    DWORD               dwNumDevices;
-    D3DEnum_GetDevices( &pDeviceList, &dwNumDevices );
-
-    // Look for windowable software, hardware, and hardware TnL devices
-    D3DEnum_DeviceInfo* pRefRastDevice     = NULL;
-    D3DEnum_DeviceInfo* pSoftwareDevice    = NULL;
-    D3DEnum_DeviceInfo* pHardwareDevice    = NULL;
-    D3DEnum_DeviceInfo* pHardwareTnLDevice = NULL;
-
-    for( DWORD i=0; i<dwNumDevices; i++ )
-    {
-        if( pDeviceList[i].bDesktopCompatible )
-        {
-            if( pDeviceList[i].bHardware )
-            {
-                if( (*pDeviceList[i].pDeviceGUID) == IID_IDirect3DTnLHalDevice )
-                    pHardwareTnLDevice = &pDeviceList[i];
-                else
-                    pHardwareDevice = &pDeviceList[i];
-            }
-            else
-            {
-                if( (*pDeviceList[i].pDeviceGUID) == IID_IDirect3DRefDevice )
-                    pRefRastDevice = &pDeviceList[i];
-                else
-                    pSoftwareDevice = &pDeviceList[i];
-            }
-        }
-    }
-
-    // Prefer a hardware non-TnL device first, then a TnL hardware device, and
-    // finally, a software device.
-    if( 0 == ( dwFlags & D3DENUM_SOFTWAREONLY ) && pHardwareDevice )
-        (*ppDevice) = pHardwareDevice;
-    else if( 0 == ( dwFlags & D3DENUM_SOFTWAREONLY ) && pHardwareTnLDevice )
-        (*ppDevice) = pHardwareTnLDevice;
-    else if( pSoftwareDevice )
-        (*ppDevice) = pSoftwareDevice;
-    else if( pRefRastDevice )
-        (*ppDevice) = pRefRastDevice;
-    else
-        return D3DENUMERR_NOCOMPATIBLEDEVICES;
-
-    // Set the windowed state of the newly selected device
-    (*ppDevice)->bWindowed = true;
-
-    return S_OK;
-}
-
-
-
-
-
diff --git a/src/old/d3denum.h b/src/old/d3denum.h
deleted file mode 100644
index fe49249..0000000
--- a/src/old/d3denum.h
+++ /dev/null
@@ -1,133 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DEnum.h
-//
-// Desc: Functions to enumerate DDraw/D3D drivers, devices, and modes.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#include <d3d.h>
-
-
-//-----------------------------------------------------------------------------
-// Flag and error definitions
-//-----------------------------------------------------------------------------
-#define D3DENUM_SOFTWAREONLY           0x00000001 // Software-devices only flag
-
-#define D3DENUMERR_NODIRECTDRAW        0x81000001 // Could not create DDraw
-#define D3DENUMERR_ENUMERATIONFAILED   0x81000002 // Enumeration failed
-#define D3DENUMERR_SUGGESTREFRAST      0x81000003 // Suggest using the RefRast
-#define D3DENUMERR_NOCOMPATIBLEDEVICES 0x81000004 // No devices were found that
-                                                  // meet the app's desired
-                                                  // capabilities
-#define D3DENUMERR_ENGINE              0x81000005 // 3D engine error
-#define D3DENUMERR_ROBOT               0x81000006 // robot error
-#define D3DENUMERR_SOUND               0x81000007 // sound error
-
-
-//-----------------------------------------------------------------------------
-// Name: struct D3DEnum_DeviceInfo
-// Desc: Structure to hold info about the enumerated Direct3D devices.
-//-----------------------------------------------------------------------------
-struct D3DEnum_DeviceInfo
-{
-    // D3D Device info
-    TCHAR          strDesc[40];
-    GUID*          pDeviceGUID;
-    D3DDEVICEDESC7 ddDeviceDesc;
-    bool           bHardware;
-
-    // DDraw Driver info
-    GUID*          pDriverGUID;
-    DDCAPS         ddDriverCaps;
-    DDCAPS         ddHELCaps;
-
-    // DDraw Mode Info
-    DDSURFACEDESC2 ddsdFullscreenMode;
-    bool           bWindowed;
-    bool           bStereo;
-
-    // For internal use (apps should not need to use these)
-    GUID            guidDevice;
-    GUID            guidDriver;
-    DDSURFACEDESC2* pddsdModes;
-    DWORD           dwNumModes;
-    DWORD           dwCurrentMode;
-    bool            bDesktopCompatible;
-    bool            bStereoCompatible;
-};
-
-
-// For code not yet switched to new struct name
-typedef D3DEnum_DeviceInfo D3DDEVICEINFO;
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_EnumerateDevices()
-// Desc: Enumerates all drivers, devices, and modes. The callback function is
-//       called each device, to confirm that the device supports the feature
-//       set required by the app.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_EnumerateDevices( HRESULT (*fn)(DDCAPS*, D3DDEVICEDESC7*) );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_FreeResources()
-// Desc: Cleans up any memory allocated during device enumeration
-//-----------------------------------------------------------------------------
-VOID D3DEnum_FreeResources();
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_GetDevices()
-// Desc: Returns a ptr to the array of enumerated D3DDEVICEINFO structures.
-//-----------------------------------------------------------------------------
-VOID D3DEnum_GetDevices( D3DEnum_DeviceInfo** ppDevices, DWORD* pdwCount );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_SelectDefaultDevice()
-// Desc: Picks a driver based on a set of passed in criteria. The
-//       D3DENUM_SOFTWAREONLY flag can be used to pick a software device.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_SelectDefaultDevice( D3DEnum_DeviceInfo** pDevice,
-                                     DWORD dwFlags = 0L );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DEnum_UserChangeDevice()
-// Desc: Pops up a dialog which allows the user to select a new device.
-//-----------------------------------------------------------------------------
-HRESULT D3DEnum_UserChangeDevice( D3DEnum_DeviceInfo** ppDevice );
-
-
-
-
diff --git a/src/old/d3dframe.cpp b/src/old/d3dframe.cpp
deleted file mode 100644
index 1305739..0000000
--- a/src/old/d3dframe.cpp
+++ /dev/null
@@ -1,622 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DFrame.cpp
-//
-// Desc: Class functions to implement a Direct3D app framework.
-//
-// Copyright (c) 1995-1999 by Microsoft, all rights reserved
-//-----------------------------------------------------------------------------
-#include <windows.h>
-#include <stdio.h>
-#include <tchar.h>
-#include "old/d3dframe.h"
-#include "old/d3dutil.h"
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CD3DFramework7()
-// Desc: The constructor. Clears static variables
-//-----------------------------------------------------------------------------
-CD3DFramework7::CD3DFramework7()
-{
-     m_hWnd           = NULL;
-     m_bIsFullscreen  = false;
-     m_bIsStereo      = false;
-     m_dwRenderWidth  = 0L;
-     m_dwRenderHeight = 0L;
-
-     m_pddsFrontBuffer    = NULL;
-     m_pddsBackBuffer     = NULL;
-     m_pddsBackBufferLeft = NULL;
-
-     m_pddsZBuffer     = NULL;
-     m_pd3dDevice      = NULL;
-     m_pDD             = NULL;
-     m_pD3D            = NULL;
-     m_dwDeviceMemType = NULL;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: ~CD3DFramework7()
-// Desc: The destructor. Deletes all objects
-//-----------------------------------------------------------------------------
-CD3DFramework7::~CD3DFramework7()
-{
-    DestroyObjects();
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: DestroyObjects()
-// Desc: Cleans everything up upon deletion. This code returns an error
-//       if any of the objects have remaining reference counts.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::DestroyObjects()
-{
-    LONG nDD  = 0L; // Number of outstanding DDraw references
-    LONG nD3D = 0L; // Number of outstanding D3DDevice references
-
-    if( m_pDD )
-    {
-        HRESULT err = m_pDD->SetCooperativeLevel( m_hWnd, DDSCL_NORMAL );
-        char s[100];
-        sprintf(s, "SetCooperativeLevel error=%d\n", err);
-        OutputDebugString(s);
-    }
-
-    // Do a safe check for releasing the D3DDEVICE. RefCount must be zero.
-    if( m_pd3dDevice )
-        if( 0 < ( nD3D = m_pd3dDevice->Release() ) )
-            DEBUG_MSG( _T("Error: D3DDevice object is still referenced!") );
-    m_pd3dDevice = NULL;
-
-    SAFE_RELEASE( m_pddsBackBuffer );
-    SAFE_RELEASE( m_pddsBackBufferLeft );
-    SAFE_RELEASE( m_pddsZBuffer );
-    SAFE_RELEASE( m_pddsFrontBuffer );
-    SAFE_RELEASE( m_pD3D );
-
-    if( m_pDD )
-    {
-        // Do a safe check for releasing DDRAW. RefCount must be zero.
-        if( 0 < ( nDD = m_pDD->Release() ) )
-            DEBUG_MSG( _T("Error: DDraw object is still referenced!") );
-    }
-    m_pDD = NULL;
-
-    // Return successful, unless there are outstanding DD or D3DDevice refs.
-    return ( nDD==0 && nD3D==0 ) ? S_OK : D3DFWERR_NONZEROREFCOUNT;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: Initialize()
-// Desc: Creates the internal objects for the framework
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::Initialize( HWND hWnd, GUID* pDriverGUID,
-                                    GUID* pDeviceGUID, DDSURFACEDESC2* pMode,
-                                    DWORD dwFlags )
-{
-    HRESULT hr;
-
-    // Check params. Note: A NULL mode is valid for windowed modes only.
-    if( ( NULL==hWnd ) || ( NULL==pDeviceGUID ) ||
-        ( NULL==pMode && (dwFlags&D3DFW_FULLSCREEN) ) )
-        return E_INVALIDARG;
-
-    // Setup state for windowed/fullscreen mode
-    m_hWnd          = hWnd;
-    m_bIsStereo     = false;
-    m_bIsFullscreen = ( dwFlags & D3DFW_FULLSCREEN ) ? true : false;
-
-    // Support stereoscopic viewing for fullscreen modes which support it
-    if( ( dwFlags & D3DFW_STEREO ) && ( dwFlags & D3DFW_FULLSCREEN ) )
-        if( pMode->ddsCaps.dwCaps2 & DDSCAPS2_STEREOSURFACELEFT )
-            m_bIsStereo = true;
-
-    // Create the D3D rendering environment (surfaces, device, viewport, etc.)
-    if( FAILED( hr = CreateEnvironment( pDriverGUID, pDeviceGUID, pMode,
-                                        dwFlags ) ) )
-    {
-        DestroyObjects();
-        return hr;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateEnvironment()
-// Desc: Creates the internal objects for the framework
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateEnvironment( GUID* pDriverGUID, GUID* pDeviceGUID,
-                                           DDSURFACEDESC2* pMode, DWORD dwFlags )
-{
-    HRESULT hr;
-
-    // Select the default memory type, for whether the device is HW or SW
-    if( IsEqualIID( *pDeviceGUID, IID_IDirect3DHALDevice) )
-        m_dwDeviceMemType = DDSCAPS_VIDEOMEMORY;
-    else if( IsEqualIID( *pDeviceGUID, IID_IDirect3DTnLHalDevice) )
-        m_dwDeviceMemType = DDSCAPS_VIDEOMEMORY;
-    else
-        m_dwDeviceMemType = DDSCAPS_SYSTEMMEMORY;
-
-    // Create the DDraw object
-    hr = CreateDirectDraw( pDriverGUID, dwFlags );
-    if( FAILED( hr ) )
-        return hr;
-
-    // Create the front and back buffers, and attach a clipper
-    if( dwFlags & D3DFW_FULLSCREEN )
-        hr = CreateFullscreenBuffers( pMode );
-    else
-        hr = CreateWindowedBuffers();
-    if( FAILED( hr ) )
-        return hr;
-
-    // Create the Direct3D object and the Direct3DDevice object
-    hr = CreateDirect3D( pDeviceGUID );
-    if( FAILED( hr ) )
-        return hr;
-
-    // Create and attach the zbuffer
-    if( dwFlags & D3DFW_ZBUFFER )
-        hr = CreateZBuffer( pDeviceGUID );
-    if( FAILED( hr ) )
-        return hr;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: EnumZBufferFormatsCallback()
-// Desc: Simply returns the first matching enumerated z-buffer format
-//-----------------------------------------------------------------------------
-static HRESULT WINAPI EnumZBufferFormatsCallback( DDPIXELFORMAT* pddpf,
-                                                  VOID* pContext )
-{
-    DDPIXELFORMAT* pddpfOut = (DDPIXELFORMAT*)pContext;
-
-    if( pddpfOut->dwRGBBitCount == pddpf->dwRGBBitCount )
-    {
-        (*pddpfOut) = (*pddpf);
-        return D3DENUMRET_CANCEL;
-    }
-
-    return D3DENUMRET_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateDirectDraw()
-// Desc: Create the DirectDraw interface
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateDirectDraw( GUID* pDriverGUID, DWORD dwFlags )
-{
-    // Create the DirectDraw interface, and query for the DD7 interface
-    if( FAILED( DirectDrawCreateEx( pDriverGUID, (VOID**)&m_pDD,
-                                    IID_IDirectDraw7, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Could not create DirectDraw") );
-        return D3DFWERR_NODIRECTDRAW;
-    }
-
-    // Set the Windows cooperative level
-    DWORD dwCoopFlags = DDSCL_NORMAL;
-    if( m_bIsFullscreen )
-        dwCoopFlags = DDSCL_ALLOWREBOOT|DDSCL_EXCLUSIVE|DDSCL_FULLSCREEN;
-
-    // By defualt, set the flag to allow D3D to optimize floating point calcs
-    if( 0L == ( dwFlags & D3DFW_NO_FPUSETUP ) )
-        dwCoopFlags |= DDSCL_FPUSETUP;
-
-    if( FAILED( m_pDD->SetCooperativeLevel( m_hWnd, dwCoopFlags ) ) )
-    {
-        DEBUG_MSG( _T("Couldn't set coop level") );
-        return D3DFWERR_COULDNTSETCOOPLEVEL;
-    }
-
-    // Check that we are NOT in a palettized display. That case will fail,
-    // since the framework doesn't use palettes.
-    DDSURFACEDESC2 ddsd;
-    ddsd.dwSize = sizeof(ddsd);
-    m_pDD->GetDisplayMode( &ddsd );
-    if( ddsd.ddpfPixelFormat.dwRGBBitCount <= 8 )
-        return D3DFWERR_INVALIDMODE;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateFullscreenBuffers()
-// Desc: Creates the primary and (optional) backbuffer for rendering.
-//       Windowed mode and fullscreen mode are handled differently.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateFullscreenBuffers( DDSURFACEDESC2* pddsd )
-{
-    HRESULT hr;
-
-    // Get the dimensions of the screen bounds
-    // Store the rectangle which contains the renderer
-    SetRect( &m_rcScreenRect, 0, 0, pddsd->dwWidth, pddsd->dwHeight );
-    m_dwRenderWidth  = m_rcScreenRect.right  - m_rcScreenRect.left;
-    m_dwRenderHeight = m_rcScreenRect.bottom - m_rcScreenRect.top;
-
-    // Set the display mode to the requested dimensions. Check for
-    // 320x200x8 modes, and set flag to avoid using ModeX
-    DWORD dwModeFlags = 0;
-
-    if( (320==m_dwRenderWidth) && (200==m_dwRenderHeight) &&
-        (8==pddsd->ddpfPixelFormat.dwRGBBitCount) )
-        dwModeFlags |= DDSDM_STANDARDVGAMODE;
-
-    if( FAILED( m_pDD->SetDisplayMode( m_dwRenderWidth, m_dwRenderHeight,
-                                pddsd->ddpfPixelFormat.dwRGBBitCount,
-                                pddsd->dwRefreshRate, dwModeFlags ) ) )
-    {
-        DEBUG_MSG( _T("Can't set display mode") );
-        return D3DFWERR_BADDISPLAYMODE;
-    }
-
-    // Setup to create the primary surface w/backbuffer
-    DDSURFACEDESC2 ddsd;
-    ZeroMemory( &ddsd, sizeof(ddsd) );
-    ddsd.dwSize            = sizeof(ddsd);
-    ddsd.dwFlags           = DDSD_CAPS|DDSD_BACKBUFFERCOUNT;
-    ddsd.ddsCaps.dwCaps    = DDSCAPS_PRIMARYSURFACE | DDSCAPS_3DDEVICE |
-                             DDSCAPS_FLIP | DDSCAPS_COMPLEX;
-    ddsd.dwBackBufferCount = 1;
-
-    // Support for stereoscopic viewing
-    if( m_bIsStereo )
-    {
-        ddsd.ddsCaps.dwCaps  |= DDSCAPS_VIDEOMEMORY;
-        ddsd.ddsCaps.dwCaps2 |= DDSCAPS2_STEREOSURFACELEFT;
-    }
-
-    // Create the primary surface
-    if( FAILED( hr = m_pDD->CreateSurface( &ddsd, &m_pddsFrontBuffer, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Error: Can't create primary surface") );
-        if( hr != DDERR_OUTOFVIDEOMEMORY )
-            return D3DFWERR_NOPRIMARY;
-        DEBUG_MSG( _T("Error: Out of video memory") );
-        return DDERR_OUTOFVIDEOMEMORY;
-    }
-
-    // Get the backbuffer, which was created along with the primary.
-    DDSCAPS2 ddscaps = { DDSCAPS_BACKBUFFER, 0, 0, 0 };
-    if( FAILED( hr = m_pddsFrontBuffer->GetAttachedSurface( &ddscaps,
-                                                &m_pddsBackBuffer ) ) )
-    {
-        DEBUG_ERR( hr, _T("Error: Can't get the backbuffer") );
-        return D3DFWERR_NOBACKBUFFER;
-    }
-
-    // Increment the backbuffer count (for consistency with windowed mode)
-    m_pddsBackBuffer->AddRef();
-
-    // Support for stereoscopic viewing
-    if( m_bIsStereo )
-    {
-        // Get the left backbuffer, which was created along with the primary.
-        DDSCAPS2 ddscaps = { 0, DDSCAPS2_STEREOSURFACELEFT, 0, 0 };
-        if( FAILED( hr = m_pddsBackBuffer->GetAttachedSurface( &ddscaps,
-                                                    &m_pddsBackBufferLeft ) ) )
-        {
-            DEBUG_ERR( hr, _T("Error: Can't get the left backbuffer") );
-            return D3DFWERR_NOBACKBUFFER;
-        }
-        m_pddsBackBufferLeft->AddRef();
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateWindowedBuffers()
-// Desc: Creates the primary and (optional) backbuffer for rendering.
-//       Windowed mode and fullscreen mode are handled differently.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateWindowedBuffers()
-{
-    HRESULT hr;
-
-    // Get the dimensions of the viewport and screen bounds
-    GetClientRect( m_hWnd, &m_rcScreenRect );
-    ClientToScreen( m_hWnd, (POINT*)&m_rcScreenRect.left );
-    ClientToScreen( m_hWnd, (POINT*)&m_rcScreenRect.right );
-    m_dwRenderWidth  = m_rcScreenRect.right  - m_rcScreenRect.left;
-    m_dwRenderHeight = m_rcScreenRect.bottom - m_rcScreenRect.top;
-
-    // Create the primary surface
-    DDSURFACEDESC2 ddsd;
-    ZeroMemory( &ddsd, sizeof(ddsd) );
-    ddsd.dwSize         = sizeof(ddsd);
-    ddsd.dwFlags        = DDSD_CAPS;
-    ddsd.ddsCaps.dwCaps = DDSCAPS_PRIMARYSURFACE;
-
-    if( FAILED( hr = m_pDD->CreateSurface( &ddsd, &m_pddsFrontBuffer, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Error: Can't create primary surface") );
-        if( hr != DDERR_OUTOFVIDEOMEMORY )
-            return D3DFWERR_NOPRIMARY;
-        DEBUG_MSG( _T("Error: Out of video memory") );
-        return DDERR_OUTOFVIDEOMEMORY;
-    }
-
-    // If in windowed-mode, create a clipper object
-    LPDIRECTDRAWCLIPPER pcClipper;
-    if( FAILED( hr = m_pDD->CreateClipper( 0, &pcClipper, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't create clipper") );
-        return D3DFWERR_NOCLIPPER;
-    }
-
-    // Associate the clipper with the window
-    pcClipper->SetHWnd( 0, m_hWnd );
-    m_pddsFrontBuffer->SetClipper( pcClipper );
-    SAFE_RELEASE( pcClipper );
-
-    // Create a backbuffer
-    ddsd.dwFlags        = DDSD_WIDTH | DDSD_HEIGHT | DDSD_CAPS;
-    ddsd.dwWidth        = m_dwRenderWidth;
-    ddsd.dwHeight       = m_dwRenderHeight;
-    ddsd.ddsCaps.dwCaps = DDSCAPS_OFFSCREENPLAIN | DDSCAPS_3DDEVICE;
-
-    if( FAILED( hr = m_pDD->CreateSurface( &ddsd, &m_pddsBackBuffer, NULL ) ) )
-    {
-        DEBUG_ERR( hr, _T("Error: Couldn't create the backbuffer") );
-        if( hr != DDERR_OUTOFVIDEOMEMORY )
-            return D3DFWERR_NOBACKBUFFER;
-        DEBUG_MSG( _T("Error: Out of video memory") );
-        return DDERR_OUTOFVIDEOMEMORY;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateDirect3D()
-// Desc: Create the Direct3D interface
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateDirect3D( GUID* pDeviceGUID )
-{
-    // Query DirectDraw for access to Direct3D
-    if( FAILED( m_pDD->QueryInterface( IID_IDirect3D7, (VOID**)&m_pD3D ) ) )
-    {
-        DEBUG_MSG( _T("Couldn't get the Direct3D interface") );
-        return D3DFWERR_NODIRECT3D;
-    }
-
-    // Create the device
-    if( FAILED( m_pD3D->CreateDevice( *pDeviceGUID, m_pddsBackBuffer,
-                                      &m_pd3dDevice) ) )
-    {
-        DEBUG_MSG( _T("Couldn't create the D3DDevice") );
-        return D3DFWERR_NO3DDEVICE;
-    }
-
-    // Finally, set the viewport for the newly created device
-    D3DVIEWPORT7 vp = { 0, 0, m_dwRenderWidth, m_dwRenderHeight, 0.0f, 1.0f };
-
-    if( FAILED( m_pd3dDevice->SetViewport( &vp ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't set current viewport to device") );
-        return D3DFWERR_NOVIEWPORT;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CreateZBuffer()
-// Desc: Internal function called by Create() to make and attach a zbuffer
-//       to the renderer
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::CreateZBuffer( GUID* pDeviceGUID )
-{
-    HRESULT hr;
-
-    // Check if the device supports z-bufferless hidden surface removal. If so,
-    // we don't really need a z-buffer
-    D3DDEVICEDESC7 ddDesc;
-    m_pd3dDevice->GetCaps( &ddDesc );
-    if( ddDesc.dpcTriCaps.dwRasterCaps & D3DPRASTERCAPS_ZBUFFERLESSHSR )
-        return S_OK;
-
-    // Get z-buffer dimensions from the render target
-    DDSURFACEDESC2 ddsd;
-    ddsd.dwSize = sizeof(ddsd);
-    m_pddsBackBuffer->GetSurfaceDesc( &ddsd );
-
-    // Setup the surface desc for the z-buffer.
-    ddsd.dwFlags        = DDSD_WIDTH | DDSD_HEIGHT | DDSD_CAPS | DDSD_PIXELFORMAT;
-    ddsd.ddsCaps.dwCaps = DDSCAPS_ZBUFFER | m_dwDeviceMemType;
-    ddsd.ddpfPixelFormat.dwSize = 0;  // Tag the pixel format as unitialized
-
-    // Get an appropiate pixel format from enumeration of the formats. On the
-    // first pass, we look for a zbuffer dpeth which is equal to the frame
-    // buffer depth (as some cards unfornately require this).
-    m_pD3D->EnumZBufferFormats( *pDeviceGUID, EnumZBufferFormatsCallback,
-                                (VOID*)&ddsd.ddpfPixelFormat );
-    if( 0 == ddsd.ddpfPixelFormat.dwSize )
-    {
-        // Try again, just accepting any 16-bit zbuffer
-        ddsd.ddpfPixelFormat.dwRGBBitCount = 16;
-        m_pD3D->EnumZBufferFormats( *pDeviceGUID, EnumZBufferFormatsCallback,
-                                    (VOID*)&ddsd.ddpfPixelFormat );
-
-        if( 0 == ddsd.ddpfPixelFormat.dwSize )
-        {
-            DEBUG_MSG( _T("Device doesn't support requested zbuffer format") );
-            return D3DFWERR_NOZBUFFER;
-        }
-    }
-
-    // Create and attach a z-buffer
-    if( FAILED( hr = m_pDD->CreateSurface( &ddsd, &m_pddsZBuffer, NULL ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't create a ZBuffer surface") );
-        if( hr != DDERR_OUTOFVIDEOMEMORY )
-            return D3DFWERR_NOZBUFFER;
-        DEBUG_MSG( _T("Error: Out of video memory") );
-        return DDERR_OUTOFVIDEOMEMORY;
-    }
-
-    if( FAILED( m_pddsBackBuffer->AddAttachedSurface( m_pddsZBuffer ) ) )
-    {
-        DEBUG_MSG( _T("Error: Couldn't attach zbuffer to render surface") );
-        return D3DFWERR_NOZBUFFER;
-    }
-
-    // For stereoscopic viewing, attach zbuffer to left surface as well
-    if( m_bIsStereo )
-    {
-        if( FAILED( m_pddsBackBufferLeft->AddAttachedSurface( m_pddsZBuffer ) ) )
-        {
-            DEBUG_MSG( _T("Error: Couldn't attach zbuffer to left render surface") );
-            return D3DFWERR_NOZBUFFER;
-        }
-    }
-
-    // Finally, this call rebuilds internal structures
-    if( FAILED( m_pd3dDevice->SetRenderTarget( m_pddsBackBuffer, 0L ) ) )
-    {
-        DEBUG_MSG( _T("Error: SetRenderTarget() failed after attaching zbuffer!") );
-        return D3DFWERR_NOZBUFFER;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: RestoreSurfaces()
-// Desc: Checks for lost surfaces and restores them if lost. Note: Don't
-//       restore render surface, since it's just a duplicate ptr.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::RestoreSurfaces()
-{
-    // Restore all surfaces (including video memory vertex buffers)
-    m_pDD->RestoreAllSurfaces();
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: Move()
-// Desc: Moves the screen rect for windowed renderers
-//-----------------------------------------------------------------------------
-VOID CD3DFramework7::Move( INT x, INT y )
-{
-    if( true == m_bIsFullscreen )
-        return;
-
-    SetRect( &m_rcScreenRect, x, y, x + m_dwRenderWidth, y + m_dwRenderHeight );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: FlipToGDISurface()
-// Desc: Puts the GDI surface in front of the primary, so that dialog
-//       boxes and other windows drawing funcs may happen.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::FlipToGDISurface( bool bDrawFrame )
-{
-    if( m_pDD && m_bIsFullscreen )
-    {
-        m_pDD->FlipToGDISurface();
-
-        if( bDrawFrame )
-        {
-            DrawMenuBar( m_hWnd );
-            RedrawWindow( m_hWnd, NULL, NULL, RDW_FRAME );
-        }
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: ShowFrame()
-// Desc: Show the frame on the primary surface, via a blt or a flip.
-//-----------------------------------------------------------------------------
-HRESULT CD3DFramework7::ShowFrame()
-{
-    if( NULL == m_pddsFrontBuffer )
-        return D3DFWERR_NOTINITIALIZED;
-
-    if( m_bIsFullscreen )
-    {
-        // We are in fullscreen mode, so perform a flip.
-        if( m_bIsStereo )
-            return m_pddsFrontBuffer->Flip( NULL, DDFLIP_WAIT | DDFLIP_STEREO );
-        else
-            return m_pddsFrontBuffer->Flip( NULL, DDFLIP_WAIT );
-    }
-    else
-    {
-        // We are in windowed mode, so perform a blit.
-        return m_pddsFrontBuffer->Blt( &m_rcScreenRect, m_pddsBackBuffer,
-                                       NULL, DDBLT_WAIT, NULL );
-    }
-}
-
-
-
diff --git a/src/old/d3dframe.h b/src/old/d3dframe.h
deleted file mode 100644
index 10eee57..0000000
--- a/src/old/d3dframe.h
+++ /dev/null
@@ -1,141 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DFrame.h
-//
-// Desc: Class to manage the Direct3D environment objects such as buffers,
-//       viewports, and 3D devices.
-//
-//       The class is initialized with the Initialize() function, after which
-//       the Get????() functions can be used to access the objects needed for
-//       rendering. If the device or display needs to be changed, the
-//       ChangeDevice() function can be called. If the display window is moved
-//       the changes need to be reported with the Move() function.
-//
-//       After rendering a frame, the ShowFrame() function filps or blits the
-//       backbuffer contents to the primary. If surfaces are lost, they can be
-//       restored with the RestoreSurfaces() function. Finally, if normal
-//       Windows output is needed, the FlipToGDISurface() provides a GDI
-//       surface to draw on.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#include <ddraw.h>
-#include <d3d.h>
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CD3DFramework7
-// Desc: The Direct3D sample framework class for DX7. Maintains the D3D
-//       surfaces and device used for 3D rendering.
-//-----------------------------------------------------------------------------
-class CD3DFramework7
-{
-    // Internal variables for the framework class
-    HWND                 m_hWnd;               // The window object
-    bool                 m_bIsFullscreen;      // Fullscreen vs. windowed
-    bool                 m_bIsStereo;          // Stereo view mode
-    DWORD                m_dwRenderWidth;      // Dimensions of the render target
-    DWORD                m_dwRenderHeight;
-    RECT                 m_rcScreenRect;       // Screen rect for window
-    LPDIRECTDRAW7        m_pDD;                // The DirectDraw object
-    LPDIRECT3D7          m_pD3D;               // The Direct3D object
-    LPDIRECT3DDEVICE7    m_pd3dDevice;         // The D3D device
-    LPDIRECTDRAWSURFACE7 m_pddsFrontBuffer;    // The primary surface
-    LPDIRECTDRAWSURFACE7 m_pddsBackBuffer;     // The backbuffer surface
-    LPDIRECTDRAWSURFACE7 m_pddsBackBufferLeft; // For stereo modes
-    LPDIRECTDRAWSURFACE7 m_pddsZBuffer;        // The zbuffer surface
-    DWORD                m_dwDeviceMemType;
-
-    // Internal functions for the framework class
-    HRESULT CreateZBuffer( GUID* );
-    HRESULT CreateFullscreenBuffers( DDSURFACEDESC2* );
-    HRESULT CreateWindowedBuffers();
-    HRESULT CreateDirectDraw( GUID*, DWORD );
-    HRESULT CreateDirect3D( GUID* );
-    HRESULT CreateEnvironment( GUID*, GUID*, DDSURFACEDESC2*, DWORD );
-
-public:
-    // Access functions for DirectX objects
-    LPDIRECTDRAW7        GetDirectDraw()        { return m_pDD; }
-    LPDIRECT3D7          GetDirect3D()          { return m_pD3D; }
-    LPDIRECT3DDEVICE7    GetD3DDevice()         { return m_pd3dDevice; }
-    LPDIRECTDRAWSURFACE7 GetFrontBuffer()       { return m_pddsFrontBuffer; }
-    LPDIRECTDRAWSURFACE7 GetBackBuffer()        { return m_pddsBackBuffer; }
-    LPDIRECTDRAWSURFACE7 GetRenderSurface()     { return m_pddsBackBuffer; }
-    LPDIRECTDRAWSURFACE7 GetRenderSurfaceLeft() { return m_pddsBackBufferLeft; }
-
-    // Functions to aid rendering
-    HRESULT RestoreSurfaces();
-    HRESULT ShowFrame();
-    HRESULT FlipToGDISurface( bool bDrawFrame = false );
-
-    // Functions for managing screen and viewport bounds
-    bool    IsFullscreen()                  { return m_bIsFullscreen; }
-    bool    IsStereo()                      { return m_bIsStereo; }
-    VOID    Move( INT x, INT y );
-
-    // Creates the Framework
-    HRESULT Initialize( HWND hWnd, GUID* pDriverGUID, GUID* pDeviceGUID,
-                        DDSURFACEDESC2* pddsd, DWORD dwFlags );
-    HRESULT DestroyObjects();
-
-            CD3DFramework7();
-           ~CD3DFramework7();
-};
-
-
-
-
-//-----------------------------------------------------------------------------
-// Flags used for the Initialize() method of a CD3DFramework object
-//-----------------------------------------------------------------------------
-#define D3DFW_FULLSCREEN    0x00000001 // Use fullscreen mode
-#define D3DFW_STEREO        0x00000002 // Use stereo-scopic viewing
-#define D3DFW_ZBUFFER       0x00000004 // Create and use a zbuffer
-#define D3DFW_NO_FPUSETUP   0x00000008 // Don't use default DDSCL_FPUSETUP flag
-
-
-
-
-//-----------------------------------------------------------------------------
-// Errors that the Initialize() and ChangeDriver() calls may return
-//-----------------------------------------------------------------------------
-#define D3DFWERR_INITIALIZATIONFAILED 0x82000000
-#define D3DFWERR_NODIRECTDRAW         0x82000001
-#define D3DFWERR_COULDNTSETCOOPLEVEL  0x82000002
-#define D3DFWERR_NODIRECT3D           0x82000003
-#define D3DFWERR_NO3DDEVICE           0x82000004
-#define D3DFWERR_NOZBUFFER            0x82000005
-#define D3DFWERR_INVALIDZBUFFERDEPTH  0x82000006
-#define D3DFWERR_NOVIEWPORT           0x82000007
-#define D3DFWERR_NOPRIMARY            0x82000008
-#define D3DFWERR_NOCLIPPER            0x82000009
-#define D3DFWERR_BADDISPLAYMODE       0x8200000a
-#define D3DFWERR_NOBACKBUFFER         0x8200000b
-#define D3DFWERR_NONZEROREFCOUNT      0x8200000c
-#define D3DFWERR_NORENDERTARGET       0x8200000d
-#define D3DFWERR_INVALIDMODE          0x8200000e
-#define D3DFWERR_NOTINITIALIZED       0x8200000f
-
-
-
diff --git a/src/old/d3dmath.cpp b/src/old/d3dmath.cpp
deleted file mode 100644
index 77ce492..0000000
--- a/src/old/d3dmath.cpp
+++ /dev/null
@@ -1,343 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DMath.cpp
-//
-// Desc: Shortcut macros and functions for using DX objects
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-#define D3D_OVERLOADS
-#define STRICT
-#include <math.h>
-#include <stdio.h>
-#include "d3dmath.h"
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_MatrixMultiply()
-// Desc: Does the matrix operation: [Q] = [A] * [B]. Note that the order of
-//       this operation was changed from the previous version of the DXSDK.
-//-----------------------------------------------------------------------------
-VOID D3DMath_MatrixMultiply( D3DMATRIX& q, D3DMATRIX& a, D3DMATRIX& b )
-{
-    FLOAT* pA = (FLOAT*)&a;
-    FLOAT* pB = (FLOAT*)&b;
-    FLOAT  pM[16];
-
-    ZeroMemory( pM, sizeof(D3DMATRIX) );
-
-    for( WORD i=0; i<4; i++ )
-        for( WORD j=0; j<4; j++ )
-            for( WORD k=0; k<4; k++ )
-                pM[4*i+j] +=  pA[4*i+k] * pB[4*k+j];
-
-    memcpy( &q, pM, sizeof(D3DMATRIX) );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_MatrixInvert()
-// Desc: Does the matrix operation: [Q] = inv[A]. Note: this function only
-//       works for matrices with [0 0 0 1] for the 4th column.
-//-----------------------------------------------------------------------------
-HRESULT D3DMath_MatrixInvert( D3DMATRIX& q, D3DMATRIX& a )
-{
-    if( fabs(a._44 - 1.0f) > .001f)
-        return E_INVALIDARG;
-    if( fabs(a._14) > .001f || fabs(a._24) > .001f || fabs(a._34) > .001f )
-        return E_INVALIDARG;
-
-    FLOAT fDetInv = 1.0f / ( a._11 * ( a._22 * a._33 - a._23 * a._32 ) -
-                             a._12 * ( a._21 * a._33 - a._23 * a._31 ) +
-                             a._13 * ( a._21 * a._32 - a._22 * a._31 ) );
-
-    q._11 =  fDetInv * ( a._22 * a._33 - a._23 * a._32 );
-    q._12 = -fDetInv * ( a._12 * a._33 - a._13 * a._32 );
-    q._13 =  fDetInv * ( a._12 * a._23 - a._13 * a._22 );
-    q._14 = 0.0f;
-
-    q._21 = -fDetInv * ( a._21 * a._33 - a._23 * a._31 );
-    q._22 =  fDetInv * ( a._11 * a._33 - a._13 * a._31 );
-    q._23 = -fDetInv * ( a._11 * a._23 - a._13 * a._21 );
-    q._24 = 0.0f;
-
-    q._31 =  fDetInv * ( a._21 * a._32 - a._22 * a._31 );
-    q._32 = -fDetInv * ( a._11 * a._32 - a._12 * a._31 );
-    q._33 =  fDetInv * ( a._11 * a._22 - a._12 * a._21 );
-    q._34 = 0.0f;
-
-    q._41 = -( a._41 * q._11 + a._42 * q._21 + a._43 * q._31 );
-    q._42 = -( a._41 * q._12 + a._42 * q._22 + a._43 * q._32 );
-    q._43 = -( a._41 * q._13 + a._42 * q._23 + a._43 * q._33 );
-    q._44 = 1.0f;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_VectorMatrixMultiply()
-// Desc: Multiplies a vector by a matrix
-//-----------------------------------------------------------------------------
-HRESULT D3DMath_VectorMatrixMultiply( D3DVECTOR& vDest, D3DVECTOR& vSrc,
-                                      D3DMATRIX& mat)
-{
-    FLOAT x = vSrc.x*mat._11 + vSrc.y*mat._21 + vSrc.z* mat._31 + mat._41;
-    FLOAT y = vSrc.x*mat._12 + vSrc.y*mat._22 + vSrc.z* mat._32 + mat._42;
-    FLOAT z = vSrc.x*mat._13 + vSrc.y*mat._23 + vSrc.z* mat._33 + mat._43;
-    FLOAT w = vSrc.x*mat._14 + vSrc.y*mat._24 + vSrc.z* mat._34 + mat._44;
-
-    if( fabs( w ) < g_EPSILON )
-        return E_INVALIDARG;
-
-    vDest.x = x/w;
-    vDest.y = y/w;
-    vDest.z = z/w;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_VertexMatrixMultiply()
-// Desc: Multiplies a vertex by a matrix
-//-----------------------------------------------------------------------------
-HRESULT D3DMath_VertexMatrixMultiply( D3DVERTEX& vDest, D3DVERTEX& vSrc,
-                                      D3DMATRIX& mat )
-{
-    HRESULT    hr;
-    D3DVECTOR* pSrcVec  = (D3DVECTOR*)&vSrc.x;
-    D3DVECTOR* pDestVec = (D3DVECTOR*)&vDest.x;
-
-    if( SUCCEEDED( hr = D3DMath_VectorMatrixMultiply( *pDestVec, *pSrcVec,
-                                                      mat ) ) )
-    {
-        pSrcVec  = (D3DVECTOR*)&vSrc.nx;
-        pDestVec = (D3DVECTOR*)&vDest.nx;
-        hr = D3DMath_VectorMatrixMultiply( *pDestVec, *pSrcVec, mat );
-    }
-    return hr;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_QuaternionFromRotation()
-// Desc: Converts a normalized axis and angle to a unit quaternion.
-//-----------------------------------------------------------------------------
-VOID D3DMath_QuaternionFromRotation( FLOAT& x, FLOAT& y, FLOAT& z, FLOAT& w,
-                                     D3DVECTOR& v, FLOAT fTheta )
-{
-    x = sinf( fTheta/2.0f ) * v.x;
-    y = sinf( fTheta/2.0f ) * v.y;
-    z = sinf( fTheta/2.0f ) * v.z;
-    w = cosf( fTheta/2.0f );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_RotationFromQuaternion()
-// Desc: Converts a normalized axis and angle to a unit quaternion.
-//-----------------------------------------------------------------------------
-VOID D3DMath_RotationFromQuaternion( D3DVECTOR& v, FLOAT& fTheta,
-                                     FLOAT x, FLOAT y, FLOAT z, FLOAT w )
-
-{
-    fTheta = acosf(w) * 2.0f;
-    v.x    = x / sinf( fTheta/2.0f );
-    v.y    = y / sinf( fTheta/2.0f );
-    v.z    = z / sinf( fTheta/2.0f );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_QuaternionFromAngles()
-// Desc: Converts euler angles to a unit quaternion.
-//-----------------------------------------------------------------------------
-VOID D3DMath_QuaternionFromAngles( FLOAT& x, FLOAT& y, FLOAT& z, FLOAT& w,
-                                   FLOAT fYaw, FLOAT fPitch, FLOAT fRoll )
-
-{
-    FLOAT fSinYaw   = sinf( fYaw/2.0f );
-    FLOAT fSinPitch = sinf( fPitch/2.0f );
-    FLOAT fSinRoll  = sinf( fRoll/2.0f );
-    FLOAT fCosYaw   = cosf( fYaw/2.0f );
-    FLOAT fCosPitch = cosf( fPitch/2.0f );
-    FLOAT fCosRoll  = cosf( fRoll/2.0f );
-
-    x = fSinRoll * fCosPitch * fCosYaw - fCosRoll * fSinPitch * fSinYaw;
-    y = fCosRoll * fSinPitch * fCosYaw + fSinRoll * fCosPitch * fSinYaw;
-    z = fCosRoll * fCosPitch * fSinYaw - fSinRoll * fSinPitch * fCosYaw;
-    w = fCosRoll * fCosPitch * fCosYaw + fSinRoll * fSinPitch * fSinYaw;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_MatrixFromQuaternion()
-// Desc: Converts a unit quaternion into a rotation matrix.
-//-----------------------------------------------------------------------------
-VOID D3DMath_MatrixFromQuaternion( D3DMATRIX& mat, FLOAT x, FLOAT y, FLOAT z,
-                                   FLOAT w )
-{
-    FLOAT xx = x*x; FLOAT yy = y*y; FLOAT zz = z*z;
-    FLOAT xy = x*y; FLOAT xz = x*z; FLOAT yz = y*z;
-    FLOAT wx = w*x; FLOAT wy = w*y; FLOAT wz = w*z;
-
-    mat._11 = 1 - 2 * ( yy + zz );
-    mat._12 =     2 * ( xy - wz );
-    mat._13 =     2 * ( xz + wy );
-
-    mat._21 =     2 * ( xy + wz );
-    mat._22 = 1 - 2 * ( xx + zz );
-    mat._23 =     2 * ( yz - wx );
-
-    mat._31 =     2 * ( xz - wy );
-    mat._32 =     2 * ( yz + wx );
-    mat._33 = 1 - 2 * ( xx + yy );
-
-    mat._14 = mat._24 = mat._34 = 0.0f;
-    mat._41 = mat._42 = mat._43 = 0.0f;
-    mat._44 = 1.0f;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_QuaternionFromMatrix()
-// Desc: Converts a rotation matrix into a unit quaternion.
-//-----------------------------------------------------------------------------
-VOID D3DMath_QuaternionFromMatrix( FLOAT& x, FLOAT& y, FLOAT& z, FLOAT& w,
-                                   D3DMATRIX& mat )
-{
-    if( mat._11 + mat._22 + mat._33 > 0.0f )
-    {
-        FLOAT s = sqrtf( mat._11 + mat._22 + mat._33 + mat._44 );
-
-        x = (mat._23-mat._32) / (2*s);
-        y = (mat._31-mat._13) / (2*s);
-        z = (mat._12-mat._21) / (2*s);
-        w = 0.5f * s;
-    }
-    else
-    {
-
-
-    }
-    FLOAT xx = x*x; FLOAT yy = y*y; FLOAT zz = z*z;
-    FLOAT xy = x*y; FLOAT xz = x*z; FLOAT yz = y*z;
-    FLOAT wx = w*x; FLOAT wy = w*y; FLOAT wz = w*z;
-
-    mat._11 = 1 - 2 * ( yy + zz );
-    mat._12 =     2 * ( xy - wz );
-    mat._13 =     2 * ( xz + wy );
-
-    mat._21 =     2 * ( xy + wz );
-    mat._22 = 1 - 2 * ( xx + zz );
-    mat._23 =     2 * ( yz - wx );
-
-    mat._31 =     2 * ( xz - wy );
-    mat._32 =     2 * ( yz + wx );
-    mat._33 = 1 - 2 * ( xx + yy );
-
-    mat._14 = mat._24 = mat._34 = 0.0f;
-    mat._41 = mat._42 = mat._43 = 0.0f;
-    mat._44 = 1.0f;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_QuaternionMultiply()
-// Desc: Mulitples two quaternions together as in {Q} = {A} * {B}.
-//-----------------------------------------------------------------------------
-VOID D3DMath_QuaternionMultiply( FLOAT& Qx, FLOAT& Qy, FLOAT& Qz, FLOAT& Qw,
-                                  FLOAT Ax, FLOAT Ay, FLOAT Az, FLOAT Aw,
-                                  FLOAT Bx, FLOAT By, FLOAT Bz, FLOAT Bw )
-{
-    FLOAT Dx =  Ax*Bw + Ay*Bz - Az*By + Aw*Bx;
-    FLOAT Dy = -Ax*Bz + Ay*Bw + Az*Bx + Aw*By;
-    FLOAT Dz =  Ax*By - Ay*Bx + Az*Bw + Aw*Bz;
-    FLOAT Dw = -Ax*Bx - Ay*By - Az*Bz + Aw*Bw;
-
-    Qx = Dx; Qy = Dy; Qz = Dz; Qw = Dw;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DMath_SlerpQuaternions()
-// Desc: Compute a quaternion which is the spherical linear interpolation
-//       between two other quaternions by dvFraction.
-//-----------------------------------------------------------------------------
-VOID D3DMath_QuaternionSlerp( FLOAT& Qx, FLOAT& Qy, FLOAT& Qz, FLOAT& Qw,
-                              FLOAT Ax, FLOAT Ay, FLOAT Az, FLOAT Aw,
-                              FLOAT Bx, FLOAT By, FLOAT Bz, FLOAT Bw,
-                              FLOAT fAlpha )
-{
-    // Compute dot product (equal to cosine of the angle between quaternions)
-    FLOAT fCosTheta = Ax*Bx + Ay*By + Az*Bz + Aw*Bw;
-
-    // Check angle to see if quaternions are in opposite hemispheres
-    if( fCosTheta < 0.0f )
-    {
-        // If so, flip one of the quaterions
-        fCosTheta = -fCosTheta;
-        Bx = -Bx; By = -By; Bz = -Bz; Bw = -Bw;
-    }
-
-    // Set factors to do linear interpolation, as a special case where the
-    // quaternions are close together.
-    FLOAT fBeta = 1.0f - fAlpha;
-
-    // If the quaternions aren't close, proceed with spherical interpolation
-    if( 1.0f - fCosTheta > 0.001f )
-    {
-        FLOAT fTheta = acosf( fCosTheta );
-
-        fBeta  = sinf( fTheta*fBeta ) / sinf( fTheta);
-        fAlpha = sinf( fTheta*fAlpha ) / sinf( fTheta);
-    }
-
-    // Do the interpolation
-    Qx = fBeta*Ax + fAlpha*Bx;
-    Qy = fBeta*Ay + fAlpha*By;
-    Qz = fBeta*Az + fAlpha*Bz;
-    Qw = fBeta*Aw + fAlpha*Bw;
-}
-
-
-
-
diff --git a/src/old/d3dmath.h b/src/old/d3dmath.h
deleted file mode 100644
index 6e98e18..0000000
--- a/src/old/d3dmath.h
+++ /dev/null
@@ -1,107 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DMath.h
-//
-// Desc: Math functions and shortcuts for Direct3D programming.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#include <ddraw.h>
-#include <d3d.h>
-
-
-//-----------------------------------------------------------------------------
-// Useful Math constants
-//-----------------------------------------------------------------------------
-const FLOAT g_PI       =  3.14159265358979323846f; // Pi
-const FLOAT g_2_PI     =  6.28318530717958623200f; // 2 * Pi
-const FLOAT g_PI_DIV_2 =  1.57079632679489655800f; // Pi / 2
-const FLOAT g_PI_DIV_4 =  0.78539816339744827900f; // Pi / 4
-const FLOAT g_INV_PI   =  0.31830988618379069122f; // 1 / Pi
-const FLOAT g_DEGTORAD =  0.01745329251994329547f; // Degrees to Radians
-const FLOAT g_RADTODEG = 57.29577951308232286465f; // Radians to Degrees
-const FLOAT g_HUGE     =  1.0e+38f;                // Huge number for FLOAT
-const FLOAT g_EPSILON  =  1.0e-5f;                 // Tolerance for FLOATs
-
-
-
-
-//-----------------------------------------------------------------------------
-// Fuzzy compares (within tolerance)
-//-----------------------------------------------------------------------------
-//>>> func.h IsZero()
-inline bool D3DMath_IsZero( FLOAT a, FLOAT fTol = g_EPSILON )
-{ return ( a <= 0.0f ) ? ( a >= -fTol ) : ( a <= fTol ); }
-
-
-
-
-//-----------------------------------------------------------------------------
-// Matrix functions
-//-----------------------------------------------------------------------------
-//>>> matrix.h MultiplyMatrices()
-VOID    D3DMath_MatrixMultiply( D3DMATRIX& q, D3DMATRIX& a, D3DMATRIX& b );
-//>>> matrix.h Matrix::Invert()
-HRESULT D3DMath_MatrixInvert( D3DMATRIX& q, D3DMATRIX& a );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Vector functions
-//-----------------------------------------------------------------------------
-
-//>>> matrix.h MatrixVectorMultiply()
-HRESULT D3DMath_VectorMatrixMultiply( D3DVECTOR& vDest, D3DVECTOR& vSrc,
-                                      D3DMATRIX& mat);
-// TODO
-HRESULT D3DMath_VertexMatrixMultiply( D3DVERTEX& vDest, D3DVERTEX& vSrc,
-                                      D3DMATRIX& mat );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Quaternion functions
-//-----------------------------------------------------------------------------
-
-// UNUSED
-
-
-VOID D3DMath_QuaternionFromRotation( FLOAT& x, FLOAT& y, FLOAT& z, FLOAT& w,
-                                     D3DVECTOR& v, FLOAT fTheta );
-VOID D3DMath_RotationFromQuaternion( D3DVECTOR& v, FLOAT& fTheta,
-                                     FLOAT x, FLOAT y, FLOAT z, FLOAT w );
-VOID D3DMath_QuaternionFromAngles( FLOAT& x, FLOAT& y, FLOAT& z, FLOAT& w,
-                                   FLOAT fYaw, FLOAT fPitch, FLOAT fRoll );
-VOID D3DMath_MatrixFromQuaternion( D3DMATRIX& mat, FLOAT x, FLOAT y, FLOAT z,
-                                   FLOAT w );
-VOID D3DMath_QuaternionFromMatrix( FLOAT &x, FLOAT &y, FLOAT &z, FLOAT &w,
-                                   D3DMATRIX& mat );
-VOID D3DMath_QuaternionMultiply( FLOAT& Qx, FLOAT& Qy, FLOAT& Qz, FLOAT& Qw,
-                                 FLOAT Ax, FLOAT Ay, FLOAT Az, FLOAT Aw,
-                                 FLOAT Bx, FLOAT By, FLOAT Bz, FLOAT Bw );
-VOID D3DMath_QuaternionSlerp( FLOAT& Qx, FLOAT& Qy, FLOAT& Qz, FLOAT& Qw,
-                              FLOAT Ax, FLOAT Ay, FLOAT Az, FLOAT Aw,
-                              FLOAT Bx, FLOAT By, FLOAT Bz, FLOAT Bw,
-                              FLOAT fAlpha );
-
-
diff --git a/src/old/d3dres.h b/src/old/d3dres.h
deleted file mode 100644
index 0259d86..0000000
--- a/src/old/d3dres.h
+++ /dev/null
@@ -1,55 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DRes.h
-//
-// Desc: Resource definitions required by the CD3DApplication class.
-//       Any application using the CD3DApplication class must include resources
-//       with the following identifiers.
-//
-// Copyright (c) 1999 Microsoft Corporation. All rights reserved.
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#define IDI_MAIN_ICON          101 // Application icon
-#define IDR_MAIN_ACCEL         113 // Keyboard accelerator
-#define IDR_MENU               141 // Application menu
-#define IDR_POPUP              142 // Popup menu
-#define IDD_ABOUT              143 // About dialog box
-#define IDD_CHANGEDEVICE       144 // "Change Device" dialog box
-#define IDC_CURSORHAND         149
-#define IDC_CURSORSCROLLL      150
-#define IDC_CURSORSCROLLR      151
-#define IDC_CURSORSCROLLU      152
-#define IDC_CURSORSCROLLD      153
-#define IDC_CURSORTARGET       154
-
-#define IDC_DEVICE_COMBO      1000 // Device combobox for "Change Device" dlg
-#define IDC_MODE_COMBO        1001 // Mode combobox for "Change Device" dlg
-#define IDC_WINDOWED_CHECKBOX 1012 // Checkbox for windowed-mode
-#define IDC_STEREO_CHECKBOX   1013 // Checkbox for stereo modes
-#define IDC_FULLSCREEN_TEXT   1014 // Group box text label
-
-#define IDM_ABOUT            40001 // Command to invoke About dlg
-#define IDM_CHANGEDEVICE     40002 // Command to invoke "Change Device" dlg
-#define IDM_TOGGLEFULLSCREEN 40003 // Command to toggle fullscreen mode
-#define IDM_TOGGLESTART      40004 // Command to toggle frame animation
-#define IDM_SINGLESTEP       40005 // Command to single step frame animation
-#define IDM_EXIT             40006 // Command to exit the application
-
-
diff --git a/src/old/d3dtextr.cpp b/src/old/d3dtextr.cpp
deleted file mode 100644
index 4885457..0000000
--- a/src/old/d3dtextr.cpp
+++ /dev/null
@@ -1,1081 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DTextr.cpp
-//
-// Desc: Functions to manage textures, including creating (loading from a
-//       file), restoring lost surfaces, invalidating, and destroying.
-//
-//       Note: the implementation of these fucntions maintain an internal list
-//       of loaded textures. After creation, individual textures are referenced
-//       via their ASCII names.
-//
-// Copyright (c) 1996-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-#include <tchar.h>
-#include <stdio.h>
-#include <algorithm>
-using std::min;
-#include "old/d3dtextr.h"
-#include "old/d3dutil.h"
-#include "common/language.h"
-#include "common/misc.h"
-
-
-
-
-//-----------------------------------------------------------------------------
-// Macros, function prototypes and static variable
-//-----------------------------------------------------------------------------
-static TCHAR    g_strTexturePath[512] = _T(""); // Path for files
-static bool     g_bDebugMode = false;
-
-
-
-void D3DTextr_SetDebugMode(bool bDebug)
-{
-    g_bDebugMode = bDebug;
-}
-
-
-
-//-----------------------------------------------------------------------------
-// Name: TextureContainer
-// Desc: Linked list structure to hold info per texture
-//-----------------------------------------------------------------------------
-struct TextureContainer
-{
-    TextureContainer* m_pNext; // Linked list ptr
-
-    TCHAR   m_strName[80];     // Name of texture (doubles as image filename)
-    DWORD   m_dwWidth;
-    DWORD   m_dwHeight;
-    DWORD   m_dwStage;         // Texture stage (for multitexture devices)
-    DWORD   m_dwBPP;
-    DWORD   m_dwFlags;
-    bool    m_bHasAlpha;
-
-    LPDIRECTDRAWSURFACE7 m_pddsSurface; // Surface of the texture
-    HBITMAP m_hbmBitmap;       // Bitmap containing texture image
-    DWORD*  m_pRGBAData;
-
-public:
-    HRESULT LoadImageData();
-    HRESULT LoadBitmapFile( TCHAR* strPathname );
-    HRESULT LoadTargaFile( TCHAR* strPathname, TCHAR* strFilename );
-    HRESULT Restore( LPDIRECT3DDEVICE7 pd3dDevice );
-    HRESULT CopyBitmapToSurface();
-    HRESULT CopyRGBADataToSurface();
-
-    TextureContainer( TCHAR* strName, DWORD dwStage, DWORD dwFlags );
-    ~TextureContainer();
-};
-
-// Local list of textures
-static TextureContainer* g_ptcTextureList = NULL;
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CD3DTextureManager
-// Desc: Class used to automatically construct and destruct the static
-//       texture engine class.
-//-----------------------------------------------------------------------------
-class CD3DTextureManager
-{
-public:
-    CD3DTextureManager() {}
-    ~CD3DTextureManager() { if( g_ptcTextureList ) delete g_ptcTextureList; }
-};
-
-// Global instance
-CD3DTextureManager g_StaticTextureEngine;
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: struct TEXTURESEARCHINFO
-// Desc: Structure used to search for texture formats
-//-----------------------------------------------------------------------------
-struct TEXTURESEARCHINFO
-{
-    DWORD dwDesiredBPP;   // Input for texture format search
-    bool  bUseAlpha;
-    bool  bUsePalette;
-    bool  bFoundGoodFormat;
-
-    DDPIXELFORMAT* pddpf; // Output of texture format search
-};
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: TextureSearchCallback()
-// Desc: Enumeration callback routine to find a best-matching texture format.
-//       The param data is the DDPIXELFORMAT of the best-so-far matching
-//       texture. Note: the desired BPP is passed in the dwSize field, and the
-//       default BPP is passed in the dwFlags field.
-//-----------------------------------------------------------------------------
-static HRESULT CALLBACK TextureSearchCallback( DDPIXELFORMAT* pddpf,
-                                               VOID* param )
-{
-    if( NULL==pddpf || NULL==param )
-        return DDENUMRET_OK;
-
-    TEXTURESEARCHINFO* ptsi = (TEXTURESEARCHINFO*)param;
-
-    // Skip any funky modes
-    if( pddpf->dwFlags & (DDPF_LUMINANCE|DDPF_BUMPLUMINANCE|DDPF_BUMPDUDV) )
-        return DDENUMRET_OK;
-
-    // Check for palettized formats
-    if( ptsi->bUsePalette )
-    {
-        if( !( pddpf->dwFlags & DDPF_PALETTEINDEXED8 ) )
-            return DDENUMRET_OK;
-
-        // Accept the first 8-bit palettized format we get
-        memcpy( ptsi->pddpf, pddpf, sizeof(DDPIXELFORMAT) );
-        ptsi->bFoundGoodFormat = true;
-        return DDENUMRET_CANCEL;
-    }
-
-    // Else, skip any paletized formats (all modes under 16bpp)
-    if( pddpf->dwRGBBitCount < 16 )
-        return DDENUMRET_OK;
-
-    // Skip any FourCC formats
-    if( pddpf->dwFourCC != 0 )
-        return DDENUMRET_OK;
-
-    // Skip any ARGB 4444 formats (which are best used for pre-authored
-    // content designed speciafically for an ARGB 4444 format).
-    if( pddpf->dwRGBAlphaBitMask == 0x0000f000 )
-        return DDENUMRET_OK;
-
-    // Make sure current alpha format agrees with requested format type
-    if( (ptsi->bUseAlpha==true) && !(pddpf->dwFlags&DDPF_ALPHAPIXELS) )
-        return DDENUMRET_OK;
-    if( (ptsi->bUseAlpha==false) && (pddpf->dwFlags&DDPF_ALPHAPIXELS) )
-        return DDENUMRET_OK;
-
-    // Check if we found a good match
-    if( pddpf->dwRGBBitCount == ptsi->dwDesiredBPP )
-    {
-        memcpy( ptsi->pddpf, pddpf, sizeof(DDPIXELFORMAT) );
-        ptsi->bFoundGoodFormat = true;
-        return DDENUMRET_CANCEL;
-    }
-
-    return DDENUMRET_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: FindTexture()
-// Desc: Searches the internal list of textures for a texture specified by
-//       its name. Returns the structure associated with that texture.
-//-----------------------------------------------------------------------------
-static TextureContainer* FindTexture( TCHAR* strTextureName )
-{
-    TextureContainer* ptcTexture = g_ptcTextureList;
-
-    while( ptcTexture )
-    {
-        if( !lstrcmpi( strTextureName, ptcTexture->m_strName ) )
-            return ptcTexture;
-        ptcTexture = ptcTexture->m_pNext;
-    }
-
-    return NULL;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: TextureContainer()
-// Desc: Constructor for a texture object
-//-----------------------------------------------------------------------------
-TextureContainer::TextureContainer( TCHAR* strName, DWORD dwStage,
-                                    DWORD dwFlags )
-{
-    lstrcpy( m_strName, strName );
-    m_dwWidth     = 0;
-    m_dwHeight    = 0;
-    m_dwStage     = dwStage;
-    m_dwBPP       = 0;
-    m_dwFlags     = dwFlags;
-    m_bHasAlpha   = 0;
-
-    m_pddsSurface = NULL;
-    m_hbmBitmap   = NULL;
-    m_pRGBAData   = NULL;
-
-    // Add the texture to the head of the global texture list
-    m_pNext = g_ptcTextureList;
-    g_ptcTextureList = this;
-
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: ~TextureContainer()
-// Desc: Destructs the contents of the texture container
-//-----------------------------------------------------------------------------
-TextureContainer::~TextureContainer()
-{
-    SAFE_RELEASE( m_pddsSurface );
-    SAFE_DELETE(  m_pRGBAData );
-    DeleteObject( m_hbmBitmap );
-
-    // Remove the texture container from the global list
-    if( g_ptcTextureList == this )
-        g_ptcTextureList = m_pNext;
-    else
-    {
-        for( TextureContainer* ptc=g_ptcTextureList; ptc; ptc=ptc->m_pNext )
-            if( ptc->m_pNext == this )
-                ptc->m_pNext = m_pNext;
-    }
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: LoadImageData()
-// Desc: Loads the texture map's image data
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::LoadImageData()
-{
-    TCHAR*      strExtension;
-    TCHAR       strMetaname[256];
-    TCHAR       strFilename[256];
-
-    if ( g_bDebugMode )
-    {
-        if ( _tcsrchr( m_strName, _T('\\') ) == 0 )
-        {
-            lstrcpy( strMetaname, "" );
-            lstrcpy( strFilename, g_strTexturePath );
-            lstrcat( strFilename, m_strName );
-        }
-        else
-        {
-            lstrcpy( strMetaname, "" );
-            lstrcpy( strFilename, m_strName );
-        }
-    }
-    else
-    {
-        if ( _tcsrchr( m_strName, _T('\\') ) == 0 )
-        {
-#if _SCHOOL
-            lstrcpy( strMetaname, "ceebot1.dat" );
-#else
-            lstrcpy( strMetaname, "colobot1.dat" );
-#endif
-            lstrcpy( strFilename, m_strName );
-        }
-        else
-        {
-            lstrcpy( strMetaname, "" );
-            lstrcpy( strFilename, m_strName );
-        }
-    }
-
-    if ( !g_metafile.IsExist(strMetaname, strFilename) )
-    {
-        return DDERR_NOTFOUND;
-    }
-
-    // Get the filename extension
-    if ( NULL == ( strExtension = _tcsrchr( m_strName, _T('.') ) ) )
-    {
-        return DDERR_UNSUPPORTED;
-    }
-
-    // Load bitmap files
-    if ( strMetaname[0] == 0 && !lstrcmpi( strExtension, _T(".bmp") ) )
-    {
-        return LoadBitmapFile( strFilename );
-    }
-
-    // Load targa files
-    if ( !lstrcmpi( strExtension, _T(".tga") ) )
-    {
-        return LoadTargaFile( strMetaname, strFilename );
-    }
-
-    // Can add code here to check for other file formats before failing
-    return DDERR_UNSUPPORTED;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: LoadBitmapFile()
-// Desc: Loads data from a .bmp file, and stores it in a bitmap structure.
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::LoadBitmapFile( TCHAR* strPathname )
-{
-    // Try to load the bitmap as a file
-    m_hbmBitmap = (HBITMAP)LoadImage( NULL, strPathname, IMAGE_BITMAP, 0, 0,
-                                      LR_LOADFROMFILE|LR_CREATEDIBSECTION );
-    if( m_hbmBitmap )
-        return S_OK;
-
-    return DDERR_NOTFOUND;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: LoadTargaFile()
-// Desc: Loads RGBA data from a .tga file, and stores it in allocated memory
-//       for the specified texture container
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::LoadTargaFile( TCHAR* strMetaname, TCHAR* strFilename )
-{
-    if( g_metafile.Open(strMetaname, strFilename) != 0 )
-        return E_FAIL;
-
-    struct TargaHeader
-    {
-        BYTE IDLength;
-        BYTE ColormapType;
-        BYTE ImageType;
-        BYTE ColormapSpecification[5];
-        WORD XOrigin;
-        WORD YOrigin;
-        WORD ImageWidth;
-        WORD ImageHeight;
-        BYTE PixelDepth;
-        BYTE ImageDescriptor;
-    } tga;
-
-    g_metafile.Read(&tga, sizeof(TargaHeader));
-
-    // Only true color, non-mapped images are supported
-    if( ( 0 != tga.ColormapType ) ||
-        ( tga.ImageType != 10 && tga.ImageType != 2 ) )
-    {
-        g_metafile.Close();
-        return E_FAIL;
-    }
-
-    // Skip the ID field. The first byte of the header is the length of this field
-    if( tga.IDLength )
-    {
-        g_metafile.Seek(tga.IDLength);
-    }
-
-    m_dwWidth   = tga.ImageWidth;
-    m_dwHeight  = tga.ImageHeight;
-    m_dwBPP     = tga.PixelDepth;
-    m_pRGBAData = new DWORD[m_dwWidth*m_dwHeight];
-
-    if( m_pRGBAData == NULL )
-    {
-        g_metafile.Close();
-        return E_FAIL;
-    }
-
-    for( DWORD y=0; y<m_dwHeight; y++ )
-    {
-        DWORD dwOffset = y*m_dwWidth;
-
-        if( 0 == ( tga.ImageDescriptor & 0x0010 ) )
-            dwOffset = (m_dwHeight-y-1)*m_dwWidth;
-
-        for( DWORD x=0; x<m_dwWidth; x )
-        {
-            if( tga.ImageType == 10 )
-            {
-                BYTE PacketInfo = g_metafile.GetByte();
-                WORD PacketType = 0x80 & PacketInfo;
-                WORD PixelCount = ( 0x007f & PacketInfo ) + 1;
-
-                if( PacketType )
-                {
-                    DWORD b = g_metafile.GetWord();
-                    DWORD g = g_metafile.GetWord();
-                    DWORD r = g_metafile.GetWord();
-                    DWORD a = 0xff;
-                    if( m_dwBPP == 32 )
-                        a = g_metafile.GetWord();
-
-                    while( PixelCount-- )
-                    {
-                        m_pRGBAData[dwOffset+x] = (r<<24L)+(g<<16L)+(b<<8L)+(a);
-                        x++;
-                    }
-                }
-                else
-                {
-                    while( PixelCount-- )
-                    {
-                        BYTE b = g_metafile.GetByte();
-                        BYTE g = g_metafile.GetByte();
-                        BYTE r = g_metafile.GetByte();
-                        BYTE a = 0xff;
-                        if( m_dwBPP == 32 )
-                            a = g_metafile.GetByte();
-
-                        m_pRGBAData[dwOffset+x] = (r<<24L)+(g<<16L)+(b<<8L)+(a);
-                        x++;
-                    }
-                }
-            }
-            else
-            {
-                BYTE b = g_metafile.GetByte();
-                BYTE g = g_metafile.GetByte();
-                BYTE r = g_metafile.GetByte();
-                BYTE a = 0xff;
-                if( m_dwBPP == 32 )
-                    a = g_metafile.GetByte();
-
-                m_pRGBAData[dwOffset+x] = (r<<24L)+(g<<16L)+(b<<8L)+(a);
-                x++;
-            }
-        }
-    }
-
-    g_metafile.Close();
-
-    // Check for alpha content
-    for( DWORD i=0; i<(m_dwWidth*m_dwHeight); i++ )
-    {
-//?     if( m_pRGBAData[i] & 0x000000ff != 0xff )
-        if( (m_pRGBAData[i] & 0x000000ff) != 0xff )  // erreur corrig�e !
-        {
-            m_bHasAlpha = true;
-            break;
-        }
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: Restore()
-// Desc: Rebuilds the texture surface using the new device.
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::Restore( LPDIRECT3DDEVICE7 pd3dDevice )
-{
-    // Release any previously created objects
-    SAFE_RELEASE( m_pddsSurface );
-
-    // Check params
-    if( NULL == pd3dDevice )
-        return DDERR_INVALIDPARAMS;
-
-    // Get the device caps
-    D3DDEVICEDESC7 ddDesc;
-    if( FAILED( pd3dDevice->GetCaps( &ddDesc) ) )
-        return E_FAIL;
-
-    // Setup the new surface desc
-    DDSURFACEDESC2 ddsd;
-    D3DUtil_InitSurfaceDesc( ddsd );
-    ddsd.dwFlags         = DDSD_CAPS|DDSD_HEIGHT|DDSD_WIDTH|
-                           DDSD_PIXELFORMAT|DDSD_TEXTURESTAGE;
-    ddsd.ddsCaps.dwCaps  = DDSCAPS_TEXTURE;
-    ddsd.dwTextureStage  = m_dwStage;
-    ddsd.dwWidth         = m_dwWidth;
-    ddsd.dwHeight        = m_dwHeight;
-
-    // Turn on texture management for hardware devices
-    if( ddDesc.deviceGUID == IID_IDirect3DHALDevice )
-        ddsd.ddsCaps.dwCaps2 = DDSCAPS2_TEXTUREMANAGE;
-    else if( ddDesc.deviceGUID == IID_IDirect3DTnLHalDevice )
-        ddsd.ddsCaps.dwCaps2 = DDSCAPS2_TEXTUREMANAGE;
-    else
-        ddsd.ddsCaps.dwCaps |= DDSCAPS_SYSTEMMEMORY;
-
-    // Adjust width and height to be powers of 2, if the device requires it
-    if( ddDesc.dpcTriCaps.dwTextureCaps & D3DPTEXTURECAPS_POW2 )
-    {
-        for( ddsd.dwWidth=1;  m_dwWidth>ddsd.dwWidth;   ddsd.dwWidth<<=1 );
-        for( ddsd.dwHeight=1; m_dwHeight>ddsd.dwHeight; ddsd.dwHeight<<=1 );
-    }
-
-    // Limit max texture sizes, if the driver can't handle large textures
-    DWORD dwMaxWidth  = ddDesc.dwMaxTextureWidth;
-    DWORD dwMaxHeight = ddDesc.dwMaxTextureHeight;
-    ddsd.dwWidth  = min( ddsd.dwWidth,  ( dwMaxWidth  ? dwMaxWidth  : 256 ) );
-    ddsd.dwHeight = min( ddsd.dwHeight, ( dwMaxHeight ? dwMaxHeight : 256 ) );
-
-    // Make the texture square, if the driver requires it
-    if( ddDesc.dpcTriCaps.dwTextureCaps & D3DPTEXTURECAPS_SQUAREONLY )
-    {
-        if( ddsd.dwWidth > ddsd.dwHeight ) ddsd.dwHeight = ddsd.dwWidth;
-        else                               ddsd.dwWidth  = ddsd.dwHeight;
-    }
-
-    // Setup the structure to be used for texture enumration.
-    TEXTURESEARCHINFO tsi;
-    tsi.bFoundGoodFormat = false;
-    tsi.pddpf            = &ddsd.ddpfPixelFormat;
-    tsi.dwDesiredBPP     = m_dwBPP;
-    tsi.bUsePalette      = ( m_dwBPP <= 8 );
-    tsi.bUseAlpha        = m_bHasAlpha;
-    if( m_dwFlags & D3DTEXTR_16BITSPERPIXEL )
-        tsi.dwDesiredBPP = 16;
-    else if( m_dwFlags & D3DTEXTR_32BITSPERPIXEL )
-        tsi.dwDesiredBPP = 32;
-
-    if( m_dwFlags & (D3DTEXTR_TRANSPARENTWHITE|D3DTEXTR_TRANSPARENTBLACK) )
-    {
-        if( tsi.bUsePalette )
-        {
-            if( ddDesc.dpcTriCaps.dwTextureCaps & D3DPTEXTURECAPS_ALPHAPALETTE )
-            {
-                tsi.bUseAlpha   = true;
-                tsi.bUsePalette = true;
-            }
-            else
-            {
-                tsi.bUseAlpha   = true;
-                tsi.bUsePalette = false;
-            }
-        }
-    }
-
-    // Enumerate the texture formats, and find the closest device-supported
-    // texture pixel format
-    pd3dDevice->EnumTextureFormats( TextureSearchCallback, &tsi );
-
-    // If we couldn't find a format, let's try a default format
-    if( false == tsi.bFoundGoodFormat )
-    {
-        tsi.bUsePalette  = false;
-        tsi.dwDesiredBPP = 16;
-        pd3dDevice->EnumTextureFormats( TextureSearchCallback, &tsi );
-
-        // If we still fail, we cannot create this texture
-        if( false == tsi.bFoundGoodFormat )
-            return E_FAIL;
-    }
-
-    // Get the DirectDraw interface for creating surfaces
-    LPDIRECTDRAW7        pDD;
-    LPDIRECTDRAWSURFACE7 pddsRender;
-    pd3dDevice->GetRenderTarget( &pddsRender );
-    pddsRender->GetDDInterface( (VOID**)&pDD );
-    pddsRender->Release();
-
-    // Create a new surface for the texture
-    HRESULT hr = pDD->CreateSurface( &ddsd, &m_pddsSurface, NULL );
-
-    // Done with DDraw
-    pDD->Release();
-
-    if( FAILED(hr) )
-        return hr;
-
-    // For bitmap-based textures, copy the bitmap image.
-    if( m_hbmBitmap )
-        return CopyBitmapToSurface();
-
-    if( m_pRGBAData )
-        return CopyRGBADataToSurface();
-
-    // At this point, code can be added to handle other file formats (such as
-    // .dds files, .jpg files, etc.).
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CopyBitmapToSurface()
-// Desc: Copies the image of a bitmap into a surface
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::CopyBitmapToSurface()
-{
-    // Get a DDraw object to create a temporary surface
-    LPDIRECTDRAW7 pDD;
-    m_pddsSurface->GetDDInterface( (VOID**)&pDD );
-
-    // Get the bitmap structure (to extract width, height, and bpp)
-    BITMAP bm;
-    GetObject( m_hbmBitmap, sizeof(BITMAP), &bm );
-
-    // Setup the new surface desc
-    DDSURFACEDESC2 ddsd;
-    ddsd.dwSize = sizeof(ddsd);
-    m_pddsSurface->GetSurfaceDesc( &ddsd );
-    ddsd.dwFlags          = DDSD_CAPS|DDSD_HEIGHT|DDSD_WIDTH|DDSD_PIXELFORMAT|
-                            DDSD_TEXTURESTAGE;
-    ddsd.ddsCaps.dwCaps   = DDSCAPS_TEXTURE|DDSCAPS_SYSTEMMEMORY;
-    ddsd.ddsCaps.dwCaps2  = 0L;
-    ddsd.dwWidth          = bm.bmWidth;
-    ddsd.dwHeight         = bm.bmHeight;
-
-    // Create a new surface for the texture
-    LPDIRECTDRAWSURFACE7 pddsTempSurface;
-    HRESULT hr;
-    if( FAILED( hr = pDD->CreateSurface( &ddsd, &pddsTempSurface, NULL ) ) )
-    {
-        pDD->Release();
-        return hr;
-    }
-
-    // Get a DC for the bitmap
-    HDC hdcBitmap = CreateCompatibleDC( NULL );
-    if( NULL == hdcBitmap )
-    {
-        pddsTempSurface->Release();
-        pDD->Release();
-        return hr;
-    }
-    SelectObject( hdcBitmap, m_hbmBitmap );
-
-    // Handle palettized textures. Need to attach a palette
-    if( ddsd.ddpfPixelFormat.dwRGBBitCount == 8 )
-    {
-        LPDIRECTDRAWPALETTE  pPalette;
-        DWORD dwPaletteFlags = DDPCAPS_8BIT|DDPCAPS_ALLOW256;
-        DWORD pe[256];
-        WORD  wNumColors     = GetDIBColorTable( hdcBitmap, 0, 256, (RGBQUAD*)pe );
-
-        // Create the color table
-        for( WORD i=0; i<wNumColors; i++ )
-        {
-            pe[i] = RGB( GetBValue(pe[i]), GetGValue(pe[i]), GetRValue(pe[i]) );
-
-            // Handle textures with transparent pixels
-            if( m_dwFlags & (D3DTEXTR_TRANSPARENTWHITE|D3DTEXTR_TRANSPARENTBLACK) )
-            {
-                // Set alpha for opaque pixels
-                if( m_dwFlags & D3DTEXTR_TRANSPARENTBLACK )
-                {
-                    if( pe[i] != 0x00000000 )
-                        pe[i] |= 0xff000000;
-                }
-                else if( m_dwFlags & D3DTEXTR_TRANSPARENTWHITE )
-                {
-                    if( pe[i] != 0x00ffffff )
-                        pe[i] |= 0xff000000;
-                }
-            }
-        }
-        // Add DDPCAPS_ALPHA flag for textures with transparent pixels
-        if( m_dwFlags & (D3DTEXTR_TRANSPARENTWHITE|D3DTEXTR_TRANSPARENTBLACK) )
-            dwPaletteFlags |= DDPCAPS_ALPHA;
-
-        // Create & attach a palette
-        pDD->CreatePalette( dwPaletteFlags, (PALETTEENTRY*)pe, &pPalette, NULL );
-        pddsTempSurface->SetPalette( pPalette );
-        m_pddsSurface->SetPalette( pPalette );
-        SAFE_RELEASE( pPalette );
-    }
-
-    // Copy the bitmap image to the surface.
-    HDC hdcSurface;
-    if( SUCCEEDED( pddsTempSurface->GetDC( &hdcSurface ) ) )
-    {
-        BitBlt( hdcSurface, 0, 0, bm.bmWidth, bm.bmHeight, hdcBitmap, 0, 0,
-                SRCCOPY );
-        pddsTempSurface->ReleaseDC( hdcSurface );
-    }
-    DeleteDC( hdcBitmap );
-
-    // Copy the temp surface to the real texture surface
-    m_pddsSurface->Blt( NULL, pddsTempSurface, NULL, DDBLT_WAIT, NULL );
-
-    // Done with the temp surface
-    pddsTempSurface->Release();
-
-    // For textures with real alpha (not palettized), set transparent bits
-    if( ddsd.ddpfPixelFormat.dwRGBAlphaBitMask )
-    {
-        if( m_dwFlags & (D3DTEXTR_TRANSPARENTWHITE|D3DTEXTR_TRANSPARENTBLACK) )
-        {
-            // Lock the texture surface
-            DDSURFACEDESC2 ddsd;
-            ddsd.dwSize = sizeof(ddsd);
-            while( m_pddsSurface->Lock( NULL, &ddsd, 0, NULL ) ==
-                   DDERR_WASSTILLDRAWING );
-
-            DWORD dwAlphaMask = ddsd.ddpfPixelFormat.dwRGBAlphaBitMask;
-            DWORD dwRGBMask   = ( ddsd.ddpfPixelFormat.dwRBitMask |
-                                  ddsd.ddpfPixelFormat.dwGBitMask |
-                                  ddsd.ddpfPixelFormat.dwBBitMask );
-            DWORD dwColorkey  = 0x00000000; // Colorkey on black
-            if( m_dwFlags & D3DTEXTR_TRANSPARENTWHITE )
-                dwColorkey = dwRGBMask;     // Colorkey on white
-
-            // Add an opaque alpha value to each non-colorkeyed pixel
-            for( DWORD y=0; y<ddsd.dwHeight; y++ )
-            {
-                WORD*  p16 =  (WORD*)((BYTE*)ddsd.lpSurface + y*ddsd.lPitch);
-                DWORD* p32 = (DWORD*)((BYTE*)ddsd.lpSurface + y*ddsd.lPitch);
-
-                for( DWORD x=0; x<ddsd.dwWidth; x++ )
-                {
-                    if( ddsd.ddpfPixelFormat.dwRGBBitCount == 16 )
-                    {
-                        if( ( *p16 &= dwRGBMask ) != dwColorkey )
-                            *p16 |= dwAlphaMask;
-                        p16++;
-                    }
-                    if( ddsd.ddpfPixelFormat.dwRGBBitCount == 32 )
-                    {
-                        if( ( *p32 &= dwRGBMask ) != dwColorkey )
-                            *p32 |= dwAlphaMask;
-                        p32++;
-                    }
-                }
-            }
-            m_pddsSurface->Unlock( NULL );
-        }
-    }
-
-    pDD->Release();
-
-    return S_OK;;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: CopyRGBADataToSurface()
-// Desc: Invalidates the current texture objects and rebuilds new ones
-//       using the new device.
-//-----------------------------------------------------------------------------
-HRESULT TextureContainer::CopyRGBADataToSurface()
-{
-    // Get a DDraw object to create a temporary surface
-    LPDIRECTDRAW7 pDD;
-    m_pddsSurface->GetDDInterface( (VOID**)&pDD );
-
-    // Setup the new surface desc
-    DDSURFACEDESC2 ddsd;
-    ddsd.dwSize = sizeof(ddsd);
-    m_pddsSurface->GetSurfaceDesc( &ddsd );
-    ddsd.dwFlags         = DDSD_CAPS|DDSD_HEIGHT|DDSD_WIDTH|DDSD_PIXELFORMAT|
-                           DDSD_TEXTURESTAGE;
-    ddsd.ddsCaps.dwCaps  = DDSCAPS_TEXTURE|DDSCAPS_SYSTEMMEMORY;
-    ddsd.ddsCaps.dwCaps2 = 0L;
-    ddsd.dwWidth         = m_dwWidth;
-    ddsd.dwHeight        = m_dwHeight;
-
-    // Create a new surface for the texture
-    LPDIRECTDRAWSURFACE7 pddsTempSurface;
-    HRESULT hr;
-    if( FAILED( hr = pDD->CreateSurface( &ddsd, &pddsTempSurface, NULL ) ) )
-    {
-        pDD->Release();
-        return NULL;
-    }
-
-    while( pddsTempSurface->Lock( NULL, &ddsd, 0, 0 ) == DDERR_WASSTILLDRAWING );
-    DWORD lPitch = ddsd.lPitch;
-    BYTE* pBytes = (BYTE*)ddsd.lpSurface;
-
-    DWORD dwRMask = ddsd.ddpfPixelFormat.dwRBitMask;
-    DWORD dwGMask = ddsd.ddpfPixelFormat.dwGBitMask;
-    DWORD dwBMask = ddsd.ddpfPixelFormat.dwBBitMask;
-    DWORD dwAMask = ddsd.ddpfPixelFormat.dwRGBAlphaBitMask;
-
-    DWORD dwRShiftL = 8, dwRShiftR = 0;
-    DWORD dwGShiftL = 8, dwGShiftR = 0;
-    DWORD dwBShiftL = 8, dwBShiftR = 0;
-    DWORD dwAShiftL = 8, dwAShiftR = 0;
-
-    DWORD dwMask;
-    for( dwMask=dwRMask; dwMask && !(dwMask&0x1); dwMask>>=1 ) dwRShiftR++;
-    for( ; dwMask; dwMask>>=1 ) dwRShiftL--;
-
-    for( dwMask=dwGMask; dwMask && !(dwMask&0x1); dwMask>>=1 ) dwGShiftR++;
-    for( ; dwMask; dwMask>>=1 ) dwGShiftL--;
-
-    for( dwMask=dwBMask; dwMask && !(dwMask&0x1); dwMask>>=1 ) dwBShiftR++;
-    for( ; dwMask; dwMask>>=1 ) dwBShiftL--;
-
-    for( dwMask=dwAMask; dwMask && !(dwMask&0x1); dwMask>>=1 ) dwAShiftR++;
-    for( ; dwMask; dwMask>>=1 ) dwAShiftL--;
-
-    for( DWORD y=0; y<ddsd.dwHeight; y++ )
-    {
-        DWORD* pDstData32 = (DWORD*)pBytes;
-        WORD*  pDstData16 = (WORD*)pBytes;
-
-        for( DWORD x=0; x<ddsd.dwWidth; x++ )
-        {
-            DWORD dwPixel = m_pRGBAData[y*ddsd.dwWidth+x];
-
-            BYTE r = (BYTE)((dwPixel>>24)&0x000000ff);
-            BYTE g = (BYTE)((dwPixel>>16)&0x000000ff);
-            BYTE b = (BYTE)((dwPixel>> 8)&0x000000ff);
-            BYTE a = (BYTE)((dwPixel>> 0)&0x000000ff);
-
-            DWORD dr = ((r>>(dwRShiftL))<<dwRShiftR)&dwRMask;
-            DWORD dg = ((g>>(dwGShiftL))<<dwGShiftR)&dwGMask;
-            DWORD db = ((b>>(dwBShiftL))<<dwBShiftR)&dwBMask;
-            DWORD da = ((a>>(dwAShiftL))<<dwAShiftR)&dwAMask;
-
-            if( 32 == ddsd.ddpfPixelFormat.dwRGBBitCount )
-                pDstData32[x] = (DWORD)(dr+dg+db+da);
-            else
-                pDstData16[x] = (WORD)(dr+dg+db+da);
-        }
-
-        pBytes += ddsd.lPitch;
-    }
-
-    pddsTempSurface->Unlock(0);
-
-    // Copy the temp surface to the real texture surface
-    m_pddsSurface->Blt( NULL, pddsTempSurface, NULL, DDBLT_WAIT, NULL );
-
-    // Done with the temp objects
-    pddsTempSurface->Release();
-    pDD->Release();
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_SetTexturePath()
-// Desc: Enumeration callback routine to find a best-matching texture format.
-//-----------------------------------------------------------------------------
-VOID D3DTextr_SetTexturePath( TCHAR* strTexturePath )
-{
-    if( NULL == strTexturePath )
-        strTexturePath = _T("");
-    lstrcpy( g_strTexturePath, strTexturePath );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_CreateTextureFromFile()
-// Desc: Is passed a filename and creates a local Bitmap from that file.
-//       The texture can not be used until it is restored, however.
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_CreateTextureFromFile( TCHAR* strName, DWORD dwStage,
-                                        DWORD dwFlags )
-{
-    // Check parameters
-    if( NULL == strName )
-        return E_INVALIDARG;
-
-    // Check first to see if the texture is already loaded
-    if( NULL != FindTexture( strName ) )
-        return S_OK;
-
-    // Allocate and add the texture to the linked list of textures;
-    TextureContainer* ptcTexture = new TextureContainer( strName, dwStage,
-                                                         dwFlags );
-    if( NULL == ptcTexture )
-        return E_OUTOFMEMORY;
-
-    // Create a bitmap and load the texture file into it,
-    if( FAILED( ptcTexture->LoadImageData() ) )
-    {
-        delete ptcTexture;
-        return E_FAIL;
-    }
-
-    // Save the image's dimensions
-    if( ptcTexture->m_hbmBitmap )
-    {
-        BITMAP bm;
-        GetObject( ptcTexture->m_hbmBitmap, sizeof(BITMAP), &bm );
-        ptcTexture->m_dwWidth  = (DWORD)bm.bmWidth;
-        ptcTexture->m_dwHeight = (DWORD)bm.bmHeight;
-        ptcTexture->m_dwBPP    = (DWORD)bm.bmBitsPixel;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_CreateEmptyTexture()
-// Desc: Creates an empty texture.
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_CreateEmptyTexture( TCHAR* strName, DWORD dwWidth,
-                                     DWORD dwHeight, DWORD dwStage,
-                                     DWORD dwFlags )
-{
-    // Check parameters
-    if( NULL == strName )
-        return E_INVALIDARG;
-
-    // Check first to see if the texture is already loaded
-    if( NULL != FindTexture( strName ) )
-        return E_FAIL;
-
-    // Allocate and add the texture to the linked list of textures;
-    TextureContainer* ptcTexture = new TextureContainer( strName, dwStage,
-                                                         dwFlags );
-    if( NULL == ptcTexture )
-        return E_OUTOFMEMORY;
-
-    // Save dimensions
-    ptcTexture->m_dwWidth  = dwWidth;
-    ptcTexture->m_dwHeight = dwHeight;
-    ptcTexture->m_dwBPP    = 16;
-    if( ptcTexture->m_dwFlags & D3DTEXTR_32BITSPERPIXEL )
-        ptcTexture->m_dwBPP = 32;
-
-    // Save alpha usage flag
-    if( dwFlags & D3DTEXTR_CREATEWITHALPHA )
-        ptcTexture->m_bHasAlpha = true;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_Restore()
-// Desc: Invalidates the current texture objects and rebuilds new ones
-//       using the new device.
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_Restore( TCHAR* strName, LPDIRECT3DDEVICE7 pd3dDevice )
-{
-    TextureContainer* ptcTexture = FindTexture( strName );
-    if( NULL == ptcTexture )
-        return DDERR_NOTFOUND;
-
-    // Restore the texture (this recreates the new surface for this device).
-    return ptcTexture->Restore( pd3dDevice );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_RestoreAllTextures()
-// Desc: This function is called when a mode is changed. It updates all
-//       texture objects to be valid with the new device.
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_RestoreAllTextures( LPDIRECT3DDEVICE7 pd3dDevice )
-{
-    TextureContainer* ptcTexture = g_ptcTextureList;
-
-    while( ptcTexture )
-    {
-        D3DTextr_Restore( ptcTexture->m_strName, pd3dDevice );
-        ptcTexture = ptcTexture->m_pNext;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_Invalidate()
-// Desc: Used to bump a texture out of (video) memory, this function
-//       actually destroys the d3dtexture and ddsurface of the texture
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_Invalidate( TCHAR* strName )
-{
-    TextureContainer* ptcTexture = FindTexture( strName );
-    if( NULL == ptcTexture )
-        return DDERR_NOTFOUND;
-
-    SAFE_RELEASE( ptcTexture->m_pddsSurface );
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_InvalidateAllTextures()
-// Desc: This function is called when a mode is changed. It invalidates
-//       all texture objects so their device can be safely released.
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_InvalidateAllTextures()
-{
-    TextureContainer* ptcTexture = g_ptcTextureList;
-
-    while( ptcTexture )
-    {
-        SAFE_RELEASE( ptcTexture->m_pddsSurface );
-        ptcTexture = ptcTexture->m_pNext;
-    }
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_DestroyTexture()
-// Desc: Frees the resources for the specified texture container
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_DestroyTexture( TCHAR* strName )
-{
-    TextureContainer* ptcTexture = FindTexture( strName );
-
-    SAFE_DELETE( ptcTexture );
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DTextr_GetSurface()
-// Desc: Returns a pointer to a d3dSurface from the name of the texture
-//-----------------------------------------------------------------------------
-LPDIRECTDRAWSURFACE7 D3DTextr_GetSurface( TCHAR* strName )
-{
-    TextureContainer* ptcTexture = FindTexture( strName );
-
-    return ptcTexture ? ptcTexture->m_pddsSurface : NULL;
-}
-
-
-
-
-
diff --git a/src/old/d3dtextr.h b/src/old/d3dtextr.h
deleted file mode 100644
index ec0dc47..0000000
--- a/src/old/d3dtextr.h
+++ /dev/null
@@ -1,79 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DTextr.h
-//
-// Desc: Functions to manage textures, including creating (loading from a
-//       file), restoring lost surfaces, invalidating, and destroying.
-//
-//       Note: the implementation of these fucntions maintain an internal list
-//       of loaded textures. After creation, individual textures are referenced
-//       via their ASCII names.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#include <ddraw.h>
-#include <d3d.h>
-
-
-
-
-//-----------------------------------------------------------------------------
-// Access functions for loaded textures. Note: these functions search
-// an internal list of the textures, and use the texture associated with the
-// ASCII name.
-//-----------------------------------------------------------------------------
-LPDIRECTDRAWSURFACE7 D3DTextr_GetSurface( TCHAR* strName );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Texture invalidation and restoration functions
-//-----------------------------------------------------------------------------
-HRESULT D3DTextr_Invalidate( TCHAR* strName );
-HRESULT D3DTextr_Restore( TCHAR* strName, LPDIRECT3DDEVICE7 pd3dDevice );
-HRESULT D3DTextr_InvalidateAllTextures();
-HRESULT D3DTextr_RestoreAllTextures( LPDIRECT3DDEVICE7 pd3dDevice );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Texture creation and deletion functions
-//-----------------------------------------------------------------------------
-#define D3DTEXTR_TRANSPARENTWHITE 0x00000001
-#define D3DTEXTR_TRANSPARENTBLACK 0x00000002
-#define D3DTEXTR_32BITSPERPIXEL   0x00000004
-#define D3DTEXTR_16BITSPERPIXEL   0x00000008
-#define D3DTEXTR_CREATEWITHALPHA  0x00000010
-
-
-HRESULT D3DTextr_CreateTextureFromFile( TCHAR* strName, DWORD dwStage=0L,
-                                        DWORD dwFlags=0L );
-HRESULT D3DTextr_CreateEmptyTexture( TCHAR* strName, DWORD dwWidth,
-                                     DWORD dwHeight, DWORD dwStage,
-                                     DWORD dwFlags );
-HRESULT D3DTextr_DestroyTexture( TCHAR* strName );
-VOID    D3DTextr_SetTexturePath( TCHAR* strTexturePath );
-
-void    D3DTextr_SetDebugMode(bool bDebug);
-
-
diff --git a/src/old/d3dutil.cpp b/src/old/d3dutil.cpp
deleted file mode 100644
index bd4c7ac..0000000
--- a/src/old/d3dutil.cpp
+++ /dev/null
@@ -1,325 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DUtil.cpp
-//
-// Desc: Shortcut macros and functions for using DX objects
-//
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-#include <math.h>
-#include <stdio.h>
-#include <tchar.h>
-#include "old/d3dutil.h"
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_GetDXSDKMediaPath()
-// Desc: Returns the DirectX SDK media path, as stored in the system registry
-//       during the SDK install.
-//-----------------------------------------------------------------------------
-const TCHAR* D3DUtil_GetDXSDKMediaPath()
-{
-    static TCHAR strNull[2] = _T("");
-    static TCHAR strPath[512];
-    HKEY  key;
-    DWORD type, size = 512;
-
-    // Open the appropriate registry key
-    LONG result = RegOpenKeyEx( HKEY_LOCAL_MACHINE,
-                                _T("Software\\Microsoft\\DirectX"),
-                                0, KEY_READ, &key );
-    if( ERROR_SUCCESS != result )
-        return strNull;
-
-    result = RegQueryValueEx( key, _T("DXSDK Samples Path"), NULL,
-                              &type, (BYTE*)strPath, &size );
-    RegCloseKey( key );
-
-    if( ERROR_SUCCESS != result )
-        return strNull;
-
-    lstrcat( strPath, _T("\\D3DIM\\Media\\") );
-
-    return strPath;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_InitSurfaceDesc()
-// Desc: Helper function called to build a DDSURFACEDESC2 structure,
-//       typically before calling CreateSurface() or GetSurfaceDesc()
-//-----------------------------------------------------------------------------
-VOID D3DUtil_InitSurfaceDesc( DDSURFACEDESC2& ddsd, DWORD dwFlags,
-                              DWORD dwCaps )
-{
-    ZeroMemory( &ddsd, sizeof(ddsd) );
-    ddsd.dwSize                 = sizeof(ddsd);
-    ddsd.dwFlags                = dwFlags;
-    ddsd.ddsCaps.dwCaps         = dwCaps;
-    ddsd.ddpfPixelFormat.dwSize = sizeof(DDPIXELFORMAT);
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_InitMaterial()
-// Desc: Helper function called to build a D3DMATERIAL7 structure
-//-----------------------------------------------------------------------------
-VOID D3DUtil_InitMaterial( D3DMATERIAL7& mtrl, FLOAT r, FLOAT g, FLOAT b,
-                           FLOAT a )
-{
-    ZeroMemory( &mtrl, sizeof(D3DMATERIAL7) );
-    mtrl.dcvDiffuse.r = mtrl.dcvAmbient.r = r;
-    mtrl.dcvDiffuse.g = mtrl.dcvAmbient.g = g;
-    mtrl.dcvDiffuse.b = mtrl.dcvAmbient.b = b;
-    mtrl.dcvDiffuse.a = mtrl.dcvAmbient.a = a;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_InitLight()
-// Desc: Initializes a D3DLIGHT7 structure
-//-----------------------------------------------------------------------------
-VOID D3DUtil_InitLight( D3DLIGHT7& light, D3DLIGHTTYPE ltType,
-                        FLOAT x, FLOAT y, FLOAT z )
-{
-    ZeroMemory( &light, sizeof(D3DLIGHT7) );
-    light.dltType        = ltType;
-    light.dcvDiffuse.r   = 1.0f;
-    light.dcvDiffuse.g   = 1.0f;
-    light.dcvDiffuse.b   = 1.0f;
-    light.dcvSpecular    = light.dcvDiffuse;
-    light.dvPosition.x   = light.dvDirection.x = x;
-    light.dvPosition.y   = light.dvDirection.y = y;
-    light.dvPosition.z   = light.dvDirection.z = z;
-    light.dvAttenuation0 = 1.0f;
-    light.dvRange        = D3DLIGHT_RANGE_MAX;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetViewMatrix()
-// Desc: Given an eye point, a lookat point, and an up vector, this
-//       function builds a 4x4 view matrix.
-//-----------------------------------------------------------------------------
-HRESULT D3DUtil_SetViewMatrix( D3DMATRIX& mat, D3DVECTOR& vFrom,
-                               D3DVECTOR& vAt, D3DVECTOR& vWorldUp )
-{
-    // Get the z basis vector, which points straight ahead. This is the
-    // difference from the eyepoint to the lookat point.
-    D3DVECTOR vView = vAt - vFrom;
-
-    FLOAT fLength = Magnitude( vView );
-    if( fLength < 1e-6f )
-        return E_INVALIDARG;
-
-    // Normalize the z basis vector
-    vView /= fLength;
-
-    // Get the dot product, and calculate the projection of the z basis
-    // vector onto the up vector. The projection is the y basis vector.
-    FLOAT fDotProduct = DotProduct( vWorldUp, vView );
-
-    D3DVECTOR vUp = vWorldUp - fDotProduct * vView;
-
-    // If this vector has near-zero length because the input specified a
-    // bogus up vector, let's try a default up vector
-    if( 1e-6f > ( fLength = Magnitude( vUp ) ) )
-    {
-        vUp = D3DVECTOR( 0.0f, 1.0f, 0.0f ) - vView.y * vView;
-
-        // If we still have near-zero length, resort to a different axis.
-        if( 1e-6f > ( fLength = Magnitude( vUp ) ) )
-        {
-            vUp = D3DVECTOR( 0.0f, 0.0f, 1.0f ) - vView.z * vView;
-
-            if( 1e-6f > ( fLength = Magnitude( vUp ) ) )
-                return E_INVALIDARG;
-        }
-    }
-
-    // Normalize the y basis vector
-    vUp /= fLength;
-
-    // The x basis vector is found simply with the cross product of the y
-    // and z basis vectors
-    D3DVECTOR vRight = CrossProduct( vUp, vView );
-
-    // Start building the matrix. The first three rows contains the basis
-    // vectors used to rotate the view to point at the lookat point
-    D3DUtil_SetIdentityMatrix( mat );
-    mat._11 = vRight.x;    mat._12 = vUp.x;    mat._13 = vView.x;
-    mat._21 = vRight.y;    mat._22 = vUp.y;    mat._23 = vView.y;
-    mat._31 = vRight.z;    mat._32 = vUp.z;    mat._33 = vView.z;
-
-    // Do the translation values (rotations are still about the eyepoint)
-    mat._41 = - DotProduct( vFrom, vRight );
-    mat._42 = - DotProduct( vFrom, vUp );
-    mat._43 = - DotProduct( vFrom, vView );
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetProjectionMatrix()
-// Desc: Sets the passed in 4x4 matrix to a perpsective projection matrix built
-//       from the field-of-view (fov, in y), aspect ratio, near plane (D),
-//       and far plane (F). Note that the projection matrix is normalized for
-//       element [3][4] to be 1.0. This is performed so that W-based range fog
-//       will work correctly.
-//-----------------------------------------------------------------------------
-HRESULT D3DUtil_SetProjectionMatrix( D3DMATRIX& mat, FLOAT fFOV, FLOAT fAspect,
-                                     FLOAT fNearPlane, FLOAT fFarPlane )
-{
-    if( fabs(fFarPlane-fNearPlane) < 0.01f )
-        return E_INVALIDARG;
-    if( fabs(sin(fFOV/2)) < 0.01f )
-        return E_INVALIDARG;
-
-    FLOAT w = fAspect * ( cosf(fFOV/2)/sinf(fFOV/2) );
-    FLOAT h =   1.0f  * ( cosf(fFOV/2)/sinf(fFOV/2) );
-    FLOAT Q = fFarPlane / ( fFarPlane - fNearPlane );
-
-    ZeroMemory( &mat, sizeof(D3DMATRIX) );
-    mat._11 = w;
-    mat._22 = h;
-    mat._33 = Q;
-    mat._34 = 1.0f;
-    mat._43 = -Q*fNearPlane;
-
-    return S_OK;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetRotateXMatrix()
-// Desc: Create Rotation matrix about X axis
-//-----------------------------------------------------------------------------
-VOID D3DUtil_SetRotateXMatrix( D3DMATRIX& mat, FLOAT fRads )
-{
-    D3DUtil_SetIdentityMatrix( mat );
-    mat._22 =  cosf( fRads );
-    mat._23 =  sinf( fRads );
-    mat._32 = -sinf( fRads );
-    mat._33 =  cosf( fRads );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetRotateYMatrix()
-// Desc: Create Rotation matrix about Y axis
-//-----------------------------------------------------------------------------
-VOID D3DUtil_SetRotateYMatrix( D3DMATRIX& mat, FLOAT fRads )
-{
-    D3DUtil_SetIdentityMatrix( mat );
-    mat._11 =  cosf( fRads );
-    mat._13 = -sinf( fRads );
-    mat._31 =  sinf( fRads );
-    mat._33 =  cosf( fRads );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetRotateZMatrix()
-// Desc: Create Rotation matrix about Z axis
-//-----------------------------------------------------------------------------
-VOID D3DUtil_SetRotateZMatrix( D3DMATRIX& mat, FLOAT fRads )
-{
-    D3DUtil_SetIdentityMatrix( mat );
-    mat._11  =  cosf( fRads );
-    mat._12  =  sinf( fRads );
-    mat._21  = -sinf( fRads );
-    mat._22  =  cosf( fRads );
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: D3DUtil_SetRotationMatrix
-// Desc: Create a Rotation matrix about vector direction
-//-----------------------------------------------------------------------------
-VOID D3DUtil_SetRotationMatrix( D3DMATRIX& mat, D3DVECTOR& vDir, FLOAT fRads )
-{
-    FLOAT     fCos = cosf( fRads );
-    FLOAT     fSin = sinf( fRads );
-    D3DVECTOR v    = Normalize( vDir );
-
-    mat._11 = ( v.x * v.x ) * ( 1.0f - fCos ) + fCos;
-    mat._12 = ( v.x * v.y ) * ( 1.0f - fCos ) - (v.z * fSin);
-    mat._13 = ( v.x * v.z ) * ( 1.0f - fCos ) + (v.y * fSin);
-
-    mat._21 = ( v.y * v.x ) * ( 1.0f - fCos ) + (v.z * fSin);
-    mat._22 = ( v.y * v.y ) * ( 1.0f - fCos ) + fCos ;
-    mat._23 = ( v.y * v.z ) * ( 1.0f - fCos ) - (v.x * fSin);
-
-    mat._31 = ( v.z * v.x ) * ( 1.0f - fCos ) - (v.y * fSin);
-    mat._32 = ( v.z * v.y ) * ( 1.0f - fCos ) + (v.x * fSin);
-    mat._33 = ( v.z * v.z ) * ( 1.0f - fCos ) + fCos;
-
-    mat._14 = mat._24 = mat._34 = 0.0f;
-    mat._41 = mat._42 = mat._43 = 0.0f;
-    mat._44 = 1.0f;
-}
-
-
-
-
-//-----------------------------------------------------------------------------
-// Name: _DbgOut()
-// Desc: Outputs a message to the debug stream
-//-----------------------------------------------------------------------------
-HRESULT _DbgOut( TCHAR* strFile, DWORD dwLine, HRESULT hr, TCHAR* strMsg )
-{
-    TCHAR buffer[256];
-    wsprintf( buffer, _T("%s(%ld): "), strFile, dwLine );
-    OutputDebugString( buffer );
-    OutputDebugString( strMsg );
-
-    if( hr )
-    {
-        wsprintf( buffer, _T("(hr=%08lx)\n"), hr );
-        OutputDebugString( buffer );
-    }
-
-    OutputDebugString( _T("\n") );
-
-    return hr;
-}
-
-
-
diff --git a/src/old/d3dutil.h b/src/old/d3dutil.h
deleted file mode 100644
index 369c7db..0000000
--- a/src/old/d3dutil.h
+++ /dev/null
@@ -1,113 +0,0 @@
-// * 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/.
-
-//-----------------------------------------------------------------------------
-// File: D3DUtil.h
-//
-// Desc: Helper functions and typing shortcuts for Direct3D programming.
-//
-// Copyright (c) 1997-1999 Microsoft Corporation. All rights reserved
-//-----------------------------------------------------------------------------
-
-#pragma once
-
-#include <ddraw.h>
-#include <d3d.h>
-
-
-
-
-//-----------------------------------------------------------------------------
-// Miscellaneous helper functions
-//-----------------------------------------------------------------------------
-const TCHAR* D3DUtil_GetDXSDKMediaPath();
-
-#define SAFE_DELETE(p)  { if(p) { delete (p);     (p)=NULL; } }
-#define SAFE_RELEASE(p) { if(p) { (p)->Release(); (p)=NULL; } }
-
-
-
-
-//-----------------------------------------------------------------------------
-// Short cut functions for creating and using DX structures
-//-----------------------------------------------------------------------------
-VOID D3DUtil_InitDeviceDesc( D3DDEVICEDESC7& ddDevDesc );
-VOID D3DUtil_InitSurfaceDesc( DDSURFACEDESC2& ddsd, DWORD dwFlags=0,
-                              DWORD dwCaps=0 );
-VOID D3DUtil_InitMaterial( D3DMATERIAL7& mtrl, FLOAT r=0.0f, FLOAT g=0.0f,
-                           FLOAT b=0.0f, FLOAT a=1.0f );
-VOID D3DUtil_InitLight( D3DLIGHT7& light, D3DLIGHTTYPE ltType,
-                        FLOAT x=0.0f, FLOAT y=0.0f, FLOAT z=0.0f );
-
-
-
-
-//-----------------------------------------------------------------------------
-// D3D Matrix functions. For performance reasons, some functions are inline.
-//-----------------------------------------------------------------------------
-HRESULT D3DUtil_SetViewMatrix( D3DMATRIX& mat, D3DVECTOR& vFrom,
-                               D3DVECTOR& vAt, D3DVECTOR& vUp );
-HRESULT D3DUtil_SetProjectionMatrix( D3DMATRIX& mat, FLOAT fFOV = 1.570795f,
-                                     FLOAT fAspect = 1.0f,
-                                     FLOAT fNearPlane = 1.0f,
-                                     FLOAT fFarPlane = 1000.0f );
-
-inline VOID D3DUtil_SetIdentityMatrix( D3DMATRIX& m )
-{
-    m._12 = m._13 = m._14 = m._21 = m._23 = m._24 = 0.0f;
-    m._31 = m._32 = m._34 = m._41 = m._42 = m._43 = 0.0f;
-    m._11 = m._22 = m._33 = m._44 = 1.0f;
-}
-
-inline VOID D3DUtil_SetTranslateMatrix( D3DMATRIX& m, FLOAT tx, FLOAT ty,
-                                        FLOAT tz )
-{ D3DUtil_SetIdentityMatrix( m ); m._41 = tx; m._42 = ty; m._43 = tz; }
-
-inline VOID D3DUtil_SetTranslateMatrix( D3DMATRIX& m, D3DVECTOR& v )
-{ D3DUtil_SetTranslateMatrix( m, v.x, v.y, v.z ); }
-
-inline VOID D3DUtil_SetScaleMatrix( D3DMATRIX& m, FLOAT sx, FLOAT sy,
-                                    FLOAT sz )
-{ D3DUtil_SetIdentityMatrix( m ); m._11 = sx; m._22 = sy; m._33 = sz; }
-
-inline VOID SetScaleMatrix( D3DMATRIX& m, D3DVECTOR& v )
-{ D3DUtil_SetScaleMatrix( m, v.x, v.y, v.z ); }
-
-VOID    D3DUtil_SetRotateXMatrix( D3DMATRIX& mat, FLOAT fRads );
-VOID    D3DUtil_SetRotateYMatrix( D3DMATRIX& mat, FLOAT fRads );
-VOID    D3DUtil_SetRotateZMatrix( D3DMATRIX& mat, FLOAT fRads );
-VOID    D3DUtil_SetRotationMatrix( D3DMATRIX& mat, D3DVECTOR& vDir,
-                                   FLOAT fRads );
-
-
-
-
-//-----------------------------------------------------------------------------
-// Debug printing support
-//-----------------------------------------------------------------------------
-
-HRESULT _DbgOut( TCHAR*, DWORD, HRESULT, TCHAR* );
-
-#if defined(DEBUG) | defined(_DEBUG)
-    #define DEBUG_MSG(str)    _DbgOut( __FILE__, (DWORD)__LINE__, 0, str )
-    #define DEBUG_ERR(hr,str) _DbgOut( __FILE__, (DWORD)__LINE__, hr, str )
-#else
-    #define DEBUG_MSG(str)    (0L)
-    #define DEBUG_ERR(hr,str) (hr)
-#endif
-
-
-
diff --git a/src/old/joystick.cpp b/src/old/joystick.cpp
deleted file mode 100644
index 269c09d..0000000
--- a/src/old/joystick.cpp
+++ /dev/null
@@ -1,244 +0,0 @@
-// * 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/.
-
-// joystick.cpp
-
-#define DIRECTINPUT_VERSION 0x0700
-
-#include <windows.h>
-#include <dinput.h>
-#include <stdio.h>
-
-#include "old/joystick.h"
-
-
-
-
-// Global variables.
-
-LPDIRECTINPUT7          g_pDI       = NULL;
-LPDIRECTINPUTDEVICE2    g_pJoystick = NULL;
-DIDEVCAPS               g_diDevCaps;
-
-
-
-
-
-// Called once for each enumerated joystick. If we find one, create a
-// device interface on it so we can play with it.
-
-bool CALLBACK EnumJoysticksCallback( const DIDEVICEINSTANCE* pdidInstance,
-                                     VOID* pContext )
-{
-    HRESULT hr;
-
-    // Obtain an interface to the enumerated joystick.
-    hr = g_pDI->CreateDeviceEx( pdidInstance->guidInstance, IID_IDirectInputDevice2,
-                                (VOID**)&g_pJoystick, NULL );
-
-    // If it failed, then we can't use this joystick. (Maybe the user unplugged
-    // it while we were in the middle of enumerating it.)
-    if( FAILED(hr) )
-        return DIENUM_CONTINUE;
-
-
-    // Stop enumeration. Note: we're just taking the first joystick we get. You
-    // could store all the enumerated joysticks and let the user pick.
-    return DIENUM_STOP;
-}
-
-
-// Callback function for enumerating the axes on a joystick.
-
-bool CALLBACK EnumAxesCallback( const DIDEVICEOBJECTINSTANCE* pdidoi,
-                                VOID* pContext )
-{
-    DIPROPRANGE diprg;
-    diprg.diph.dwSize       = sizeof(DIPROPRANGE);
-    diprg.diph.dwHeaderSize = sizeof(DIPROPHEADER);
-    diprg.diph.dwHow        = DIPH_BYOFFSET;
-    diprg.diph.dwObj        = pdidoi->dwOfs; // Specify the enumerated axis
-    diprg.lMin              = -1000;
-    diprg.lMax              = +1000;
-
-    // Set the range for the axis
-    if( FAILED( g_pJoystick->SetProperty( DIPROP_RANGE, &diprg.diph ) ) )
-        return DIENUM_STOP;
-
-#ifndef __MINGW32__ // FIXME Doesn't work under MinGW
-    // Set the UI to reflect what axes the joystick supports
-    switch( pdidoi->dwOfs )
-    {
-        case DIJOFS_X:
-            OutputDebugString("EnumAxesCallback -x\n");
-            break;
-        case DIJOFS_Y:
-            OutputDebugString("EnumAxesCallback -y\n");
-            break;
-        case DIJOFS_Z:
-            OutputDebugString("EnumAxesCallback -z\n");
-            break;
-        case DIJOFS_RX:
-            OutputDebugString("EnumAxesCallback -rx\n");
-            break;
-        case DIJOFS_RY:
-            OutputDebugString("EnumAxesCallback -ry\n");
-            break;
-        case DIJOFS_RZ:
-            OutputDebugString("EnumAxesCallback -rz\n");
-            break;
-        case DIJOFS_SLIDER(0):
-            OutputDebugString("EnumAxesCallback -s0\n");
-            break;
-        case DIJOFS_SLIDER(1):
-            OutputDebugString("EnumAxesCallback -s1\n");
-            break;
-    }
-#endif
-
-    return DIENUM_CONTINUE;
-}
-
-
-// Initialize the DirectInput variables.
-
-bool InitDirectInput(HINSTANCE hInst, HWND hWnd)
-{
-    HRESULT hr;
-
-    // Register with the DirectInput subsystem and get a pointer
-    // to a IDirectInput interface we can use.
-#ifndef __MINGW32__ // FIXME Doesn't work under MinGW
-    hr = DirectInputCreateEx( hInst, DIRECTINPUT_VERSION,IID_IDirectInput7, (LPVOID*)&g_pDI, NULL );
-    if( FAILED(hr) )  return false;
-#else
-    return false;
-#endif
-
-    // Look for a simple joystick we can use for this sample program.
-    hr = g_pDI->EnumDevices( DIDEVTYPE_JOYSTICK, EnumJoysticksCallback,
-                             NULL, DIEDFL_ATTACHEDONLY );
-    if( FAILED(hr) )  return false;
-
-    // Make sure we got a joystick
-    if( NULL == g_pJoystick )
-    {
-//?        MessageBox( NULL, "Joystick not found", "DInput Sample",
-//?                    MB_ICONERROR | MB_OK );
-        return false;
-    }
-
-    // Set the data format to "simple joystick" - a predefined data format
-    //
-    // A data format specifies which controls on a device we are interested in,
-    // and how they should be reported. This tells DInput that we will be
-    // passing a DIJOYSTATE structure to IDirectInputDevice::GetDeviceState().
-    hr = g_pJoystick->SetDataFormat( &c_dfDIJoystick );
-    if( FAILED(hr) )  return false;
-
-    // Set the cooperative level to let DInput know how this device should
-    // interact with the system and with other DInput applications.
-    hr = g_pJoystick->SetCooperativeLevel( hWnd, DISCL_EXCLUSIVE|DISCL_FOREGROUND );
-    if( FAILED(hr) )  return false;
-
-    // Determine how many axis the joystick has (so we don't error out setting
-    // properties for unavailable axis)
-    g_diDevCaps.dwSize = sizeof(DIDEVCAPS);
-    hr = g_pJoystick->GetCapabilities(&g_diDevCaps);
-    if( FAILED(hr) )  return false;
-
-
-    // Enumerate the axes of the joyctick and set the range of each axis. Note:
-    // we could just use the defaults, but we're just trying to show an example
-    // of enumerating device objects (axes, buttons, etc.).
-    g_pJoystick->EnumObjects( EnumAxesCallback, (VOID*)g_pJoystick, DIDFT_AXIS );
-
-    return true;
-}
-
-// Acquire or unacquire the keyboard, depending on if the app is active
-// Input device must be acquired before the GetDeviceState is called.
-
-bool SetAcquire(bool bActive)
-{
-    if ( g_pJoystick )
-    {
-        if( bActive )  g_pJoystick->Acquire();
-        else           g_pJoystick->Unacquire();
-    }
-    return true;
-}
-
-
-// Get the input device's state and display it.
-
-bool UpdateInputState( DIJOYSTATE &js )
-{
-    HRESULT     hr;
-
-    if ( g_pJoystick )
-    {
-        do
-        {
-            // Poll the device to read the current state
-            hr = g_pJoystick->Poll();
-            if ( FAILED(hr) )  return false;
-
-            // Get the input's device state
-            hr = g_pJoystick->GetDeviceState( sizeof(DIJOYSTATE), &js );
-
-            if( hr == DIERR_INPUTLOST )
-            {
-                // DInput is telling us that the input stream has been
-                // interrupted. We aren't tracking any state between polls, so
-                // we don't have any special reset that needs to be done. We
-                // just re-acquire and try again.
-                hr = g_pJoystick->Acquire();
-                if ( FAILED(hr) )  return false;
-            }
-        }
-        while ( DIERR_INPUTLOST == hr );
-        if ( FAILED(hr) )  return false;
-    }
-    return true;
-}
-
-
-// Initialize the DirectInput variables.
-
-bool FreeDirectInput()
-{
-    // Unacquire and release any DirectInputDevice objects.
-    if( NULL != g_pJoystick )
-    {
-        // Unacquire the device one last time just in case
-        // the app tried to exit while the device is still acquired.
-        g_pJoystick->Unacquire();
-        g_pJoystick->Release();
-        g_pJoystick = NULL;
-    }
-
-
-    // Release any DirectInput objects.
-    if( g_pDI )
-    {
-        g_pDI->Release();
-        g_pDI = NULL;
-    }
-
-    return true;
-}
-
diff --git a/src/old/joystick.h b/src/old/joystick.h
deleted file mode 100644
index 5b4e517..0000000
--- a/src/old/joystick.h
+++ /dev/null
@@ -1,27 +0,0 @@
-// * 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/.
-
-// joystick.h
-
-#pragma once
-
-
-extern bool InitDirectInput(HINSTANCE hInst, HWND hWnd);
-extern bool SetAcquire(bool bActive);
-extern bool UpdateInputState(DIJOYSTATE &js);
-extern bool FreeDirectInput();
-
-
diff --git a/src/old/light.cpp b/src/old/light.cpp
deleted file mode 100644
index 811a824..0000000
--- a/src/old/light.cpp
+++ /dev/null
@@ -1,504 +0,0 @@
-// * 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/.
-
-// light.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dengine.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/light.h"
-
-
-
-
-
-// Initializes a progression.
-
-void ProgInit(LightProg &p, float value)
-{
-    p.starting = value;
-    p.ending   = value;
-    p.current  = value;
-    p.progress = 0.0f;
-    p.speed    = 100.0f;
-}
-
-// Makes evolve a progression.
-
-void ProgFrame(LightProg &p, float rTime)
-{
-    if ( p.speed < 100.0f )
-    {
-        if ( p.progress < 1.0f )
-        {
-            p.progress += p.speed*rTime;
-            if ( p.progress > 1.0f )
-            {
-                p.progress = 1.0f;
-            }
-        }
-
-        p.current = (p.ending-p.starting)*p.progress + p.starting;
-    }
-    else
-    {
-        p.current = p.ending;
-    }
-}
-
-// Change the current value.
-
-void ProgSet(LightProg &p, float value)
-{
-    p.starting = p.current;
-    p.ending   = value;
-    p.progress = 0.0f;
-}
-
-
-
-
-
-// Object's constructor.
-
-CLight::CLight(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_LIGHT, this);
-
-    m_pD3DDevice = 0;
-    m_engine = engine;
-
-    m_lightUsed = 0;
-    m_lightTable = (Light*)malloc(sizeof(Light)*D3DMAXLIGHT);
-    ZeroMemory(m_lightTable, sizeof(Light)*D3DMAXLIGHT);
-
-    m_time = 0.0f;
-}
-
-// Object's destructor.
-
-CLight::~CLight()
-{
-    free(m_lightTable);
-    m_iMan->DeleteInstance(CLASS_LIGHT, this);
-}
-
-
-void CLight::SetD3DDevice(LPDIRECT3DDEVICE7 device)
-{
-    m_pD3DDevice = device;
-}
-
-
-// Removes all the lights.
-
-void CLight::FlushLight()
-{
-    int     i;
-
-    for ( i=0 ; i<D3DMAXLIGHT ; i++ )
-    {
-        m_lightTable[i].bUsed = false;
-        m_pD3DDevice->LightEnable(i, false);
-    }
-    m_lightUsed = 0;
-}
-
-
-// Creates a new light. Returns its rank or -1 on error.
-
-int CLight::CreateLight()
-{
-    int     i;
-
-    for ( i=0 ; i<D3DMAXLIGHT ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == false )
-        {
-            ZeroMemory(&m_lightTable[i], sizeof(Light));
-            m_lightTable[i].bUsed   = true;
-            m_lightTable[i].bEnable = true;
-
-            m_lightTable[i].incluType = TYPENULL;
-            m_lightTable[i].excluType = TYPENULL;
-
-            m_lightTable[i].light.dltType       = D3DLIGHT_DIRECTIONAL;
-            m_lightTable[i].light.dcvDiffuse.r  =   0.5f;
-            m_lightTable[i].light.dcvDiffuse.g  =   0.5f;
-            m_lightTable[i].light.dcvDiffuse.b  =   0.5f;  // white
-            m_lightTable[i].light.dvPosition.x  =-100.0f;
-            m_lightTable[i].light.dvPosition.y  = 100.0f;
-            m_lightTable[i].light.dvPosition.z  =-100.0f;
-            m_lightTable[i].light.dvDirection.x =   1.0f;
-            m_lightTable[i].light.dvDirection.y =  -1.0f;
-            m_lightTable[i].light.dvDirection.z =   1.0f;
-
-            ProgInit(m_lightTable[i].intensity,  1.0f);  // maximum
-            ProgInit(m_lightTable[i].colorRed,   0.5f);
-            ProgInit(m_lightTable[i].colorGreen, 0.5f);
-            ProgInit(m_lightTable[i].colorBlue,  0.5f);  // gray
-
-            if ( m_lightUsed < i+1 )
-            {
-                m_lightUsed = i+1;
-            }
-            return i;
-        }
-    }
-    return -1;
-}
-
-// Deletes a light.
-
-bool CLight::DeleteLight(int lightRank)
-{
-    int     i;
-
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].bUsed = false;
-    m_pD3DDevice->LightEnable(lightRank, false);
-
-    m_lightUsed = 0;
-    for ( i=0 ; i<D3DMAXLIGHT ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == true )
-        {
-            m_lightUsed = i+1;
-        }
-    }
-
-    return true;
-}
-
-
-// Specifies a light.
-
-bool CLight::SetLight(int lightRank, const D3DLIGHT7 &light)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].light = light;
-
-    ProgInit(m_lightTable[lightRank].colorRed,   m_lightTable[lightRank].light.dcvDiffuse.r);
-    ProgInit(m_lightTable[lightRank].colorGreen, m_lightTable[lightRank].light.dcvDiffuse.g);
-    ProgInit(m_lightTable[lightRank].colorBlue,  m_lightTable[lightRank].light.dcvDiffuse.b);
-
-    return true;
-}
-
-// Gives the specifications of a light.
-
-bool CLight::GetLight(int lightRank, D3DLIGHT7 &light)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    light = m_lightTable[lightRank].light;
-    return true;
-}
-
-
-// Lights up or put out a light.
-
-bool CLight::LightEnable(int lightRank, bool bEnable)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].bEnable = bEnable;
-    return true;
-}
-
-
-// Specifies the type (TYPE *) items included in this light.
-// This light does not light up so that this type of objects.
-
-bool CLight::SetLightIncluType(int lightRank, D3DTypeObj type)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].incluType = type;
-    return true;
-}
-
-// Specifies the type (TYPE *) items excluded by this light.
-// This light does not illuminate then ever these objects.
-
-bool CLight::SetLightExcluType(int lightRank, D3DTypeObj type)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].excluType = type;
-    return true;
-}
-
-
-// Management of the position of the light.
-
-bool CLight::SetLightPos(int lightRank, Math::Vector pos)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].light.dvPosition = VEC_TO_D3DVEC(pos);
-    return true;
-}
-
-Math::Vector CLight::RetLightPos(int lightRank)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return Math::Vector(0.0f, 0.0f, 0.0f);
-
-    return D3DVEC_TO_VEC(m_lightTable[lightRank].light.dvPosition);
-}
-
-
-// Management direction of the light.
-
-bool CLight::SetLightDir(int lightRank, Math::Vector dir)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].light.dvDirection = VEC_TO_D3DVEC(dir);
-    return true;
-}
-
-Math::Vector CLight::RetLightDir(int lightRank)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return Math::Vector(0.0f, 0.0f, 0.0f);
-
-    return D3DVEC_TO_VEC(m_lightTable[lightRank].light.dvDirection);
-}
-
-
-// Specifies the rate of change.
-
-bool CLight::SetLightIntensitySpeed(int lightRank, float speed)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].intensity.speed = speed;
-    return true;
-}
-
-// Management of the intensity of light.
-
-bool CLight::SetLightIntensity(int lightRank, float value)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    ProgSet(m_lightTable[lightRank].intensity, value);
-    return true;
-}
-
-float CLight::RetLightIntensity(int lightRank)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return 0.0f;
-
-    return m_lightTable[lightRank].intensity.current;
-}
-
-
-// Specifies the rate of change.
-
-bool CLight::SetLightColorSpeed(int lightRank, float speed)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    m_lightTable[lightRank].colorRed.speed   = speed;
-    m_lightTable[lightRank].colorGreen.speed = speed;
-    m_lightTable[lightRank].colorBlue.speed  = speed;
-    return true;
-}
-
-// Color management for light.
-
-bool CLight::SetLightColor(int lightRank, D3DCOLORVALUE color)
-{
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )  return false;
-
-    ProgSet(m_lightTable[lightRank].colorRed,   color.r);
-    ProgSet(m_lightTable[lightRank].colorGreen, color.g);
-    ProgSet(m_lightTable[lightRank].colorBlue,  color.b);
-    return true;
-}
-
-D3DCOLORVALUE CLight::RetLightColor(int lightRank)
-{
-    D3DCOLORVALUE   color;
-
-    if ( lightRank < 0 || lightRank >= D3DMAXLIGHT )
-    {
-        color.r = 0.5f;
-        color.g = 0.5f;
-        color.b = 0.5f;
-        color.a = 0.5f;
-        return color;
-    }
-
-    color.r = m_lightTable[lightRank].colorRed.current;
-    color.g = m_lightTable[lightRank].colorGreen.current;
-    color.b = m_lightTable[lightRank].colorBlue.current;
-    return color;
-}
-
-
-// Adjusts the color of all lights.
-
-void CLight::AdaptLightColor(D3DCOLORVALUE color, float factor)
-{
-    D3DCOLORVALUE   value;
-    int             i;
-
-    for ( i=0 ; i<m_lightUsed ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == false )  continue;
-
-        value.r = m_lightTable[i].colorRed.current;
-        value.g = m_lightTable[i].colorGreen.current;
-        value.b = m_lightTable[i].colorBlue.current;
-
-        value.r += color.r*factor;
-        value.g += color.g*factor;
-        value.b += color.b*factor;
-
-        ProgInit(m_lightTable[i].colorRed,   value.r);
-        ProgInit(m_lightTable[i].colorGreen, value.g);
-        ProgInit(m_lightTable[i].colorBlue,  value.b);
-    }
-
-    LightUpdate();
-}
-
-
-
-// Makes all the lights evolve.
-
-void CLight::FrameLight(float rTime)
-{
-    Math::Vector    dir;
-    float       angle;
-    int         i;
-
-    if ( m_engine->RetPause() )  return;
-
-    m_time += rTime;
-
-    for ( i=0 ; i<m_lightUsed ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == false )  continue;
-
-        ProgFrame(m_lightTable[i].intensity,  rTime);
-        ProgFrame(m_lightTable[i].colorRed,   rTime);
-        ProgFrame(m_lightTable[i].colorGreen, rTime);
-        ProgFrame(m_lightTable[i].colorBlue,  rTime);
-
-        if ( m_lightTable[i].incluType == TYPEQUARTZ )
-        {
-            m_lightTable[i].light.dvDirection.x = sinf((m_time+i*Math::PI*0.5f)*1.0f);
-            m_lightTable[i].light.dvDirection.z = cosf((m_time+i*Math::PI*0.5f)*1.1f);
-            m_lightTable[i].light.dvDirection.y = -1.0f+cosf((m_time+i*Math::PI*0.5f)*2.7f)*0.5f;
-        }
-
-        if ( m_lightTable[i].incluType == TYPEMETAL )
-        {
-            dir = m_engine->RetEyePt()-m_engine->RetLookatPt();
-            angle = Math::RotateAngle(dir.x, dir.z);
-            angle += Math::PI*0.5f*i;
-            m_lightTable[i].light.dvDirection.x = sinf(angle*2.0f);
-            m_lightTable[i].light.dvDirection.z = cosf(angle*2.0f);
-        }
-    }
-}
-
-
-// Updates all the lights.
-
-void CLight::LightUpdate()
-{
-    bool    bEnable;
-    float   value;
-    int     i;
-
-    for ( i=0 ; i<m_lightUsed ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == false )  continue;
-
-        bEnable = m_lightTable[i].bEnable;
-        if ( m_lightTable[i].intensity.current == 0.0f )  bEnable = false;
-
-        if ( bEnable )
-        {
-            value = m_lightTable[i].colorRed.current * m_lightTable[i].intensity.current;
-            m_lightTable[i].light.dcvDiffuse.r = value;
-
-            value = m_lightTable[i].colorGreen.current * m_lightTable[i].intensity.current;
-            m_lightTable[i].light.dcvDiffuse.g = value;
-
-            value = m_lightTable[i].colorBlue.current * m_lightTable[i].intensity.current;
-            m_lightTable[i].light.dcvDiffuse.b = value;
-
-            m_pD3DDevice->SetLight(i, &m_lightTable[i].light);
-            m_pD3DDevice->LightEnable(i, bEnable);
-        }
-        else
-        {
-            m_lightTable[i].light.dcvDiffuse.r = 0.0f;
-            m_lightTable[i].light.dcvDiffuse.g = 0.0f;
-            m_lightTable[i].light.dcvDiffuse.b = 0.0f;
-
-            m_pD3DDevice->LightEnable(i, bEnable);
-        }
-    }
-}
-
-// Updates the lights for a given type.
-
-void CLight::LightUpdate(D3DTypeObj type)
-{
-    bool    bEnable;
-    int     i;
-
-    for ( i=0 ; i<m_lightUsed ; i++ )
-    {
-        if ( m_lightTable[i].bUsed == false )  continue;
-        if ( m_lightTable[i].bEnable == false )  continue;
-        if ( m_lightTable[i].intensity.current == 0.0f )  continue;
-
-        if ( m_lightTable[i].incluType != TYPENULL )
-        {
-            bEnable = (m_lightTable[i].incluType == type);
-            m_pD3DDevice->LightEnable(i, bEnable);
-        }
-
-        if ( m_lightTable[i].excluType != TYPENULL )
-        {
-            bEnable = (m_lightTable[i].excluType != type);
-            m_pD3DDevice->LightEnable(i, bEnable);
-        }
-    }
-}
-
-
diff --git a/src/old/light.h b/src/old/light.h
deleted file mode 100644
index 49e4e7d..0000000
--- a/src/old/light.h
+++ /dev/null
@@ -1,109 +0,0 @@
-// * 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/.
-
-// light.h
-
-#pragma once
-
-
-#include "old/d3dengine.h"
-#include "graphics/common/color.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-
-
-const int D3DMAXLIGHT = 100;
-
-
-struct LightProg
-{
-    float   starting;
-    float   ending;
-    float   current;
-    float   progress;
-    float   speed;
-};
-
-
-struct Light
-{
-    char            bUsed;          // true -> light exists
-    char            bEnable;        // true -> light turned on
-
-    D3DTypeObj      incluType;      // type of all objects included
-    D3DTypeObj      excluType;      // type of all objects excluded
-
-    D3DLIGHT7       light;          // configuration of the light
-
-    LightProg       intensity;      // intensity (0 .. 1)
-    LightProg       colorRed;
-    LightProg       colorGreen;
-    LightProg       colorBlue;
-};
-
-
-
-class CLight
-{
-public:
-    CLight(CInstanceManager *iMan, CD3DEngine* engine);
-    virtual ~CLight();
-
-    void            SetD3DDevice(LPDIRECT3DDEVICE7 device);
-
-    void            FlushLight();
-    int             CreateLight();
-    bool            DeleteLight(int lightRank);
-    bool            SetLight(int lightRank, const D3DLIGHT7 &light);
-    bool            GetLight(int lightRank, D3DLIGHT7 &light);
-    bool            LightEnable(int lightRank, bool bEnable);
-
-    bool            SetLightIncluType(int lightRank, D3DTypeObj type);
-    bool            SetLightExcluType(int lightRank, D3DTypeObj type);
-
-    bool            SetLightPos(int lightRank, Math::Vector pos);
-    Math::Vector        RetLightPos(int lightRank);
-
-    bool            SetLightDir(int lightRank, Math::Vector dir);
-    Math::Vector        RetLightDir(int lightRank);
-
-    bool            SetLightIntensitySpeed(int lightRank, float speed);
-    bool            SetLightIntensity(int lightRank, float value);
-    float           RetLightIntensity(int lightRank);
-    void            AdaptLightColor(D3DCOLORVALUE color, float factor);
-
-    bool            SetLightColorSpeed(int lightRank, float speed);
-    bool            SetLightColor(int lightRank, D3DCOLORVALUE color);
-    D3DCOLORVALUE   RetLightColor(int lightRank);
-
-    void            FrameLight(float rTime);
-    void            LightUpdate();
-    void            LightUpdate(D3DTypeObj type);
-
-protected:
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*       m_engine;
-    LPDIRECT3DDEVICE7 m_pD3DDevice;
-
-    float           m_time;
-    int             m_lightUsed;
-    Light*          m_lightTable;
-};
-
diff --git a/src/old/math3d.cpp b/src/old/math3d.cpp
deleted file mode 100644
index a099df4..0000000
--- a/src/old/math3d.cpp
+++ /dev/null
@@ -1,1197 +0,0 @@
-// * 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/.
-
-// math3d.cpp
-
-#define STRICT
-#define D3D_OVERLOADS
-
-#include <math.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "old/d3dutil.h"
-#include "old/math3d.h"
-
-
-// Old defines
-#define MATH3D_PI               3.14159265358979323846f
-#define MATH3D_CHOUIA           1e-6f
-#define MATH3D_BEAUCOUP     1e6f
-
-
-// Old FPOINT struct
-struct FPOINT
-{
-    float   x;
-    float   y;
-
-    FPOINT() { }
-    FPOINT(float _x, float _y)
-    {
-        x = _x;
-        y = _y;
-    }
-};
-
-
-// === Functions already replaced by new implementation ===
-
-//>>> func.h IsEqual()
-bool        IsEqual(float a, float b);
-
-//>>> func.h Min()
-float       Min(float a, float b);
-float       Min(float a, float b, float c);
-float       Min(float a, float b, float c, float d);
-float       Min(float a, float b, float c, float d, float e);
-
-//>>> func.h Max()
-float       Max(float a, float b);
-float       Max(float a, float b, float c);
-float       Max(float a, float b, float c, float d);
-float       Max(float a, float b, float c, float d, float e);
-
-//>>> func.h Norm()
-float       Norm(float a);
-//>>> fabs()
-float       Abs(float a);
-
-//>>> func.h Swap()
-void        Swap(int &a, int &b);
-//>>> func.h Swap()
-void        Swap(float &a, float &b);
-//>>> point.h Swap()
-void        Swap(FPOINT &a, FPOINT &b);
-
-//>>> func.h Mod()
-float       Mod(float a, float m);
-//>>> func.h NormAngle()
-float       NormAngle(float angle);
-//>>> func.h TestAngle()
-bool        TestAngle(float angle, float min, float max);
-
-//>>> geometry.h RotateAngle()
-float       RotateAngle(FPOINT center, FPOINT p1, FPOINT p2);
-
-//>>> func.h Direction()
-float       Direction(float a, float g);
-
-//>>> geometry.h RotatePoint()
-FPOINT      RotatePoint(FPOINT center, float angle, FPOINT p);
-//>>> geometry.h RotatePoint()
-FPOINT      RotatePoint(float angle, FPOINT p);
-//>>> geometry.h RotatePoint()
-FPOINT      RotatePoint(float angle, float dist);
-//>>> geometry.h RotateAngle()
-float       RotateAngle(float x, float y);
-//>>> geometry.h RotatePoint()
-void        RotatePoint(float cx, float cy, float angle, float &px, float &py);
-
-//>>> geometry.h IsInsideTriangle()
-bool            IsInsideTriangle(FPOINT a, FPOINT b, FPOINT c, FPOINT p);
-
-//>>> point.h Distance()
-float       Length(FPOINT a, FPOINT b);
-
-//>>> point.h Point::Length()
-float       Length(float x, float y);
-
-//>>> func.h Rand()
-float       Rand();
-//>>> func.h Neutral()
-float       Neutral(float value, float dead);
-
-//>>> func.h PropAngle()
-float       Prop(int a, int b, float p);
-//>>> func.h Smooth()
-float       Smooth(float actual, float hope, float time);
-//>>> func.h Bounce()
-float       Bounce(float progress, float middle=0.3f, float bounce=0.4f);
-
-
-//>>> geometry.h SegmentPoint()
-D3DVECTOR   SegmentDist(const D3DVECTOR &p1, const D3DVECTOR &p2, float dist);
-
-//>>> geometry.h Intersect()
-bool            Intersect(D3DVECTOR a, D3DVECTOR b, D3DVECTOR c, D3DVECTOR d, D3DVECTOR e, D3DVECTOR &i);
-
-//>>> geometry.h IntersectY()
-bool            IntersectY(D3DVECTOR a, D3DVECTOR b, D3DVECTOR c, D3DVECTOR &p);
-
-//>>> geometry.h RotatePoint()
-void            RotatePoint(D3DVECTOR center, float angleH, float angleV, D3DVECTOR &p);
-
-//>>> geometry.h RotatePoint2()
-void            RotatePoint2(D3DVECTOR center, float angleH, float angleV, D3DVECTOR &p);
-
-//>>> geometry.h RotateView()
-D3DVECTOR   RotateView(D3DVECTOR center, float angleH, float angleV, float dist);
-
-//>>> geometry.h LookatPoint()
-D3DVECTOR   LookatPoint( D3DVECTOR eye, float angleH, float angleV, float length );
-
-//>>> vector.h Vector::Length()
-float       Length(const D3DVECTOR &u);
-
-//>>> vector.h Distance()
-float       Length(const D3DVECTOR &a, const D3DVECTOR &b);
-
-//>>> geometry.h DistanceProjected()
-float       Length2d(const D3DVECTOR &a, const D3DVECTOR &b);
-
-//>>> vector.h Angle()
-float       Angle( D3DVECTOR u, D3DVECTOR v );
-
-//>>> vector.h CrossProduct()
-D3DVECTOR   Cross( D3DVECTOR u, D3DVECTOR v );
-
-//>>> geometry.h NormalToPlane()
-D3DVECTOR   ComputeNormal( D3DVECTOR p1, D3DVECTOR p2, D3DVECTOR p3 );
-
-//>>> geometry.h Transform()
-D3DVECTOR   Transform(const D3DMATRIX &m, D3DVECTOR p);
-
-//>>> geometry.h Projection()
-D3DVECTOR   Projection(const D3DVECTOR &a, const D3DVECTOR &b, const D3DVECTOR &p);
-
-//>>> geometry.h DistanceToPlane()
-float       DistancePlanPoint(const D3DVECTOR &a, const D3DVECTOR &b, const D3DVECTOR &c, const D3DVECTOR &p);
-
-//>>> geometry.h IsSamePlane()
-bool            IsSamePlane(D3DVECTOR *plan1, D3DVECTOR *plan2);
-
-//>>> geometry.h LoadRotationXZYMatrix()
-void            MatRotateXZY(D3DMATRIX &mat, D3DVECTOR angle);
-
-//>>> geometry.h LoadRotationZXYMatrix()
-void            MatRotateZXY(D3DMATRIX &mat, D3DVECTOR angle);
-
-
-
-// UNUSED
-float       MidPoint(FPOINT a, FPOINT b, float px);
-
-// UNUSED
-bool        LineFunction(FPOINT p1, FPOINT p2, float &a, float &b);
-
-
-
-
-// Returns true if two numbers are nearly equal.
-
-bool IsEqual(float a, float b)
-{
-    return Abs(a-b) < MATH3D_CHOUIA;
-}
-
-
-// Returns the minimum value.
-
-float Min(float a, float b)
-{
-    if ( a <= b )  return a;
-    else           return b;
-}
-
-float Min(float a, float b, float c)
-{
-    return Min( Min(a,b), c );
-}
-
-float Min(float a, float b, float c, float d)
-{
-    return Min( Min(a,b), Min(c,d) );
-}
-
-float Min(float a, float b, float c, float d, float e)
-{
-    return Min( Min(a,b), Min(c,d), e );
-}
-
-
-// Returns the maximum value.
-
-float Max(float a, float b)
-{
-    if ( a >= b )  return a;
-    else           return b;
-}
-
-float Max(float a, float b, float c)
-{
-    return Max( Max(a,b), c );
-}
-
-float Max(float a, float b, float c, float d)
-{
-    return Max( Max(a,b), Max(c,d) );
-}
-
-float Max(float a, float b, float c, float d, float e)
-{
-    return Max( Max(a,b), Max(c,d), e );
-}
-
-
-// Returns the normalized value (0 .. 1).
-
-float Norm(float a)
-{
-    if ( a < 0.0f )  return 0.0f;
-    if ( a > 1.0f )  return 1.0f;
-    return a;
-}
-
-
-// Returns the absolute value of a number.
-
-float Abs(float a)
-{
-    return (float)fabs(a);
-}
-
-
-// Swaps two integers.
-
-void Swap(int &a, int &b)
-{
-    int     c;
-
-    c = a;
-    a = b;
-    b = c;
-}
-
-// Swaps two real numbers.
-
-void Swap(float &a, float &b)
-{
-    float   c;
-
-    c = a;
-    a = b;
-    b = c;
-}
-
-// Permutes two points.
-
-void Swap(FPOINT &a, FPOINT &b)
-{
-    FPOINT  c;
-
-    c = a;
-    a = b;
-    b = c;
-}
-
-// Returns the modulo of a floating point number.
-//  Mod(8.1, 4) = 0.1
-//  Mod(n, 1) = fractional part of n
-
-float Mod(float a, float m)
-{
-    return a - ((int)(a/m))*m;
-}
-
-// Returns a normalized angle, that is in other words between 0 and 2 * MATH3D_PI.
-
-float NormAngle(float angle)
-{
-    angle = Mod(angle, MATH3D_PI*2.0f);
-    if ( angle < 0.0f )
-    {
-        return MATH3D_PI*2.0f + angle;
-    }
-    else
-    {
-        return angle;
-    }
-}
-
-// Test if a angle is between two terminals.
-
-bool TestAngle(float angle, float min, float max)
-{
-    angle = NormAngle(angle);
-    min   = NormAngle(min);
-    max   = NormAngle(max);
-
-    if ( min > max )
-    {
-        return ( angle <= max || angle >= min );
-    }
-    else
-    {
-        return ( angle >= min && angle <= max );
-    }
-}
-
-
-// Calculates the angle to rotate the angle a to the angle g.
-// A positive angle is counterclockwise (CCW).
-
-float Direction(float a, float g)
-{
-    a = NormAngle(a);
-    g = NormAngle(g);
-
-    if ( a < g )
-    {
-        if ( a+MATH3D_PI*2.0f-g < g-a )  a += MATH3D_PI*2.0f;
-    }
-    else
-    {
-        if ( g+MATH3D_PI*2.0f-a < a-g )  g += MATH3D_PI*2.0f;
-    }
-    return (g-a);
-}
-
-
-// Rotates a point around a center.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-FPOINT RotatePoint(FPOINT center, float angle, FPOINT p)
-{
-    FPOINT  a, b;
-
-    a.x = p.x-center.x;
-    a.y = p.y-center.y;
-
-    b.x = a.x*cosf(angle) - a.y*sinf(angle);
-    b.y = a.x*sinf(angle) + a.y*cosf(angle);
-
-    b.x += center.x;
-    b.y += center.y;
-    return b;
-}
-
-// Rotates a point around the origin.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-FPOINT RotatePoint(float angle, FPOINT p)
-{
-    FPOINT  a;
-
-    a.x = p.x*cosf(angle) - p.y*sinf(angle);
-    a.y = p.x*sinf(angle) + p.y*cosf(angle);
-
-    return a;
-}
-
-// Rotates a vector (dist, 0).
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-FPOINT RotatePoint(float angle, float dist)
-{
-    FPOINT  a;
-
-    a.x = dist*cosf(angle);
-    a.y = dist*sinf(angle);
-
-    return a;
-}
-
-// Calculates the angle of a right triangle.
-// The angle is counterclockwise (CCW), between 0 and 2 * MATH3D_PI.
-// For an angle clockwise (CW), just go ahead.
-//
-//      ^
-//      |
-//    y o----o
-//      |  / |
-//      |/)a |
-//  ----o----o-->
-//      |    x
-//      |
-
-float RotateAngle(float x, float y)
-{
-#if 1
-    if ( x == 0.0f && y == 0.0f )  return 0.0f;
-
-    if ( x >= 0.0f )
-    {
-        if ( y >= 0.0f )
-        {
-            if ( x > y )  return           atanf(y/x);
-            else          return MATH3D_PI*0.5f - atanf(x/y);
-        }
-        else
-        {
-            if ( x > -y )  return MATH3D_PI*2.0f + atanf(y/x);
-            else           return MATH3D_PI*1.5f - atanf(x/y);
-        }
-    }
-    else
-    {
-        if ( y >= 0.0f )
-        {
-            if ( -x > y )  return MATH3D_PI*1.0f + atanf(y/x);
-            else           return MATH3D_PI*0.5f - atanf(x/y);
-        }
-        else
-        {
-            if ( -x > -y )  return MATH3D_PI*1.0f + atanf(y/x);
-            else            return MATH3D_PI*1.5f - atanf(x/y);
-        }
-    }
-#else
-    float   angle;
-
-    if ( x == 0.0f )
-    {
-        if ( y > 0.0f )
-        {
-            return 90.0f*MATH3D_PI/180.0f;
-        }
-        else
-        {
-            return 270.0f*MATH3D_PI/180.0f;
-        }
-    }
-    else
-    {
-        angle = atanf(y/x);
-        if ( x < 0.0f )
-        {
-            angle += MATH3D_PI;
-        }
-        return angle;
-    }
-#endif
-}
-
-// Calculates the angle between two points and one center.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-float RotateAngle(FPOINT center, FPOINT p1, FPOINT p2)
-{
-    float   a1, a2, a;
-
-    if ( p1.x == center.x &&
-         p1.y == center.y )  return 0;
-
-    if ( p2.x == center.x &&
-         p2.y == center.y )  return 0;
-
-    a1 = asinf((p1.y-center.y)/Length(p1,center));
-    a2 = asinf((p2.y-center.y)/Length(p2,center));
-
-    if ( p1.x < center.x )  a1 = MATH3D_PI-a1;
-    if ( p2.x < center.x )  a2 = MATH3D_PI-a2;
-
-    a = a2-a1;
-    if ( a < 0 )  a += MATH3D_PI*2;
-    return a;
-}
-
-// Returns py up on the line ab.
-
-float MidPoint(FPOINT a, FPOINT b, float px)
-{
-    if ( Abs(a.x-b.x) < MATH3D_CHOUIA )
-    {
-        if ( a.y < b.y )  return  MATH3D_BEAUCOUP;
-        else              return -MATH3D_BEAUCOUP;
-    }
-    return (b.y-a.y)*(px-a.x)/(b.x-a.x)+a.y;
-}
-
-// Advance "dist" along the segment p1-p2.
-
-D3DVECTOR SegmentDist(const D3DVECTOR &p1, const D3DVECTOR &p2, float dist)
-{
-    return p1+Normalize(p2-p1)*dist;
-}
-
-// Check if a point is inside a triangle.
-
-bool IsInsideTriangle(FPOINT a, FPOINT b, FPOINT c, FPOINT p)
-{
-    float   n, m;
-
-    if ( p.x < a.x && p.x < b.x && p.x < c.x )  return false;
-    if ( p.x > a.x && p.x > b.x && p.x > c.x )  return false;
-    if ( p.y < a.y && p.y < b.y && p.y < c.y )  return false;
-    if ( p.y > a.y && p.y > b.y && p.y > c.y )  return false;
-
-    if ( a.x > b.x )  Swap(a,b);
-    if ( a.x > c.x )  Swap(a,c);
-    if ( c.x < a.x )  Swap(c,a);
-    if ( c.x < b.x )  Swap(c,b);
-
-    n = MidPoint(a, b, p.x);
-    m = MidPoint(a, c, p.x);
-    if ( (n>p.y||p.y>m) && (n<p.y||p.y<m) )  return false;
-
-    n = MidPoint(c, b, p.x);
-    m = MidPoint(c, a, p.x);
-    if ( (n>p.y||p.y>m) && (n<p.y||p.y<m) )  return false;
-
-    return true;
-}
-
-// Calculates the intersection "i" right "of" the plan "abc".
-
-bool Intersect(D3DVECTOR a, D3DVECTOR b, D3DVECTOR c,
-               D3DVECTOR d, D3DVECTOR e, D3DVECTOR &i)
-{
-    float   d1, d2;
-
-    d1 = (d.x-a.x)*((b.y-a.y)*(c.z-a.z)-(c.y-a.y)*(b.z-a.z)) -
-         (d.y-a.y)*((b.x-a.x)*(c.z-a.z)-(c.x-a.x)*(b.z-a.z)) +
-         (d.z-a.z)*((b.x-a.x)*(c.y-a.y)-(c.x-a.x)*(b.y-a.y));
-
-    d2 = (d.x-e.x)*((b.y-a.y)*(c.z-a.z)-(c.y-a.y)*(b.z-a.z)) -
-         (d.y-e.y)*((b.x-a.x)*(c.z-a.z)-(c.x-a.x)*(b.z-a.z)) +
-         (d.z-e.z)*((b.x-a.x)*(c.y-a.y)-(c.x-a.x)*(b.y-a.y));
-
-    if ( d2 == 0 )  return false;
-
-    i.x = d.x + d1/d2*(e.x-d.x);
-    i.y = d.y + d1/d2*(e.y-d.y);
-    i.z = d.z + d1/d2*(e.z-d.z);
-    return true;
-}
-
-// Calculates the intersection of the straight line passing through p (x, z)
-// parallel to the y axis, with the plane abc. Returns p.y.
-
-bool IntersectY(D3DVECTOR a, D3DVECTOR b, D3DVECTOR c, D3DVECTOR &p)
-{
-#if 0
-    D3DVECTOR   d,e,i;
-
-    d.x = p.x;
-    d.y = 0.0f;
-    d.z = p.z;
-    e.x = p.x;
-    e.y = 1.0f;
-    e.z = p.z;
-    if ( !Intersect(a,b,c,d,e,i) )  return false;
-    p.y = i.y;
-    return true;
-#else
-    float   d, d1, d2;
-
-    d  = (b.x-a.x)*(c.z-a.z) - (c.x-a.x)*(b.z-a.z);
-    d1 = (p.x-a.x)*(c.z-a.z) - (c.x-a.x)*(p.z-a.z);
-    d2 = (b.x-a.x)*(p.z-a.z) - (p.x-a.x)*(b.z-a.z);
-
-    if ( d == 0.0f )  return false;
-
-    p.y = a.y + d1/d*(b.y-a.y) + d2/d*(c.y-a.y);
-    return true;
-#endif
-}
-
-
-// Rotates a point around a center in the plan.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-void RotatePoint(float cx, float cy, float angle, float &px, float &py)
-{
-    float   ax, ay;
-
-    px -= cx;
-    py -= cy;
-
-    ax = px*cosf(angle) - py*sinf(angle);
-    ay = px*sinf(angle) + py*cosf(angle);
-
-    px = cx+ax;
-    py = cy+ay;
-}
-
-// Rotates a point around a center in space.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-void RotatePoint(D3DVECTOR center, float angleH, float angleV, D3DVECTOR &p)
-{
-    D3DVECTOR   a, b;
-
-    p.x -= center.x;
-    p.y -= center.y;
-    p.z -= center.z;
-
-    b.x = p.x*cosf(angleH) - p.z*sinf(angleH);
-    b.y = p.z*sinf(angleV) + p.y*cosf(angleV);
-    b.z = p.x*sinf(angleH) + p.z*cosf(angleH);
-
-    p.x = center.x+b.x;
-    p.y = center.y+b.y;
-    p.z = center.z+b.z;
-}
-
-// Rotates a point around a center in space.
-// The angle is in radians.
-// A positive angle is counterclockwise (CCW).
-
-void RotatePoint2(D3DVECTOR center, float angleH, float angleV, D3DVECTOR &p)
-{
-    D3DVECTOR   a, b;
-
-    p.x -= center.x;
-    p.y -= center.y;
-    p.z -= center.z;
-
-    a.x = p.x*cosf(angleH) - p.z*sinf(angleH);
-    a.y = p.y;
-    a.z = p.x*sinf(angleH) + p.z*cosf(angleH);
-
-    b.x = a.x;
-    b.y = a.z*sinf(angleV) + a.y*cosf(angleV);
-    b.z = a.z*cosf(angleV) - a.y*sinf(angleV);
-
-    p.x = center.x+b.x;
-    p.y = center.y+b.y;
-    p.z = center.z+b.z;
-}
-
-// Calculation point of view to look at a center
-// two angles and a distance.
-
-D3DVECTOR RotateView(D3DVECTOR center, float angleH, float angleV, float dist)
-{
-    D3DMATRIX   mat1, mat2, mat;
-    D3DVECTOR   eye;
-
-    D3DUtil_SetRotateZMatrix(mat1, -angleV);
-    D3DUtil_SetRotateYMatrix(mat2, -angleH);
-    D3DMath_MatrixMultiply(mat, mat1, mat2);
-
-    eye.x = 0.0f+dist;
-    eye.y = 0.0f;
-    eye.z = 0.0f;
-    eye = Transform(mat, eye);
-
-    return eye+center;
-}
-
-// Calculates the end point.
-
-D3DVECTOR LookatPoint( D3DVECTOR eye, float angleH, float angleV, float length )
-{
-    D3DVECTOR   lookat;
-
-    lookat = eye;
-    lookat.z += length;
-
-//? RotatePoint(eye.x, eye.z, angleH, lookat.x, lookat.z);
-//? RotatePoint(eye.z, eye.y, angleV, lookat.z, lookat.y);
-    RotatePoint(eye, angleH, angleV, lookat);
-
-    return lookat;
-}
-
-
-// Returns the distance between two points.
-
-float Length(FPOINT a, FPOINT b)
-{
-    return sqrtf( (a.x-b.x)*(a.x-b.x) +
-                  (a.y-b.y)*(a.y-b.y) );
-}
-
-// Returns the hypotenuse of a right triangle.
-
-float Length(float x, float y)
-{
-    return sqrtf( (x*x) + (y*y) );
-}
-
-// Returns the length of a vector.
-
-float Length(const D3DVECTOR &u)
-{
-    return sqrtf( (u.x*u.x) + (u.y*u.y) + (u.z*u.z) );
-}
-
-// Returns the distance between two points.
-
-float Length(const D3DVECTOR &a, const D3DVECTOR &b)
-{
-    return sqrtf( (a.x-b.x)*(a.x-b.x) +
-                  (a.y-b.y)*(a.y-b.y) +
-                  (a.z-b.z)*(a.z-b.z) );
-}
-
-// Returns the distance "a flat" between two points.
-
-float Length2d(const D3DVECTOR &a, const D3DVECTOR &b)
-{
-    return sqrtf( (a.x-b.x)*(a.x-b.x) +
-                  (a.z-b.z)*(a.z-b.z) );
-}
-
-
-// Returns the angle formed by two vectors.
-
-float Angle( D3DVECTOR u, D3DVECTOR v )
-{
-#if 0
-    return acosf( Abs(u.x*v.x + u.y*v.y + u.z*v.z) / (Length(u)*Length(v)) );
-#endif
-#if 0
-    float   d;
-    d = (u.y*v.z-u.z*v.y) + (u.z*v.x-u.x*v.z) + (u.x*v.y-u.y*v.x);
-    return asinf( Abs(d) / (Length(u)*Length(v)) );
-#endif
-#if 0
-    return asinf( Length(Cross(u,v)) / (Length(u)*Length(v)) );
-#endif
-#if 1
-    float   len, a, b;
-
-    len = Length(u)*Length(v);
-    a = acosf( (u.x*v.x + u.y*v.y + u.z*v.z) / len );
-    b = asinf( Length(Cross(u,v)) / len );
-    return a;
-#endif
-}
-
-// Returns the product of two vectors.
-
-D3DVECTOR Cross( D3DVECTOR u, D3DVECTOR v )
-{
-    return D3DVECTOR( u.y*v.z - u.z*v.y,
-                      u.z*v.x - u.x*v.z,
-                      u.x*v.y - u.y*v.x );
-}
-
-// Returns the normal vector of a triangular face.
-
-D3DVECTOR ComputeNormal( D3DVECTOR p1, D3DVECTOR p2, D3DVECTOR p3 )
-{
-    D3DVECTOR   u, v;
-
-    u = D3DVECTOR( p3.x-p1.x, p3.y-p1.y, p3.z-p1.z );
-    v = D3DVECTOR( p2.x-p1.x, p2.y-p1.y, p2.z-p1.z );
-
-    return Normalize(Cross(u, v));
-}
-
-
-// Transforms a point in a matrix, in exactly the same manner as Direct3D.
-
-D3DVECTOR Transform(const D3DMATRIX &m, D3DVECTOR p)
-{
-    D3DVECTOR   pp;
-
-    pp.x = p.x*m._11 + p.y*m._21 + p.z*m._31 + m._41;
-    pp.y = p.x*m._12 + p.y*m._22 + p.z*m._32 + m._42;
-    pp.z = p.x*m._13 + p.y*m._23 + p.z*m._33 + m._43;
-
-    return pp;
-}
-
-
-// Calculates the projection of a point P on a straight line AB.
-
-D3DVECTOR Projection(const D3DVECTOR &a, const D3DVECTOR &b, const D3DVECTOR &p)
-{
-    float       k;
-
-    k  = (b.x-a.x)*(p.x-a.x) + (b.y-a.y)*(p.y-a.y) + (b.z-a.z)*(p.z-a.z);
-    k /= (b.x-a.x)*(b.x-a.x) + (b.y-a.y)*(b.y-a.y) + (b.z-a.z)*(b.z-a.z);
-
-    return a + k*(b-a);
-}
-
-// The texture plate in the xz plane.
-
-void MappingObject(D3DVERTEX2* pVertices, int nb, float scale)
-{
-    int     i;
-
-    for ( i=0 ; i<nb ; i++ )
-    {
-        pVertices[i].tu = pVertices[i].x*scale;
-        pVertices[i].tv = pVertices[i].z*scale;
-    }
-}
-
-// Smooths normal.
-
-void SmoothObject(D3DVERTEX2* pVertices, int nb)
-{
-    char*       bDone;
-    int         index[100];
-    int         i, j, rank;
-    D3DVECTOR   sum;
-
-    bDone = (char*)malloc(nb*sizeof(char));
-    ZeroMemory(bDone, nb*sizeof(char));
-
-    for ( i=0 ; i<nb ; i++ )
-    {
-        bDone[i] = true;
-        rank = 0;
-        index[rank++] = i;
-
-        for ( j=0 ; j<nb ; j++ )
-        {
-            if ( bDone[j] )  continue;
-            if ( pVertices[j].x == pVertices[i].x &&
-                 pVertices[j].y == pVertices[i].y &&
-                 pVertices[j].z == pVertices[i].z )
-            {
-                bDone[j] = true;
-                index[rank++] = j;
-                if ( rank >= 100 )  break;
-            }
-        }
-
-        sum.x = 0;
-        sum.y = 0;
-        sum.z = 0;
-        for ( j=0 ; j<rank ; j++ )
-        {
-            sum.x += pVertices[index[j]].nx;
-            sum.y += pVertices[index[j]].ny;
-            sum.z += pVertices[index[j]].nz;
-        }
-        sum = Normalize(sum);
-
-        for ( j=0 ; j<rank ; j++ )
-        {
-            pVertices[index[j]].nx = sum.x;
-            pVertices[index[j]].ny = sum.y;
-            pVertices[index[j]].nz = sum.z;
-        }
-    }
-
-    free(bDone);
-}
-
-
-
-// Calculates the parameters a and b of the segment passing
-// through the points p1 and p2, knowing that:
-//      f(x) = ax+b
-// Returns false if the line is vertical.
-
-bool LineFunction(FPOINT p1, FPOINT p2, float &a, float &b)
-{
-    if ( D3DMath_IsZero(p1.x-p2.x) )
-    {
-        a = g_HUGE;  // infinite slope!
-        b = p2.x;
-        return false;
-    }
-
-    a = (p2.y-p1.y)/(p2.x-p1.x);
-    b = p2.y - p2.x*a;
-    return true;
-}
-
-
-// Calculates the distance between a plane ABC and a point P.
-
-float DistancePlanPoint(const D3DVECTOR &a, const D3DVECTOR &b,
-                        const D3DVECTOR &c, const D3DVECTOR &p)
-{
-    D3DVECTOR   n;
-    float       aa,bb,cc,dd;
-
-    n = ComputeNormal(a,b,c);
-
-    aa = n.x;
-    bb = n.y;
-    cc = n.z;
-    dd = -(n.x*a.x + n.y*a.y + n.z*a.z);
-
-    return Abs(aa*p.x + bb*p.y + cc*p.z + dd);
-}
-
-// Check if two planes defined by 3 points are part of the same plan.
-
-bool IsSamePlane(D3DVECTOR *plan1, D3DVECTOR *plan2)
-{
-    D3DVECTOR   n1, n2;
-    float       dist;
-
-    n1 = ComputeNormal(plan1[0], plan1[1], plan1[2]);
-    n2 = ComputeNormal(plan2[0], plan2[1], plan2[2]);
-
-    if ( Abs(n1.x-n2.x) > 0.1f ||
-         Abs(n1.y-n2.y) > 0.1f ||
-         Abs(n1.z-n2.z) > 0.1f )  return false;
-
-    dist = DistancePlanPoint(plan1[0], plan1[1], plan1[2], plan2[0]);
-    if ( dist > 0.1f )  return false;
-
-    return true;
-}
-
-
-// Calculates the matrix to make three rotations in the X, Y and Z
-// >>>>>> OPTIMIZING!!!
-
-void MatRotateXZY(D3DMATRIX &mat, D3DVECTOR angle)
-{
-    D3DMATRIX   temp;
-
-    D3DUtil_SetRotateXMatrix(temp, angle.x);
-    D3DUtil_SetRotateZMatrix(mat, angle.z);
-    D3DMath_MatrixMultiply(mat, mat, temp);
-    D3DUtil_SetRotateYMatrix(temp, angle.y);
-    D3DMath_MatrixMultiply(mat, mat, temp);  // X-Z-Y
-}
-
-// Calculates the matrix to make three rotations in the order Z, X and Y.
-// >>>>>> OPTIMIZING!!!
-
-void MatRotateZXY(D3DMATRIX &mat, D3DVECTOR angle)
-{
-    D3DMATRIX   temp;
-
-    D3DUtil_SetRotateZMatrix(temp, angle.z);
-    D3DUtil_SetRotateXMatrix(mat, angle.x);
-    D3DMath_MatrixMultiply(mat, mat, temp);
-    D3DUtil_SetRotateYMatrix(temp, angle.y);
-    D3DMath_MatrixMultiply(mat, mat, temp);  // Z-X-Y
-}
-
-
-// Returns a random value between 0 and 1.
-
-float Rand()
-{
-    return (float)rand()/RAND_MAX;
-}
-
-
-// Managing the dead zone of a joystick.
-
-//  in:   -1            0            1
-//       --|-------|----o----|-------|-->
-//                      <---->
-//                       dead
-//  out:  -1       0         0       1
-
-float Neutral(float value, float dead)
-{
-    if ( Abs(value) <= dead )
-    {
-        return 0.0f;
-    }
-    else
-    {
-        if ( value > 0.0f )  return (value-dead)/(1.0f-dead);
-        else                 return (value+dead)/(1.0f-dead);
-    }
-}
-
-
-// Calculates a value (radians) proportional between a and b (degrees).
-
-float Prop(int a, int b, float p)
-{
-    float   aa, bb;
-
-    aa = (float)a*MATH3D_PI/180.0f;
-    bb = (float)b*MATH3D_PI/180.0f;
-
-    return aa+p*(bb-aa);
-}
-
-// Gently advanced a desired value from its current value.
-// Over time, the greater the progression is rapid.
-
-float Smooth(float actual, float hope, float time)
-{
-    float   futur;
-
-    futur = actual + (hope-actual)*time;
-
-    if ( hope > actual )
-    {
-        if ( futur > hope )  futur = hope;
-    }
-    if ( hope < actual )
-    {
-        if ( futur < hope )  futur = hope;
-    }
-
-    return futur;
-}
-
-
-// Bounces any movement.
-
-//  out
-//   |
-//  1+------o-------o---
-//   |    o | o   o |  | bounce
-//   |   o  |   o---|---
-//   |  o   |       |
-//   | o    |       |
-//  -o------|-------+----> progress
-//  0|      |       1
-//   |<---->|middle
-
-float Bounce(float progress, float middle, float bounce)
-{
-    if ( progress < middle )
-    {
-        progress = progress/middle;  // 0..1
-        return 0.5f+sinf(progress*MATH3D_PI-MATH3D_PI/2.0f)/2.0f;
-    }
-    else
-    {
-        progress = (progress-middle)/(1.0f-middle);  // 0..1
-        return (1.0f-bounce/2.0f)+sinf((0.5f+progress*2.0f)*MATH3D_PI)*(bounce/2.0f);
-    }
-}
-
-
-// Returns the color corresponding D3DCOLOR.
-
-D3DCOLOR RetColor(float intensity)
-{
-    D3DCOLOR    color;
-
-    if ( intensity <= 0.0f )  return 0x00000000;
-    if ( intensity >= 1.0f )  return 0xffffffff;
-
-    color  = (int)(intensity*255.0f)<<24;
-    color |= (int)(intensity*255.0f)<<16;
-    color |= (int)(intensity*255.0f)<<8;
-    color |= (int)(intensity*255.0f);
-
-    return color;
-}
-
-// Returns the color corresponding D3DCOLOR.
-
-D3DCOLOR RetColor(D3DCOLORVALUE intensity)
-{
-    D3DCOLOR    color;
-
-    color  = (int)(intensity.a*255.0f)<<24;
-    color |= (int)(intensity.r*255.0f)<<16;
-    color |= (int)(intensity.g*255.0f)<<8;
-    color |= (int)(intensity.b*255.0f);
-
-    return color;
-}
-
-// Returns the color corresponding D3DCOLORVALUE.
-
-D3DCOLORVALUE RetColor(D3DCOLOR intensity)
-{
-    D3DCOLORVALUE   color;
-
-    color.r = (float)((intensity>>16)&0xff)/256.0f;
-    color.g = (float)((intensity>>8 )&0xff)/256.0f;
-    color.b = (float)((intensity>>0 )&0xff)/256.0f;
-    color.a = (float)((intensity>>24)&0xff)/256.0f;
-
-    return color;
-}
-
-
-// RGB to HSV conversion.
-
-void RGB2HSV(D3DCOLORVALUE src, ColorHSV &dest)
-{
-    float   min, max, delta;
-
-    min = Min(src.r, src.g, src.b);
-    max = Max(src.r, src.g, src.b);
-
-    dest.v = max;  // intensity
-
-    if ( max == 0.0f )
-    {
-        dest.s = 0.0f;  // saturation
-        dest.h = 0.0f;  // undefined color!
-    }
-    else
-    {
-        delta = max-min;
-        dest.s = delta/max;  // saturation
-
-        if ( src.r == max )  // between yellow & magenta
-        {
-            dest.h = (src.g-src.b)/delta;
-        }
-        else if ( src.g == max )  // between cyan & yellow
-        {
-            dest.h = 2.0f+(src.b-src.r)/delta;
-        }
-        else  // between magenta & cyan
-        {
-            dest.h = 4.0f+(src.r-src.g)/delta;
-        }
-
-        dest.h *= 60.0f;  // in degrees
-        if ( dest.h < 0.0f )  dest.h += 360.0f;
-        dest.h /= 360.0f;  // 0..1
-    }
-}
-
-// HSV to RGB conversion.
-
-void HSV2RGB(ColorHSV src, D3DCOLORVALUE &dest)
-{
-    int     i;
-    float   f,v,p,q,t;
-
-    src.h = Norm(src.h)*360.0f;
-    src.s = Norm(src.s);
-    src.v = Norm(src.v);
-
-    if ( src.s == 0.0f )  // zero saturation?
-    {
-        dest.r = src.v;
-        dest.g = src.v;
-        dest.b = src.v;  // gray
-    }
-    else
-    {
-        if ( src.h == 360.0f )  src.h = 0.0f;
-        src.h /= 60.0f;
-        i = (int)src.h;  // integer part (0 .. 5)
-        f = src.h-i;     // fractional part
-
-        v = src.v;
-        p = src.v*(1.0f-src.s);
-        q = src.v*(1.0f-(src.s*f));
-        t = src.v*(1.0f-(src.s*(1.0f-f)));
-
-        switch (i)
-        {
-            case 0:  dest.r=v; dest.g=t; dest.b=p;  break;
-            case 1:  dest.r=q; dest.g=v; dest.b=p;  break;
-            case 2:  dest.r=p; dest.g=v; dest.b=t;  break;
-            case 3:  dest.r=p; dest.g=q; dest.b=v;  break;
-            case 4:  dest.r=t; dest.g=p; dest.b=v;  break;
-            case 5:  dest.r=v; dest.g=p; dest.b=q;  break;
-        }
-    }
-}
-
diff --git a/src/old/math3d.h b/src/old/math3d.h
deleted file mode 100644
index 54bc5ea..0000000
--- a/src/old/math3d.h
+++ /dev/null
@@ -1,48 +0,0 @@
-// * 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/.
-
-// math3d.h
-
-#pragma once
-
-
-#include <math.h>
-
-#include "common/struct.h"
-
-
-// TODO
-void            MappingObject( D3DVERTEX2* pVertices, int nb, float scale );
-
-// TODO
-void            SmoothObject( D3DVERTEX2* pVertices, int nb );
-
-// TODO
-D3DCOLOR        RetColor(float intensity);
-
-// TODO
-D3DCOLOR        RetColor(D3DCOLORVALUE intensity);
-
-// TODO
-D3DCOLORVALUE RetColor(D3DCOLOR intensity);
-
-// TODO
-void            RGB2HSV(D3DCOLORVALUE src, ColorHSV &dest);
-
-// TODO
-void            HSV2RGB(ColorHSV src, D3DCOLORVALUE &dest);
-
-
diff --git a/src/old/micent2.txt b/src/old/micent2.txt
deleted file mode 100644
index c77d91b..0000000
--- a/src/old/micent2.txt
+++ /dev/null
@@ -1,13 +0,0 @@
-\b;Rapport du satellite

-\c;

-\s;-> SURFACE\c;

-\tab;Température:      25.4 degrés

-\tab;Atmosphère:       oxygène, azote, ammoniaque

-\tab;Vent:             0.7 m/s

-\tab;Minerai titanium: aucun

-\tab;Minerai uranium:  aucun

-

-\s;-> SOUS-SOL\c;

-\tab;Energie:          aucune

-\tab;Minerai titanium: aucun

-\tab;Minerai uranium:  aucun

diff --git a/src/old/mixer.txt b/src/old/mixer.txt
deleted file mode 100644
index 2009c2a..0000000
--- a/src/old/mixer.txt
+++ /dev/null
@@ -1,486 +0,0 @@
-Several people have asked me for the sample code I use to program

-the mixer in Windows. Since it's a fairly short sample and there's

-clearly some interest, I thought I'd post it directly to the newsgroup.

-Here it is ... enjoy! (?)

-

-Julian

-

-// Example routine that manipulates the mixer controls for Win32

-// This code is not a stand-alone application ...

-//

-// It's also not very pretty ...

-//

-// But then, neither is the API ...

-//

-// Julian Bunn, 1998, julianb@altavista.net

-

-

-#include <windows.h>

-#include <mmsystem.h>

-

-

-MIXERCONTROLDETAILS mixDetailsMic,mixDetailsSpk,mixDetailsLin;

-LONG

-lMaximumSpk,lMaximumMic,lMaximumLin,lMinimumMic,lMinimumSpk,lMinimumLin;

-

-int         nMixerDevs;

-int         nMicMixID;

-

-LPHMIXER    hMixer;

-UINT        IdMixer;

-

-

-/****************************************************************************

-

-        Function: ProgramInitMixer()

-

-        PURPOSE : Initialises the mixer

-*****************************************************************************/

-

-LONG WINAPI ProgramInitMixer()

-{

- UINT iS,iD,iDC,iC, itype;

- UINT volume;

- MMRESULT mmres;

- MIXERCAPS mixCaps;

- MIXERLINE mixLine;

- MIXERLINECONTROLS mixControls;

- MIXERCONTROL mixClist[50];

- MIXERCONTROLDETAILS mixDetails;

- MIXERCONTROLDETAILS_UNSIGNED mixValue;

- MIXERCONTROLDETAILS_BOOLEAN mixMute;

- MIXERCONTROLDETAILS_BOOLEAN mixBoolean[50];

- MIXERCONTROLDETAILS_LISTTEXT mixList[50];

- BOOL bDoneMike = FALSE;

- BOOL bDoneSpkr = FALSE;

- UINT LineID = 0;

-

- if(!bMixerOpened) {

-// check first if we have a mixer

-    if((nMixerDevs = mixerGetNumDevs()) < 1) {

-       return (Program_ERROR);

-    }

-

-// really need to pop up a chooser for which mixer device, in

-// cases where there is more than one.

-// In the meantime, I select the last one listed

-

-    IdMixer = nMixerDevs-1;

-

-    mmres = mixerOpen((LPHMIXER) &hMixer, IdMixer, (DWORD) 0, (DWORD)

-NULL,

-          MIXER_OBJECTF_MIXER);

-    if(mmres != MMSYSERR_NOERROR) {

-           return (Program_ERROR);

-       }

-

-    bMixerOpened = TRUE;

- }

-

- mmres = mixerGetDevCaps(IdMixer, (LPMIXERCAPS) &mixCaps,

-sizeof(MIXERCAPS));

- if(mmres != MMSYSERR_NOERROR) {

-        return (Program_ERROR);

-    }

-// Set the manufacturer's name for the mixer ...

-    SetDlgItemText(hWndDialogBox,IDC_MIXERNAME,mixCaps.szPname);

-    if(nMixerDevs>1) {

-       DialogBox(g_hInstance,MAKEINTRESOURCE(IDD_INFOMESSAGE1),

-hWndDialogBox, DialogBoxCallback);

-    }

-

-

-// Loop over the destination mixer lines

- for (iD=0;iD<mixCaps.cDestinations;iD++) {

-      mixLine.cbStruct = sizeof(MIXERLINE);

-      mixLine.dwDestination = (DWORD) iD;

-   mixLine.dwSource = (DWORD) 0;

-// Get information on this line

-   mmres = mixerGetLineInfo(hMixer, (LPMIXERLINE) &mixLine,

-        MIXER_GETLINEINFOF_DESTINATION);

-

-         if(mmres != MMSYSERR_NOERROR) {

-               return (Program_ERROR);

-            }

-

-// I select types I'm interested in: the speaker output, the input

-(voice and wave)

-   itype = 0;

-   if(mixLine.dwComponentType == MIXERLINE_COMPONENTTYPE_DST_SPEAKERS)

-itype = 1; // Output for speakers ... only allow WAVEOUT

-                  if(mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_DST_VOICEIN)   itype = 2; // Input for ADC ...

-only allow Microphone (or AUX)

-                  if(mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_DST_WAVEIN)   itype = 2; // Input for ADC ...

-only allow Microphone (or AUX)

-   if(itype == 2 && !bMicrophone) {

-    itype = 3;

-   }

-

-

-      mixControls.cbStruct = sizeof(MIXERLINECONTROLS);

-      mixControls.dwLineID = mixLine.dwLineID;

-      mixControls.cControls = mixLine.cControls;

-      mixControls.cbmxctrl = sizeof(mixClist[0]);

-      mixControls.pamxctrl = (LPMIXERCONTROL) &mixClist[0];

-// Get the controls for the current destination mixer line

-      mmres = mixerGetLineControls(hMixer,

-       (LPMIXERLINECONTROLS) &mixControls,

-    MIXER_GETLINECONTROLSF_ALL);

-         if(mmres != MMSYSERR_NOERROR) {

-               return (Program_ERROR);

-              }

-            for (iDC=0;iDC<mixLine.cControls;iDC++) {

-// For this control, I make various checks on its type

-    if(mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_MUX ||

-                           mixClist[iDC].dwControlType ==

-MIXERCONTROL_CONTROLTYPE_MIXER) {

-

-// This is a control that defines a set of connections ... get all the

-types, and the values

-// for the connection

-       mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-       mixDetails.dwControlID = mixClist[iDC].dwControlID;

-       mixDetails.cChannels = 1;//mixLine.cChannels;

-       mixDetails.hwndOwner = (HWND) mixClist[iDC].cMultipleItems;

-       mixDetails.cbDetails = sizeof(MIXERCONTROLDETAILS_LISTTEXT);

-       mixDetails.paDetails = (LPMIXERCONTROLDETAILS_LISTTEXT)

-&mixList[0];

-                           mmres = mixerGetControlDetails(hMixer,

-         (LPMIXERCONTROLDETAILS) &mixDetails,

-      MIXER_GETCONTROLDETAILSF_LISTTEXT);

-                      if(mmres != MMSYSERR_NOERROR) {

-                                return (Program_ERROR);

-                           }

-

-       mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-       mixDetails.dwControlID = mixClist[iDC].dwControlID;

-       mixDetails.cChannels = 1;//mixLine.cChannels;

-       mixDetails.hwndOwner = (HWND) mixClist[iDC].cMultipleItems;

-       mixDetails.cbDetails = sizeof(MIXERCONTROLDETAILS_BOOLEAN);

-       mixDetails.paDetails = (LPMIXERCONTROLDETAILS_BOOLEAN)

-&mixBoolean[0];

-                           mmres = mixerGetControlDetails(hMixer,

-         (LPMIXERCONTROLDETAILS) &mixDetails,

-      MIXER_GETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                              return (Program_ERROR);

-                           }

-// In this application, I want to set only the microphone or line as

-input sources ...

-

-for(iS=0;iS<mixClist[iDC].cMultipleItems;iS++) {

-        mixBoolean[iS].fValue = FALSE;

-                                 if(itype == 2 && mixList[iS].dwParam2

-== MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE) {

-         mixBoolean[iS].fValue = TRUE;

-         bDoneMike = TRUE;

-        }

-                                 if(itype == 3 && (mixList[iS].dwParam2

-== MIXERLINE_COMPONENTTYPE_SRC_LINE ||

-                       mixList[iS].dwParam2 ==

-MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY)) {

-         if(strncmp(mixList[iS].szName,"Line",4) == 0) {

-            mixBoolean[iS].fValue = TRUE;

-            bDoneMike = TRUE;

-         }

-        }

-        if(itype == 1 && mixList[iS].dwParam2 ==

-MIXERLINE_COMPONENTTYPE_DST_SPEAKERS) {

-                                       mixBoolean[iS].fValue = TRUE;

-         bDoneSpkr = TRUE;

-                                 }

-       }

-// I've prepared the settings accordingly ... now I set them in the

-mixer

-       mmres = mixerSetControlDetails(hMixer,

-            (LPMIXERCONTROLDETAILS) &mixDetails,

-          MIXER_SETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                                return (Program_ERROR);

-                           }

-    }

-    if(mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_VOLUME ||

-

-       mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_TREBLE ||

-

-       mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_BASS) {

-// This is a control of a volume

-       volume = 0;

-

-       mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-       mixDetails.dwControlID = mixClist[iDC].dwControlID;

-       mixDetails.cChannels = (DWORD) 1;

-       mixDetails.hwndOwner = NULL;

-       mixDetails.cbDetails = sizeof(MIXERCONTROLDETAILS_UNSIGNED);

-       mixDetails.paDetails = (LPMIXERCONTROLDETAILS_UNSIGNED)

-&mixValue;

-                           mmres = mixerGetControlDetails(hMixer,

-         (LPMIXERCONTROLDETAILS) &mixDetails,

-      MIXER_GETCONTROLDETAILSF_VALUE);

-

-                      if(mmres != MMSYSERR_NOERROR) {

-                               return (Program_ERROR);

-                           }

-// I want to set all volumes to maximum, treble and bass boost to

-minimum

-       if(mixClist[iDC].dwControlType ==

-MIXERCONTROL_CONTROLTYPE_VOLUME) {

-           if(mixValue.dwValue != 0) mixValue.dwValue =

-mixClist[iDC].Bounds.lMaximum;

-       } else {

-           mixValue.dwValue = mixClist[iDC].Bounds.lMinimum;

-       }

-       mmres = mixerSetControlDetails(hMixer,

-         (LPMIXERCONTROLDETAILS) &mixDetails,

-      MIXER_SETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                               return (Program_ERROR);

-                           }

-    }

-    if(mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_MUTE) {

-// A mute control _in principle_ I've already set all these up ...

-             mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-       mixDetails.dwControlID = mixClist[iDC].dwControlID;

-       mixDetails.cChannels = (DWORD) 1;

-       mixDetails.hwndOwner = NULL;

-       mixDetails.cbDetails = sizeof(MIXERCONTROLDETAILS_BOOLEAN);

-       mixDetails.paDetails = (LPMIXERCONTROLDETAILS_BOOLEAN) &mixMute;

-                           mmres = mixerGetControlDetails(hMixer,

-            (LPMIXERCONTROLDETAILS) &mixDetails,

-            MIXER_GETCONTROLDETAILSF_VALUE);

-       mixMute.fValue = mixClist[iDC].Bounds.lMinimum;

-       mmres = mixerSetControlDetails(hMixer,

-           (LPMIXERCONTROLDETAILS) &mixDetails,

-           MIXER_SETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                               return (Program_ERROR);

-                           }

-    }

-    if(mixClist[iDC].dwControlType == MIXERCONTROL_CONTROLTYPE_ONOFF) {

-// An "on-off" control ... sort of like a mute, but different (used e.g

-for AGC)

-             mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-       mixDetails.dwControlID = mixClist[iDC].dwControlID;

-       mixDetails.cChannels = (DWORD) 1;

-       mixDetails.hwndOwner = NULL;

-       mixDetails.cbDetails = sizeof(MIXERCONTROLDETAILS_BOOLEAN);

-       mixDetails.paDetails = (LPMIXERCONTROLDETAILS_BOOLEAN) &mixMute;

-                           mmres = mixerGetControlDetails(hMixer,

-            (LPMIXERCONTROLDETAILS) &mixDetails,

-            MIXER_GETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                               return (Program_ERROR);

-                           }

-       mixMute.fValue = mixClist[iDC].Bounds.lMinimum;

-       mmres = mixerSetControlDetails(hMixer,

-           (LPMIXERCONTROLDETAILS) &mixDetails,

-           MIXER_SETCONTROLDETAILSF_VALUE);

-                      if(mmres != MMSYSERR_NOERROR) {

-                               return (Program_ERROR);

-                           }

-    }

-

-   }

-

-

-   iDC = mixLine.cConnections;

-// Now I start looking over all the source lines coming into this mixer

-line ..

-   for (iS=0;iS<iDC;iS++) {

-               mixLine.cbStruct = sizeof(MIXERLINE);

-                 mixLine.dwDestination = (DWORD) iD;

-            mixLine.dwSource = (DWORD) iS;

-

-          mmres = mixerGetLineInfo(hMixer, (LPMIXERLINE) &mixLine,

-            MIXER_GETLINEINFOF_SOURCE);

-                    if(mmres != MMSYSERR_NOERROR) {

-                            return (Program_ERROR);

-                         }

-

-       mixControls.cbStruct = sizeof(MIXERLINECONTROLS);

-       mixControls.dwLineID = mixLine.dwLineID;

-       mixControls.cControls = mixLine.cControls;

-       mixControls.cbmxctrl = sizeof(mixClist[0]);

-       mixControls.pamxctrl = (LPMIXERCONTROL) &mixClist[0];

-       mmres = mixerGetLineControls(hMixer,

-         (LPMIXERLINECONTROLS) &mixControls,

-      MIXER_GETLINECONTROLSF_ALL);

-                      if(mmres != MMSYSERR_NOERROR) {

-                              return (Program_ERROR);

-                           }

-// for this source line ... loop over all the control. Very like what

-was done above for the

-// destination line ...

-       for(iC=0;iC<mixLine.cControls;iC++) {

-           if(mixClist[iC].dwControlType ==

-MIXERCONTROL_CONTROLTYPE_VOLUME) {

-

-              mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-              mixDetails.dwControlID = mixClist[iC].dwControlID;

-              mixDetails.cChannels = (DWORD) 1;

-              mixDetails.hwndOwner = NULL;

-              mixDetails.cbDetails =

-sizeof(MIXERCONTROLDETAILS_UNSIGNED);

-              mixDetails.paDetails = (LPMIXERCONTROLDETAILS_UNSIGNED)

-&mixValue;

-// I want to make a copy of the waveout, microphone, aux and line lines

-for later use .... hence memcpy

-              if(itype == 1 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT) {

-

-memcpy(&mixDetailsSpk,&mixDetails,sizeof(MIXERCONTROLDETAILS));

-        lMaximumSpk = mixClist[iC].Bounds.lMaximum;

-        lMinimumSpk = mixClist[iC].Bounds.lMinimum;

-         }

-              if(itype == 2 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE) {

-

-memcpy(&mixDetailsMic,&mixDetails,sizeof(MIXERCONTROLDETAILS));

-        lMaximumMic = mixClist[iC].Bounds.lMaximum;

-        lMinimumMic = mixClist[iC].Bounds.lMinimum;

-         }

-                                  if(itype == 3 &&

-(mixLine.dwComponentType == MIXERLINE_COMPONENTTYPE_SRC_LINE ||

-                          mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY)) {

-// I'm not sure why I had to check the string like this ...

-            if(strncmp(mixLine.szName,"Line",4) == 0) {

-

-memcpy(&mixDetailsLin,&mixDetails,sizeof(MIXERCONTROLDETAILS));

-            lMaximumLin = mixClist[iC].Bounds.lMaximum;

-            lMinimumLin = mixClist[iC].Bounds.lMinimum;

-       }

-         }

-

-

-                                  mmres = mixerGetControlDetails(hMixer,

-

-                  (LPMIXERCONTROLDETAILS) &mixDetails,

-               MIXER_GETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                       return (Program_ERROR);

-                                  }

-// Now I'm going to set the input levels the way I want them ..

-         mixValue.dwValue = mixClist[iC].Bounds.lMinimum;

-              if(itype == 1 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT) {

-        mixValue.dwValue = mixClist[iC].Bounds.lMaximum;

-        }

-              if(itype == 2 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE) {

-        mixValue.dwValue = mixClist[iC].Bounds.lMaximum;

-        }

-                                  if(itype == 3 &&

-(mixLine.dwComponentType == MIXERLINE_COMPONENTTYPE_SRC_LINE ||

-                          mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY)) {

-              if(strncmp(mixLine.szName,"Line",4) == 0) {

-           mixValue.dwValue = mixClist[iC].Bounds.lMaximum;

-        }

-        }

-

-              mmres = mixerSetControlDetails(hMixer,

-                  (LPMIXERCONTROLDETAILS) &mixDetails,

-               MIXER_SETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                       return (Program_ERROR);

-                                  }

-      }

-           if(mixClist[iC].dwControlType ==

-MIXERCONTROL_CONTROLTYPE_MUTE) {

-                    mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-              mixDetails.dwControlID = mixClist[iC].dwControlID;

-              mixDetails.cChannels = (DWORD) 1;

-              mixDetails.hwndOwner = NULL;

-              mixDetails.cbDetails =

-sizeof(MIXERCONTROLDETAILS_BOOLEAN);

-              mixDetails.paDetails = (LPMIXERCONTROLDETAILS_BOOLEAN)

-&mixMute;

-                                  mmres = mixerGetControlDetails(hMixer,

-

-                     (LPMIXERCONTROLDETAILS) &mixDetails,

-                     MIXER_GETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                      return (Program_ERROR);

-                                  }

-// I run the risk of inverting my boolean selections, so jump out if

-already done ...

-         if(itype != 0 && (bDoneSpkr || bDoneMike)) break;

-

-        mixMute.fValue = mixClist[iC].Bounds.lMaximum;

-              if(itype == 1 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT) {

-        mixMute.fValue = mixClist[iC].Bounds.lMinimum;

-        }

-              if(itype == 2 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE) {

-        mixMute.fValue = mixClist[iC].Bounds.lMinimum;

-        }

-                                  if(itype == 3 &&

-(mixLine.dwComponentType == MIXERLINE_COMPONENTTYPE_SRC_LINE ||

-                          mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY)) {

-           if(strncmp(mixLine.szName,"Line",4) == 0) {

-           mixMute.fValue = mixClist[iC].Bounds.lMinimum;

-        }

-         }

-

-         mmres = mixerSetControlDetails(hMixer,

-                     (LPMIXERCONTROLDETAILS) &mixDetails,

-                     MIXER_SETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                       return (Program_ERROR);

-                                  }

-        }

-        if(mixClist[iC].dwControlType == MIXERCONTROL_CONTROLTYPE_ONOFF)

-{

-                    mixDetails.cbStruct = sizeof(MIXERCONTROLDETAILS);

-              mixDetails.dwControlID = mixClist[iC].dwControlID;

-              mixDetails.cChannels = (DWORD) 1;

-              mixDetails.hwndOwner = NULL;

-              mixDetails.cbDetails =

-sizeof(MIXERCONTROLDETAILS_BOOLEAN);

-              mixDetails.paDetails = (LPMIXERCONTROLDETAILS_BOOLEAN)

-&mixMute;

-                                  mmres = mixerGetControlDetails(hMixer,

-

-                     (LPMIXERCONTROLDETAILS) &mixDetails,

-                     MIXER_GETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                     return (Program_ERROR);

-                                  }

-

-         mixMute.fValue = mixClist[iC].Bounds.lMinimum;

-              if(itype == 1 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT) {

-        mixMute.fValue = mixClist[iC].Bounds.lMaximum;

-         }

-              if(itype == 2 && mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE) {

-        mixMute.fValue = mixClist[iC].Bounds.lMaximum;

-         }

-                                  if(itype == 3 &&

-(mixLine.dwComponentType == MIXERLINE_COMPONENTTYPE_SRC_LINE ||

-                          mixLine.dwComponentType ==

-MIXERLINE_COMPONENTTYPE_SRC_AUXILIARY)) {

-              if(strncmp(mixLine.szName,"Line",4) == 0) {

-           mixMute.fValue = mixClist[iC].Bounds.lMaximum;

-        }

-         }

-

-              mmres = mixerSetControlDetails(hMixer,

-                     (LPMIXERCONTROLDETAILS) &mixDetails,

-                     MIXER_SETCONTROLDETAILSF_VALUE);

-                               if(mmres != MMSYSERR_NOERROR) {

-                                      return (Program_ERROR);

-                                  }

-        }

-       }

-      }

- }

- return Program_NOERROR;

-}

-

-

diff --git a/src/old/model.cpp b/src/old/model.cpp
deleted file mode 100644
index 701df9e..0000000
--- a/src/old/model.cpp
+++ /dev/null
@@ -1,3228 +0,0 @@
-// * 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/.
-
-// model.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/water.h"
-#include "object/robotmain.h"
-#include "ui/interface.h"
-#include "ui/edit.h"
-#include "ui/button.h"
-#include "script/cmdtoken.h"
-#include "old/modfile.h"
-#include "old/model.h"
-
-
-
-const int MAX_COLORS = 9;
-
-static float table_color[MAX_COLORS*3] =
-{
-    1.0f,   1.0f,   1.0f,   // white
-    1.0f,   0.0f,   0.0f,   // red
-    0.0f,   1.0f,   0.0f,   // green
-    0.0f,   0.6f,   1.0f,   // blue
-    1.0f,   1.0f,   0.0f,   // yellow
-    0.0f,   1.0f,   1.0f,   // cyan
-    1.0f,   0.0f,   1.0f,   // magenta
-    0.3f,   0.3f,   0.3f,   // grey
-    0.0f,   0.0f,   0.0f,   // black
-};
-
-
-const int MAX_STATES = 10;
-
-static int table_state[MAX_STATES] =
-{
-    D3DSTATENORMAL,
-    D3DSTATEPART1,
-    D3DSTATEPART2,
-    D3DSTATEPART3,
-    D3DSTATEPART4,
-    D3DSTATE2FACE,  // #5
-    D3DSTATETTw,
-    D3DSTATETTb,
-    D3DSTATETTw|D3DSTATE2FACE,  // #8
-    D3DSTATETTb|D3DSTATE2FACE,  // #9
-};
-
-
-const int MAX_NAMES = 23;
-
-
-
-
-// Object's constructor.
-
-CModel::CModel(CInstanceManager* iMan)
-{
-    m_iMan = iMan;
-
-    m_engine    = (CD3DEngine*)m_iMan->SearchInstance(CLASS_ENGINE);
-    m_interface = (CInterface*)m_iMan->SearchInstance(CLASS_INTERFACE);
-
-    m_modFile = new CModFile(m_iMan);
-    m_triangleTable = m_modFile->RetTriangleList();
-
-    m_textureRank = 0;
-    strcpy(m_textureName, "lemt.tga");
-    m_color = 0;
-    m_state = 0;
-    m_textureMode = 0;
-    m_textureRotate = 0;
-    m_bTextureMirrorX = false;
-    m_bTextureMirrorY = false;
-    m_texturePart = 0;
-    TexturePartUpdate();
-
-    m_bDisplayTransparent = false;
-    m_bDisplayOnlySelection = false;
-    InitView();
-
-    m_triangleSel1 = 0;
-    m_triangleSel2 = 0;
-
-    m_mode = 1;
-    m_oper = 'P';
-
-    m_secondTexNum = 0;
-    m_secondSubdiv = 1;
-    m_secondOffsetU = 0;
-    m_secondOffsetV = 0;
-
-    m_min = 0.0f;
-    m_max = 1000000.0f;
-}
-
-// Object's destructor.
-
-CModel::~CModel()
-{
-    delete m_modFile;
-}
-
-
-// You must call this procedure before changing the model interactively.
-
-void CModel::StartUserAction()
-{
-    Event       event;
-    Math::Point     pos, dim;
-    CButton*    pb;
-
-    dim.x = 105.0f/640.0f;
-    dim.y =  18.0f/480.0f;
-    pos.x =  10.0f/640.0f;
-    pos.y = 450.0f/480.0f;
-    m_interface->CreateEdit(pos, dim, 0, EVENT_EDIT1);
-
-    dim.x =  50.0f/640.0f;
-    pos.x = 125.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON1);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Load");
-    pos.x = 185.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON2);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Script");
-    pos.x = 245.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON3);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Read");
-    pos.x = 305.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON4);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Add");
-    pos.x = 365.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON5);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Write");
-
-    dim.x =  50.0f/640.0f;
-    dim.y =  18.0f/480.0f;
-    pos.x =  10.0f/640.0f;
-    pos.y = 425.0f/480.0f;
-    m_interface->CreateEdit(pos, dim, 0, EVENT_EDIT2);
-    pos.x =  65.0f/640.0f;
-    pos.y = 425.0f/480.0f;
-    m_interface->CreateEdit(pos, dim, 0, EVENT_EDIT3);
-    pos.x =  10.0f/640.0f;
-    pos.y = 400.0f/480.0f;
-    m_interface->CreateEdit(pos, dim, 0, EVENT_EDIT4);
-    pos.x =  65.0f/640.0f;
-    pos.y = 400.0f/480.0f;
-    m_interface->CreateEdit(pos, dim, 0, EVENT_EDIT5);
-
-    dim.x =  20.0f/640.0f;
-    dim.y =  20.0f/480.0f;
-    pos.y = 370.0f/480.0f;
-    pos.x =  10.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON10);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("P");
-    pos.x =  30.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON11);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("R");
-    pos.x =  50.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON12);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("Z");
-    pos.y = 350.0f/480.0f;
-    pos.x =  10.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON13);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("+X");
-    pos.x =  30.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON14);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("+Y");
-    pos.x =  50.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON15);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("+Z");
-    pos.y = 330.0f/480.0f;
-    pos.x =  10.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON16);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("-X");
-    pos.x =  30.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON17);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("-Y");
-    pos.x =  50.0f/640.0f;
-    pb = m_interface->CreateButton(pos, dim, 0, EVENT_BUTTON18);
-    pb->SetState(STATE_SIMPLY);
-    pb->SetName("-Z");
-
-//? m_modFile->ReadModel("objects\\io.mod");
-    DeselectAll();
-    CurrentInit();
-
-    ZeroMemory(&event, sizeof(Event));
-    EventFrame(event);
-
-    m_engine->LoadAllTexture();
-    UpdateInfoText();
-}
-
-// You must call this procedure after modifing the model interactively.
-
-void CModel::StopUserAction()
-{
-    m_interface->DeleteControl(EVENT_EDIT1);
-    m_interface->DeleteControl(EVENT_EDIT2);
-    m_interface->DeleteControl(EVENT_EDIT3);
-    m_interface->DeleteControl(EVENT_EDIT4);
-    m_interface->DeleteControl(EVENT_EDIT5);
-    m_interface->DeleteControl(EVENT_BUTTON1);
-    m_interface->DeleteControl(EVENT_BUTTON2);
-    m_interface->DeleteControl(EVENT_BUTTON3);
-    m_interface->DeleteControl(EVENT_BUTTON4);
-    m_interface->DeleteControl(EVENT_BUTTON5);
-    m_interface->DeleteControl(EVENT_BUTTON10);
-    m_interface->DeleteControl(EVENT_BUTTON11);
-    m_interface->DeleteControl(EVENT_BUTTON12);
-    m_interface->DeleteControl(EVENT_BUTTON13);
-    m_interface->DeleteControl(EVENT_BUTTON14);
-    m_interface->DeleteControl(EVENT_BUTTON15);
-    m_interface->DeleteControl(EVENT_BUTTON16);
-    m_interface->DeleteControl(EVENT_BUTTON17);
-    m_interface->DeleteControl(EVENT_BUTTON18);
-
-    m_engine->SetInfoText(0, "");
-    m_engine->SetInfoText(1, "");
-}
-
-
-// Updates the​editable values for mapping textures.
-
-void CModel::PutTextureValues()
-{
-    CEdit*  pe;
-    char    s[100];
-    int     value;
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT2);
-    if ( pe != 0 )
-    {
-        value = (int)(m_textureSup.x*256.0f+0.5f);
-        sprintf(s, "%d", value);
-        pe->SetText(s);
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT3);
-    if ( pe != 0 )
-    {
-        value = (int)(m_textureSup.y*256.0f+0.5f);
-        sprintf(s, "%d", value);
-        pe->SetText(s);
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT4);
-    if ( pe != 0 )
-    {
-        value = (int)(m_textureInf.x*256.0f-0.5f);
-        sprintf(s, "%d", value);
-        pe->SetText(s);
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT5);
-    if ( pe != 0 )
-    {
-        value = (int)(m_textureInf.y*256.0f-0.5f);
-        sprintf(s, "%d", value);
-        pe->SetText(s);
-    }
-}
-
-// Takes the editable values for mapping textures.
-
-void CModel::GetTextureValues()
-{
-    CEdit*  pe;
-    char    s[100];
-    int     value;
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT2);
-    if ( pe != 0 )
-    {
-        pe->GetText(s, 100);
-        sscanf(s, "%d", &value);
-        m_textureSup.x = ((float)value-0.5f)/256.0f;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT3);
-    if ( pe != 0 )
-    {
-        pe->GetText(s, 100);
-        sscanf(s, "%d", &value);
-        m_textureSup.y = ((float)value-0.5f)/256.0f;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT4);
-    if ( pe != 0 )
-    {
-        pe->GetText(s, 100);
-        sscanf(s, "%d", &value);
-        m_textureInf.x = ((float)value+0.5f)/256.0f;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT5);
-    if ( pe != 0 )
-    {
-        pe->GetText(s, 100);
-        sscanf(s, "%d", &value);
-        m_textureInf.y = ((float)value+0.5f)/256.0f;
-    }
-}
-
-
-// Gives the model name.
-
-void CModel::GetModelName(char *buffer)
-{
-    CEdit*  pe;
-    char    s[100];
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT1);
-    if ( pe == 0 )
-    {
-        strcpy(buffer, "objects\\io.mod");
-    }
-    else
-    {
-        pe->GetText(s, 100);
-        sprintf(buffer, "objects\\%s.mod", s);
-    }
-}
-
-// Gives the model name.
-
-void CModel::GetDXFName(char *buffer)
-{
-    CEdit*  pe;
-    char    s[100];
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT1);
-    if ( pe == 0 )
-    {
-        strcpy(buffer, "models\\import.dxf");
-    }
-    else
-    {
-        pe->GetText(s, 100);
-        sprintf(buffer, "models\\%s.dxf", s);
-    }
-}
-
-// Gives the model name.
-
-void CModel::GetScriptName(char *buffer)
-{
-    CEdit*  pe;
-    char    s[100];
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT1);
-    if ( pe == 0 )
-    {
-        strcpy(buffer, "objects\\script.txt");
-    }
-    else
-    {
-        pe->GetText(s, 100);
-        sprintf(buffer, "objects\\%s.txt", s);
-    }
-}
-
-// Indicates whether the edition name has focus.
-
-bool CModel::IsEditFocus()
-{
-    CEdit*  pe;
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT1);
-    if ( pe != 0 )
-    {
-        if ( pe->RetFocus() )  return true;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT2);
-    if ( pe != 0 )
-    {
-        if ( pe->RetFocus() )  return true;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT3);
-    if ( pe != 0 )
-    {
-        if ( pe->RetFocus() )  return true;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT4);
-    if ( pe != 0 )
-    {
-        if ( pe->RetFocus() )  return true;
-    }
-
-    pe = (CEdit*)m_interface->SearchControl(EVENT_EDIT5);
-    if ( pe != 0 )
-    {
-        if ( pe->RetFocus() )  return true;
-    }
-
-    return false;
-}
-
-
-// Management of an event.
-
-bool CModel::EventProcess(const Event &event)
-{
-    char    s[100];
-    int     first, last;
-
-    switch( event.event )
-    {
-        case EVENT_FRAME:
-            EventFrame(event);
-            break;
-
-        case EVENT_KEYDOWN:
-            if ( IsEditFocus() )
-                break;
-
-            if ( event.param == '1' )
-            {
-                m_mode = 1;
-                UpdateInfoText();
-            }
-            if ( event.param == '2' )
-            {
-                m_mode = 2;
-                UpdateInfoText();
-            }
-            if ( event.param == '3' )
-            {
-                m_mode = 3;
-                UpdateInfoText();
-            }
-            if ( event.param == VK_ADD )  // numpad?
-            {
-                if ( event.keyState & KS_SHIFT )  CurrentSelect(true);
-                CurrentSearchNext(+1, (event.keyState & KS_CONTROL));
-            }
-            if ( event.param == VK_SUBTRACT )  // least numpad?
-            {
-                if ( event.keyState & KS_SHIFT )  CurrentSelect(true);
-                CurrentSearchNext(-1, (event.keyState & KS_CONTROL));
-            }
-            if ( event.param == VK_NUMPAD0 )
-            {
-                CurrentSelect(false);
-            }
-            if ( event.param == VK_DECIMAL )
-            {
-                CurrentSelect(true);
-            }
-            if ( event.param == VK_END )
-            {
-                DeselectAll();
-            }
-            if ( event.param == VK_INSERT )
-            {
-                SelectAll();
-            }
-            if ( event.param == VK_BACK )  // Delete normal ?
-            {
-                SelectDelete();
-            }
-            if ( event.param == VK_SPACE )
-            {
-                m_bDisplayTransparent = !m_bDisplayTransparent;
-                m_bDisplayOnlySelection = false;
-            }
-            if ( event.param == 'H' )
-            {
-                m_bDisplayOnlySelection = !m_bDisplayOnlySelection;
-                m_bDisplayTransparent = false;
-            }
-            if ( m_mode == 1 )
-            {
-                if ( event.param == 'S' )
-                {
-                    SmoothSelect();
-                }
-                if ( event.param == 'N' )
-                {
-                    PlaneSelect();
-                }
-                if ( event.param == 'C' )
-                {
-                    ColorSelect();
-                }
-                if ( event.param == 'V' )
-                {
-                    m_color ++;
-                    if ( m_color >= MAX_COLORS )  m_color = 0;
-                    UpdateInfoText();
-                    ColorSelect();
-                }
-                if ( event.param == 'J' )
-                {
-                    StateSelect();
-                }
-                if ( event.param == 'K' )
-                {
-                    m_state ++;
-                    if ( m_state >= MAX_STATES )  m_state = 0;
-                    UpdateInfoText();
-                    StateSelect();
-                }
-                if ( event.param == 'M' )
-                {
-                    m_textureMode ++;
-                    if ( m_textureMode > 3 )  m_textureMode = 0;
-                    UpdateInfoText();
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'Z' )
-                {
-                    m_textureRotate ++;
-                    if ( m_textureRotate > 2 )  m_textureRotate = 0;
-                    UpdateInfoText();
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'X' )
-                {
-                    m_bTextureMirrorX = !m_bTextureMirrorX;
-                    UpdateInfoText();
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'Y' )
-                {
-                    m_bTextureMirrorY = !m_bTextureMirrorY;
-                    UpdateInfoText();
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'O' )
-                {
-                    TextureRankChange(+1);
-                    UpdateInfoText();
-                }
-                if ( event.param == 'P' )
-                {
-                    TexturePartChange(+1);
-                    UpdateInfoText();
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'T' )
-                {
-                    GetTextureValues();
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  m_textureInf, m_textureSup, m_textureName);
-                }
-                if ( event.param == 'E' )
-                {
-                    Math::Point ti, ts;
-                    ti.x =  0.00f;
-                    ti.y =  0.00f;
-                    ts.x =  0.00f;
-                    ts.y =  0.00f;
-                    MappingSelect(m_textureMode, m_textureRotate,
-                                  m_bTextureMirrorX, m_bTextureMirrorY,
-                                  ti, ts, "");
-                }
-            }
-            if ( m_mode == 2 )
-            {
-                if ( event.param == 'E' )
-                {
-                    m_secondTexNum = 0;
-                    UpdateInfoText();
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                }
-                if ( event.param == 'O' )
-                {
-                    m_secondTexNum ++;
-                    if ( m_secondTexNum > 10 )  m_secondTexNum = 1;
-                    UpdateInfoText();
-                }
-                if ( event.param == 'T' )
-                {
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    m_engine->LoadAllTexture();
-                }
-                if ( event.param == 'U' )
-                {
-                    m_secondOffsetU += 45;
-                    if ( m_secondOffsetU >= 360 )  m_secondOffsetU = 0;
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    UpdateInfoText();
-                }
-                if ( event.param == 'V' )
-                {
-                    m_secondOffsetV += 45;
-                    if ( m_secondOffsetV >= 360 )  m_secondOffsetV = 0;
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    UpdateInfoText();
-                }
-                if ( event.param == 'X' )
-                {
-                    m_bTextureMirrorX = !m_bTextureMirrorX;
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    UpdateInfoText();
-                }
-                if ( event.param == 'Y' )
-                {
-                    m_bTextureMirrorY = !m_bTextureMirrorY;
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    UpdateInfoText();
-                }
-                if ( event.param == 'S' )
-                {
-                    m_secondSubdiv ++;
-                    if ( m_secondSubdiv > 7 )  m_secondSubdiv = 1;
-                    MappingSelect2(m_secondTexNum, m_secondSubdiv, m_secondOffsetU, m_secondOffsetV, m_bTextureMirrorX, m_bTextureMirrorY);
-                    UpdateInfoText();
-                }
-            }
-            if ( m_mode == 3 )
-            {
-                if ( event.param == 'M' )
-                {
-                    if ( m_min == 0.0f && m_max == 1000000.0f )
-                    {
-                        m_min = 0.0f;  m_max = 100.0f;
-                    }
-                    else if ( m_min == 0.0f && m_max == 100.0f )
-                    {
-                        m_min = 100.0f;  m_max = 200.0f;
-                    }
-                    else if ( m_min == 100.0f && m_max == 200.0f )
-                    {
-                        m_min = 200.0f;  m_max = 1000000.0f;
-                    }
-                    else if ( m_min == 200.0f && m_max == 1000000.0f )
-                    {
-                        m_min = 0.0f;  m_max = 1000000.0f;
-                    }
-                    UpdateInfoText();
-                }
-                if ( event.param == 'C' )
-                {
-                    MinMaxChange();
-                }
-            }
-            break;
-
-        case EVENT_BUTTON1:  // import ?
-            GetDXFName(s);
-            m_modFile->ReadDXF(s, m_min, m_max);
-            DeselectAll();
-            CurrentInit();
-            EventFrame(event);
-            m_engine->LoadAllTexture();
-            break;
-
-        case EVENT_BUTTON2:  // script ?
-            GetScriptName(s);
-            ReadScript(s);
-            DeselectAll();
-            CurrentInit();
-            EventFrame(event);
-            m_engine->LoadAllTexture();
-            break;
-
-        case EVENT_BUTTON3:  // read ?
-            GetModelName(s);
-            m_modFile->ReadModel(s, true, false);  // standard read with borders
-            DeselectAll();
-            CurrentInit();
-            EventFrame(event);
-            m_engine->LoadAllTexture();
-            break;
-
-        case EVENT_BUTTON4:  // add ?
-            GetModelName(s);
-            first = m_modFile->RetTriangleUsed();
-            m_modFile->AddModel(s, first, true, false);  // standard read with borders
-            last = m_modFile->RetTriangleUsed();
-            SelectZone(first, last);
-            EventFrame(event);
-            break;
-
-        case EVENT_BUTTON5:  // write ?
-            GetModelName(s);
-            DeselectAll();
-            m_modFile->WriteModel(s);
-            break;
-
-        case EVENT_BUTTON10:  // pos ?
-            m_oper = 'P';
-            break;
-        case EVENT_BUTTON11:  // rotate ?
-            m_oper = 'R';
-            break;
-        case EVENT_BUTTON12:  // zoom ?
-            m_oper = 'Z';
-            break;
-
-        case EVENT_BUTTON13:  // +X ?
-            MoveSelect(Math::Vector(1.0f, 0.0f, 0.0f));
-            break;
-        case EVENT_BUTTON16:  // -X ?
-            MoveSelect(Math::Vector(-1.0f, 0.0f, 0.0f));
-            break;
-        case EVENT_BUTTON14:  // +Y ?
-            MoveSelect(Math::Vector(0.0f, 1.0f, 0.0f));
-            break;
-        case EVENT_BUTTON17:  // -Y ?
-            MoveSelect(Math::Vector(0.0f, -1.0f, 0.0f));
-            break;
-        case EVENT_BUTTON15:  // +Z ?
-            MoveSelect(Math::Vector(0.0f, 0.0f, 1.0f));
-            break;
-        case EVENT_BUTTON18:  // -Z ?
-            MoveSelect(Math::Vector(0.0f, 0.0f, -1.0f));
-            break;
-    }
-
-    return 0;
-}
-
-
-// Drives the model.
-
-bool CModel::EventFrame(const Event &event)
-{
-    D3DMATERIAL7    matCurrent, matCurrenti, matCurrents, matTrans;
-    D3DMATERIAL7*   pMat;
-    D3DVERTEX2      vertex[3];
-    char            texName2[20];
-    int             i, used, objRank, state;
-
-    m_time += event.rTime;
-
-    m_engine->FlushObject();
-    objRank = m_engine->CreateObject();
-
-    ZeroMemory(&matCurrent, sizeof(D3DMATERIAL7));
-    matCurrent.diffuse.r = 1.0f;
-    matCurrent.diffuse.g = 0.0f;
-    matCurrent.diffuse.b = 0.0f;  // red
-    matCurrent.ambient.r = 0.5f;
-    matCurrent.ambient.g = 0.5f;
-    matCurrent.ambient.b = 0.5f;
-
-    ZeroMemory(&matCurrents, sizeof(D3DMATERIAL7));
-    matCurrents.diffuse.r = 1.0f;
-    matCurrents.diffuse.g = 1.0f;
-    matCurrents.diffuse.b = 0.0f;  // yellow
-    matCurrents.ambient.r = 0.5f;
-    matCurrents.ambient.g = 0.5f;
-    matCurrents.ambient.b = 0.5f;
-
-    ZeroMemory(&matCurrenti, sizeof(D3DMATERIAL7));
-    matCurrenti.diffuse.r = 0.0f;
-    matCurrenti.diffuse.g = 0.0f;
-    matCurrenti.diffuse.b = 1.0f;  // blue
-    matCurrenti.ambient.r = 0.5f;
-    matCurrenti.ambient.g = 0.5f;
-    matCurrenti.ambient.b = 0.5f;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed )  continue;
-
-        if ( m_triangleTable[i].min != m_min ||
-             m_triangleTable[i].max != m_max )  continue;
-
-        pMat = &m_triangleTable[i].material;
-        state = D3DSTATENORMAL;
-
-        if ( i >= m_triangleSel1 &&
-             i <= m_triangleSel2 &&
-             (int)(m_time*10.0f)%2 == 0 )
-        {
-            pMat = &matCurrent;
-        }
-        else if ( m_triangleTable[i].bSelect &&
-                  (int)(m_time*10.0f)%2 == 0 )
-        {
-            pMat = &matCurrents;
-        }
-        else
-        {
-            if ( m_bDisplayOnlySelection )  continue;
-            if ( m_bDisplayTransparent )
-            {
-                matTrans = m_triangleTable[i].material;
-                matTrans.diffuse.a = 0.1f;  // very transparent
-                pMat = &matTrans;
-                state = D3DSTATETD;
-            }
-        }
-
-        if ( m_triangleTable[i].texNum2 == 0 )
-        {
-            m_engine->AddTriangle(objRank, &m_triangleTable[i].p1, 3,
-                                  *pMat, state,
-                                  m_triangleTable[i].texName, "",
-                                  0.0f, 1000000.0f, false);
-        }
-        else
-        {
-            sprintf(texName2, "dirty%.2d.tga", m_triangleTable[i].texNum2);
-            m_engine->AddTriangle(objRank, &m_triangleTable[i].p1, 3,
-                                  *pMat, state|D3DSTATEDUALb,
-                                  m_triangleTable[i].texName, texName2,
-                                  0.0f, 1000000.0f, false);
-        }
-
-        if ( m_bDisplayTransparent &&  // draws inside?
-             i >= m_triangleSel1   &&
-             i <= m_triangleSel2   )
-        {
-            vertex[0] = m_triangleTable[i].p3;
-            vertex[1] = m_triangleTable[i].p2;
-            vertex[2] = m_triangleTable[i].p1;
-
-            m_engine->AddTriangle(objRank, vertex, 3,
-                                  matCurrenti, D3DSTATENORMAL,
-                                  m_triangleTable[i].texName, "",
-                                  0.0f, 1000000.0f, false);
-        }
-    }
-
-    return true;
-}
-
-
-// Gives a vertex.
-
-bool CModel::GetVertex(int rank, D3DVERTEX2 &vertex)
-{
-    if ( rank < 0 || rank/3 >= m_modFile->RetTriangleUsed() )  return false;
-    if ( !m_triangleTable[rank/3].bUsed )  return false;
-
-    if ( !m_triangleTable[rank/3].bSelect )  return false;
-
-    if ( rank%3 == 0 )
-    {
-        vertex = m_triangleTable[rank/3].p1;
-        return true;
-    }
-    if ( rank%3 == 1 )
-    {
-        vertex = m_triangleTable[rank/3].p2;
-        return true;
-    }
-    if ( rank%3 == 2 )
-    {
-        vertex = m_triangleTable[rank/3].p3;
-        return true;
-    }
-    return false;
-}
-
-// Modifies a vertex.
-
-bool CModel::SetVertex(int rank, D3DVERTEX2 &vertex)
-{
-    if ( rank < 0 || rank/3 >= m_modFile->RetTriangleUsed() )  return false;
-    if ( !m_triangleTable[rank/3].bUsed )  return false;
-
-    if ( !m_triangleTable[rank/3].bSelect )  return false;
-
-    if ( rank%3 == 0 )
-    {
-        m_triangleTable[rank/3].p1 = vertex;
-        return true;
-    }
-    if ( rank%3 == 1 )
-    {
-        m_triangleTable[rank/3].p2 = vertex;
-        return true;
-    }
-    if ( rank%3 == 2 )
-    {
-        m_triangleTable[rank/3].p3 = vertex;
-        return true;
-    }
-    return false;
-}
-
-// Smoothed normals selected triangles.
-
-void CModel::SmoothSelect()
-{
-    char*       bDone;
-    int         index[100];
-    int         used, i, j, rank;
-    D3DVERTEX2  vi, vj;
-    Math::Vector    sum;
-
-    used = m_modFile->RetTriangleUsed();
-
-    bDone = (char*)malloc(used*3*sizeof(char));
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        bDone[i] = false;
-    }
-
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        bDone[i] = true;
-        rank = 0;
-        index[rank++] = i;
-        if ( !GetVertex(i, vi) )  continue;
-
-        for ( j=0 ; j<used*3 ; j++ )
-        {
-            if ( bDone[j] )  continue;
-            if ( !GetVertex(j, vj) )  continue;
-            if ( vj.x == vi.x &&
-                 vj.y == vi.y &&
-                 vj.z == vi.z )
-            {
-                bDone[j] = true;
-                index[rank++] = j;
-                if ( rank >= 100 )  break;
-            }
-        }
-
-        sum.x = 0;
-        sum.y = 0;
-        sum.z = 0;
-        for ( j=0 ; j<rank ; j++ )
-        {
-            GetVertex(index[j], vj);
-            sum.x += vj.nx;
-            sum.y += vj.ny;
-            sum.z += vj.nz;
-        }
-        sum = Normalize(sum);
-
-        for ( j=0 ; j<rank ; j++ )
-        {
-            GetVertex(index[j], vj);
-            vj.nx = sum.x;
-            vj.ny = sum.y;
-            vj.nz = sum.z;
-            SetVertex(index[j], vj);
-        }
-    }
-
-    free(bDone);
-
-    SelectTerm();
-}
-
-
-// Cast normals selected triangles.
-
-void CModel::PlaneSelect()
-{
-    Math::Vector    p1, p2, p3, n;
-    int         used, i;
-
-    used = m_modFile->RetTriangleUsed();
-
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bSelect )
-        {
-            p1.x = m_triangleTable[i].p1.x;
-            p1.y = m_triangleTable[i].p1.y;
-            p1.z = m_triangleTable[i].p1.z;
-
-            p2.x = m_triangleTable[i].p2.x;
-            p2.y = m_triangleTable[i].p2.y;
-            p2.z = m_triangleTable[i].p2.z;
-
-            p3.x = m_triangleTable[i].p3.x;
-            p3.y = m_triangleTable[i].p3.y;
-            p3.z = m_triangleTable[i].p3.z;
-
-            n = Math::NormalToPlane(p3, p2, p1);
-
-            m_triangleTable[i].p3.nx = n.x;
-            m_triangleTable[i].p3.ny = n.y;
-            m_triangleTable[i].p3.nz = n.z;
-        }
-    }
-    SelectTerm();
-}
-
-
-// Change the color of the selected triangles.
-
-void CModel::ColorSelect()
-{
-    int         used, i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bSelect )
-        {
-            m_triangleTable[i].material.diffuse.r = table_color[m_color*3+0];
-            m_triangleTable[i].material.diffuse.g = table_color[m_color*3+1];
-            m_triangleTable[i].material.diffuse.b = table_color[m_color*3+2];
-        }
-    }
-    SelectTerm();
-}
-
-// Change the status of selected triangles.
-
-void CModel::StateSelect()
-{
-    int         used, i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bSelect )
-        {
-            m_triangleTable[i].state = table_state[m_state];
-        }
-    }
-    SelectTerm();
-}
-
-// Moves the selection.
-
-void CModel::MoveSelect(Math::Vector move)
-{
-    if ( m_oper == 'Z' )
-    {
-             if ( move.x == +1 )  move.x = 1.1f;
-        else if ( move.x == -1 )  move.x = 1.0f/1.1f;
-        else                      move.x = 1.0f;
-             if ( move.y == +1 )  move.y = 1.1f;
-        else if ( move.y == -1 )  move.y = 1.0f/1.1f;
-        else                      move.y = 1.0f;
-             if ( move.z == +1 )  move.z = 1.1f;
-        else if ( move.z == -1 )  move.z = 1.0f/1.1f;
-        else                      move.z = 1.0f;
-    }
-    if ( m_oper == 'R' )
-    {
-#if 0
-             if ( move.x == +1 )  move.x =  5.0f*Math::PI/180.0f;
-        else if ( move.x == -1 )  move.x = -5.0f*Math::PI/180.0f;
-             if ( move.y == +1 )  move.y =  5.0f*Math::PI/180.0f;
-        else if ( move.y == -1 )  move.y = -5.0f*Math::PI/180.0f;
-             if ( move.z == +1 )  move.z =  5.0f*Math::PI/180.0f;
-        else if ( move.z == -1 )  move.z = -5.0f*Math::PI/180.0f;
-#else
-             if ( move.x == +1 )  move.x =  45.0f*Math::PI/180.0f;
-        else if ( move.x == -1 )  move.x = -45.0f*Math::PI/180.0f;
-             if ( move.y == +1 )  move.y =  45.0f*Math::PI/180.0f;
-        else if ( move.y == -1 )  move.y = -45.0f*Math::PI/180.0f;
-             if ( move.z == +1 )  move.z =  45.0f*Math::PI/180.0f;
-        else if ( move.z == -1 )  move.z = -45.0f*Math::PI/180.0f;
-#endif
-    }
-
-    OperSelect(move, m_oper);
-}
-
-// Moves the selection.
-
-void CModel::OperSelect(Math::Vector move, char oper)
-{
-    Math::Point     rot;
-    int         used, i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bSelect )
-        {
-            if ( oper == 'P' )
-            {
-                m_triangleTable[i].p1.x += move.x;
-                m_triangleTable[i].p1.y += move.y;
-                m_triangleTable[i].p1.z += move.z;
-                m_triangleTable[i].p2.x += move.x;
-                m_triangleTable[i].p2.y += move.y;
-                m_triangleTable[i].p2.z += move.z;
-                m_triangleTable[i].p3.x += move.x;
-                m_triangleTable[i].p3.y += move.y;
-                m_triangleTable[i].p3.z += move.z;
-            }
-            if ( oper == 'Z' )
-            {
-                m_triangleTable[i].p1.x *= move.x;
-                m_triangleTable[i].p1.y *= move.y;
-                m_triangleTable[i].p1.z *= move.z;
-                m_triangleTable[i].p2.x *= move.x;
-                m_triangleTable[i].p2.y *= move.y;
-                m_triangleTable[i].p2.z *= move.z;
-                m_triangleTable[i].p3.x *= move.x;
-                m_triangleTable[i].p3.y *= move.y;
-                m_triangleTable[i].p3.z *= move.z;
-            }
-            if ( oper == 'R' )
-            {
-                if ( move.x != 0 )
-                {
-                    rot.x = m_triangleTable[i].p1.z;
-                    rot.y = m_triangleTable[i].p1.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.x, rot);
-                    m_triangleTable[i].p1.z = rot.x;
-                    m_triangleTable[i].p1.y = rot.y;
-
-                    rot.x = m_triangleTable[i].p2.z;
-                    rot.y = m_triangleTable[i].p2.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.x, rot);
-                    m_triangleTable[i].p2.z = rot.x;
-                    m_triangleTable[i].p2.y = rot.y;
-
-                    rot.x = m_triangleTable[i].p3.z;
-                    rot.y = m_triangleTable[i].p3.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.x, rot);
-                    m_triangleTable[i].p3.z = rot.x;
-                    m_triangleTable[i].p3.y = rot.y;
-                }
-                if ( move.y != 0 )
-                {
-                    rot.x = m_triangleTable[i].p1.x;
-                    rot.y = m_triangleTable[i].p1.z;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.y, rot);
-                    m_triangleTable[i].p1.x = rot.x;
-                    m_triangleTable[i].p1.z = rot.y;
-
-                    rot.x = m_triangleTable[i].p2.x;
-                    rot.y = m_triangleTable[i].p2.z;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.y, rot);
-                    m_triangleTable[i].p2.x = rot.x;
-                    m_triangleTable[i].p2.z = rot.y;
-
-                    rot.x = m_triangleTable[i].p3.x;
-                    rot.y = m_triangleTable[i].p3.z;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.y, rot);
-                    m_triangleTable[i].p3.x = rot.x;
-                    m_triangleTable[i].p3.z = rot.y;
-                }
-                if ( move.z != 0 )
-                {
-                    rot.x = m_triangleTable[i].p1.x;
-                    rot.y = m_triangleTable[i].p1.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.z, rot);
-                    m_triangleTable[i].p1.x = rot.x;
-                    m_triangleTable[i].p1.y = rot.y;
-
-                    rot.x = m_triangleTable[i].p2.x;
-                    rot.y = m_triangleTable[i].p2.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.z, rot);
-                    m_triangleTable[i].p2.x = rot.x;
-                    m_triangleTable[i].p2.y = rot.y;
-
-                    rot.x = m_triangleTable[i].p3.x;
-                    rot.y = m_triangleTable[i].p3.y;
-                    rot = Math::RotatePoint(Math::Point(0.0f, 0.0f), move.z, rot);
-                    m_triangleTable[i].p3.x = rot.x;
-                    m_triangleTable[i].p3.y = rot.y;
-                }
-            }
-        }
-    }
-    SelectTerm();
-}
-
-// Performs a build script.
-
-void CModel::ReadScript(char *filename)
-{
-    FILE*       file = NULL;
-    char        line[200];
-    char        name[200];
-    char        buffer[200];
-    int         i, first, last;
-    Math::Vector    move;
-    bool        bFirst = true;
-
-    file = fopen(filename, "r");
-    if ( file == NULL )  return;
-
-    while ( fgets(line, 200, file) != NULL )
-    {
-        for ( i=0 ; i<200 ; i++ )
-        {
-            if ( line[i] == '\t' )  line[i] = ' ';  // replace tab by space
-            if ( line[i] == '/' && line[i+1] == '/' )
-            {
-                line[i] = 0;
-                break;
-            }
-        }
-
-        if ( Cmd(line, "Object") )
-        {
-            OpString(line, "name", name);
-            sprintf(buffer, "objects\\%s.mod", name);
-
-            if ( bFirst )
-            {
-                m_modFile->ReadModel(buffer, true, true);
-                last = m_modFile->RetTriangleUsed();
-                SelectZone(0, last);
-            }
-            else
-            {
-                first = m_modFile->RetTriangleUsed();
-                m_modFile->AddModel(buffer, first, true, false);
-                last = m_modFile->RetTriangleUsed();
-                SelectZone(first, last);
-            }
-            bFirst = false;
-
-            move = OpDir(line, "zoom");
-            OperSelect(move, 'Z');
-
-            move = OpDir(line, "rot");
-            move *= Math::PI/180.0f;  // degrees -> radians
-            OperSelect(move, 'R');
-
-            move = OpDir(line, "pos");
-            OperSelect(move, 'P');
-        }
-    }
-
-    fclose(file);
-}
-
-
-
-// Computes the bbox of selected triangles.
-
-void CModel::BBoxCompute(Math::Vector &min, Math::Vector &max)
-{
-    D3DVERTEX2  vertex;
-    int         used, i;
-
-    min.x =  1000000.0f;
-    min.y =  1000000.0f;
-    min.z =  1000000.0f;
-    max.x = -1000000.0f;
-    max.y = -1000000.0f;
-    max.z = -1000000.0f;
-
-    used = m_modFile->RetTriangleUsed();
-
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        if ( vertex.x < min.x )  min.x = vertex.x;
-        if ( vertex.y < min.y )  min.y = vertex.y;
-        if ( vertex.z < min.z )  min.z = vertex.z;
-
-        if ( vertex.x > max.x )  max.x = vertex.x;
-        if ( vertex.y > max.y )  max.y = vertex.y;
-        if ( vertex.z > max.z )  max.z = vertex.z;
-    }
-}
-
-// Returns the gravity center of the selection.
-
-Math::Vector CModel::RetSelectCDG()
-{
-    Math::Vector    min, max, cdg;
-
-    BBoxCompute(min, max);
-
-    cdg.x = (min.x+max.x)/2.0f;
-    cdg.y = (min.y+max.y)/2.0f;
-    cdg.z = (min.z+max.z)/2.0f;
-
-    return cdg;
-}
-
-// Returns the normal vector of the selection.
-
-Math::Vector CModel::RetSelectNormal()
-{
-    Math::Vector    p1, p2, p3, n;
-
-    p1.x = m_triangleTable[m_triangleSel1].p1.nx;
-    p1.y = m_triangleTable[m_triangleSel1].p1.ny;
-    p1.z = m_triangleTable[m_triangleSel1].p1.nz;
-
-    p2.x = m_triangleTable[m_triangleSel1].p2.nx;
-    p2.y = m_triangleTable[m_triangleSel1].p2.ny;
-    p2.z = m_triangleTable[m_triangleSel1].p2.nz;
-
-    p3.x = m_triangleTable[m_triangleSel1].p3.nx;
-    p3.y = m_triangleTable[m_triangleSel1].p3.ny;
-    p3.z = m_triangleTable[m_triangleSel1].p3.nz;
-
-    n = Normalize(p1+p2+p3);
-
-    return n;
-}
-
-// Maps a texture onto the selected triangles.
-
-bool CModel::IsMappingSelectPlausible(D3DMaping D3Dmode)
-{
-    D3DVERTEX2  vertex[3];
-    Math::Vector    min, max;
-    Math::Point     a, b, ti, ts;
-    float       au, bu, av, bv;
-    int         used, i, j;
-
-    ti.x = 0.0f;
-    ti.y = 0.0f;
-    ts.x = 1.0f;
-    ts.y = 1.0f;
-
-    BBoxCompute(min, max);
-
-    if ( D3Dmode == D3DMAPPINGX )
-    {
-        a.x = min.z;
-        a.y = min.y;
-        b.x = max.z;
-        b.y = max.y;
-    }
-    if ( D3Dmode == D3DMAPPINGY )
-    {
-        a.x = min.x;
-        a.y = min.z;
-        b.x = max.x;
-        b.y = max.z;
-    }
-    if ( D3Dmode == D3DMAPPINGZ )
-    {
-        a.x = min.x;
-        a.y = min.y;
-        b.x = max.x;
-        b.y = max.y;
-    }
-
-    au = (ts.x-ti.x)/(b.x-a.x);
-    bu = ts.x-b.x*(ts.x-ti.x)/(b.x-a.x);
-
-    av = (ts.y-ti.y)/(b.y-a.y);
-    bv = ts.y-b.y*(ts.y-ti.y)/(b.y-a.y);
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( !GetVertex(i*3+0, vertex[0]) )  continue;
-        if ( !GetVertex(i*3+1, vertex[1]) )  continue;
-        if ( !GetVertex(i*3+2, vertex[2]) )  continue;
-
-        for ( j=0 ; j<3 ; j++ )
-        {
-            if ( D3Dmode == D3DMAPPINGX )
-            {
-                vertex[j].tu = vertex[j].z*au+bu;
-                vertex[j].tv = vertex[j].y*av+bv;
-            }
-            if ( D3Dmode == D3DMAPPINGY )
-            {
-                vertex[j].tu = vertex[j].x*au+bu;
-                vertex[j].tv = vertex[j].z*av+bv;
-            }
-            if ( D3Dmode == D3DMAPPINGZ )
-            {
-                vertex[j].tu = vertex[j].x*au+bu;
-                vertex[j].tv = vertex[j].y*av+bv;
-            }
-        }
-
-        if ( vertex[0].tu == vertex[1].tu &&
-             vertex[0].tu == vertex[2].tu )  return false;
-
-        if ( vertex[0].tv == vertex[1].tv &&
-             vertex[0].tv == vertex[2].tv )  return false;
-    }
-
-    return true;
-}
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelect(int mode, int rotate, bool bMirrorX, bool bMirrorY,
-                           Math::Point ti, Math::Point ts, char *texName)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max;
-    Math::Point     a, b;
-    D3DMaping   D3Dmode;
-    float       au, bu, av, bv;
-    int         used, i;
-    bool        bPlausible[3];
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed   )  continue;
-        if ( !m_triangleTable[i].bSelect )  continue;
-
-        strcpy(m_triangleTable[i].texName, texName);
-    }
-
-    if ( mode == 1 )
-    {
-        MappingSelectSpherical(mode, rotate, bMirrorX, bMirrorY, ti, ts, texName);
-        return;
-    }
-    if ( mode == 2 )
-    {
-        MappingSelectCylindrical(mode, rotate, bMirrorX, bMirrorY, ti, ts, texName);
-        return;
-    }
-    if ( mode == 3 )
-    {
-        MappingSelectFace(mode, rotate, bMirrorX, bMirrorY, ti, ts, texName);
-        return;
-    }
-
-    BBoxCompute(min, max);
-
-    bPlausible[0] = IsMappingSelectPlausible(D3DMAPPINGX);
-    bPlausible[1] = IsMappingSelectPlausible(D3DMAPPINGY);
-    bPlausible[2] = IsMappingSelectPlausible(D3DMAPPINGZ);
-
-    for ( i=0 ; i<9 ; i++ )
-    {
-        if ( !bPlausible[i%3] )  continue;
-        if ( rotate-- == 0 )  break;
-    }
-    if ( i%3 == 0 )  D3Dmode = D3DMAPPINGX;
-    if ( i%3 == 1 )  D3Dmode = D3DMAPPINGY;
-    if ( i%3 == 2 )  D3Dmode = D3DMAPPINGZ;
-
-    if ( D3Dmode == D3DMAPPINGX )
-    {
-        a.x = min.z;
-        a.y = min.y;
-        b.x = max.z;
-        b.y = max.y;
-    }
-    if ( D3Dmode == D3DMAPPINGY )
-    {
-        a.x = min.x;
-        a.y = min.z;
-        b.x = max.x;
-        b.y = max.z;
-    }
-    if ( D3Dmode == D3DMAPPINGZ )
-    {
-        a.x = min.x;
-        a.y = min.y;
-        b.x = max.x;
-        b.y = max.y;
-    }
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    au = (ts.x-ti.x)/(b.x-a.x);
-    bu = ts.x-b.x*(ts.x-ti.x)/(b.x-a.x);
-
-    av = (ts.y-ti.y)/(b.y-a.y);
-    bv = ts.y-b.y*(ts.y-ti.y)/(b.y-a.y);
-
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        if ( D3Dmode == D3DMAPPINGX )
-        {
-            vertex.tu = vertex.z*au+bu;
-            vertex.tv = vertex.y*av+bv;
-        }
-        if ( D3Dmode == D3DMAPPINGY )
-        {
-            vertex.tu = vertex.x*au+bu;
-            vertex.tv = vertex.z*av+bv;
-        }
-        if ( D3Dmode == D3DMAPPINGZ )
-        {
-            vertex.tu = vertex.x*au+bu;
-            vertex.tv = vertex.y*av+bv;
-        }
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelectSpherical(int mode, int rotate, bool bMirrorX, bool bMirrorY,
-                                    Math::Point ti, Math::Point ts, char *texName)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max, center, dim, p;
-    float       radius, k, u, v;
-    int         used, i;
-
-    BBoxCompute(min, max);
-    center = (min+max)/2.0f;
-    dim    = (max-min)/2.0f;
-    radius = Math::Min(dim.x, dim.y, dim.z);
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        p.x = vertex.x-center.x;
-        p.y = vertex.y-center.y;
-        p.z = vertex.z-center.z;
-
-        k = radius/p.Length();
-        u = k*p.x;
-        v = k*p.z;
-        u = (u/dim.x*2.0f+1.0f)/2.0f;  // 0..1
-        v = (v/dim.z*2.0f+1.0f)/2.0f;
-
-        vertex.tu = ti.x+(ts.x-ti.x)*u;
-        vertex.tv = ti.y+(ts.y-ti.y)*v;
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-// Seeking the center of a group of points.
-
-Math::Vector CModel::RetMappingCenter(Math::Vector pos, Math::Vector min)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    center, p;
-    int         used, i, nb;
-
-    center.x = 0.0f;
-    center.y = 0.0f;
-    center.z = 0.0f;
-
-    nb = 0;
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        p.x = vertex.x;
-        p.y = vertex.y;
-        p.z = vertex.z;
-
-        if ( fabs(p.x-pos.x) <= min.x &&
-             fabs(p.y-pos.y) <= min.y &&
-             fabs(p.z-pos.z) <= min.z )
-        {
-            center.x += p.x;
-            center.y += p.y;
-            center.z += p.z;
-            nb ++;
-        }
-    }
-
-    if ( nb == 0 )  return pos;
-
-    center.x /= (float)nb;
-    center.y /= (float)nb;
-    center.z /= (float)nb;
-
-    return center;
-}
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelectCylindrical(int mode, int rotate, bool bMirrorX, bool bMirrorY,
-                                      Math::Point ti, Math::Point ts, char *texName)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max, center, local, dim, p, pp, box;
-    float       radius, u, v;
-    int         used, i;
-
-    BBoxCompute(min, max);
-    center = (min+max)/2.0f;
-    dim    = (max-min)/2.0f;
-    radius = Math::Min(dim.x, dim.y, dim.z);
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    if ( rotate == 0 )
-    {
-        box.x =  2.0f;
-        box.y = 10.0f;
-        box.z = 10.0f;
-    }
-    if ( rotate == 1 )
-    {
-        box.x = 10.0f;
-        box.y =  2.0f;
-        box.z = 10.0f;
-    }
-    if ( rotate == 2 )
-    {
-        box.x = 10.0f;
-        box.y = 10.0f;
-        box.z =  2.0f;
-    }
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        p.x = vertex.x;
-        p.y = vertex.y;
-        p.z = vertex.z;
-
-#if 1
-        p.x -= center.x;
-        p.y -= center.y;
-        p.z -= center.z;
-
-        pp = p;
-#else
-        local = RetMappingCenter(p, box);
-
-        pp = p;
-        pp.x -= local.x;
-        pp.y -= local.y;
-        pp.z -= local.z;
-
-        p.x -= center.x;
-        p.y -= center.y;
-        p.z -= center.z;
-#endif
-
-        if ( rotate == 0 )
-        {
-            u = Math::RotateAngle(pp.y, pp.z);
-            v = p.x/dim.x/2.0f + 0.5f;
-        }
-        if ( rotate == 1 )
-        {
-            u = Math::RotateAngle(pp.x, pp.z);
-            v = p.y/dim.y/2.0f + 0.5f;
-        }
-        if ( rotate == 2 )
-        {
-            u = Math::RotateAngle(pp.x, pp.y);
-            v = p.z/dim.z/2.0f + 0.5f;
-        }
-
-//?     if ( u < Math::PI )  u = u/Math::PI;
-//?     else           u = 2.0f-u/Math::PI;
-        u = u/(Math::PI*2.0f);
-
-        vertex.tu = ti.x+(ts.x-ti.x)*u;
-        vertex.tv = ti.y+(ts.y-ti.y)*v;
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelectFace(int mode, int rotate, bool bMirrorX, bool bMirrorY,
-                               Math::Point ti, Math::Point ts, char *texName)
-{
-    D3DVERTEX2  vertex[3];
-    Math::Vector    min, max, center, local, dim, p;
-    float       radius, u[3], v[3], m[3], avg;
-    int         used, i, j;
-
-    BBoxCompute(min, max);
-    center = (min+max)/2.0f;
-    dim    = (max-min)/2.0f;
-    radius = Math::Min(dim.x, dim.y, dim.z);
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        for ( j=0 ; j<3 ; j++ )
-        {
-            if ( !GetVertex(i*3+j, vertex[j]) )  continue;
-
-            p.x = vertex[j].x - center.x;
-            p.y = vertex[j].y - center.y;
-            p.z = vertex[j].z - center.z;
-
-#if 0
-            u[j] = Math::RotateAngle(p.x, p.z)/(Math::PI*2.0f)+0.5f;
-            if ( u[j] > 1.0f ) u[j] -= 1.0f;
-#else
-            u[j] = Math::RotateAngle(p.x, p.z)/Math::PI;
-//?         if ( u[j] > 1.0f )  u[j] = 2.0f-u[j];
-            if ( u[j] > 1.0f )  u[j] -= 1.0f;
-#endif
-
-            v[j] = p.y/dim.y/2.0f + 0.5f;
-
-            if ( u[j] < 0.5f )  m[j] = u[j];
-            else                m[j] = u[j]-1.0f;
-        }
-
-        avg = (m[0]+m[1]+m[2])/3.0f;
-
-        for ( j=0 ; j<3 ; j++ )
-        {
-            if ( u[j] < 0.05f || u[j] > 0.95f )
-            {
-                if ( avg > 0.0f )  u[j] = 0.0f;
-                else               u[j] = 1.0f;
-            }
-
-            vertex[j].tu = ti.x+(ts.x-ti.x)*u[j];
-            vertex[j].tv = ti.y+(ts.y-ti.y)*v[j];
-
-            SetVertex(i*3+j, vertex[j]);
-        }
-    }
-
-    SelectTerm();
-}
-
-
-// Maps a secondary texture on selected triangles.
-
-void CModel::MappingSelect2(int texNum2, int subdiv,
-                            int offsetU, int offsetV,
-                            bool bMirrorX, bool bMirrorY)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max, center, p;
-    float       u ,v;
-    int         used, i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed   )  continue;
-        if ( !m_triangleTable[i].bSelect )  continue;
-
-        m_triangleTable[i].texNum2 = texNum2;
-    }
-
-    if ( subdiv == 6 )
-    {
-        MappingSelectSpherical2(bMirrorX, bMirrorY);
-        return;
-    }
-    if ( subdiv == 7 )
-    {
-        MappingSelectMagic2(bMirrorX, bMirrorY);
-        return;
-    }
-    if ( subdiv > 2 )
-    {
-        MappingSelectPlane2(subdiv-3, bMirrorX, bMirrorY);
-        return;
-    }
-
-    BBoxCompute(min, max);
-    center = (min+max)/2.0f;
-
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        p.x = vertex.x-center.x;
-        p.y = vertex.y-center.y;
-        p.z = vertex.z-center.z;
-
-        u = Math::RotateAngle(p.x, p.z);
-        v = Math::RotateAngle(Math::Point(p.x, p.z).Length(), p.y);
-        if ( p.x < 0.0f )  v += Math::PI;
-
-        u = Math::NormAngle(u+(float)offsetU*Math::PI/180.0f);
-        v = Math::NormAngle(v+(float)offsetV*Math::PI/180.0f);
-
-        if ( subdiv == 1 )
-        {
-            u = u/(Math::PI*2.0f);
-            v = v/(Math::PI*2.0f);
-        }
-        if ( subdiv == 2 )
-        {
-            if ( u < Math::PI )  u = u/Math::PI;
-            else           u = (Math::PI*2.0f-u)/Math::PI;
-            if ( v < Math::PI )  v = v/Math::PI;
-            else           v = (Math::PI*2.0f-v)/Math::PI;
-        }
-
-        vertex.tu2 = u;
-        vertex.tv2 = v;
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-// Maps a secondary texture on flat.
-
-void CModel::MappingSelectPlane2(int mode, bool bMirrorX, bool bMirrorY)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max;
-    Math::Point     ti, ts, a, b;
-    float       au, bu, av, bv;
-    int         used, i;
-
-    ti = Math::Point(0.0f, 0.0f);
-    ts = Math::Point(1.0f, 1.0f);
-
-    BBoxCompute(min, max);
-
-    if ( mode == 0 )
-    {
-        a.x = min.z;
-        a.y = min.y;
-        b.x = max.z;
-        b.y = max.y;
-    }
-    if ( mode == 1 )
-    {
-        a.x = min.x;
-        a.y = min.z;
-        b.x = max.x;
-        b.y = max.z;
-    }
-    if ( mode == 2 )
-    {
-        a.x = min.x;
-        a.y = min.y;
-        b.x = max.x;
-        b.y = max.y;
-    }
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    au = (ts.x-ti.x)/(b.x-a.x);
-    bu = ts.x-b.x*(ts.x-ti.x)/(b.x-a.x);
-
-    av = (ts.y-ti.y)/(b.y-a.y);
-    bv = ts.y-b.y*(ts.y-ti.y)/(b.y-a.y);
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        if ( mode == 0 )
-        {
-            vertex.tu2 = vertex.z*au+bu;
-            vertex.tv2 = vertex.y*av+bv;
-        }
-        if ( mode == 1 )
-        {
-            vertex.tu2 = vertex.x*au+bu;
-            vertex.tv2 = vertex.z*av+bv;
-        }
-        if ( mode == 2 )
-        {
-            vertex.tu2 = vertex.x*au+bu;
-            vertex.tv2 = vertex.y*av+bv;
-        }
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelectSpherical2(bool bMirrorX, bool bMirrorY)
-{
-    D3DVERTEX2  vertex;
-    Math::Vector    min, max, center, dim, p;
-    Math::Point     ti, ts;
-    float       radius, k, u, v;
-    int         used, i;
-
-    BBoxCompute(min, max);
-    center = (min+max)/2.0f;
-    dim    = (max-min)/2.0f;
-    radius = Math::Min(dim.x, dim.y, dim.z);
-
-    ti = Math::Point(0.0f, 0.0f);
-    ts = Math::Point(1.0f, 1.0f);
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( !GetVertex(i, vertex) )  continue;
-
-        p.x = vertex.x-center.x;
-        p.y = vertex.y-center.y;
-        p.z = vertex.z-center.z;
-
-        k = radius/p.Length();
-        u = k*p.x;
-        v = k*p.z;
-        u = (u/dim.x*2.0f+1.0f)/2.0f;  // 0..1
-        v = (v/dim.z*2.0f+1.0f)/2.0f;
-
-        vertex.tu2 = ti.x+(ts.x-ti.x)*u;
-        vertex.tv2 = ti.y+(ts.y-ti.y)*v;
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-// Maps a texture onto the selected triangles.
-
-void CModel::MappingSelectMagic2(bool bMirrorX, bool bMirrorY)
-{
-    D3DVERTEX2  vertex, v[3];
-    Math::Vector    min, max, au, bu, av, bv, n;
-    Math::Point     ti, ts;
-    int         used, i, mode;
-
-    ti = Math::Point(0.0f, 0.0f);
-    ts = Math::Point(1.0f, 1.0f);
-
-    BBoxCompute(min, max);
-
-    if ( bMirrorX )
-    {
-        Math::Swap(ti.x, ts.x);
-    }
-
-    if ( !bMirrorY )  // reverse test!
-    {
-        Math::Swap(ti.y, ts.y);
-    }
-
-    au.x = (ts.x-ti.x)/(max.x-min.x);
-    bu.x = ts.x-max.x*(ts.x-ti.x)/(max.x-min.x);
-    au.y = (ts.x-ti.x)/(max.y-min.y);
-    bu.y = ts.x-max.y*(ts.x-ti.x)/(max.y-min.y);
-    au.z = (ts.x-ti.x)/(max.z-min.z);
-    bu.z = ts.x-max.z*(ts.x-ti.x)/(max.z-min.z);
-
-    av.x = (ts.y-ti.y)/(max.x-min.x);
-    bv.x = ts.y-max.x*(ts.y-ti.y)/(max.x-min.x);
-    av.y = (ts.y-ti.y)/(max.y-min.y);
-    bv.y = ts.y-max.y*(ts.y-ti.y)/(max.y-min.y);
-    av.z = (ts.y-ti.y)/(max.z-min.z);
-    bv.z = ts.y-max.z*(ts.y-ti.y)/(max.z-min.z);
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used*3 ; i++ )
-    {
-        if ( i%3 == 0 )
-        {
-            if ( !GetVertex(i+0, v[0]) )  continue;
-            if ( !GetVertex(i+1, v[1]) )  continue;
-            if ( !GetVertex(i+2, v[2]) )  continue;
-
-            n = Math::NormalToPlane(Math::Vector(v[0].x, v[0].y, v[0].z),
-                                    Math::Vector(v[1].x, v[1].y, v[1].z),
-                                    Math::Vector(v[2].x, v[2].y, v[2].z));
-
-            n.x = fabs(n.x);
-            n.y = fabs(n.y);
-            n.z = fabs(n.z);
-
-            if ( n.x >= Math::Max(n.y, n.z) )  mode = 0;
-            if ( n.y >= Math::Max(n.x, n.z) )  mode = 1;
-            if ( n.z >= Math::Max(n.x, n.y) )  mode = 2;
-        }
-
-        if ( !GetVertex(i, vertex) )  continue;
-
-        if ( mode == 0 )
-        {
-            vertex.tu2 = vertex.z*au.z+bu.z;
-            vertex.tv2 = vertex.y*av.y+bv.y;
-        }
-        if ( mode == 1 )
-        {
-            vertex.tu2 = vertex.x*au.x+bu.x;
-            vertex.tv2 = vertex.z*av.z+bv.z;
-        }
-        if ( mode == 2 )
-        {
-            vertex.tu2 = vertex.x*au.x+bu.x;
-            vertex.tv2 = vertex.y*av.y+bv.y;
-        }
-
-        SetVertex(i, vertex);
-    }
-
-    SelectTerm();
-}
-
-
-// Seeks the next triangle.
-
-int CModel::SearchNext(int rank, int step)
-{
-    int     max, i;
-
-    max = m_modFile->RetTriangleUsed();
-
-    for ( i=0 ; i<max ; i++ )
-    {
-        rank += step;
-        if ( rank <  0   )  rank = max-1;
-        if ( rank >= max )  rank = 0;
-
-        if ( m_triangleTable[rank].min != m_min ||
-             m_triangleTable[rank].max != m_max )  continue;
-
-        if ( m_triangleTable[rank].bUsed )  break;
-    }
-    return rank;
-}
-
-// Seeks all the triangles belonging to the same plane.
-
-int CModel::SearchSamePlane(int first, int step)
-{
-    Math::Vector    vFirst[3], vNext[3];
-    int         last, i;
-
-    vFirst[0].x = m_triangleTable[first].p1.x;
-    vFirst[0].y = m_triangleTable[first].p1.y;
-    vFirst[0].z = m_triangleTable[first].p1.z;
-    vFirst[1].x = m_triangleTable[first].p2.x;
-    vFirst[1].y = m_triangleTable[first].p2.y;
-    vFirst[1].z = m_triangleTable[first].p2.z;
-    vFirst[2].x = m_triangleTable[first].p3.x;
-    vFirst[2].y = m_triangleTable[first].p3.y;
-    vFirst[2].z = m_triangleTable[first].p3.z;
-
-    for ( i=0 ; i<1000 ; i++ )
-    {
-        last = first;
-        first = SearchNext(first, step);
-
-        vNext[0].x = m_triangleTable[first].p1.x;
-        vNext[0].y = m_triangleTable[first].p1.y;
-        vNext[0].z = m_triangleTable[first].p1.z;
-        vNext[1].x = m_triangleTable[first].p2.x;
-        vNext[1].y = m_triangleTable[first].p2.y;
-        vNext[1].z = m_triangleTable[first].p2.z;
-        vNext[2].x = m_triangleTable[first].p3.x;
-        vNext[2].y = m_triangleTable[first].p3.y;
-        vNext[2].z = m_triangleTable[first].p3.z;
-
-        if ( !IsSamePlane(vFirst, vNext) )  // other plan?
-        {
-            return last;
-        }
-    }
-    return first;
-}
-
-// Seeks the next triangle.
-
-void CModel::CurrentSearchNext(int step, bool bControl)
-{
-    if ( step > 0 )  // forward?
-    {
-        m_triangleSel1 = SearchNext(m_triangleSel2, step);
-        if ( bControl )
-        {
-            m_triangleSel2 = m_triangleSel1;
-        }
-        else
-        {
-            m_triangleSel2 = SearchSamePlane(m_triangleSel1, step);
-        }
-    }
-    if ( step < 0 )  // back?
-    {
-        m_triangleSel2 = SearchNext(m_triangleSel1, step);
-        if ( bControl )
-        {
-            m_triangleSel1 = m_triangleSel2;
-        }
-        else
-        {
-            m_triangleSel1 = SearchSamePlane(m_triangleSel2, step);
-        }
-    }
-
-#if 0
-    char s[100];
-    sprintf(s, "(%.2f;%.2f;%.2f) (%.2f;%.2f;%.2f) (%.2f;%.2f;%.2f)",
-            m_triangleTable[m_triangleSel1].p1.x,
-            m_triangleTable[m_triangleSel1].p1.y,
-            m_triangleTable[m_triangleSel1].p1.z,
-            m_triangleTable[m_triangleSel1].p2.x,
-            m_triangleTable[m_triangleSel1].p2.y,
-            m_triangleTable[m_triangleSel1].p2.z,
-            m_triangleTable[m_triangleSel1].p3.x,
-            m_triangleTable[m_triangleSel1].p3.y,
-            m_triangleTable[m_triangleSel1].p3.z);
-    m_engine->SetInfoText(2, s);
-    sprintf(s, "(%.2f;%.2f) (%.2f;%.2f) (%.2f;%.2f)",
-            m_triangleTable[m_triangleSel1].p1.tu2,
-            m_triangleTable[m_triangleSel1].p1.tv2,
-            m_triangleTable[m_triangleSel1].p2.tu2,
-            m_triangleTable[m_triangleSel1].p2.tv2,
-            m_triangleTable[m_triangleSel1].p3.tu2,
-            m_triangleTable[m_triangleSel1].p3.tv2);
-    m_engine->SetInfoText(3, s);
-#endif
-
-    InitViewFromSelect();
-    UpdateInfoText();
-}
-
-// Initializes the current triangles.
-
-void CModel::CurrentInit()
-{
-    m_triangleSel1 = 0;
-    m_triangleSel2 = SearchSamePlane(m_triangleSel1, +1);
-
-    InitViewFromSelect();
-    UpdateInfoText();
-}
-
-// Selects the current triangles.
-
-void CModel::CurrentSelect(bool bSelect)
-{
-    int     i;
-
-    for ( i=m_triangleSel1 ; i<=m_triangleSel2 ; i++ )
-    {
-        m_triangleTable[i].bSelect = bSelect;
-    }
-}
-
-
-// Deselects all triangles.
-
-void CModel::DeselectAll()
-{
-    int     used, i;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        m_triangleTable[i].bSelect = false;
-    }
-}
-
-// Selects an area.
-
-void CModel::SelectZone(int first, int last)
-{
-    int     used, i;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        m_triangleTable[i].bSelect = false;
-        if ( i >= first && i < last )
-        {
-            m_triangleTable[i].bSelect = true;
-        }
-    }
-    m_triangleSel1 = first;
-    m_triangleSel2 = last-1;
-}
-
-// Selects all triangles.
-
-void CModel::SelectAll()
-{
-    int     used, i;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].min == m_min &&
-             m_triangleTable[i].max == m_max )
-        {
-            m_triangleTable[i].bSelect = true;
-        }
-    }
-}
-
-// Deselects all triangles.
-
-void CModel::SelectTerm()
-{
-    int     used, i;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( i >= m_triangleSel1 && i <= m_triangleSel2 )
-        {
-            if ( !m_triangleTable[i].bSelect )  return;
-        }
-        else
-        {
-            if ( m_triangleTable[i].bSelect )  return;
-        }
-    }
-
-    DeselectAll();
-}
-
-// Selects the triangles currents.
-
-void CModel::DefaultSelect()
-{
-    int     used, i;
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=m_triangleSel1 ; i<=m_triangleSel2 ; i++ )
-    {
-        m_triangleTable[i].bSelect = true;
-    }
-}
-
-
-
-// Removes all selected triangles.
-
-void CModel::SelectDelete()
-{
-    int     used ,i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bSelect )
-        {
-            m_triangleTable[i].bUsed = false;
-        }
-    }
-
-    i = m_triangleSel1;
-    Compress();
-
-    m_triangleSel1 = i;
-    m_triangleSel2 = SearchSamePlane(m_triangleSel1, +1);
-    InitViewFromSelect();
-    UpdateInfoText();
-}
-
-// Compresses all triangles.
-
-void CModel::Compress()
-{
-    int     used, i, j;
-
-    j = 0;
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( m_triangleTable[i].bUsed )
-        {
-            m_triangleTable[j++] = m_triangleTable[i];
-        }
-    }
-    m_modFile->SetTriangleUsed(j);
-    CurrentInit();
-}
-
-
-// Change the min / max of all selected triangles.
-
-void CModel::MinMaxChange()
-{
-    int     used, i;
-
-    DefaultSelect();
-
-    used = m_modFile->RetTriangleUsed();
-    for ( i=0 ; i<used ; i++ )
-    {
-        if ( !m_triangleTable[i].bSelect )  continue;
-
-        m_triangleTable[i].min = m_min;
-        m_triangleTable[i].max = m_max;
-    }
-}
-
-
-// Initializes the point of view.
-
-void CModel::InitView()
-{
-    m_viewHeight =  5.0f;
-    m_viewDist   = 50.0f;
-    m_viewAngleH =  0.0f;
-    m_viewAngleV =  0.0f;
-}
-
-// Initializes the point of view to see the selected triangles.
-
-void CModel::InitViewFromSelect()
-{
-#if 0
-    Math::Vector    n;
-    float       h,v;
-
-    n = RetSelectNormal();
-
-    m_viewAngleH = Math::RotateAngle(n.x, n.z)+Math::PI;
-    m_viewAngleV = Math::RotateAngle(sqrtf(n.x*n.x+n.z*n.z), n.y)+Math::PI;
-    h = m_viewAngleH;
-    v = m_viewAngleV;
-
-    while ( m_viewAngleV <= -Math::PI )
-    {
-        m_viewAngleV += Math::PI;
-        m_viewAngleH += Math::PI;
-    }
-    while ( m_viewAngleV >=  Math::PI )
-    {
-        m_viewAngleV -= Math::PI;
-        m_viewAngleH -= Math::PI;
-    }
-    m_viewAngleV *= 0.75f;
-
-    char s[100];
-    sprintf(s, "angle=%f %f -> %f %f\n", h,v, m_viewAngleH, m_viewAngleV);
-    OutputDebugString(s);
-#endif
-}
-
-// Updates the parameters for the point of view.
-
-void CModel::UpdateView()
-{
-    Math::Vector    eye, lookat, vUpVec;
-
-//? lookat = RetSelectCDG();
-    lookat = Math::Vector(0.0f, m_viewHeight, 0.0f);
-    eye = RotateView(lookat, m_viewAngleH, m_viewAngleV, m_viewDist);
-
-    vUpVec = Math::Vector(0.0f, 1.0f, 0.0f);
-    m_engine->SetViewParams(eye, lookat, vUpVec, 10.0f);
-    m_engine->SetRankView(0);
-}
-
-// Moves the point of view.
-
-void CModel::ViewMove(const Event &event, float speed)
-{
-    if ( IsEditFocus() )  return;
-
-    // Up/Down.
-    if ( event.axeY > 0.5f )
-    {
-        if ( event.keyState & KS_CONTROL )
-        {
-            m_viewHeight += event.rTime*10.0f*speed;
-            if ( m_viewHeight > 100.0f )  m_viewHeight = 100.0f;
-        }
-        else
-        {
-            m_viewAngleV -= event.rTime*1.0f*speed;
-            if ( m_viewAngleV < -Math::PI*0.49f )  m_viewAngleV = -Math::PI*0.49f;
-        }
-    }
-    if ( event.axeY < -0.5f )
-    {
-        if ( event.keyState & KS_CONTROL )
-        {
-            m_viewHeight -= event.rTime*10.0f*speed;
-            if ( m_viewHeight < -100.0f )  m_viewHeight = -100.0f;
-        }
-        else
-        {
-            m_viewAngleV += event.rTime*1.0f*speed;
-            if ( m_viewAngleV > Math::PI*0.49f )  m_viewAngleV = Math::PI*0.49f;
-        }
-    }
-
-    // Left/Right.
-    if ( event.axeX < -0.5f )
-    {
-        m_viewAngleH -= event.rTime*1.0f*speed;
-    }
-    if ( event.axeX > 0.5f )
-    {
-        m_viewAngleH += event.rTime*1.0f*speed;
-    }
-
-    // PageUp/PageDown.
-    if ( event.keyState & KS_PAGEUP )
-    {
-        m_viewDist -= event.rTime*30.0f*speed;
-        if ( m_viewDist < 1.0f )  m_viewDist = 1.0f;
-    }
-    if ( event.keyState & KS_PAGEDOWN )
-    {
-        m_viewDist += event.rTime*30.0f*speed;
-        if ( m_viewDist > 300.0f )  m_viewDist = 300.0f;
-    }
-}
-
-
-
-// Updates the text information.
-
-void CModel::UpdateInfoText()
-{
-    char        info[100];
-
-    if ( m_mode == 1 )
-    {
-        sprintf(info, "[1] V:color=%d K:state=%d  Sel=%d..%d (T=%d)",
-                m_color, m_state,
-                m_triangleSel1, m_triangleSel2,
-                m_triangleSel2-m_triangleSel1+1);
-        m_engine->SetInfoText(0, info);
-
-        sprintf(info, "M:mode=%d Z:rot=%d XY:mir=%d;%d P:part=%d O:name=%s",
-                m_textureMode, m_textureRotate,
-                m_bTextureMirrorX, m_bTextureMirrorY,
-                m_texturePart, m_textureName);
-        m_engine->SetInfoText(1, info);
-    }
-
-    if ( m_mode == 2 )
-    {
-        sprintf(info, "[2]  Sel=%d..%d (T=%d)",
-                m_triangleSel1, m_triangleSel2,
-                m_triangleSel2-m_triangleSel1+1);
-        m_engine->SetInfoText(0, info);
-
-        sprintf(info, "O:dirty=%d UV:offset=%d;%d XY:mir=%d;%d S:subdiv=%d",
-                m_secondTexNum,
-                m_secondOffsetU, m_secondOffsetV,
-                m_bTextureMirrorX, m_bTextureMirrorY,
-                m_secondSubdiv);
-        m_engine->SetInfoText(1, info);
-    }
-
-    if ( m_mode == 3 )
-    {
-        sprintf(info, "[3]  LOD Math::Min/max=%d..%d  Sel=%d..%d (T=%d)",
-                (int)m_min, (int)m_max,
-                m_triangleSel1, m_triangleSel2,
-                m_triangleSel2-m_triangleSel1+1);
-        m_engine->SetInfoText(0, info);
-
-        sprintf(info, "[Change]");
-        m_engine->SetInfoText(1, info);
-    }
-}
-
-
-
-static int tablePartT[] =   // lemt.tga
-{
-    192,   0, 256,  32,  // track profile
-      0,  64, 128, 128,  // wheels for track
-      0,   0, 128,  64,  // profile
-     90,   0, 128,  28,  // pivot trainer
-    128,   0, 192,  44,  // chest front
-    128,  44, 192,  58,  // shell
-    128,  58, 192,  87,  // back chest
-    128,  87, 192, 128,  // back shell
-    128, 128, 192, 144,  // sub back shell
-      0, 128,  32, 152,  // rear fender
-      0, 152,  32, 182,  // fender middle
-      0, 182,  32, 256,  // front fender
-     32, 128, 112, 176,  // wing
-    224,  48, 232,  64,  // thrust tunnel
-    192,  32, 224,  64,  // fire under reactor
-    224,  32, 256,  48,  // foot
-    192,  64, 256, 128,  // sensor
-    192, 128, 224, 176,  // battery holder
-    192, 216, 248, 248,  // cannon board
-    220, 216, 222, 245,  // cannon board
-     64, 176, 128, 224,  // top cannon
-    128, 152, 192, 160,  // external cannon
-    128, 144, 192, 152,  // interior cannon
-    192, 176, 224, 192,  // small cannon
-    128, 236, 192, 256,  // cannon organic
-    214, 192, 224, 216,  // crosshair
-    224, 128, 248, 152,  // articulation
-    128, 192, 192, 214,  // piston board
-    128, 214, 192, 236,  // piston front
-    192, 192, 214, 214,  // piston edge
-    128, 192, 161, 214,  // small piston board
-     32, 176,  64, 198,  // radar piston
-    128, 160, 160, 192,  // wheel
-    232,  48, 255,  56,  // tire profile
-    240, 152, 248, 216,  // vertical hatching
-    248, 192, 256, 256,  // battery
-    224, 152, 240, 168,  // rock
-    144,  80, 176, 112,  // nuclear
-    140,  76, 180, 116,  // large nuclear
-    144,  80, 152,  88,  // yellow nuclear
-    224, 168, 240, 192,  // cap resolution C
-    224, 192, 240, 210,  // back resolution C
-     32, 224,  96, 235,  // arm resolution C
-     32, 235,  96, 246,  // arm resolution C
-    161,   1, 164,   4,  // blank
-    168,   1, 171,   4,  // medium gray
-    154,   1, 157,   4,  // dark gray uniform
-    147,   1, 150,   4,  // blue unifrom
-    114, 130, 118, 134,  // red unifrom
-    121, 130, 125, 134,  // green uniform
-    114, 137, 118, 141,  // yellow uniform
-    121, 137, 125, 141,  // violet uniform
-    -1
-};
-
-static int tablePartR[] =   // roller.tga
-{
-      0,   0, 128,  52,  // wheels for track
-     48, 137, 128, 201,  // catalytic radiator
-      0,  52,  32,  84,  // front radiator
-     32,  52,  43,  84,  // back radiator
-      0,  84,  96, 137,  // large catalytic
-    128,   0, 192,  85,  // front
-    128, 173, 192, 256,  // back
-    192,   0, 256,  42,  // over
-    128,  85, 192, 109,  // catalytic pillon
-    128, 109, 192, 173,  // top pillon
-    192,  85, 240, 109,  // catalytic gate pillon
-      0, 137,  24, 256,  // catalytic verrin
-     24, 137,  48, 256,  // catalytic verrin
-     48, 201, 128, 233,  // medium cannon
-    192, 109, 256, 173,  // bottom cannon
-    192, 173, 240, 205,  // cannon 1
-    192, 173, 240, 177,  // cannon 2
-     43,  52,  75,  84,  // front cannon
-     48, 233, 128, 247,  // piston
-     96, 105, 128, 137,  // front phazer
-     96,  97, 128, 105,  // phazer cannon
-     75,  52, 107,  84,  // exhaust pipe
-    192, 205, 243, 256,  // nuclear power plant instruction
-    192,  42, 256,  85,  // reflection glass
-    -1
-};
-
-static int tablePartW[] =   // subm.tga
-{
-      0,   0, 128,  26,  // chenilles
-      0,  26,  22, 114,  // portique 1
-      0, 114,  22, 202,  // portique 2
-     22,  26,  82,  56,  // c�t� hublot
-     22,  56,  82,  86,  // c�t� ligne rouge
-     22,  86,  82, 116,  // c�t� simple
-     22, 116,  82, 146,  // avant/arri�re
-     22, 146,  82, 176,  // avant/arri�re + phare
-    132,  82, 196, 166,  // capot trainer
-    132, 166, 196, 177,  // capot trainer
-    132, 177, 196, 188,  // capot trainer
-      0, 224,  96, 256,  // c�t� trainer
-     30, 224,  48, 256,  // arri�re trainer
-    136, 240, 216, 256,  // barri�re courte
-     96, 240, 256, 256,  // barri�re longue
-    128,   0, 160,  32,  // black-box 1
-    160,   0, 192,  32,  // black-box 2
-    192,   0, 224,  32,  // black-box 3
-    224, 105, 256, 137,  // TNT 1
-    224, 137, 256, 169,  // TNT 2
-     82,  32, 146,  82,  // factory r�solution C
-    146,  32, 210,  82,  // factory r�solution C
-    224,   0, 256, 105,  // tower r�solution C
-     82,  82, 132, 150,  // research r�solution C
-    199, 169, 256, 233,  // sac r�solution C
-    106, 150, 130, 214,  // cl� A
-     82, 150, 106, 214,  // cl� B
-    132, 188, 196, 212,  // cl� C
-    132, 212, 196, 236,  // cl� D
-    210,  32, 224,  46,  // gris
-     56, 176,  82, 224,  // sol coffre-fort
-    -1
-};
-
-static int tablePartDr[] =  // drawer.tga
-{
-    128,   0, 134,   6,  // bleu
-    128,   6, 134,  12,  // gris fonc�
-    128,  12, 134,  18,  // gris clair
-      0,   0, 128,  32,  // roues chenille
-    192,   0, 256,  32,  // profil chenille
-    140,   0, 160,   8,  // profil phare
-    160,   0, 192,  32,  // face phare
-      0,  32, 160,  48,  // hachure
-    160,  32, 192,  48,  // c�t�
-      0,  48,  96,  96,  // tableau de bord
-     96,  48, 192, 112,  // radiateur
-    192,  32, 256, 112,  // grille lat�rale
-    192, 112, 256, 128,  // capot
-      0,  96,   8, 160,  // chassis
-      8,  96,  96, 104,  // axe chenilles
-      8, 104,  16, 160,  // axe carrousel
-     16, 128,  24, 160,  // flan support
-    224, 128, 256, 160,  // rotule
-     24, 104,  32, 160,  // bocal (18)
-     32, 104,  40, 160,  // bocal
-     40, 104,  48, 160,  // bocal
-     24, 152,  48, 160,  // bocal fond
-      0, 240,  32, 256,  // crayon 1: couleur (22)
-      0, 160,  32, 192,  // crayon 1: dessus
-      0, 192,  32, 256,  // crayon 1: pointe
-     32, 240,  64, 256,  // crayon 2: couleur
-     32, 160,  64, 192,  // crayon 2: dessus
-     32, 192,  64, 256,  // crayon 2: pointe
-     64, 240,  96, 256,  // crayon 3: couleur
-     64, 160,  96, 192,  // crayon 3: dessus
-     64, 192,  96, 256,  // crayon 3: pointe
-     96, 240, 128, 256,  // crayon 4: couleur
-     96, 160, 128, 192,  // crayon 4: dessus
-     96, 192, 128, 256,  // crayon 4: pointe
-    128, 240, 160, 256,  // crayon 5: couleur
-    128, 160, 160, 192,  // crayon 5: dessus
-    128, 192, 160, 256,  // crayon 5: pointe
-    160, 240, 192, 256,  // crayon 6: couleur
-    160, 160, 192, 192,  // crayon 6: dessus
-    160, 192, 192, 256,  // crayon 6: pointe
-    192, 240, 224, 256,  // crayon 7: couleur
-    192, 160, 224, 192,  // crayon 7: dessus
-    192, 192, 224, 256,  // crayon 7: pointe
-    224, 240, 256, 256,  // crayon 8: couleur
-    224, 160, 256, 192,  // crayon 8: dessus
-    224, 192, 256, 256,  // crayon 8: pointe
-    -1
-};
-
-static int tablePartKi[] =  // kid.tga
-{
-      0,   0, 128,  53,  // ciseaux
-    128,   0, 256, 128,  // CD
-      0,   0,   8,   8,  // livre 1: fond
-      8,   0,  16,   8,  // livre 2: fond
-     16,   0,  24,   8,  // livre: fond
-     24,   0,  32,   8,  // livre: fond
-     32,   0,  40,   8,  // livre: fond
-     40,   0,  48,   8,  // livre: fond
-      0,  53,  22, 138,  // livre 1: tranche
-     22,  53,  86, 138,  // livre 1: face
-      0, 138,  22, 224,  // livre 2: tranche
-     22, 138,  86, 224,  // livre 2: face
-     86,  53,  94,  85,  // livre: pages
-     94,  53, 110, 139,  // livre: tranche
-    110,  53, 126, 139,  // livre: tranche
-     86, 139, 102, 225,  // livre: tranche
-    102, 139, 118, 225,  // livre: tranche
-    118, 139, 134, 225,  // livre: tranche
-     64,   0,  72,   8,  // fauille: fond
-    155, 155, 256, 256,  // feuille: carreaux
-     72,   0,  80,   8,  // lampe
-     80,   0,  88,   8,  // lampe
-     80,   8,  88,  16,  // ampoule
-     72,   8,  80,  16,  // rayons (23)
-     86,  85,  94, 139,  // lampe
-      0, 224,  32, 256,  // lampe rotule
-     64,   8,  72,  16,  // arrosoir: fond
-    134, 128, 142, 256,  // arrosoir: corps
-    142, 128, 150, 256,  // arrosoir: tuyau
-    128, 225, 134, 256,  // arrosoir: int�rieur
-     32, 224,  64, 256,  // arrosoir: ponneau
-     56,   8,  64,  16,  // skate: roues (31)
-     48,   8,  56,  16,  // skate: axes
-     40,   8,  48,  16,  // skate: grip
-     32,   8,  40,  16,  // skate: tranche
-     24,   8,  32,  16,  // skate: dessous
-    150, 128, 200, 256,  // skate: motif 1
-    200, 128, 250, 256,  // skate: motif 2
-     64, 224,  96, 256,  // skate: roue (38)
-     96, 225, 104, 256,  // skate: amortisseur
-    -1
-};
-
-static int tablePartKi2[] = // kid2.tga
-{
-      2,   2,  62,  62,  // coca: dessus
-      0,  64,   8, 192,  // coca: flan
-      8,  64,  96, 192,  // coca: logo
-    128,   0, 256,  85,  // carton
-    128,  85, 256,  91,  // carton tranche
-    128, 128, 256, 256,  // roue
-    192,  96, 256, 128,  // pneu
-    184,  96, 192, 128,  // jante
-    128,  96, 160, 128,  // int�rieur
-    160,  96, 168, 104,  // porte bois
-    160, 104, 168, 112,  // porte m�tal
-    160, 112, 184, 128,  // vitre
-     96,   0, 128, 256,  // bouteille: corps (12)
-     64,   0,  96,  32,  // bouteille: bouchon
-    168,  96, 176, 104,  // bouteille: vert
-      0, 192,  96, 224,  // bois clair
-      0, 224,  96, 256,  // bois fonc�
-     64,  32,  96,  64,  // bateau
-    168, 104, 176, 112,  // ballon (18)
-    176, 104, 184, 112,  // ballon
-    176,  96, 184, 104,  // int�rieur caisse
-    -1
-};
-
-static int tablePartKi3[] = // kid3.tga
-{
-      0,   0,  32,  28,  // �crou: flan
-      0,  28,  32,  44,  // �crou: profil
-      0,  44,  32,  60,  // �crou: pas de vis
-      0,  60,  32,  64,  // tuyau
-      0,  64,  32,  68,  // tuyau
-      0,  68,   8,  76,  // tuyau
-      0,  76,  32, 108,  // plastic
-      8,  68,  16,  76,  // saut: gris clair (7)
-     16,  68,  24,  76,  // saut: gris fonc�
-     24,  68,  32,  76,  // saut: gris bois
-      0, 108,  32, 140,  // saut: rotule
-      0, 140,  32, 144,  // saut: axe
-    128,   0, 256, 128,  // saut: flan
-      0, 144,   8, 152,  // basket: gris fonc� (13)
-      8, 144,  16, 152,  // basket: gris clair
-     16, 144,  24, 152,  // basket: gris lacets
-     24, 144,  32, 152,  // basket: gris semelle
-      0, 152,   8, 181,  // basket: int�rieur
-      0, 181, 192, 256,  // basket: c�t�
-    192, 181, 226, 256,  // basket: arri�re
-     32, 135,  96, 181,  // basket: dessus (20)
-     96, 168, 128, 181,  // basket: avant
-      8, 152,  16, 160,  // chaise: plastique
-     16, 152,  24, 160,  // chaise: m�tal
-     32,   0,  64,  32,  // chaise: roue
-      8, 177,  24, 181,  // chaise: roue
-    226, 181, 234, 256,  // chaise: piston (26)
-     64,  96, 128, 128,  // chaise: relief
-     96, 135, 128, 167,  // chaise: dessous
-     32, 128, 250, 135,  // paille 1
-     38, 128, 256, 135,  // paille 2
-    234, 181, 242, 256,  // allumette
-      8, 160,  16, 168,  // allumette (dessus)
-    128, 135, 224, 181,  // panneau
-    242, 135, 256, 256,  // poteau (34)
-     24, 152,  32, 160,  // clou
-     16, 160,  24, 168,  // tuyau m�talique
-    112, 181, 192, 185,  // tuyau int�rieur
-     32,  32,  48,  80,  // pas de vis
-     24, 160,  32, 168,  // ventillateur: plastique (39)
-     40,  80,  56,  96,  // ventillateur: plastique d�grad�
-      8, 168,  16, 176,  // ventillateur: m�tal
-     32,  80,  40, 112,  // ventillateur: socle 1
-     64,   0,  96,  16,  // ventillateur: socle 2
-     48,  32,  56,  80,  // ventillateur: socle 3
-     64,  16,  96,  32,  // ventillateur: moteur flan
-     96,   0, 128,  32,  // ventillateur: moteur face
-    102,   6, 122,  26,  // ventillateur: socle dessus
-     16, 168,  24, 176,  // pot: uni (48)
-     56,  32,  64,  64,  // pot: haut
-     56,  64,  64,  96,  // pot: bas
-     64,  32, 128,  96,  // pot: terre
-    -1
-};
-
-static int tablePartF[] =   // factory.tga
-{
-      0,   0, 152, 152,  // plancher octogonal fabrique
-     50,  50, 102, 102,  // dessus pile
-      0, 152, 128, 252,  // avant
-    128, 152, 256, 252,  // arri�re
-    152,  28, 225, 128,  // c�t�
-    152,  28, 176, 128,  // c�t� partiel
-    152,   0, 216,  16,  // hachures
-    236,   0, 256,  40,  // axe
-    152, 128, 224, 152,  // support cible
-    -1
-};
-
-static int tablePartD[] =   // derrick.tga
-{
-      0,   0,  64,  32,  // grand c�t�
-     64,   0,  96,  24,  // petit c�t�
-     96,   0, 136,  24,  // attention
-      0,  32,   8, 160,  // tube 1
-      8,  32,  16,  96,  // tube 2
-     16,  32,  24, 160,  // pilier
-     24,  32,  32, 160,  // tige foret
-     32,  32,  40, 160,  // tige destructeur
-      8,  96,  16, 128,  // foret
-    136,   0, 256, 120,  // plancher octogonal station de recharge
-     40,  32,  64,  56,  // cube m�tal
-     64,  24, 128,  48,  // c�t� tour haut
-     64,  48, 128, 229,  // c�t� tour bas
-    136, 120, 256, 240,  // int�rieur usine
-      0, 160,  64, 224,  // to�t usine
-    -1
-};
-
-static int tablePartC[] =   // convert.tga
-{
-      0,   0, 120, 120,  // plancher octogonal convertisseur
-      0, 120, 128, 176,  // grand c�t�
-    128, 120, 192, 176,  // petit c�t�
-    192, 120, 256, 184,  // couvercle convertisseur
-    120,   0, 216,  64,  // face trianble
-    216,   0, 248,  64,  // c�t� triangle
-    120,  64, 160,  84,  // axe
-      0, 141, 128, 176,  // recherche: base
-      0, 176, 128, 214,  // recherche: haut
-      0, 214, 128, 252,  // recherche: haut (!)
-    174,  64, 190, 120,  // recherche: montant
-    190,  64, 206, 120,  // recherche: montant
-    206,  64, 254,  85,  // radar
-    192, 168, 256, 232,  // hachures carr�es
-    248,   0, 256,  64,  // c�ne fabrique de piles
-    128, 176, 192, 240,  // dessus centrale nucl�aire
-    120,  85, 174, 120,  // technicien, visage
-    206, 106, 256, 120,  // technicien, casquette
-    160,  64, 174,  78,  // technicien, visi�re
-    -1
-};
-
-static int tablePartS[] =   // search.tga
-{
-      0,   0, 128, 128,  // usine 1
-    128,   0, 256, 128,  // usine 2
-      0, 128, 128, 256,  // pile
-    128, 128, 228, 240,  // support pile
-    228, 128, 256, 184,  // antenne
-    128, 128, 192, 160,  // contr�le 1
-    128, 160, 192, 192,  // contr�le 2
-    128, 192, 192, 224,  // contr�le 3
-    128, 224, 192, 256,  // contr�le 4
-    -1
-};
-
-static int tablePartP[] =   // plant.tga
-{
-      0, 160,  48, 256,  // feuille 1
-      0,   0,  94, 100,  // feuille 2
-     48, 156, 108, 256,  // feuille 3
-     94,   0, 104, 100,  // tige 1
-    185,   0, 195, 100,  // tige 2
-    108, 100, 182, 256,  // foug�re
-    104,   0, 144, 100,  // courge
-    203,   0, 256,  83,  // armature derrick r�solution C
-    -1
-};
-
-static int tablePartV[] =   // vegetal.tga
-{
-      0,   0,  94, 100,  // racine
-    186,   0, 256, 256,  // tronc
-    162,   0, 168, 128,  // mat drapeau bleu
-    168,   0, 174, 128,  // mat drapeau rouge
-    174,   0, 180, 128,  // mat drapeau vert
-    180,   0, 186, 128,  // mat drapeau jaune
-    180, 128, 186, 256,  // mat drapeau violet
-     94,   0, 107,  32,  // drapeau bleu
-    107,   0, 120,  32,  // drapeau rouge
-    120,   0, 133,  32,  // drapeau vert
-    133,   0, 146,  32,  // drapeau jaune
-    146,   0, 159,  32,  // drapeau violet
-     94,  64, 126,  96,  // verre 1
-    126,  64, 158,  86,  // verre 2
-    128, 128, 180, 144,  // verre 3a
-    128, 144, 180, 160,  // verre 3b
-    128,  94, 162, 128,  // verre 4
-      0, 100,  32, 228,  // champignon 1
-     32, 100,  48, 228,  // champignon 1
-     48, 100, 112, 228,  // champignon 2
-    112, 100, 128, 228,  // champignon 2
-    128, 160, 180, 212,  // tronc (21)
-    -1
-};
-
-static int tablePartM[] =   // mother.tga
-{
-      0,   0, 128, 128,  // corps arri�re
-    128,   0, 192, 128,  // corps avant
-      0, 128,  64, 192,  // t�te
-     64, 128, 192, 160,  // pince ext.
-     64, 160, 192, 192,  // pince int.
-      0, 192,  64, 256,  // mire
-    -1
-};
-
-static int tablePartA[] =   // ant.tga
-{
-      0,   0,  64,  64,  // queue
-      0,  96, 128, 160,  // queue abeille
-     64,   0, 128,  64,  // corps
-    128,   0, 192,  64,  // t�te
-      0,  64,  64,  72,  // patte
-      0,  72,  64,  80,  // antenne
-     64,  64, 150,  96,  // queue ver
-    150,  64, 182,  96,  // corps ver
-    182,  64, 256,  96,  // t�te ver
-    224,  32, 256,  64,  // articulation ver
-    128,  96, 220, 160,  // aile
-      0,  80,  16,  96,  // oeil
-    200,   0, 208,   8,  // vert clair
-    200,   8, 208,  16,  // vert fonc�
-      0, 160,  64, 224,  // corps araign�e
-     64, 160, 128, 192,  // t�te araign�e
-    208,   0, 216,  64,  // patte araign�e
-    216,   0, 224,  32,  // patte araign�e
-    224,   0, 256,   8,  // antenne araign�e
-    192,   0, 200,   8,  // brun clair
-    192,   8, 200,  16,  // brun fonc�
-    128, 160, 256, 256,  // SatCom
-    -1
-};
-
-static int tablePartH[] =   // human.tga
-{
-      0,   0,  64,  64,  // vissi�re
-     64,   0,  96,  64,  // cuisse
-     96,   0, 128,  64,  // jambe
-    128,   0, 192,  32,  // bras
-    128,  32, 192,  64,  // avant-bras
-      0,  64, 128, 224,  // ventre
-    128,  64, 256, 224,  // dos
-     64, 224, 112, 256,  // dessus pied
-    144, 224, 168, 240,  // dessous pied
-    112, 224, 144, 240,  // c�t� pied
-    112, 224, 128, 240,  // c�t� pied
-      0, 224,  64, 256,  // gant
-    168, 224, 200, 256,  // oreille
-    112, 240, 144, 256,  // ligne casque
-    200, 224, 208, 256,  // int�rieur coup
-    240,   0, 244,  64,  // bombone orange
-    244,   0, 248,  64,  // bombone orange (reflet)
-    248,   0, 252,  64,  // bombone bleu
-    252,   0, 256,  64,  // bombone bleu (reflet)
-    144, 240, 156, 256,  // gris habit
-    156, 240, 168, 256,  // gris articulation
-//? 208, 224, 256, 256,  // SatCom
-    192,   0, 240,  64,  // quartz
-    -1
-};
-
-static int tablePartG[] =   // apollo.tga
-{
-      0,   0,  64,  64,  // rev�tement LEM
-     64,   0, 128,  64,  // rev�tement LEM
-    128,   8, 136, 128,  // pied
-      0,  64,  64, 128,  // roue
-    136,  24, 152,  44,  // profil pneu
-    136,   8, 160,  24,  // garde boue
-     64,  64, 128, 128,  // si�ge
-     64, 128, 128, 192,  // si�ge
-     64, 192, 128, 212,  // si�ge
-    128, 128, 240, 192,  // moteur
-      0, 192,  28, 256,  // moteur
-     32, 128,  60, 256,  // moteur
-    224,   0, 256, 128,  // avant
-    206,   0, 224, 128,  // avant
-    136,  44, 168,  62,  // avant
-     64, 212, 108, 256,  // panneau de commande
-    198,   0, 206, 128,  // mat
-    190,  64, 198, 128,  // mat
-    160,   8, 176,  24,  // cam�ra
-    176,   8, 192,  24,  // moyeu
-    136,  64, 168,  96,  // module
-    168,  64, 190,  96,  // module
-    136,  96, 168, 128,  // module
-    128, 192, 230, 252,  // drapeau
-      0, 128,  32, 192,  // antenne
-    128,   0, 136,   8,  // jaune
-    136,   0, 144,   8,  // beige
-    144,   0, 152,   8,  // brun
-    168,   0, 176,   8,  // gris tr�s clair
-    152,   0, 160,   8,  // gris clair
-    160,   0, 168,   8,  // gris fonc�
-    -1
-};
-
-static int tablePartB[] =   // base1.tga
-{
-      0,   0,  80, 256,  // int�rieur porte
-     80,   0,  88, 256,  // tranche porte
-    116,   0, 180,  64,  // coiffe 1
-    116,  64, 180, 102,  // coiffe 2
-    180,   0, 244,  37,  // base
-    180,  37, 196, 101,  // support
-     88,   0, 116, 256,  // colonne
-    212,  37, 256, 128,  // suppl�ment
-    128, 128, 256, 256,  // 1/4 du sol
-    196,  37, 212,  53,  // gris fonc�
-    196,  53, 212,  69,  // gris clair
-    -1
-};
-
-static int tablePartCe[] =  // cellar01.tga
-{
-      0, 128,  64, 192,  // briques
-     64, 128, 128, 192,  // briques
-    128, 128, 192, 192,  // briques
-    192, 128, 256, 192,  // briques
-    -1
-};
-
-static int tablePartFa[] =  // face01.tga
-{
-      0,   0, 256, 256,  // visage
-    -1
-};
-
-// Retourne le pointeur la table.
-
-int* CModel::RetTextureTable()
-{
-    if ( m_textureRank ==  0 )  return tablePartT;
-    if ( m_textureRank ==  1 )  return tablePartR;
-    if ( m_textureRank ==  2 )  return tablePartW;
-    if ( m_textureRank ==  3 )  return tablePartDr;
-    if ( m_textureRank ==  4 )  return tablePartKi;
-    if ( m_textureRank ==  5 )  return tablePartKi2;
-    if ( m_textureRank ==  6 )  return tablePartKi3;
-    if ( m_textureRank ==  7 )  return tablePartF;
-    if ( m_textureRank ==  8 )  return tablePartD;
-    if ( m_textureRank ==  9 )  return tablePartC;
-    if ( m_textureRank == 10 )  return tablePartS;
-    if ( m_textureRank == 11 )  return tablePartP;
-    if ( m_textureRank == 12 )  return tablePartV;
-    if ( m_textureRank == 13 )  return tablePartM;
-    if ( m_textureRank == 14 )  return tablePartA;
-    if ( m_textureRank == 15 )  return tablePartH;
-    if ( m_textureRank == 16 )  return tablePartG;
-    if ( m_textureRank == 17 )  return tablePartB;
-    if ( m_textureRank == 18 )  return tablePartCe;
-    if ( m_textureRank == 19 )  return tablePartFa;
-    if ( m_textureRank == 20 )  return tablePartFa;
-    if ( m_textureRank == 21 )  return tablePartFa;
-    if ( m_textureRank == 22 )  return tablePartFa;
-    return 0;
-}
-
-// Updates the part of texture.
-
-void CModel::TexturePartUpdate()
-{
-    int     *table;
-
-    table = RetTextureTable();
-    if ( table == 0 )  return;
-
-    m_textureInf.x = (table[m_texturePart*4+0]+0.5f)/256.0f;
-    m_textureInf.y = (table[m_texturePart*4+1]+0.5f)/256.0f;
-    m_textureSup.x = (table[m_texturePart*4+2]-0.5f)/256.0f;
-    m_textureSup.y = (table[m_texturePart*4+3]-0.5f)/256.0f;
-
-    PutTextureValues();
-}
-
-// Changes the texture.
-
-void CModel::TextureRankChange(int step)
-{
-    m_textureRank += step;
-
-    if ( m_textureRank >= MAX_NAMES )  m_textureRank = 0;
-    if ( m_textureRank <  0         )  m_textureRank = MAX_NAMES-1;
-
-    if ( m_textureRank ==  0 )  strcpy(m_textureName, "lemt.tga");
-    if ( m_textureRank ==  1 )  strcpy(m_textureName, "roller.tga");
-    if ( m_textureRank ==  2 )  strcpy(m_textureName, "subm.tga");
-    if ( m_textureRank ==  3 )  strcpy(m_textureName, "drawer.tga");
-    if ( m_textureRank ==  4 )  strcpy(m_textureName, "kid.tga");
-    if ( m_textureRank ==  5 )  strcpy(m_textureName, "kid2.tga");
-    if ( m_textureRank ==  6 )  strcpy(m_textureName, "kid3.tga");
-    if ( m_textureRank ==  7 )  strcpy(m_textureName, "factory.tga");
-    if ( m_textureRank ==  8 )  strcpy(m_textureName, "derrick.tga");
-    if ( m_textureRank ==  9 )  strcpy(m_textureName, "convert.tga");
-    if ( m_textureRank == 10 )  strcpy(m_textureName, "search.tga");
-    if ( m_textureRank == 11 )  strcpy(m_textureName, "plant.tga");
-    if ( m_textureRank == 12 )  strcpy(m_textureName, "vegetal.tga");
-    if ( m_textureRank == 13 )  strcpy(m_textureName, "mother.tga");
-    if ( m_textureRank == 14 )  strcpy(m_textureName, "ant.tga");
-    if ( m_textureRank == 15 )  strcpy(m_textureName, "human.tga");
-    if ( m_textureRank == 16 )  strcpy(m_textureName, "apollo.tga");
-    if ( m_textureRank == 17 )  strcpy(m_textureName, "base1.tga");
-    if ( m_textureRank == 18 )  strcpy(m_textureName, "cellar01.tga");
-    if ( m_textureRank == 19 )  strcpy(m_textureName, "face01.tga");
-    if ( m_textureRank == 20 )  strcpy(m_textureName, "face02.tga");
-    if ( m_textureRank == 21 )  strcpy(m_textureName, "face03.tga");
-    if ( m_textureRank == 22 )  strcpy(m_textureName, "face04.tga");
-
-    m_texturePart = 0;
-}
-
-// Changes the part of texture.
-
-void CModel::TexturePartChange(int step)
-{
-    int     *table;
-
-    table = RetTextureTable();
-    if ( table == 0 )  return;
-
-    m_texturePart ++;
-
-    if ( table[m_texturePart*4] == -1 )
-    {
-        m_texturePart = 0;
-    }
-
-    TexturePartUpdate();
-}
-
-
diff --git a/src/old/model.h b/src/old/model.h
deleted file mode 100644
index 275807b..0000000
--- a/src/old/model.h
+++ /dev/null
@@ -1,136 +0,0 @@
-// * 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/.
-
-// model.h
-
-#pragma once
-
-
-#include "common/event.h"
-#include "old/modfile.h"
-#include "math/point.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-class CModFile;
-class CInterface;
-
-
-
-class CModel
-{
-public:
-    CModel(CInstanceManager* iMan);
-    ~CModel();
-
-    void        StartUserAction();
-    void        StopUserAction();
-
-    bool        EventProcess(const Event &event);
-
-    void        InitView();
-    void        InitViewFromSelect();
-    void        UpdateView();
-    void        ViewMove(const Event &event, float speed);
-
-protected:
-    bool        EventFrame(const Event &event);
-    bool        GetVertex(int rank, D3DVERTEX2 &vertex);
-    bool        SetVertex(int rank, D3DVERTEX2 &vertex);
-    Math::Vector    RetSelectCDG();
-    Math::Vector    RetSelectNormal();
-    void        SmoothSelect();
-    void        PlaneSelect();
-    void        ColorSelect();
-    void        StateSelect();
-    void        MoveSelect(Math::Vector move);
-    void        OperSelect(Math::Vector move, char oper);
-    void        ReadScript(char *filename);
-    void        BBoxCompute(Math::Vector &min, Math::Vector &max);
-    bool        IsMappingSelectPlausible(D3DMaping D3Dmode);
-    void        MappingSelect(int mode, int rotate, bool bMirrorX, bool bMirrorY, Math::Point ti, Math::Point ts, char *texName);
-    void        MappingSelectSpherical(int mode, int rotate, bool bMirrorX, bool bMirrorY, Math::Point ti, Math::Point ts, char *texName);
-    Math::Vector    RetMappingCenter(Math::Vector pos, Math::Vector min);
-    void        MappingSelectCylindrical(int mode, int rotate, bool bMirrorX, bool bMirrorY, Math::Point ti, Math::Point ts, char *texName);
-    void        MappingSelectFace(int mode, int rotate, bool bMirrorX, bool bMirrorY, Math::Point ti, Math::Point ts, char *texName);
-    void        MappingSelect2(int texNum2, int subdiv, int offsetU, int offsetV, bool bMirrorX, bool bMirrorY);
-    void        MappingSelectPlane2(int mode, bool bMirrorX, bool bMirrorY);
-    void        MappingSelectSpherical2(bool bMirrorX, bool bMirrorY);
-    void        MappingSelectMagic2(bool bMirrorX, bool bMirrorY);
-    int         SearchNext(int rank, int step);
-    int         SearchSamePlane(int first, int step);
-    void        CurrentSearchNext(int step, bool bControl);
-    void        CurrentInit();
-    void        CurrentSelect(bool bSelect);
-    void        DeselectAll();
-    void        SelectAll();
-    void        SelectZone(int first, int last);
-    void        SelectTerm();
-    void        DefaultSelect();
-    void        SelectDelete();
-    void        Compress();
-    void        MinMaxSelect();
-    void        MinMaxChange();
-    void        UpdateInfoText();
-    int*        RetTextureTable();
-    void        TexturePartUpdate();
-    void        TextureRankChange(int step);
-    void        TexturePartChange(int step);
-    void        PutTextureValues();
-    void        GetTextureValues();
-    void        GetModelName(char *buffer);
-    void        GetDXFName(char *buffer);
-    void        GetScriptName(char *buffer);
-    bool        IsEditFocus();
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*     m_engine;
-    CModFile*       m_modFile;
-    CInterface*     m_interface;
-
-    float           m_time;
-    ModelTriangle*  m_triangleTable;
-    int             m_triangleSel1;
-    int             m_triangleSel2;
-    int             m_mode;
-    int             m_textureMode;
-    int             m_textureRotate;
-    bool            m_bTextureMirrorX;
-    bool            m_bTextureMirrorY;
-    Math::Point         m_textureInf;
-    Math::Point         m_textureSup;
-    int             m_texturePart;
-    int             m_textureRank;
-    char            m_textureName[20];
-    bool            m_bDisplayTransparent;
-    bool            m_bDisplayOnlySelection;
-    float           m_viewHeight;
-    float           m_viewDist;
-    float           m_viewAngleH;
-    float           m_viewAngleV;
-    int             m_color;
-    int             m_state;
-    int             m_secondTexNum;
-    int             m_secondSubdiv;
-    int             m_secondOffsetU;
-    int             m_secondOffsetV;
-    char            m_oper;
-    float           m_min;
-    float           m_max;
-};
-
diff --git a/src/old/modfile.cpp b/src/old/modfile.cpp
deleted file mode 100644
index 705885a..0000000
--- a/src/old/modfile.cpp
+++ /dev/null
@@ -1,695 +0,0 @@
-// * 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/.
-
-// modfile.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/geometry.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "common/language.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "modfile.h"
-
-
-
-const int MAX_VERTICES = 2000;
-
-
-
-// Object's constructor.
-
-CModFile::CModFile(CInstanceManager* iMan)
-{
-    m_iMan = iMan;
-
-    m_engine = (CD3DEngine*)m_iMan->SearchInstance(CLASS_ENGINE);
-
-    m_triangleUsed = 0;
-    m_triangleTable = (ModelTriangle*)malloc(sizeof(ModelTriangle)*MAX_VERTICES);
-    ZeroMemory(m_triangleTable, sizeof(ModelTriangle)*MAX_VERTICES);
-}
-
-// Object's destructor.
-
-CModFile::~CModFile()
-{
-    free(m_triangleTable);
-}
-
-
-
-
-// Creates a triangle in the internal structure.
-
-bool CModFile::CreateTriangle(Math::Vector p1, Math::Vector p2, Math::Vector p3,
-                              float min, float max)
-{
-    Math::Vector    n;
-    int         i;
-
-    if ( m_triangleUsed >= MAX_VERTICES )
-    {
-        OutputDebugString("ERROR: CreateTriangle::Too many triangles\n");
-        return false;
-    }
-
-    i = m_triangleUsed++;
-
-    ZeroMemory(&m_triangleTable[i], sizeof(ModelTriangle));
-
-    m_triangleTable[i].bUsed = true;
-    m_triangleTable[i].bSelect = false;
-
-    n = Math::NormalToPlane(p3, p2, p1);
-    m_triangleTable[i].p1 = D3DVERTEX2( p1, n);
-    m_triangleTable[i].p2 = D3DVERTEX2( p2, n);
-    m_triangleTable[i].p3 = D3DVERTEX2( p3, n);
-
-    m_triangleTable[i].material.diffuse.r = 1.0f;
-    m_triangleTable[i].material.diffuse.g = 1.0f;
-    m_triangleTable[i].material.diffuse.b = 1.0f;  // white
-    m_triangleTable[i].material.ambient.r = 0.5f;
-    m_triangleTable[i].material.ambient.g = 0.5f;
-    m_triangleTable[i].material.ambient.b = 0.5f;
-
-    m_triangleTable[i].min = min;
-    m_triangleTable[i].max = max;
-
-    return true;
-}
-
-// Reads a DXF file.
-
-bool CModFile::ReadDXF(char *filename, float min, float max)
-{
-    FILE*       file = NULL;
-    char        line[100];
-    int         command, rankSommet, nbSommet, nbFace;
-    Math::Vector    table[MAX_VERTICES];
-    bool        bWaitNbSommet;
-    bool        bWaitNbFace;
-    bool        bWaitSommetX;
-    bool        bWaitSommetY;
-    bool        bWaitSommetZ;
-    bool        bWaitFaceX;
-    bool        bWaitFaceY;
-    bool        bWaitFaceZ;
-    float       x,y,z;
-    int         p1,p2,p3;
-
-    file = fopen(filename, "r");
-    if ( file == NULL )  return false;
-
-    m_triangleUsed = 0;
-
-    rankSommet = 0;
-    bWaitNbSommet = false;
-    bWaitNbFace   = false;
-    bWaitSommetX  = false;
-    bWaitSommetY  = false;
-    bWaitSommetZ  = false;
-    bWaitFaceX    = false;
-    bWaitFaceY    = false;
-    bWaitFaceZ    = false;
-
-    while ( fgets(line, 100, file) != NULL )
-    {
-        sscanf(line, "%d", &command);
-        if ( fgets(line, 100, file) == NULL )  break;
-
-        if ( command == 66 )
-        {
-            bWaitNbSommet = true;
-        }
-
-        if ( command == 71 && bWaitNbSommet )
-        {
-            bWaitNbSommet = false;
-            sscanf(line, "%d", &nbSommet);
-            if ( nbSommet > MAX_VERTICES )  nbSommet = MAX_VERTICES;
-            rankSommet = 0;
-            bWaitNbFace = true;
-
-//?         sprintf(s, "Waiting for %d sommets\n", nbSommet);
-//?         OutputDebugString(s);
-        }
-
-        if ( command == 72 && bWaitNbFace )
-        {
-            bWaitNbFace = false;
-            sscanf(line, "%d", &nbFace);
-            bWaitSommetX = true;
-
-//?         sprintf(s, "Waiting for %d faces\n", nbFace);
-//?         OutputDebugString(s);
-        }
-
-        if ( command == 10 && bWaitSommetX )
-        {
-            bWaitSommetX = false;
-            sscanf(line, "%f", &x);
-            bWaitSommetY = true;
-        }
-
-        if ( command == 20 && bWaitSommetY )
-        {
-            bWaitSommetY = false;
-            sscanf(line, "%f", &y);
-            bWaitSommetZ = true;
-        }
-
-        if ( command == 30 && bWaitSommetZ )
-        {
-            bWaitSommetZ = false;
-            sscanf(line, "%f", &z);
-
-            nbSommet --;
-            if ( nbSommet >= 0 )
-            {
-                Math::Vector p(x,z,y);  // permutation of Y and Z!
-                table[rankSommet++] = p;
-                bWaitSommetX = true;
-
-//?             sprintf(s, "Sommet[%d]=%f;%f;%f\n", rankSommet, p.x,p.y,p.z);
-//?             OutputDebugString(s);
-            }
-            else
-            {
-                bWaitFaceX = true;
-            }
-        }
-
-        if ( command == 71 && bWaitFaceX )
-        {
-            bWaitFaceX = false;
-            sscanf(line, "%d", &p1);
-            if ( p1 < 0 )  p1 = -p1;
-            bWaitFaceY = true;
-        }
-
-        if ( command == 72 && bWaitFaceY )
-        {
-            bWaitFaceY = false;
-            sscanf(line, "%d", &p2);
-            if ( p2 < 0 )  p2 = -p2;
-            bWaitFaceZ = true;
-        }
-
-        if ( command == 73 && bWaitFaceZ )
-        {
-            bWaitFaceZ = false;
-            sscanf(line, "%d", &p3);
-            if ( p3 < 0 )  p3 = -p3;
-
-            nbFace --;
-            if ( nbFace >= 0 )
-            {
-                CreateTriangle( table[p3-1], table[p2-1], table[p1-1], min,max );
-                bWaitFaceX = true;
-
-//?             sprintf(s, "Face=%d;%d;%d\n", p1,p2,p3);
-//?             OutputDebugString(s);
-            }
-        }
-
-    }
-
-    fclose(file);
-    return true;
-}
-
-
-
-struct InfoMOD
-{
-    int     rev;
-    int     vers;
-    int     total;
-    int     reserve[10];
-};
-
-
-// Change nom.bmp to nom.tga
-
-void ChangeBMPtoTGA(char *filename)
-{
-    char*   p;
-
-    p = strstr(filename, ".bmp");
-    if ( p != 0 )  strcpy(p, ".tga");
-}
-
-
-// Reads a MOD file.
-
-bool CModFile::AddModel(char *filename, int first, bool bEdit, bool bMeta)
-{
-    FILE*       file;
-    InfoMOD     info;
-    float       limit[2];
-    int         i, nb, err;
-    char*       p;
-
-    if ( m_engine->RetDebugMode() )
-    {
-        bMeta = false;
-    }
-
-    if ( bMeta )
-    {
-        p = strchr(filename, '\\');
-        if ( p == 0 )
-        {
-#if _SCHOOL
-            err = g_metafile.Open("ceebot2.dat", filename);
-#else
-            err = g_metafile.Open("colobot2.dat", filename);
-#endif
-        }
-        else
-        {
-#if _SCHOOL
-            err = g_metafile.Open("ceebot2.dat", p+1);
-#else
-            err = g_metafile.Open("colobot2.dat", p+1);
-#endif
-        }
-        if ( err != 0 )  bMeta = false;
-    }
-    if ( !bMeta )
-    {
-        file = fopen(filename, "rb");
-        if ( file == NULL )  return false;
-    }
-
-    if ( bMeta )
-    {
-        g_metafile.Read(&info, sizeof(InfoMOD));
-    }
-    else
-    {
-        fread(&info, sizeof(InfoMOD), 1, file);
-    }
-    nb = info.total;
-    m_triangleUsed += nb;
-
-    if ( info.rev == 1 && info.vers == 0 )
-    {
-        OldModelTriangle1   old;
-
-        for ( i=first ; i<m_triangleUsed ; i++ )
-        {
-            if ( bMeta )
-            {
-                g_metafile.Read(&old, sizeof(OldModelTriangle1));
-            }
-            else
-            {
-                fread(&old, sizeof(OldModelTriangle1), 1, file);
-            }
-
-            ZeroMemory(&m_triangleTable[i], sizeof(ModelTriangle));
-            m_triangleTable[i].bUsed = old.bUsed;
-            m_triangleTable[i].bSelect = old.bSelect;
-
-            m_triangleTable[i].p1.x = old.p1.x;
-            m_triangleTable[i].p1.y = old.p1.y;
-            m_triangleTable[i].p1.z = old.p1.z;
-            m_triangleTable[i].p1.nx = old.p1.nx;
-            m_triangleTable[i].p1.ny = old.p1.ny;
-            m_triangleTable[i].p1.nz = old.p1.nz;
-            m_triangleTable[i].p1.tu = old.p1.tu;
-            m_triangleTable[i].p1.tv = old.p1.tv;
-
-            m_triangleTable[i].p2.x = old.p2.x;
-            m_triangleTable[i].p2.y = old.p2.y;
-            m_triangleTable[i].p2.z = old.p2.z;
-            m_triangleTable[i].p2.nx = old.p2.nx;
-            m_triangleTable[i].p2.ny = old.p2.ny;
-            m_triangleTable[i].p2.nz = old.p2.nz;
-            m_triangleTable[i].p2.tu = old.p2.tu;
-            m_triangleTable[i].p2.tv = old.p2.tv;
-
-            m_triangleTable[i].p3.x = old.p3.x;
-            m_triangleTable[i].p3.y = old.p3.y;
-            m_triangleTable[i].p3.z = old.p3.z;
-            m_triangleTable[i].p3.nx = old.p3.nx;
-            m_triangleTable[i].p3.ny = old.p3.ny;
-            m_triangleTable[i].p3.nz = old.p3.nz;
-            m_triangleTable[i].p3.tu = old.p3.tu;
-            m_triangleTable[i].p3.tv = old.p3.tv;
-
-            m_triangleTable[i].material = old.material;
-            strcpy(m_triangleTable[i].texName, old.texName);
-            m_triangleTable[i].min = old.min;
-            m_triangleTable[i].max = old.max;
-        }
-    }
-    else if ( info.rev == 1 && info.vers == 1 )
-    {
-        OldModelTriangle2   old;
-
-        for ( i=first ; i<m_triangleUsed ; i++ )
-        {
-            if ( bMeta )
-            {
-                g_metafile.Read(&old, sizeof(OldModelTriangle2));
-            }
-            else
-            {
-                fread(&old, sizeof(OldModelTriangle2), 1, file);
-            }
-
-            ZeroMemory(&m_triangleTable[i], sizeof(ModelTriangle));
-            m_triangleTable[i].bUsed = old.bUsed;
-            m_triangleTable[i].bSelect = old.bSelect;
-
-            m_triangleTable[i].p1.x = old.p1.x;
-            m_triangleTable[i].p1.y = old.p1.y;
-            m_triangleTable[i].p1.z = old.p1.z;
-            m_triangleTable[i].p1.nx = old.p1.nx;
-            m_triangleTable[i].p1.ny = old.p1.ny;
-            m_triangleTable[i].p1.nz = old.p1.nz;
-            m_triangleTable[i].p1.tu = old.p1.tu;
-            m_triangleTable[i].p1.tv = old.p1.tv;
-
-            m_triangleTable[i].p2.x = old.p2.x;
-            m_triangleTable[i].p2.y = old.p2.y;
-            m_triangleTable[i].p2.z = old.p2.z;
-            m_triangleTable[i].p2.nx = old.p2.nx;
-            m_triangleTable[i].p2.ny = old.p2.ny;
-            m_triangleTable[i].p2.nz = old.p2.nz;
-            m_triangleTable[i].p2.tu = old.p2.tu;
-            m_triangleTable[i].p2.tv = old.p2.tv;
-
-            m_triangleTable[i].p3.x = old.p3.x;
-            m_triangleTable[i].p3.y = old.p3.y;
-            m_triangleTable[i].p3.z = old.p3.z;
-            m_triangleTable[i].p3.nx = old.p3.nx;
-            m_triangleTable[i].p3.ny = old.p3.ny;
-            m_triangleTable[i].p3.nz = old.p3.nz;
-            m_triangleTable[i].p3.tu = old.p3.tu;
-            m_triangleTable[i].p3.tv = old.p3.tv;
-
-            m_triangleTable[i].material = old.material;
-            strcpy(m_triangleTable[i].texName, old.texName);
-            m_triangleTable[i].min = old.min;
-            m_triangleTable[i].max = old.max;
-            m_triangleTable[i].state = old.state;
-            m_triangleTable[i].reserve2 = old.reserve2;
-            m_triangleTable[i].reserve3 = old.reserve3;
-            m_triangleTable[i].reserve4 = old.reserve4;
-        }
-    }
-    else
-    {
-        if ( bMeta )
-        {
-            g_metafile.Read(m_triangleTable+first, sizeof(ModelTriangle)*nb);
-        }
-        else
-        {
-            fread(m_triangleTable+first, sizeof(ModelTriangle), nb, file);
-        }
-    }
-
-    for ( i=first ; i<m_triangleUsed ; i++ )
-    {
-        ChangeBMPtoTGA(m_triangleTable[i].texName);
-    }
-
-    if ( !bEdit )
-    {
-        limit[0] = m_engine->RetLimitLOD(0);  // frontier AB as config
-        limit[1] = m_engine->RetLimitLOD(1);  // frontier BC as config
-
-        // Standard frontiers -> config.
-        for ( i=first ; i<m_triangleUsed ; i++ )
-        {
-            if ( m_triangleTable[i].min == 0.0f &&
-                 m_triangleTable[i].max == 100.0f )  // resolution A ?
-            {
-                m_triangleTable[i].max = limit[0];
-            }
-            else if ( m_triangleTable[i].min == 100.0f &&
-                      m_triangleTable[i].max == 200.0f )  // resolution B ?
-            {
-                m_triangleTable[i].min = limit[0];
-                m_triangleTable[i].max = limit[1];
-            }
-            else if ( m_triangleTable[i].min == 200.0f &&
-                      m_triangleTable[i].max == 1000000.0f )  // resolution C ?
-            {
-                m_triangleTable[i].min = limit[1];
-            }
-        }
-    }
-
-    if ( bMeta )
-    {
-        g_metafile.Close();
-    }
-    else
-    {
-        fclose(file);
-    }
-    return true;
-}
-
-// Reads a MOD file.
-
-bool CModFile::ReadModel(char *filename, bool bEdit, bool bMeta)
-{
-    m_triangleUsed = 0;
-    return AddModel(filename, 0, bEdit, bMeta);
-}
-
-
-// Writes a MOD file.
-
-bool CModFile::WriteModel(char *filename)
-{
-    FILE*       file;
-    InfoMOD     info;
-
-    if ( m_triangleUsed == 0 )  return false;
-
-    file = fopen(filename, "wb");
-    if ( file == NULL )  return false;
-
-    ZeroMemory(&info, sizeof(InfoMOD));
-    info.rev   = 1;
-    info.vers  = 2;
-    info.total = m_triangleUsed;
-    fwrite(&info, sizeof(InfoMOD), 1, file);
-
-    fwrite(m_triangleTable, sizeof(ModelTriangle), m_triangleUsed, file);
-
-    fclose(file);
-    return true;
-}
-
-
-// Creates the object in the 3D engine.
-
-bool CModFile::CreateEngineObject(int objRank, int addState)
-{
-#if 0
-    char    texName2[20];
-    int     texNum, i, state;
-
-    for ( i=0 ; i<m_triangleUsed ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed )  continue;
-
-        state = m_triangleTable[i].state;
-        texName2[0] = 0;
-
-        if ( m_triangleTable[i].texNum2 != 0 )
-        {
-            if ( m_triangleTable[i].texNum2 == 1 )
-            {
-                texNum = m_engine->RetSecondTexture();
-            }
-            else
-            {
-                texNum = m_triangleTable[i].texNum2;
-            }
-
-            if ( texNum >= 1 && texNum <= 10 )
-            {
-                state = m_triangleTable[i].state|D3DSTATEDUALb;
-            }
-            if ( texNum >= 11 && texNum <= 20 )
-            {
-                state = m_triangleTable[i].state|D3DSTATEDUALw;
-            }
-            sprintf(texName2, "dirty%.2d.bmp", texNum);
-        }
-
-        m_engine->AddTriangle(objRank, &m_triangleTable[i].p1, 3,
-                              m_triangleTable[i].material,
-                              state+addState,
-                              m_triangleTable[i].texName, texName2,
-                              m_triangleTable[i].min,
-                              m_triangleTable[i].max, false);
-    }
-    return true;
-#else
-    char    texName1[20];
-    char    texName2[20];
-    int     texNum, i, state;
-
-    for ( i=0 ; i<m_triangleUsed ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed )  continue;
-
-        state = m_triangleTable[i].state;
-        strcpy(texName1, m_triangleTable[i].texName);
-        texName2[0] = 0;
-
-        if ( strcmp(texName1, "plant.tga") == 0 )
-        {
-            state |= D3DSTATEALPHA;
-        }
-
-        if ( m_triangleTable[i].texNum2 != 0 )
-        {
-            if ( m_triangleTable[i].texNum2 == 1 )
-            {
-                texNum = m_engine->RetSecondTexture();
-            }
-            else
-            {
-                texNum = m_triangleTable[i].texNum2;
-            }
-
-            if ( texNum >= 1 && texNum <= 10 )
-            {
-                state |= D3DSTATEDUALb;
-            }
-            if ( texNum >= 11 && texNum <= 20 )
-            {
-                state |= D3DSTATEDUALw;
-            }
-            sprintf(texName2, "dirty%.2d.tga", texNum);
-        }
-
-        m_engine->AddTriangle(objRank, &m_triangleTable[i].p1, 3,
-                              m_triangleTable[i].material,
-                              state+addState,
-                              texName1, texName2,
-                              m_triangleTable[i].min,
-                              m_triangleTable[i].max, false);
-    }
-    return true;
-#endif
-}
-
-
-// Performs a mirror according to Z.
-
-void CModFile::Mirror()
-{
-    D3DVERTEX2  t;
-    int         i;
-
-    for ( i=0 ; i<m_triangleUsed ; i++ )
-    {
-        t                     = m_triangleTable[i].p1;
-        m_triangleTable[i].p1 = m_triangleTable[i].p2;
-        m_triangleTable[i].p2 = t;
-
-        m_triangleTable[i].p1.z = -m_triangleTable[i].p1.z;
-        m_triangleTable[i].p2.z = -m_triangleTable[i].p2.z;
-        m_triangleTable[i].p3.z = -m_triangleTable[i].p3.z;
-
-        m_triangleTable[i].p1.nz = -m_triangleTable[i].p1.nz;
-        m_triangleTable[i].p2.nz = -m_triangleTable[i].p2.nz;
-        m_triangleTable[i].p3.nz = -m_triangleTable[i].p3.nz;
-    }
-}
-
-
-// Returns the pointer to the list of triangles.
-
-void CModFile::SetTriangleUsed(int total)
-{
-    m_triangleUsed = total;
-}
-
-int CModFile::RetTriangleUsed()
-{
-    return m_triangleUsed;
-}
-
-int CModFile::RetTriangleMax()
-{
-    return MAX_VERTICES;
-}
-
-ModelTriangle* CModFile::RetTriangleList()
-{
-    return m_triangleTable;
-}
-
-
-// Returns the height according to a position (x - z);
-
-float CModFile::RetHeight(Math::Vector pos)
-{
-    Math::Vector    p1, p2, p3;
-    float       limit;
-    int         i;
-
-    limit = 5.0f;
-
-    for ( i=0 ; i<m_triangleUsed ; i++ )
-    {
-        if ( !m_triangleTable[i].bUsed )  continue;
-
-        if ( fabs(pos.x-m_triangleTable[i].p1.x) < limit &&
-             fabs(pos.z-m_triangleTable[i].p1.z) < limit )
-        {
-            return m_triangleTable[i].p1.y;
-        }
-
-        if ( fabs(pos.x-m_triangleTable[i].p2.x) < limit &&
-             fabs(pos.z-m_triangleTable[i].p2.z) < limit )
-        {
-            return m_triangleTable[i].p2.y;
-        }
-
-        if ( fabs(pos.x-m_triangleTable[i].p3.x) < limit &&
-             fabs(pos.z-m_triangleTable[i].p3.z) < limit )
-        {
-            return m_triangleTable[i].p3.y;
-        }
-    }
-
-    return 0.0f;
-}
-
-
diff --git a/src/old/modfile.h b/src/old/modfile.h
deleted file mode 100644
index c852c1e..0000000
--- a/src/old/modfile.h
+++ /dev/null
@@ -1,115 +0,0 @@
-// * 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/.
-
-// modfile.h
-
-#pragma once
-
-
-#include "math/vector.h"
-#include "old/d3dengine.h"
-
-
-class CInstanceManager;
-
-
-
-
-struct OldModelTriangle1
-{
-    char            bUsed;      // true -> using
-    char            bSelect;    // true -> selected
-    D3DVERTEX       p1;
-    D3DVERTEX       p2;
-    D3DVERTEX       p3;
-    D3DMATERIAL7    material;
-    char            texName[20];
-    float           min;
-    float           max;
-};      // length = 196 bytes
-
-struct OldModelTriangle2
-{
-    char            bUsed;      // true -> used
-    char            bSelect;    // true -> selected
-    D3DVERTEX       p1;
-    D3DVERTEX       p2;
-    D3DVERTEX       p3;
-    D3DMATERIAL7    material;
-    char            texName[20];
-    float           min;
-    float           max;
-    long            state;
-    short           reserve1;
-    short           reserve2;
-    short           reserve3;
-    short           reserve4;
-};
-
-struct ModelTriangle
-{
-    char            bUsed;      // true -> used
-    char            bSelect;    // true -> selected
-    D3DVERTEX2      p1;
-    D3DVERTEX2      p2;
-    D3DVERTEX2      p3;
-    D3DMATERIAL7    material;
-    char            texName[20];
-    float           min;
-    float           max;
-    long            state;
-    short           texNum2;
-    short           reserve2;
-    short           reserve3;
-    short           reserve4;
-};      // length = 208 bytes
-
-
-
-
-class CModFile
-{
-public:
-    CModFile(CInstanceManager* iMan);
-    ~CModFile();
-
-    bool            ReadDXF(char *filename, float min, float max);
-    bool            AddModel(char *filename, int first, bool bEdit=false, bool bMeta=true);
-    bool            ReadModel(char *filename, bool bEdit=false, bool bMeta=true);
-    bool            WriteModel(char *filename);
-
-    bool            CreateEngineObject(int objRank, int addState=0);
-    void            Mirror();
-
-    void            SetTriangleUsed(int total);
-    int             RetTriangleUsed();
-    int             RetTriangleMax();
-    ModelTriangle*  RetTriangleList();
-
-    float           RetHeight(Math::Vector pos);
-
-protected:
-    bool            CreateTriangle(Math::Vector p1, Math::Vector p2, Math::Vector p3, float min, float max);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*     m_engine;
-
-    ModelTriangle*  m_triangleTable;
-    int             m_triangleUsed;
-};
-
-
diff --git a/src/old/particule.cpp b/src/old/particule.cpp
deleted file mode 100644
index de40b51..0000000
--- a/src/old/particule.cpp
+++ /dev/null
@@ -1,4401 +0,0 @@
-// * 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/.
-
-// particule.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dmath.h"
-#include "old/d3dtextr.h"
-#include "old/d3dengine.h"
-#include "old/d3dutil.h"
-#include "common/language.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "common/event.h"
-#include "object/object.h"
-#include "physics/physics.h"
-#include "object/auto/auto.h"
-#include "object/robotmain.h"
-#include "old/terrain.h"
-#include "old/sound.h"
-#include "old/water.h"
-#include "old/particule.h"
-
-
-
-const float FOG_HSUP    = 10.0f;
-const float FOG_HINF    = 100.0f;
-
-
-
-
-// Check if an object can be destroyed, but is not an enemy.
-
-bool IsSoft(ObjectType type)
-{
-    return ( 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_MOBILEft ||
-             type == OBJECT_MOBILEtt ||
-             type == OBJECT_MOBILEwt ||
-             type == OBJECT_MOBILEit ||
-             type == OBJECT_MOBILEdr ||  // robot?
-             type == OBJECT_METAL    ||
-             type == OBJECT_POWER    ||
-             type == OBJECT_ATOMIC   ||  // cargo?
-             type == OBJECT_DERRICK  ||
-             type == OBJECT_STATION  ||
-             type == OBJECT_FACTORY  ||
-             type == OBJECT_REPAIR   ||
-             type == OBJECT_DESTROYER||
-             type == OBJECT_CONVERT  ||
-             type == OBJECT_TOWER    ||
-             type == OBJECT_RESEARCH ||
-             type == OBJECT_RADAR    ||
-             type == OBJECT_INFO     ||
-             type == OBJECT_ENERGY   ||
-             type == OBJECT_LABO     ||
-             type == OBJECT_NUCLEAR  ||
-             type == OBJECT_PARA     );  // building?
-}
-
-// Check if an object is a destroyable enemy.
-
-bool IsAlien(ObjectType type)
-{
-    return ( type == OBJECT_ANT      ||
-             type == OBJECT_SPIDER   ||
-             type == OBJECT_BEE      ||
-             type == OBJECT_WORM     ||
-             type == OBJECT_MOTHER   ||
-             type == OBJECT_NEST     ||
-             type == OBJECT_BULLET   ||
-             type == OBJECT_EGG      ||
-             type == OBJECT_MOBILEtg ||
-             type == OBJECT_TEEN28   ||
-             type == OBJECT_TEEN31   );
-}
-
-// Returns the damping factor for friendly fire.
-
-float RetDecay(ObjectType type)
-{
-    if ( IsSoft(type) )  return 0.2f;
-    return 1.0f;
-}
-
-
-
-// Application constructor.
-
-CParticule::CParticule(CInstanceManager *iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_PARTICULE, this);
-
-    m_pD3DDevice = 0;
-    m_engine = engine;
-    m_main = 0;
-    m_terrain = 0;
-    m_water = 0;
-    m_sound = 0;
-    m_uniqueStamp = 0;
-    m_exploGunCounter = 0;
-    m_lastTimeGunDel = 0.0f;
-    m_absTime = 0.0f;
-
-    FlushParticule();
-}
-
-// Application destructor. Free memory.
-
-CParticule::~CParticule()
-{
-    m_iMan->DeleteInstance(CLASS_PARTICULE, this);
-}
-
-
-void CParticule::SetD3DDevice(LPDIRECT3DDEVICE7 device)
-{
-    m_pD3DDevice = device;
-}
-
-
-// Removes all particles.
-
-void CParticule::FlushParticule()
-{
-    int     i, j;
-
-    for ( i=0 ; i<MAXPARTICULE*MAXPARTITYPE ; i++ )
-    {
-        m_particule[i].bUsed = false;
-    }
-
-    for ( i=0 ; i<MAXPARTITYPE ; i++ )
-    {
-        for ( j=0 ; j<SH_MAX ; j++ )
-        {
-            m_totalInterface[i][j] = 0;
-        }
-    }
-
-    for ( i=0 ; i<MAXTRACK ; i++ )
-    {
-        m_track[i].bUsed = false;
-    }
-
-    m_wheelTraceTotal = 0;
-    m_wheelTraceIndex = 0;
-
-    for ( i=0 ; i<SH_MAX ; i++ )
-    {
-        m_bFrameUpdate[i] = true;
-    }
-
-    m_fogTotal = 0;
-    m_exploGunCounter = 0;
-}
-
-// Removes all particles of a sheet.
-
-void CParticule::FlushParticule(int sheet)
-{
-    int     i;
-
-    for ( i=0 ; i<MAXPARTICULE*MAXPARTITYPE ; i++ )
-    {
-        if ( !m_particule[i].bUsed )  continue;
-        if ( m_particule[i].sheet != sheet )  continue;
-
-        m_particule[i].bUsed = false;
-    }
-
-    for ( i=0 ; i<MAXPARTITYPE ; i++ )
-    {
-        m_totalInterface[i][sheet] = 0;
-    }
-
-    for ( i=0 ; i<MAXTRACK ; i++ )
-    {
-        m_track[i].bUsed = false;
-    }
-
-    if ( sheet == SH_WORLD )
-    {
-        m_wheelTraceTotal = 0;
-        m_wheelTraceIndex = 0;
-    }
-}
-
-
-// Builds file name of the effect.
-//  effectNN.tga, with NN = number
-
-void NameParticule(char *buffer, int num)
-{
-         if ( num == 1 )  strcpy(buffer, "effect00.tga");
-    else if ( num == 2 )  strcpy(buffer, "effect01.tga");
-    else if ( num == 3 )  strcpy(buffer, "effect02.tga");
-#if _POLISH
-    else if ( num == 4 )  strcpy(buffer, "textp.tga");
-#else
-    else if ( num == 4 )  strcpy(buffer, "text.tga");
-#endif
-    else                  strcpy(buffer, "xxx.tga");
-}
-
-
-// Creates a new particle.
-// Returns the channel of the particle created or -1 on error.
-
-int CParticule::CreateParticule(Math::Vector pos, Math::Vector speed, Math::Point dim,
-                                ParticuleType type,
-                                float duration, float mass,
-                                float windSensitivity, int sheet)
-{
-//? float   dist;
-    int     i, j, t;
-
-    if ( m_main == 0 )
-    {
-        m_main = (CRobotMain*)m_iMan->SearchInstance(CLASS_MAIN);
-    }
-
-#if 0
-    if ( sheet == SH_WORLD       &&
-         type != PARTISELY       &&
-         type != PARTISELR       &&
-         type != PARTIGUN1       &&
-         type != PARTIGUN2       &&
-         type != PARTIGUN3       &&
-         type != PARTIGUN4       &&
-         type != PARTIQUARTZ     &&
-         !m_main->RetMovieLock() )
-    {
-        dist = Math::Distance(pos, m_engine->RetEyePt());
-        if ( dist > 300.0f )  return -1;
-    }
-#endif
-
-    t = -1;
-    if ( type == PARTIEXPLOT   ||
-         type == PARTIEXPLOO   ||
-         type == PARTIMOTOR    ||
-         type == PARTIBLITZ    ||
-         type == PARTICRASH    ||
-         type == PARTIVAPOR    ||
-         type == PARTIGAS      ||
-         type == PARTIBASE     ||
-         type == PARTIFIRE     ||
-         type == PARTIFIREZ    ||
-         type == PARTIBLUE     ||
-         type == PARTIROOT     ||
-         type == PARTIRECOVER  ||
-         type == PARTIEJECT    ||
-         type == PARTISCRAPS   ||
-         type == PARTIGUN2     ||
-         type == PARTIGUN3     ||
-         type == PARTIGUN4     ||
-         type == PARTIQUEUE    ||
-         type == PARTIORGANIC1 ||
-         type == PARTIORGANIC2 ||
-         type == PARTIFLAME    ||
-         type == PARTIBUBBLE   ||
-         type == PARTIERROR    ||
-         type == PARTIWARNING  ||
-         type == PARTIINFO     ||
-         type == PARTISPHERE1  ||
-         type == PARTISPHERE2  ||
-         type == PARTISPHERE4  ||
-         type == PARTISPHERE5  ||
-         type == PARTISPHERE6  ||
-         type == PARTIPLOUF0   ||
-         type == PARTITRACK1   ||
-         type == PARTITRACK2   ||
-         type == PARTITRACK3   ||
-         type == PARTITRACK4   ||
-         type == PARTITRACK5   ||
-         type == PARTITRACK6   ||
-         type == PARTITRACK7   ||
-         type == PARTITRACK8   ||
-         type == PARTITRACK9   ||
-         type == PARTITRACK10  ||
-         type == PARTITRACK11  ||
-         type == PARTITRACK12  ||
-         type == PARTILENS1    ||
-         type == PARTILENS2    ||
-         type == PARTILENS3    ||
-         type == PARTILENS4    ||
-         type == PARTIGFLAT    ||
-         type == PARTIDROP     ||
-         type == PARTIWATER    ||
-         type == PARTILIMIT1   ||
-         type == PARTILIMIT2   ||
-         type == PARTILIMIT3   ||
-         type == PARTILIMIT4   ||
-         type == PARTIEXPLOG1  ||
-         type == PARTIEXPLOG2  )
-    {
-        t = 1;  // effect00
-    }
-    if ( type == PARTIGLINT   ||
-         type == PARTIGLINTb  ||
-         type == PARTIGLINTr  ||
-         type == PARTITOTO    ||
-         type == PARTISELY    ||
-         type == PARTISELR    ||
-         type == PARTIQUARTZ  ||
-         type == PARTIGUNDEL  ||
-         type == PARTICONTROL ||
-         type == PARTISHOW    ||
-         type == PARTICHOC    ||
-         type == PARTIFOG4    ||
-         type == PARTIFOG5    ||
-         type == PARTIFOG6    ||
-         type == PARTIFOG7    )
-    {
-        t = 2;  // effect01
-    }
-    if ( type == PARTIGUN1    ||
-         type == PARTIFLIC    ||
-         type == PARTISPHERE0 ||
-         type == PARTISPHERE3 ||
-         type == PARTIFOG0    ||
-         type == PARTIFOG1    ||
-         type == PARTIFOG2    ||
-         type == PARTIFOG3    )
-    {
-        t = 3;  // effect02
-    }
-    if ( type == PARTISMOKE1  ||
-         type == PARTISMOKE2  ||
-         type == PARTISMOKE3  ||
-         type == PARTIBLOOD   ||
-         type == PARTIBLOODM  ||
-         type == PARTIVIRUS1  ||
-         type == PARTIVIRUS2  ||
-         type == PARTIVIRUS3  ||
-         type == PARTIVIRUS4  ||
-         type == PARTIVIRUS5  ||
-         type == PARTIVIRUS6  ||
-         type == PARTIVIRUS7  ||
-         type == PARTIVIRUS8  ||
-         type == PARTIVIRUS9  ||
-         type == PARTIVIRUS10 )
-    {
-        t = 4;  // text (D3DSTATETTw)
-    }
-    if ( t >= MAXPARTITYPE )  return -1;
-    if ( t == -1 )  return -1;
-
-    for ( j=0 ; j<MAXPARTICULE ; j++ )
-    {
-        i = MAXPARTICULE*t+j;
-
-        if ( !m_particule[i].bUsed )
-        {
-            ZeroMemory(&m_particule[i], sizeof(Particule));
-            m_particule[i].bUsed     = true;
-            m_particule[i].bRay      = false;
-            m_particule[i].uniqueStamp = m_uniqueStamp++;
-            m_particule[i].sheet     = sheet;
-            m_particule[i].mass      = mass;
-            m_particule[i].duration  = duration;
-            m_particule[i].pos       = pos;
-            m_particule[i].goal      = pos;
-            m_particule[i].speed     = speed;
-            m_particule[i].windSensitivity = windSensitivity;
-            m_particule[i].dim       = dim;
-            m_particule[i].zoom      = 1.0f;
-            m_particule[i].angle     = 0.0f;
-            m_particule[i].intensity = 1.0f;
-            m_particule[i].type      = type;
-            m_particule[i].phase     = PARPHSTART;
-            m_particule[i].texSup.x  = 0.0f;
-            m_particule[i].texSup.y  = 0.0f;
-            m_particule[i].texInf.x  = 0.0f;
-            m_particule[i].texInf.y  = 0.0f;
-            m_particule[i].time      = 0.0f;
-            m_particule[i].phaseTime = 0.0f;
-            m_particule[i].testTime  = 0.0f;
-            m_particule[i].objLink   = 0;
-            m_particule[i].objFather = 0;
-            m_particule[i].trackRank = -1;
-
-            m_totalInterface[t][sheet] ++;
-
-            if ( type == PARTIEXPLOT ||
-                 type == PARTIEXPLOO )
-            {
-                m_particule[i].angle = Math::Rand()*Math::PI*2.0f;
-            }
-
-            if ( type == PARTIGUN1 ||
-                 type == PARTIGUN4 )
-            {
-                m_particule[i].testTime = 1.0f;  // impact immediately
-            }
-
-            if ( type >= PARTIFOG0 &&
-                 type <= PARTIFOG9 )
-            {
-                if ( m_fogTotal < MAXPARTIFOG )
-                m_fog[m_fogTotal++] = i;
-            }
-
-            return i | ((m_particule[i].uniqueStamp&0xffff)<<16);
-        }
-    }
-
-    return -1;
-}
-
-// Creates a new triangular particle (debris).
-// Returns the channel of the particle created or -1 on error.
-
-int CParticule::CreateFrag(Math::Vector pos, Math::Vector speed,
-                           D3DTriangle *triangle,
-                           ParticuleType type,
-                           float duration, float mass,
-                           float windSensitivity, int sheet)
-{
-    Math::Vector    p1, p2, p3, n;
-    float       l1, l2, l3, dx, dy;
-    int         i, j, t;
-
-    t = 0;
-    for ( j=0 ; j<MAXPARTICULE ; j++ )
-    {
-        i = MAXPARTICULE*t+j;
-
-        if ( !m_particule[i].bUsed )
-        {
-            ZeroMemory(&m_particule[i], sizeof(Particule));
-            m_particule[i].bUsed     = true;
-            m_particule[i].bRay      = false;
-            m_particule[i].uniqueStamp = m_uniqueStamp++;
-            m_particule[i].sheet     = sheet;
-            m_particule[i].mass      = mass;
-            m_particule[i].duration  = duration;
-            m_particule[i].pos       = pos;
-            m_particule[i].goal      = pos;
-            m_particule[i].speed     = speed;
-            m_particule[i].windSensitivity = windSensitivity;
-            m_particule[i].zoom      = 1.0f;
-            m_particule[i].angle     = 0.0f;
-            m_particule[i].intensity = 1.0f;
-            m_particule[i].type      = type;
-            m_particule[i].phase     = PARPHSTART;
-            m_particule[i].texSup.x  = 0.0f;
-            m_particule[i].texSup.y  = 0.0f;
-            m_particule[i].texInf.x  = 0.0f;
-            m_particule[i].texInf.y  = 0.0f;
-            m_particule[i].time      = 0.0f;
-            m_particule[i].phaseTime = 0.0f;
-            m_particule[i].testTime  = 0.0f;
-            m_particule[i].objLink   = 0;
-            m_particule[i].objFather = 0;
-            m_particule[i].trackRank = -1;
-            m_triangle[i] = *triangle;
-
-            m_totalInterface[t][sheet] ++;
-
-            p1.x = m_triangle[i].triangle[0].x;
-            p1.y = m_triangle[i].triangle[0].y;
-            p1.z = m_triangle[i].triangle[0].z;
-
-            p2.x = m_triangle[i].triangle[1].x;
-            p2.y = m_triangle[i].triangle[1].y;
-            p2.z = m_triangle[i].triangle[1].z;
-
-            p3.x = m_triangle[i].triangle[2].x;
-            p3.y = m_triangle[i].triangle[2].y;
-            p3.z = m_triangle[i].triangle[2].z;
-
-            l1 = Math::Distance(p1, p2);
-            l2 = Math::Distance(p2, p3);
-            l3 = Math::Distance(p3, p1);
-            dx = fabs(Math::Min(l1, l2, l3))*0.5f;
-            dy = fabs(Math::Max(l1, l2, l3))*0.5f;
-            p1 = Math::Vector(-dx,  dy, 0.0f);
-            p2 = Math::Vector( dx,  dy, 0.0f);
-            p3 = Math::Vector(-dx, -dy, 0.0f);
-
-            m_triangle[i].triangle[0].x = p1.x;
-            m_triangle[i].triangle[0].y = p1.y;
-            m_triangle[i].triangle[0].z = p1.z;
-
-            m_triangle[i].triangle[1].x = p2.x;
-            m_triangle[i].triangle[1].y = p2.y;
-            m_triangle[i].triangle[1].z = p2.z;
-
-            m_triangle[i].triangle[2].x = p3.x;
-            m_triangle[i].triangle[2].y = p3.y;
-            m_triangle[i].triangle[2].z = p3.z;
-
-            n = Math::Vector(0.0f, 0.0f, -1.0f);
-
-            m_triangle[i].triangle[0].nx = n.x;
-            m_triangle[i].triangle[0].ny = n.y;
-            m_triangle[i].triangle[0].nz = n.z;
-
-            m_triangle[i].triangle[1].nx = n.x;
-            m_triangle[i].triangle[1].ny = n.y;
-            m_triangle[i].triangle[1].nz = n.z;
-
-            m_triangle[i].triangle[2].nx = n.x;
-            m_triangle[i].triangle[2].ny = n.y;
-            m_triangle[i].triangle[2].nz = n.z;
-
-            if ( type == PARTIFRAG )
-            {
-                m_particule[i].angle = Math::Rand()*Math::PI*2.0f;
-            }
-            return i | ((m_particule[i].uniqueStamp&0xffff)<<16);
-        }
-    }
-
-    return -1;
-}
-
-// Creates a new particle being a part of object.
-// Returns the channel of the particle created or -1 on error.
-
-int CParticule::CreatePart(Math::Vector pos, Math::Vector speed,
-                           ParticuleType type,
-                           float duration, float mass, float weight,
-                           float windSensitivity, int sheet)
-{
-    int         i, j, t;
-
-    t = 0;
-    for ( j=0 ; j<MAXPARTICULE ; j++ )
-    {
-        i = MAXPARTICULE*t+j;
-
-        if ( !m_particule[i].bUsed )
-        {
-            ZeroMemory(&m_particule[i], sizeof(Particule));
-            m_particule[i].bUsed     = true;
-            m_particule[i].bRay      = false;
-            m_particule[i].uniqueStamp = m_uniqueStamp++;
-            m_particule[i].sheet     = sheet;
-            m_particule[i].mass      = mass;
-            m_particule[i].weight    = weight;
-            m_particule[i].duration  = duration;
-            m_particule[i].pos       = pos;
-            m_particule[i].goal      = pos;
-            m_particule[i].speed     = speed;
-            m_particule[i].windSensitivity = windSensitivity;
-            m_particule[i].zoom      = 1.0f;
-            m_particule[i].angle     = 0.0f;
-            m_particule[i].intensity = 1.0f;
-            m_particule[i].type      = type;
-            m_particule[i].phase     = PARPHSTART;
-            m_particule[i].texSup.x  = 0.0f;
-            m_particule[i].texSup.y  = 0.0f;
-            m_particule[i].texInf.x  = 0.0f;
-            m_particule[i].texInf.y  = 0.0f;
-            m_particule[i].time      = 0.0f;
-            m_particule[i].phaseTime = 0.0f;
-            m_particule[i].testTime  = 0.0f;
-            m_particule[i].trackRank = -1;
-
-            m_totalInterface[t][sheet] ++;
-
-            return i | ((m_particule[i].uniqueStamp&0xffff)<<16);
-        }
-    }
-
-    return -1;
-}
-
-// Creates a new linear particle (radius).
-// Returns the channel of the particle created or -1 on error.
-
-int CParticule::CreateRay(Math::Vector pos, Math::Vector goal,
-                          ParticuleType type, Math::Point dim,
-                          float duration, int sheet)
-{
-    int     i, j, t;
-
-    t = -1;
-    if ( type == PARTIRAY1 ||
-         type == PARTIRAY2 ||
-         type == PARTIRAY3 ||
-         type == PARTIRAY4 )
-    {
-        t = 3;  // effect02
-    }
-    if ( t >= MAXPARTITYPE )  return -1;
-    if ( t == -1 )  return -1;
-
-    for ( j=0 ; j<MAXPARTICULE ; j++ )
-    {
-        i = MAXPARTICULE*t+j;
-
-        if ( !m_particule[i].bUsed )
-        {
-            ZeroMemory(&m_particule[i], sizeof(Particule));
-            m_particule[i].bUsed     = true;
-            m_particule[i].bRay      = true;
-            m_particule[i].uniqueStamp = m_uniqueStamp++;
-            m_particule[i].sheet     = sheet;
-            m_particule[i].mass      = 0.0f;
-            m_particule[i].duration  = duration;
-            m_particule[i].pos       = pos;
-            m_particule[i].goal      = goal;
-            m_particule[i].speed     = Math::Vector(0.0f, 0.0f, 0.0f);
-            m_particule[i].windSensitivity = 0.0f;
-            m_particule[i].dim       = dim;
-            m_particule[i].zoom      = 1.0f;
-            m_particule[i].angle     = 0.0f;
-            m_particule[i].intensity = 1.0f;
-            m_particule[i].type      = type;
-            m_particule[i].phase     = PARPHSTART;
-            m_particule[i].texSup.x  = 0.0f;
-            m_particule[i].texSup.y  = 0.0f;
-            m_particule[i].texInf.x  = 0.0f;
-            m_particule[i].texInf.y  = 0.0f;
-            m_particule[i].time      = 0.0f;
-            m_particule[i].phaseTime = 0.0f;
-            m_particule[i].testTime  = 0.0f;
-            m_particule[i].objLink   = 0;
-            m_particule[i].objFather = 0;
-            m_particule[i].trackRank = -1;
-
-            m_totalInterface[t][sheet] ++;
-
-            return i | ((m_particule[i].uniqueStamp&0xffff)<<16);
-        }
-    }
-
-    return -1;
-}
-
-// Creates a particle with a trail.
-// "length" is the length of the tail of drag (in seconds)!
-
-int CParticule::CreateTrack(Math::Vector pos, Math::Vector speed, Math::Point dim,
-                            ParticuleType type, float duration, float mass,
-                            float length, float width)
-{
-    int     channel, rank, i;
-
-    // Creates the normal particle.
-    channel = CreateParticule(pos, speed, dim, type, duration, mass, 0.0f, 0);
-    if ( channel == -1 )  return -1;
-
-    // Seeks a streak free.
-    for ( i=0 ; i<MAXTRACK ; i++ )
-    {
-        if ( !m_track[i].bUsed )  // free?
-        {
-            rank = channel;
-            if ( !CheckChannel(rank) )  return -1;
-            m_particule[rank].trackRank = i;
-
-            m_track[i].bUsed = true;
-            m_track[i].step = (length/duration)/MAXTRACKLEN;
-            m_track[i].last = 0.0f;
-            m_track[i].intensity = 1.0f;
-            m_track[i].width = width;
-            m_track[i].used = 1;
-            m_track[i].head = 0;
-            m_track[i].pos[0] = pos;
-            break;
-        }
-    }
-
-    return channel;
-}
-
-// Creates a tire mark.
-
-void CParticule::CreateWheelTrace(const Math::Vector &p1, const Math::Vector &p2,
-                                  const Math::Vector &p3, const Math::Vector &p4,
-                                  ParticuleType type)
-{
-    int     i, max;
-
-//? max = (int)(m_engine->RetWheelTraceQuantity()*MAXWHEELTRACE);
-    max = MAXWHEELTRACE;
-    i = m_wheelTraceIndex++;
-    if ( m_wheelTraceIndex > max )  m_wheelTraceIndex = 0;
-
-    m_wheelTrace[i].type = type;
-    m_wheelTrace[i].pos[0] = p1;  // ul
-    m_wheelTrace[i].pos[1] = p2;  // dl
-    m_wheelTrace[i].pos[2] = p3;  // ur
-    m_wheelTrace[i].pos[3] = p4;  // dr
-    m_wheelTrace[i].startTime = m_absTime;
-
-    if ( m_terrain == 0 )
-    {
-        m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    }
-
-    m_terrain->MoveOnFloor(m_wheelTrace[i].pos[0]);
-    m_wheelTrace[i].pos[0].y += 0.2f;  // just above the ground
-
-    m_terrain->MoveOnFloor(m_wheelTrace[i].pos[1]);
-    m_wheelTrace[i].pos[1].y += 0.2f;  // just above the ground
-
-    m_terrain->MoveOnFloor(m_wheelTrace[i].pos[2]);
-    m_wheelTrace[i].pos[2].y += 0.2f;  // just above the ground
-
-    m_terrain->MoveOnFloor(m_wheelTrace[i].pos[3]);
-    m_wheelTrace[i].pos[3].y += 0.2f;  // just above the ground
-
-    if ( m_wheelTraceTotal < max )
-    {
-        m_wheelTraceTotal ++;
-    }
-    else
-    {
-        m_wheelTraceTotal = max;
-    }
-}
-
-
-// Check a channel number.
-// Adapts the channel so it can be used as an offset in m_particule.
-
-bool CParticule::CheckChannel(int &channel)
-{
-    int     uniqueStamp;
-
-    uniqueStamp = (channel>>16)&0xffff;
-    channel &= 0xffff;
-
-    if ( channel < 0 )  return false;
-    if ( channel >= MAXPARTICULE*MAXPARTITYPE )  return false;
-#if 0
-    if ( !m_particule[channel].bUsed )  return false;
-
-    if ( m_particule[channel].uniqueStamp != uniqueStamp )  return false;
-#else
-    if ( !m_particule[channel].bUsed )
-    {
-        OutputDebugString("CheckChannel bUsed=false !\n");
-        return false;
-    }
-
-    if ( m_particule[channel].uniqueStamp != uniqueStamp )
-    {
-        OutputDebugString("CheckChannel uniqueStamp !\n");
-        return false;
-    }
-#endif
-
-    return true;
-}
-
-// Removes a particle after his rank.
-
-void CParticule::DeleteRank(int rank)
-{
-    int     i;
-
-    if ( m_totalInterface[rank/MAXPARTICULE][m_particule[rank].sheet] > 0 )
-    {
-        m_totalInterface[rank/MAXPARTICULE][m_particule[rank].sheet] --;
-    }
-
-    i = m_particule[rank].trackRank;
-    if ( i != -1 )  // drag associated?
-    {
-        m_track[i].bUsed = false;  // frees the drag
-    }
-
-    m_particule[rank].bUsed = false;
-}
-
-// Removes all particles of a given type.
-
-void CParticule::DeleteParticule(ParticuleType type)
-{
-    int     i;
-
-    for ( i=0 ; i<MAXPARTICULE*MAXPARTITYPE ; i++ )
-    {
-        if ( !m_particule[i].bUsed )  continue;
-        if ( m_particule[i].type != type )  continue;
-
-        DeleteRank(i);
-    }
-}
-
-// Removes all particles of a given channel.
-
-void CParticule::DeleteParticule(int channel)
-{
-    int     i;
-
-    if ( !CheckChannel(channel) )  return;
-
-    if ( m_totalInterface[channel/MAXPARTICULE][m_particule[channel].sheet] > 0 )
-    {
-        m_totalInterface[channel/MAXPARTICULE][m_particule[channel].sheet] --;
-    }
-
-    i = m_particule[channel].trackRank;
-    if ( i != -1 )  // drag associated?
-    {
-        m_track[i].bUsed = false;  // frees the drag
-    }
-
-    m_particule[channel].bUsed = false;
-}
-
-
-// Specifies the object to which the particle is bound.
-
-void CParticule::SetObjectLink(int channel, CObject *object)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].objLink = object;
-}
-
-// Specifies the parent object that created the particle.
-
-void CParticule::SetObjectFather(int channel, CObject *object)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].objFather = object;
-}
-
-void CParticule::SetPosition(int channel, Math::Vector pos)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].pos = pos;
-}
-
-void CParticule::SetDimension(int channel, Math::Point dim)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].dim = dim;
-}
-
-void CParticule::SetZoom(int channel, float zoom)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].zoom = zoom;
-}
-
-void CParticule::SetAngle(int channel, float angle)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].angle = angle;
-}
-
-void CParticule::SetIntensity(int channel, float intensity)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].intensity = intensity;
-}
-
-void CParticule::SetParam(int channel, Math::Vector pos, Math::Point dim, float zoom,
-                          float angle, float intensity)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].pos       = pos;
-    m_particule[channel].dim       = dim;
-    m_particule[channel].zoom      = zoom;
-    m_particule[channel].angle     = angle;
-    m_particule[channel].intensity = intensity;
-}
-
-void CParticule::SetPhase(int channel, ParticulePhase phase, float duration)
-{
-    if ( !CheckChannel(channel) )  return;
-    m_particule[channel].phase = phase;
-    m_particule[channel].duration = duration;
-    m_particule[channel].phaseTime = m_particule[channel].time;
-}
-
-// Returns the position of the particle.
-
-bool CParticule::GetPosition(int channel, Math::Vector &pos)
-{
-    if ( !CheckChannel(channel) )  return false;
-    pos = m_particule[channel].pos;
-    return true;
-}
-
-
-// Indicates whether a sheet evolves or not.
-
-void CParticule::SetFrameUpdate(int sheet, bool bUpdate)
-{
-    m_bFrameUpdate[sheet] = bUpdate;
-}
-
-// Makes evolve all the particles.
-
-void CParticule::FrameParticule(float rTime)
-{
-    CObject*    object;
-    Math::Vector    eye, pos, speed, wind;
-    Math::Point     ts, ti, dim;
-    bool        bPause;
-    float       progress, dp, h, duration, mass, amplitude;
-    int         i, j, r, total;
-
-    if ( m_main == 0 )
-    {
-        m_main = (CRobotMain*)m_iMan->SearchInstance(CLASS_MAIN);
-    }
-
-    bPause = ( m_engine->RetPause() && !m_main->RetInfoLock() );
-
-    if ( m_terrain == 0 )
-    {
-        m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    }
-    if ( m_water == 0 )
-    {
-        m_water = (CWater*)m_iMan->SearchInstance(CLASS_WATER);
-    }
-
-    if ( !bPause )
-    {
-        m_lastTimeGunDel += rTime;
-        m_absTime += rTime;
-    }
-
-    wind = m_terrain->RetWind();
-    eye = m_engine->RetEyePt();
-
-    for ( i=0 ; i<MAXPARTICULE*MAXPARTITYPE ; i++ )
-    {
-        if ( !m_particule[i].bUsed )  continue;
-        if ( !m_bFrameUpdate[m_particule[i].sheet] )  continue;
-
-        if ( m_particule[i].type != PARTISHOW )
-        {
-            if ( bPause && m_particule[i].sheet != SH_INTERFACE )  continue;
-        }
-
-        if ( m_particule[i].type != PARTIQUARTZ )
-        {
-            m_particule[i].pos += m_particule[i].speed*rTime;
-        }
-
-        if ( m_particule[i].sheet == SH_WORLD )
-        {
-            h = rTime*m_particule[i].windSensitivity*Math::Rand()*2.0f;
-            m_particule[i].pos += wind*h;
-        }
-
-        progress = (m_particule[i].time-m_particule[i].phaseTime)/m_particule[i].duration;
-
-        // Manages the particles with mass that bounce.
-        if ( m_particule[i].mass != 0.0f        &&
-             m_particule[i].type != PARTIQUARTZ )
-        {
-            m_particule[i].speed.y -= m_particule[i].mass*rTime;
-
-            if ( m_particule[i].sheet == SH_INTERFACE )
-            {
-                h = 0.0f;
-            }
-            else
-            {
-                h = m_terrain->RetFloorLevel(m_particule[i].pos, true);
-            }
-            h += m_particule[i].dim.y*0.75f;
-            if ( m_particule[i].pos.y < h )  // impact with the ground?
-            {
-                if ( m_particule[i].type == PARTIPART &&
-                     m_particule[i].weight > 3.0f &&  // heavy enough?
-                     m_particule[i].bounce < 3 )
-                {
-                    amplitude = m_particule[i].weight*0.1f;
-                    amplitude *= 1.0f-0.3f*m_particule[i].bounce;
-                    if ( amplitude > 1.0f )  amplitude = 1.0f;
-                    if ( amplitude > 0.0f )
-                    {
-                        Play(SOUND_BOUM, m_particule[i].pos, amplitude);
-                    }
-                }
-
-                if ( m_particule[i].bounce < 3 )
-                {
-                    m_particule[i].pos.y = h;
-                    m_particule[i].speed.y *= -0.4f;
-                    m_particule[i].speed.x *=  0.4f;
-                    m_particule[i].speed.z *=  0.4f;
-                    m_particule[i].bounce ++;  // more impact
-                }
-                else    // disappears after 3 bounces?
-                {
-                    if ( m_particule[i].pos.y < h-10.0f ||
-                         m_particule[i].time >= 20.0f   )
-                    {
-                        DeleteRank(i);
-                        continue;
-                    }
-                }
-            }
-        }
-
-        // Manages drag associated.
-        r = m_particule[i].trackRank;
-        if ( r != -1 )  // drag exists?
-        {
-            if ( TrackMove(r, m_particule[i].pos, progress) )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_track[r].bDrawParticule = (progress < 1.0f);
-        }
-
-        if ( m_particule[i].type == PARTITRACK1 )  // explosion technique?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.375f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK2 )  // spray blue?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.500f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK3 )  // spider?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.500f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK4 )  // insect explosion?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.625f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK5 )  // derrick?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.750f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK6 )  // reset in/out?
-        {
-            ts.x = 0.0f;
-            ts.y = 0.0f;
-            ti.x = 0.0f;
-            ti.y = 0.0f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK7  ||  // win-1 ?
-             m_particule[i].type == PARTITRACK8  ||  // win-2 ?
-             m_particule[i].type == PARTITRACK9  ||  // win-3 ?
-             m_particule[i].type == PARTITRACK10 )   // win-4 ?
-        {
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.25f*(m_particule[i].type-PARTITRACK7);
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK11 )  // phazer shot?
-        {
-            object = SearchObjectGun(m_particule[i].goal, m_particule[i].pos, m_particule[i].type, m_particule[i].objFather);
-            m_particule[i].goal = m_particule[i].pos;
-            if ( object != 0 )
-            {
-                if ( object->RetType() == OBJECT_MOTHER )
-                {
-                    object->ExploObject(EXPLO_BOUM, 0.1f);
-                }
-                else
-                {
-                    object->ExploObject(EXPLO_BOUM, 0.0f, RetDecay(object->RetType()));
-                }
-            }
-
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.375f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTITRACK12 )  // drag reactor?
-        {
-            m_particule[i].zoom = 1.0f;
-
-            ts.x = 0.375f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIMOTOR )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.000f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIBLITZ )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-            m_particule[i].angle = Math::Rand()*Math::PI*2.0f;
-
-            ts.x = 0.125f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTICRASH )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-//?         m_particule[i].intensity = 1.0f-progress;
-            if ( progress < 0.25f )
-            {
-                m_particule[i].zoom = progress/0.25f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.25f)/0.75f;
-            }
-
-//?         ts.x = 0.250f;
-            ts.x = 0.000f;
-//?         ts.x = 0.375f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIVAPOR )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-            m_particule[i].zoom = 1.0f+progress*3.0f;
-
-            ts.x = 0.000f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIGAS )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.375f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIBASE )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f+progress*7.0f;
-            m_particule[i].intensity = powf(1.0f-progress, 3.0f);
-
-            ts.x = 0.375f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIFIRE  ||
-             m_particule[i].type == PARTIFIREZ )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].type == PARTIFIRE )
-            {
-                m_particule[i].zoom = 1.0f-progress;
-            }
-            else
-            {
-                m_particule[i].zoom = progress;
-            }
-
-            ts.x = 0.500f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIGUN1 )  // fireball shot?
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].testTime >= 0.1f )
-            {
-                m_particule[i].testTime = 0.0f;
-
-                if ( m_terrain->RetFloorHeight(m_particule[i].pos, true) < -2.0f )
-                {
-                    m_exploGunCounter ++;
-
-                    if ( m_exploGunCounter%2 == 0 )
-                    {
-                        pos = m_particule[i].goal;
-                        m_terrain->MoveOnFloor(pos, true);
-                        speed.x = 0.0f;
-                        speed.z = 0.0f;
-                        speed.y = 0.0f;
-                        dim.x = Math::Rand()*6.0f+6.0f;
-                        dim.y = dim.x;
-                        duration = Math::Rand()*1.0f+1.0f;
-                        mass = 0.0f;
-                        CreateParticule(pos, speed, dim, PARTIEXPLOG1, duration, mass, 1.0f);
-
-                        pos.y += 1.0f;
-                        total = (int)(2.0f*m_engine->RetParticuleDensity());
-                        for ( j=0 ; j<total ; j++ )
-                        {
-                            speed.x = (Math::Rand()-0.5f)*20.0f;
-                            speed.z = (Math::Rand()-0.5f)*20.0f;
-                            speed.y = Math::Rand()*20.0f;
-                            dim.x = 1.0f;
-                            dim.y = dim.x;
-                            duration = Math::Rand()*1.0f+1.0f;
-                            mass = Math::Rand()*10.0f+15.0f;
-                            CreateParticule(pos, speed, dim, PARTIEXPLOG1, duration, mass, 1.0f);
-                        }
-                    }
-
-                    if ( m_exploGunCounter%4 == 0 )
-                    {
-                        Play(SOUND_EXPLOg1, pos, 0.5f);
-                    }
-
-                    DeleteRank(i);
-                    continue;
-                }
-
-                object = SearchObjectGun(m_particule[i].goal, m_particule[i].pos, m_particule[i].type, m_particule[i].objFather);
-                m_particule[i].goal = m_particule[i].pos;
-                if ( object != 0 )
-                {
-                    object->ExploObject(EXPLO_BURN, 0.0f, RetDecay(object->RetType()));
-
-                    m_exploGunCounter ++;
-
-                    if ( m_exploGunCounter%2 == 0 )
-                    {
-                        pos = m_particule[i].pos;
-                        speed.x = 0.0f;
-                        speed.z = 0.0f;
-                        speed.y = 0.0f;
-                        dim.x = Math::Rand()*6.0f+6.0f;
-                        dim.y = dim.x;
-                        duration = Math::Rand()*1.0f+1.0f;
-                        mass = 0.0f;
-                        CreateParticule(pos, speed, dim, PARTIEXPLOG1, duration, mass, 1.0f);
-
-                        pos.y += 1.0f;
-                        total = (int)(2.0f*m_engine->RetParticuleDensity());
-                        for ( j=0 ; j<total ; j++ )
-                        {
-                            speed.x = (Math::Rand()-0.5f)*20.0f;
-                            speed.z = (Math::Rand()-0.5f)*20.0f;
-                            speed.y = Math::Rand()*20.0f;
-                            dim.x = 1.0f;
-                            dim.y = dim.x;
-                            duration = Math::Rand()*1.0f+1.0f;
-                            mass = Math::Rand()*10.0f+15.0f;
-                            CreateParticule(pos, speed, dim, PARTIEXPLOG1, duration, mass, 1.0f);
-                        }
-                    }
-
-                    if ( m_exploGunCounter%4 == 0 )
-                    {
-                        Play(SOUND_EXPLOg1, pos, 0.5f);
-                    }
-
-                    DeleteRank(i);
-                    continue;
-                }
-            }
-
-            m_particule[i].angle -= rTime*Math::PI*8.0f;
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.00f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIGUN2 )  // ant shot?
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].testTime >= 0.2f )
-            {
-                m_particule[i].testTime = 0.0f;
-                object = SearchObjectGun(m_particule[i].goal, m_particule[i].pos, m_particule[i].type, m_particule[i].objFather);
-                m_particule[i].goal = m_particule[i].pos;
-                if ( object != 0 )
-                {
-                    if ( object->RetShieldRadius() > 0.0f )  // protected by shield?
-                    {
-                        CreateParticule(m_particule[i].pos, Math::Vector(0.0f, 0.0f, 0.0f), Math::Point(6.0f, 6.0f), PARTIGUNDEL, 2.0f);
-                        if ( m_lastTimeGunDel > 0.2f )
-                        {
-                            m_lastTimeGunDel = 0.0f;
-                            Play(SOUND_GUNDEL, m_particule[i].pos, 1.0f);
-                        }
-                        DeleteRank(i);
-                        continue;
-                    }
-                    else
-                    {
-                        if ( object->RetType() != OBJECT_HUMAN )
-                        {
-                            Play(SOUND_TOUCH, m_particule[i].pos, 1.0f);
-                        }
-                        object->ExploObject(EXPLO_BOUM, 0.0f);  // starts explosion
-                    }
-                }
-            }
-
-            m_particule[i].angle = Math::Rand()*Math::PI*2.0f;
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.125f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIGUN3 )  // spider suicides?
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].testTime >= 0.2f )
-            {
-                m_particule[i].testTime = 0.0f;
-                object = SearchObjectGun(m_particule[i].goal, m_particule[i].pos, m_particule[i].type, m_particule[i].objFather);
-                m_particule[i].goal = m_particule[i].pos;
-                if ( object != 0 )
-                {
-                    if ( object->RetShieldRadius() > 0.0f )
-                    {
-                        CreateParticule(m_particule[i].pos, Math::Vector(0.0f, 0.0f, 0.0f), Math::Point(6.0f, 6.0f), PARTIGUNDEL, 2.0f);
-                        if ( m_lastTimeGunDel > 0.2f )
-                        {
-                            m_lastTimeGunDel = 0.0f;
-                            Play(SOUND_GUNDEL, m_particule[i].pos, 1.0f);
-                        }
-                        DeleteRank(i);
-                        continue;
-                    }
-                    else
-                    {
-                        object->ExploObject(EXPLO_BURN, 1.0f);  // starts explosion
-                    }
-                }
-            }
-
-//?         ts.x = 0.875f;
-//?         ts.y = 0.750f;
-            ts.x = 0.500f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIGUN4 )  // orgaball shot?
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].testTime >= 0.1f )
-            {
-                m_particule[i].testTime = 0.0f;
-
-                if ( m_terrain->RetFloorHeight(m_particule[i].pos, true) < -2.0f )
-                {
-                    m_exploGunCounter ++;
-
-                    if ( m_exploGunCounter%2 == 0 )
-                    {
-                        pos = m_particule[i].goal;
-                        m_terrain->MoveOnFloor(pos, true);
-                        speed.x = 0.0f;
-                        speed.z = 0.0f;
-                        speed.y = 0.0f;
-                        dim.x = Math::Rand()*4.0f+2.0f;
-                        dim.y = dim.x;
-                        duration = Math::Rand()*0.7f+0.7f;
-                        mass = 0.0f;
-                        CreateParticule(pos, speed, dim, PARTIEXPLOG2, duration, mass, 1.0f);
-                    }
-
-                    if ( m_exploGunCounter%4 == 0 )
-                    {
-                        Play(SOUND_EXPLOg2, pos, 0.5f);
-                    }
-
-                    DeleteRank(i);
-                    continue;
-                }
-
-                object = SearchObjectGun(m_particule[i].goal, m_particule[i].pos, m_particule[i].type, m_particule[i].objFather);
-                m_particule[i].goal = m_particule[i].pos;
-                if ( object != 0 )
-                {
-                    object->ExploObject(EXPLO_BOUM, 0.0f, RetDecay(object->RetType()));
-
-                    m_exploGunCounter ++;
-
-                    if ( m_exploGunCounter%2 == 0 )
-                    {
-                        pos = m_particule[i].pos;
-                        speed.x = 0.0f;
-                        speed.z = 0.0f;
-                        speed.y = 0.0f;
-                        dim.x = Math::Rand()*4.0f+2.0f;
-                        dim.y = dim.x;
-                        duration = Math::Rand()*0.7f+0.7f;
-                        mass = 0.0f;
-                        CreateParticule(pos, speed, dim, PARTIEXPLOG2, duration, mass, 1.0f);
-                    }
-
-                    if ( m_exploGunCounter%4 == 0 )
-                    {
-                        Play(SOUND_EXPLOg2, pos, 0.5f);
-                    }
-
-                    DeleteRank(i);
-                    continue;
-                }
-            }
-
-            m_particule[i].angle = Math::Rand()*Math::PI*2.0f;
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.125f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIFLIC )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 0.1f+progress;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.00f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTISHOW )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.5f )  m_particule[i].intensity = progress/0.5f;
-            else                    m_particule[i].intensity = 2.0f-progress/0.5f;
-            m_particule[i].zoom = 1.0f-progress*0.8f;
-            m_particule[i].angle -= rTime*Math::PI*0.5f;
-
-            ts.x = 0.50f;
-            ts.y = 0.00f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTICHOC )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 0.1f+progress;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.50f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIGFLAT )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 0.1f+progress;
-            m_particule[i].intensity = 1.0f-progress;
-            m_particule[i].angle -= rTime*Math::PI*2.0f;
-
-            ts.x = 0.00f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTILIMIT1 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f;
-            m_particule[i].intensity = 1.0f;
-
-            ts.x = 0.000f;
-            ts.y = 0.125f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-        if ( m_particule[i].type == PARTILIMIT2 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f;
-            m_particule[i].intensity = 1.0f;
-
-            ts.x = 0.375f;
-            ts.y = 0.125f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-        if ( m_particule[i].type == PARTILIMIT3 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f;
-            m_particule[i].intensity = 1.0f;
-
-            ts.x = 0.500f;
-            ts.y = 0.125f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIFOG0 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.3f+sinf(progress)*0.15f;
-            m_particule[i].angle += rTime*0.05f;
-
-            ts.x = 0.25f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-        if ( m_particule[i].type == PARTIFOG1 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.3f+sinf(progress)*0.15f;
-            m_particule[i].angle -= rTime*0.07f;
-
-            ts.x = 0.25f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIFOG2 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.6f+sinf(progress)*0.15f;
-            m_particule[i].angle += rTime*0.05f;
-
-            ts.x = 0.75f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-        if ( m_particule[i].type == PARTIFOG3 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.6f+sinf(progress)*0.15f;
-            m_particule[i].angle -= rTime*0.07f;
-
-            ts.x = 0.75f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIFOG4 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.5f+sinf(progress)*0.2f;
-            m_particule[i].angle += rTime*0.05f;
-
-            ts.x = 0.00f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-        if ( m_particule[i].type == PARTIFOG5 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.5f+sinf(progress)*0.2f;
-            m_particule[i].angle -= rTime*0.07f;
-
-            ts.x = 0.00f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIFOG6 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.5f+sinf(progress)*0.2f;
-            m_particule[i].angle += rTime*0.05f;
-
-            ts.x = 0.50f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-        if ( m_particule[i].type == PARTIFOG7 )
-        {
-            m_particule[i].zoom = progress;
-            m_particule[i].intensity = 0.5f+sinf(progress)*0.2f;
-            m_particule[i].angle -= rTime*0.07f;
-
-            ts.x = 0.50f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        // Decreases the intensity if the camera
-        // is almost at the same height (fog was eye level).
-        if ( m_particule[i].type >= PARTIFOG0 &&
-             m_particule[i].type <= PARTIFOG9 )
-        {
-            h = 10.0f;
-
-            if ( m_particule[i].pos.y >= eye.y   &&
-                 m_particule[i].pos.y <  eye.y+h )
-            {
-                m_particule[i].intensity *= (m_particule[i].pos.y-eye.y)/h;
-            }
-            if ( m_particule[i].pos.y >  eye.y-h &&
-                 m_particule[i].pos.y <  eye.y   )
-            {
-                m_particule[i].intensity *= (eye.y-m_particule[i].pos.y)/h;
-            }
-        }
-
-        if ( m_particule[i].type == PARTIEXPLOT ||
-             m_particule[i].type == PARTIEXPLOO )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress/2.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            if ( m_particule[i].type == PARTIEXPLOT )  ts.x = 0.750f;
-            else                                       ts.x = 0.875f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIEXPLOG1 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.375f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-        if ( m_particule[i].type == PARTIEXPLOG2 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.625f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIFLAME )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress/2.0f;
-            if ( progress < 0.5f )
-            {
-                m_particule[i].intensity = progress/0.5f;
-            }
-            else
-            {
-                m_particule[i].intensity = 2.0f-progress/0.5f;
-            }
-
-            ts.x = 0.750f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIBUBBLE )
-        {
-            if ( progress >= 1.0f ||
-                 m_particule[i].pos.y >= m_water->RetLevel() )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress/2.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.250f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISMOKE1 ||
-             m_particule[i].type == PARTISMOKE2 ||
-             m_particule[i].type == PARTISMOKE3 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.25f )
-            {
-                m_particule[i].zoom = progress/0.25f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.25f)/0.75f;
-            }
-
-            ts.x = 0.500f+0.125f*(m_particule[i].type-PARTISMOKE1);
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIBLOOD )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.750f+(rand()%2)*0.125f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIBLOODM )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.875f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIVIRUS1  ||
-             m_particule[i].type == PARTIVIRUS2  ||
-             m_particule[i].type == PARTIVIRUS3  ||
-             m_particule[i].type == PARTIVIRUS4  ||
-             m_particule[i].type == PARTIVIRUS5  ||
-             m_particule[i].type == PARTIVIRUS6  ||
-             m_particule[i].type == PARTIVIRUS7  ||
-             m_particule[i].type == PARTIVIRUS8  ||
-             m_particule[i].type == PARTIVIRUS9  ||
-             m_particule[i].type == PARTIVIRUS10 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.25f )
-            {
-                m_particule[i].zoom = progress/0.25f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.25f)/0.75f;
-            }
-            m_particule[i].angle += rTime*Math::PI*1.0f;
-
-            if ( m_particule[i].type == PARTIVIRUS1 )  // A ?
-            {
-                ts.x =   0.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x =  10.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS2 )  // C ?
-            {
-                ts.x =  19.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x =  28.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS3 )  // E ?
-            {
-                ts.x =  36.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x =  45.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS4 )  // N ?
-            {
-                ts.x = 110.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x = 120.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS5 )  // R ?
-            {
-                ts.x = 148.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x = 158.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS6 )  // T ?
-            {
-                ts.x = 166.0f/256.0f;  ts.y =  19.0f/256.0f;
-                ti.x = 175.0f/256.0f;  ti.y =  30.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS7 )  // 0 ?
-            {
-                ts.x =  90.0f/256.0f;  ts.y =   2.0f/256.0f;
-                ti.x =  98.0f/256.0f;  ti.y =  13.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS8 )  // 2 ?
-            {
-                ts.x = 103.0f/256.0f;  ts.y =   2.0f/256.0f;
-                ti.x = 111.0f/256.0f;  ti.y =  13.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS9 )  // 5 ?
-            {
-                ts.x = 125.0f/256.0f;  ts.y =   2.0f/256.0f;
-                ti.x = 132.0f/256.0f;  ti.y =  13.0f/256.0f;
-            }
-            if ( m_particule[i].type == PARTIVIRUS10 )  // 9 ?
-            {
-                ts.x = 153.0f/256.0f;  ts.y =   2.0f/256.0f;
-                ti.x = 161.0f/256.0f;  ti.y =  13.0f/256.0f;
-            }
-        }
-
-        if ( m_particule[i].type == PARTIBLUE )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.625f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIROOT )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.25f )
-            {
-                m_particule[i].zoom = progress/0.25f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.25f)/0.75f;
-            }
-
-            ts.x = 0.000f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIRECOVER )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.25f )
-            {
-                m_particule[i].zoom = progress/0.25f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.25f)/0.75f;
-            }
-
-            ts.x = 0.875f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIEJECT )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f+powf(progress, 2.0f)*5.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.625f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISCRAPS )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-
-            ts.x = 0.625f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIFRAG )
-        {
-            m_particule[i].angle += rTime*Math::PI*0.5f;
-
-            ts.x = 0.0f;
-            ts.y = 0.0f;
-            ti.x = 0.0f;
-            ti.y = 0.0f;
-        }
-
-        if ( m_particule[i].type == PARTIPART )
-        {
-            ts.x = 0.0f;
-            ts.y = 0.0f;
-            ti.x = 0.0f;
-            ti.y = 0.0f;
-        }
-
-        if ( m_particule[i].type == PARTIQUEUE )
-        {
-            if ( m_particule[i].testTime >= 0.05f )
-            {
-                m_particule[i].testTime = 0.0f;
-
-                Math::Vector    pos, speed;
-                Math::Point     dim;
-
-                pos = m_particule[i].pos;
-//?             speed = -m_particule[i].speed*0.5f;
-                speed = Math::Vector(0.0f, 0.0f, 0.0f);
-                dim.x = 1.0f*(Math::Rand()*0.8f+0.6f);
-                dim.y = dim.x;
-                CreateParticule(pos, speed, dim, PARTIGAS, 0.5f);
-            }
-
-            ts.x = 0.375f;
-            ts.y = 0.750f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIORGANIC1 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-
-                pos      = m_particule[i].pos;
-                dim.x    = m_particule[i].dim.x/4.0f;
-                dim.y    = dim.x;
-                duration = m_particule[i].duration;
-                mass     = m_particule[i].mass;
-                total = (int)(10.0f*m_engine->RetParticuleDensity());
-                for ( i=0 ; i<total ; i++ )
-                {
-                    speed.x = (Math::Rand()-0.5f)*20.0f;
-                    speed.y = (Math::Rand()-0.5f)*20.0f;
-                    speed.z = (Math::Rand()-0.5f)*20.0f;
-                    CreateParticule(pos, speed, dim, PARTIORGANIC2, duration, mass);
-                }
-                total = (int)(5.0f*m_engine->RetParticuleDensity());
-                for ( i=0 ; i<total ; i++ )
-                {
-                    speed.x = (Math::Rand()-0.5f)*20.0f;
-                    speed.y = (Math::Rand()-0.5f)*20.0f;
-                    speed.z = (Math::Rand()-0.5f)*20.0f;
-                    duration *= Math::Rand()+0.8f;
-                    CreateTrack(pos, speed, dim, PARTITRACK4, duration, mass, duration*0.2f, dim.x*2.0f);
-                }
-                continue;
-            }
-
-            m_particule[i].zoom = (m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.125f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIORGANIC2 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration);
-
-            ts.x = 0.125f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIGLINT )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress > 0.5f )
-            {
-//?             m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration/2.0f);
-                m_particule[i].zoom = 1.0f-(progress-0.5f)*2.0f;
-            }
-            m_particule[i].angle = m_particule[i].time*Math::PI;
-
-            ts.x = 0.75f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIGLINTb )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress > 0.5f )
-            {
-                m_particule[i].zoom = 1.0f-(progress-0.5f)*2.0f;
-            }
-            m_particule[i].angle = m_particule[i].time*Math::PI;
-
-            ts.x = 0.75f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIGLINTr )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress > 0.5f )
-            {
-                m_particule[i].zoom = 1.0f-(progress-0.5f)*2.0f;
-            }
-            m_particule[i].angle = m_particule[i].time*Math::PI;
-
-            ts.x = 0.75f;
-            ts.y = 0.00f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type >= PARTILENS1 &&
-             m_particule[i].type <= PARTILENS4 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.5f )
-            {
-                m_particule[i].zoom = progress*2.0f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.5f)*2.0f;
-            }
-//?         m_particule[i].angle = m_particule[i].time*Math::PI;
-
-            ts.x = 0.25f*(m_particule[i].type-PARTILENS1);
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTICONTROL )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.3f )
-            {
-                m_particule[i].zoom = progress/0.3f;
-            }
-            else
-            {
-                m_particule[i].zoom = 1.0f;
-                m_particule[i].intensity = 1.0f-(progress-0.3f)/0.7f;
-            }
-
-            ts.x = 0.00f;
-            ts.y = 0.00f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIGUNDEL )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress > 0.5f )
-            {
-                m_particule[i].zoom = 1.0f-(m_particule[i].time-m_particule[i].duration/2.0f);
-            }
-            m_particule[i].angle = m_particule[i].time*Math::PI;
-
-            ts.x = 0.75f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIQUARTZ )
-        {
-            if ( progress >= 1.0f )
-            {
-                m_particule[i].time = 0.0f;
-                m_particule[i].duration = 0.5f+Math::Rand()*2.0f;
-                m_particule[i].pos.x = m_particule[i].speed.x + (Math::Rand()-0.5f)*m_particule[i].mass;
-                m_particule[i].pos.y = m_particule[i].speed.y + (Math::Rand()-0.5f)*m_particule[i].mass;
-                m_particule[i].pos.z = m_particule[i].speed.z + (Math::Rand()-0.5f)*m_particule[i].mass;
-                m_particule[i].dim.x = 0.5f+Math::Rand()*1.5f;
-                m_particule[i].dim.y = m_particule[i].dim.x;
-                progress = 0.0f;
-            }
-
-            if ( progress < 0.2f )
-            {
-                m_particule[i].zoom = progress/0.2f;
-                m_particule[i].intensity = 1.0f;
-            }
-            else
-            {
-                m_particule[i].zoom = 1.0f;
-                m_particule[i].intensity = 1.0f-(progress-0.2f)/0.8f;
-            }
-
-            ts.x = 0.25f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTITOTO )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-            if ( progress < 0.15f )
-            {
-                m_particule[i].intensity = progress/0.15f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.15f)/0.85f;
-            }
-            m_particule[i].intensity *= 0.5f;
-
-            ts.x = 0.25f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIERROR )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress*1.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.500f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIWARNING )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress*1.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.875f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIINFO )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress*1.0f;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.750f;
-            ts.y = 0.875f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISELY )
-        {
-            ts.x = 0.75f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-        if ( m_particule[i].type == PARTISELR )
-        {
-            ts.x = 0.75f;
-            ts.y = 0.00f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE0 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress*m_particule[i].dim.x;
-//?         m_particule[i].intensity = 1.0f-progress;
-            if ( progress < 0.65f )
-            {
-                m_particule[i].intensity = progress/0.65f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.65f)/0.35f;
-            }
-            m_particule[i].intensity *= 0.5f;
-
-            ts.x = 0.50f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE1 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.30f )
-            {
-                m_particule[i].intensity = progress/0.30f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.30f)/0.70f;
-            }
-            m_particule[i].zoom = progress*m_particule[i].dim.x;
-            m_particule[i].angle = m_particule[i].time*Math::PI*2.0f;
-
-            ts.x = 0.000f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE2 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( progress < 0.20f )
-            {
-                m_particule[i].intensity = 1.0f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.20f)/0.80f;
-            }
-            m_particule[i].zoom = progress*m_particule[i].dim.x;
-            m_particule[i].angle = m_particule[i].time*Math::PI*2.0f;
-
-            ts.x = 0.125f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE3 )
-        {
-            if ( m_particule[i].phase == PARPHEND &&
-                 progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].phase == PARPHSTART )
-            {
-                m_particule[i].intensity = progress;
-                if ( m_particule[i].intensity > 1.0f )
-                {
-                    m_particule[i].intensity = 1.0f;
-                }
-            }
-
-            if ( m_particule[i].phase == PARPHEND )
-            {
-                m_particule[i].intensity = 1.0f-progress;
-            }
-
-            m_particule[i].zoom = m_particule[i].dim.x;
-            m_particule[i].angle = m_particule[i].time*Math::PI*0.2f;
-
-            ts.x = 0.25f;
-            ts.y = 0.75f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE4 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress*m_particule[i].dim.x;
-            if ( progress < 0.65f )
-            {
-                m_particule[i].intensity = progress/0.65f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.65f)/0.35f;
-            }
-            m_particule[i].intensity *= 0.5f;
-
-            ts.x = 0.125f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE5 )
-        {
-            m_particule[i].intensity = 0.7f+sinf(progress)*0.3f;
-            m_particule[i].zoom = m_particule[i].dim.x*(1.0f+sinf(progress*0.7f)*0.01f);
-            m_particule[i].angle = m_particule[i].time*Math::PI*0.2f;
-
-            ts.x = 0.25f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTISPHERE6 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = (1.0f-progress)*m_particule[i].dim.x;
-            m_particule[i].intensity = progress*0.5f;
-
-            ts.x = 0.125f;
-            ts.y = 0.000f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIPLOUF0 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = progress;
-#if 0
-            if ( progress <= 0.5f )
-            {
-                m_particule[i].intensity = 1.0f;
-            }
-            else
-            {
-                m_particule[i].intensity = 1.0f-(progress-0.5f)/0.5f;
-            }
-#else
-//?         m_particule[i].intensity = 1.0f;
-            m_particule[i].intensity = 1.0f-progress;
-#endif
-
-            ts.x = 0.50f;
-            ts.y = 0.50f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIDROP )
-        {
-            if ( progress >= 1.0f ||
-                 m_particule[i].pos.y < m_water->RetLevel() )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].zoom = 1.0f-progress;
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.750f;
-            ts.y = 0.500f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIWATER )
-        {
-            if ( progress >= 1.0f ||
-                 m_particule[i].pos.y < m_water->RetLevel() )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            m_particule[i].intensity = 1.0f-progress;
-
-            ts.x = 0.125f;
-            ts.y = 0.125f;
-            ti.x = ts.x+0.125f;
-            ti.y = ts.y+0.125f;
-        }
-
-        if ( m_particule[i].type == PARTIRAY1 )  // rayon tour ?
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            if ( m_particule[i].testTime >= 0.2f )
-            {
-                m_particule[i].testTime = 0.0f;
-                object = SearchObjectRay(m_particule[i].pos, m_particule[i].goal,
-                                         m_particule[i].type, m_particule[i].objFather);
-                if ( object != 0 )
-                {
-                    object->ExploObject(EXPLO_BOUM, 0.0f);
-                }
-            }
-
-            ts.x = 0.00f;
-            ts.y = 0.00f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        if ( m_particule[i].type == PARTIRAY2 ||
-             m_particule[i].type == PARTIRAY3 )
-        {
-            if ( progress >= 1.0f )
-            {
-                DeleteRank(i);
-                continue;
-            }
-
-            ts.x = 0.00f;
-            ts.y = 0.25f;
-            ti.x = ts.x+0.25f;
-            ti.y = ts.y+0.25f;
-        }
-
-        dp = (1.0f/256.0f)/2.0f;
-        m_particule[i].texSup.x = ts.x+dp;
-        m_particule[i].texSup.y = ts.y+dp;
-        m_particule[i].texInf.x = ti.x-dp;
-        m_particule[i].texInf.y = ti.y-dp;
-        m_particule[i].time     += rTime;
-        m_particule[i].testTime += rTime;
-    }
-}
-
-
-// Moves a drag.
-// Returns true if the drag is finished.
-
-bool CParticule::TrackMove(int i, Math::Vector pos, float progress)
-{
-    Math::Vector    last;
-    int         h, hh;
-
-    if ( i < 0 || i >= MAXTRACK )  return true;
-    if ( m_track[i].bUsed == false )  return true;
-
-    if ( progress < 1.0f )  // particle exists?
-    {
-        h = m_track[i].head;
-
-        if ( m_track[i].used == 1 ||
-             m_track[i].last+m_track[i].step <= progress )
-        {
-            m_track[i].last = progress;
-            last = m_track[i].pos[h];
-            h ++;
-            if ( h == MAXTRACKLEN )  h = 0;
-            if ( m_track[i].used < MAXTRACKLEN )  m_track[i].used ++;
-        }
-        else
-        {
-            hh = h-1;
-            if ( hh < 0 )  hh = MAXTRACKLEN-1;
-            last = m_track[i].pos[hh];
-        }
-        m_track[i].pos[h] = pos;
-        m_track[i].len[h] = Math::Distance(pos, last);
-
-        m_track[i].head = h;
-
-//?     m_track[i].intensity = 1.0f;
-        m_track[i].intensity = 1.0f-progress;
-    }
-    else    // mort lente de la tra�n�e ?
-    {
-//?     m_track[i].intensity = 1.0f-(progress-1.0f)/(m_track[i].step*MAXTRACKLEN);
-        m_track[i].intensity = 0.0f;
-    }
-
-    return (m_track[i].intensity <= 0.0f);
-}
-
-// Draws a drag.
-
-void CParticule::TrackDraw(int i, ParticuleType type)
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    corner[4], p1, p2, p, n, eye;
-    Math::Matrix    matrix;
-    Math::Point     texInf, texSup, rot;
-    float       lTotal, f1, f2, a;
-    int         counter, h;
-
-    // Calculates the total length memorized.
-    lTotal = 0.0f;
-    h = m_track[i].head;
-    for ( counter=0 ; counter<m_track[i].used-1 ; counter++ )
-    {
-        lTotal += m_track[i].len[h];
-        h --;  if ( h < 0 )  h = MAXTRACKLEN-1;
-    }
-
-    matrix.LoadIdentity();
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    if ( type == PARTITRACK1 )  // explosion technique?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 21.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 22.0f/256.0f;  // orange
-    }
-    if ( type == PARTITRACK2 )  // blue spray?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 13.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 14.0f/256.0f;  // blue
-    }
-    if ( type == PARTITRACK3 )  // spider?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y =  5.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y =  6.0f/256.0f;  // brown
-    }
-    if ( type == PARTITRACK4 )  // insect explosion?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y =  9.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 10.0f/256.0f;  // dark green
-    }
-    if ( type == PARTITRACK5 )  // derrick?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 29.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 30.0f/256.0f;  // dark brown
-    }
-    if ( type == PARTITRACK6 )  // reset in/out?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 17.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 18.0f/256.0f;  // cyan
-    }
-    if ( type == PARTITRACK7 )  // win-1?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 41.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 42.0f/256.0f;  // orange
-    }
-    if ( type == PARTITRACK8 )  // win-2?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 45.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 46.0f/256.0f;  // yellow
-    }
-    if ( type == PARTITRACK9 )  // win-3?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 49.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 50.0f/256.0f;  // red
-    }
-    if ( type == PARTITRACK10 )  // win-4?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 53.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 54.0f/256.0f;  // violet
-    }
-    if ( type == PARTITRACK11 )  // phazer shot?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 21.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 22.0f/256.0f;  // orange
-    }
-    if ( type == PARTITRACK12 )  // drag reactor?
-    {
-        texInf.x = 64.5f/256.0f;
-        texInf.y = 21.0f/256.0f;
-        texSup.x = 95.5f/256.0f;
-        texSup.y = 22.0f/256.0f;  // orange
-    }
-
-    h  = m_track[i].head;
-    p1 = m_track[i].pos[h];
-    f1 = m_track[i].intensity;
-
-    eye = m_engine->RetEyePt();
-    a = Math::RotateAngle(eye.x-p1.x, eye.z-p1.z);
-
-    for ( counter=0 ; counter<m_track[i].used-1 ; counter++ )
-    {
-        f2 = f1-(m_track[i].len[h]/lTotal);
-        if ( f2 < 0.0f )  f2 = 0.0f;
-        h --;  if ( h < 0 )  h = MAXTRACKLEN-1;
-        p2 = m_track[i].pos[h];
-
-        n = Normalize(p1-eye);
-
-        p = p1;
-        p.x += f1*m_track[i].width;
-        rot = Math::RotatePoint(Math::Point(p1.x, p1.z), a+Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[0].x = rot.x;
-        corner[0].y = p1.y;
-        corner[0].z = rot.y;
-        rot = Math::RotatePoint(Math::Point(p1.x, p1.z), a-Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[1].x = rot.x;
-        corner[1].y = p1.y;
-        corner[1].z = rot.y;
-
-        p = p2;
-        p.x += f2*m_track[i].width;
-        rot = Math::RotatePoint(Math::Point(p2.x, p2.z), a+Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[2].x = rot.x;
-        corner[2].y = p2.y;
-        corner[2].z = rot.y;
-        rot = Math::RotatePoint(Math::Point(p2.x, p2.z), a-Math::PI/2.0f, Math::Point(p.x, p.z));
-        corner[3].x = rot.x;
-        corner[3].y = p2.y;
-        corner[3].z = rot.y;
-
-        if ( p2.y < p1.y )
-        {
-            vertex[0] = D3DVERTEX2(corner[1], n, texSup.x, texSup.y);
-            vertex[1] = D3DVERTEX2(corner[0], n, texInf.x, texSup.y);
-            vertex[2] = D3DVERTEX2(corner[3], n, texSup.x, texInf.y);
-            vertex[3] = D3DVERTEX2(corner[2], n, texInf.x, texInf.y);
-        }
-        else
-        {
-            vertex[0] = D3DVERTEX2(corner[0], n, texSup.x, texSup.y);
-            vertex[1] = D3DVERTEX2(corner[1], n, texInf.x, texSup.y);
-            vertex[2] = D3DVERTEX2(corner[2], n, texSup.x, texInf.y);
-            vertex[3] = D3DVERTEX2(corner[3], n, texInf.x, texInf.y);
-        }
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-
-        if ( f2 < 0.0f )  break;
-        f1 = f2;
-        p1 = p2;
-    }
-}
-
-// Draws a triangular particle.
-
-void CParticule::DrawParticuleTriangle(int i)
-{
-    CObject*        object;
-    Math::Matrix        matrix;
-    Math::Vector        eye, pos, angle;
-
-    if ( m_particule[i].zoom == 0.0f )  return;
-
-    eye = m_engine->RetEyePt();
-    pos = m_particule[i].pos;
-
-    object = m_particule[i].objLink;
-    if ( object != 0 )
-    {
-        pos += object->RetPosition(0);
-    }
-
-    angle.x = -Math::RotateAngle(Math::DistanceProjected(pos, eye), pos.y-eye.y);
-    angle.y = Math::RotateAngle(pos.z-eye.z, pos.x-eye.x);
-    angle.z = m_particule[i].angle;
-
-    Math::LoadRotationXZYMatrix(matrix, angle);
-    matrix.Set(1, 4, pos.x);
-    matrix.Set(2, 4, pos.y);
-    matrix.Set(3, 4, pos.z);
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLELIST, D3DFVF_VERTEX2,
-                                m_triangle[i].triangle, 3, NULL);
-    m_engine->AddStatisticTriangle(1);
-}
-
-// Draw a normal particle.
-
-void CParticule::DrawParticuleNorm(int i)
-{
-    CObject*        object;
-    D3DVERTEX2      vertex[4];  // 2 triangles
-    Math::Matrix        matrix;
-    Math::Vector        corner[4], eye, pos, n, angle;
-    Math::Point         dim;
-    float           zoom;
-
-    zoom = m_particule[i].zoom;
-    if ( !m_engine->RetStateColor() && m_particule[i].intensity < 0.5f )
-    {
-        zoom *= m_particule[i].intensity/0.5f;
-    }
-
-    if ( zoom == 0.0f )  return;
-    if ( m_particule[i].intensity == 0.0f )  return;
-
-    if ( m_particule[i].sheet == SH_INTERFACE )
-    {
-        pos = m_particule[i].pos;
-
-        n = Math::Vector(0.0f, 0.0f, -1.0f);
-
-        dim.x = m_particule[i].dim.x * zoom;
-        dim.y = m_particule[i].dim.y * zoom;
-
-        corner[0].x = pos.x+dim.x;
-        corner[0].y = pos.y+dim.y;
-        corner[0].z = 0.0f;
-
-        corner[1].x = pos.x-dim.x;
-        corner[1].y = pos.y+dim.y;
-        corner[1].z = 0.0f;
-
-        corner[2].x = pos.x+dim.x;
-        corner[2].y = pos.y-dim.y;
-        corner[2].z = 0.0f;
-
-        corner[3].x = pos.x-dim.x;
-        corner[3].y = pos.y-dim.y;
-        corner[3].z = 0.0f;
-
-        vertex[0] = D3DVERTEX2(corner[1], n, m_particule[i].texSup.x, m_particule[i].texSup.y);
-        vertex[1] = D3DVERTEX2(corner[0], n, m_particule[i].texInf.x, m_particule[i].texSup.y);
-        vertex[2] = D3DVERTEX2(corner[3], n, m_particule[i].texSup.x, m_particule[i].texInf.y);
-        vertex[3] = D3DVERTEX2(corner[2], n, m_particule[i].texInf.x, m_particule[i].texInf.y);
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-    }
-    else
-    {
-        eye = m_engine->RetEyePt();
-        pos = m_particule[i].pos;
-
-        object = m_particule[i].objLink;
-        if ( object != 0 )
-        {
-            pos += object->RetPosition(0);
-        }
-
-        angle.x = -Math::RotateAngle(Math::DistanceProjected(pos, eye), pos.y-eye.y);
-        angle.y = Math::RotateAngle(pos.z-eye.z, pos.x-eye.x);
-        angle.z = m_particule[i].angle;
-
-        Math::LoadRotationXZYMatrix(matrix, angle);
-        matrix.Set(1, 4, pos.x);
-        matrix.Set(2, 4, pos.y);
-        matrix.Set(3, 4, pos.z);
-        {
-          D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-          m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-        }
-
-        n = Math::Vector(0.0f, 0.0f, -1.0f);
-
-        dim.x = m_particule[i].dim.x * zoom;
-        dim.y = m_particule[i].dim.y * zoom;
-
-        corner[0].x =  dim.x;
-        corner[0].y =  dim.y;
-        corner[0].z =  0.0f;
-
-        corner[1].x = -dim.x;
-        corner[1].y =  dim.y;
-        corner[1].z =  0.0f;
-
-        corner[2].x =  dim.x;
-        corner[2].y = -dim.y;
-        corner[2].z =  0.0f;
-
-        corner[3].x = -dim.x;
-        corner[3].y = -dim.y;
-        corner[3].z =  0.0f;
-
-        vertex[0] = D3DVERTEX2(corner[1], n, m_particule[i].texSup.x, m_particule[i].texSup.y);
-        vertex[1] = D3DVERTEX2(corner[0], n, m_particule[i].texInf.x, m_particule[i].texSup.y);
-        vertex[2] = D3DVERTEX2(corner[3], n, m_particule[i].texSup.x, m_particule[i].texInf.y);
-        vertex[3] = D3DVERTEX2(corner[2], n, m_particule[i].texInf.x, m_particule[i].texInf.y);
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-    }
-}
-
-// Draw a particle flat (horizontal).
-
-void CParticule::DrawParticuleFlat(int i)
-{
-    CObject*        object;
-    D3DVERTEX2      vertex[4];  // 2 triangles
-    Math::Matrix        matrix;
-    Math::Vector        corner[4], pos, n, angle, eye;
-    Math::Point         dim;
-
-    if ( m_particule[i].zoom == 0.0f )  return;
-    if ( m_particule[i].intensity == 0.0f )  return;
-
-    pos = m_particule[i].pos;
-
-    object = m_particule[i].objLink;
-    if ( object != 0 )
-    {
-        pos += object->RetPosition(0);
-    }
-
-    angle.x = Math::PI/2.0f;
-    angle.y = 0.0f;
-    angle.z = m_particule[i].angle;
-
-#if 0
-    if ( m_engine->RetRankView() == 1 )  // underwater?
-    {
-        angle.x = -Math::PI/2.0f;
-        pos.y -= 1.0f;
-    }
-#else
-    if ( m_engine->RetRankView() == 1 )  // underwater?
-    {
-        pos.y -= 1.0f;
-    }
-
-    eye = m_engine->RetEyePt();
-    if ( pos.y > eye.y )  // seen from below?
-    {
-        angle.x = -Math::PI/2.0f;
-    }
-#endif
-
-    Math::LoadRotationXZYMatrix(matrix, angle);
-    matrix.Set(1, 4, pos.x);
-    matrix.Set(2, 4, pos.y);
-    matrix.Set(3, 4, pos.z);
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);
-
-    dim.x = m_particule[i].dim.x * m_particule[i].zoom;
-    dim.y = m_particule[i].dim.y * m_particule[i].zoom;
-
-    corner[0].x =  dim.x;
-    corner[0].y =  dim.y;
-    corner[0].z =  0.0f;
-
-    corner[1].x = -dim.x;
-    corner[1].y =  dim.y;
-    corner[1].z =  0.0f;
-
-    corner[2].x =  dim.x;
-    corner[2].y = -dim.y;
-    corner[2].z =  0.0f;
-
-    corner[3].x = -dim.x;
-    corner[3].y = -dim.y;
-    corner[3].z =  0.0f;
-
-    vertex[0] = D3DVERTEX2(corner[1], n, m_particule[i].texSup.x, m_particule[i].texSup.y);
-    vertex[1] = D3DVERTEX2(corner[0], n, m_particule[i].texInf.x, m_particule[i].texSup.y);
-    vertex[2] = D3DVERTEX2(corner[3], n, m_particule[i].texSup.x, m_particule[i].texInf.y);
-    vertex[3] = D3DVERTEX2(corner[2], n, m_particule[i].texInf.x, m_particule[i].texInf.y);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-}
-
-// Draw a particle to a flat sheet of fog.
-
-void CParticule::DrawParticuleFog(int i)
-{
-    CObject*        object;
-    D3DVERTEX2      vertex[4];  // 2 triangles
-    Math::Matrix        matrix;
-    Math::Vector        corner[4], pos, n, angle, eye;
-    Math::Point         dim, zoom;
-
-    if ( !m_engine->RetFog() )  return;
-    if ( m_particule[i].intensity == 0.0f )  return;
-
-    pos = m_particule[i].pos;
-
-    dim.x = m_particule[i].dim.x;
-    dim.y = m_particule[i].dim.y;
-
-    if ( m_particule[i].type == PARTIFOG0 ||
-         m_particule[i].type == PARTIFOG2 ||
-         m_particule[i].type == PARTIFOG4 ||
-         m_particule[i].type == PARTIFOG6 )
-    {
-//?     pos.x += sinf(m_particule[i].zoom*1.2f)*dim.x*0.1f;
-//?     pos.y += cosf(m_particule[i].zoom*1.5f)*dim.y*0.1f;
-        zoom.x = 1.0f+sinf(m_particule[i].zoom*2.0f)/6.0f;
-        zoom.y = 1.0f+cosf(m_particule[i].zoom*2.7f)/6.0f;
-    }
-    if ( m_particule[i].type == PARTIFOG1 ||
-         m_particule[i].type == PARTIFOG3 ||
-         m_particule[i].type == PARTIFOG5 ||
-         m_particule[i].type == PARTIFOG7 )
-    {
-//?     pos.x += sinf(m_particule[i].zoom*1.0f)*dim.x*0.1f;
-//?     pos.y += cosf(m_particule[i].zoom*1.3f)*dim.y*0.1f;
-        zoom.x = 1.0f+sinf(m_particule[i].zoom*3.0f)/6.0f;
-        zoom.y = 1.0f+cosf(m_particule[i].zoom*3.7f)/6.0f;
-    }
-
-    dim.x *= zoom.x;
-    dim.y *= zoom.y;
-
-    object = m_particule[i].objLink;
-    if ( object != 0 )
-    {
-        pos += object->RetPosition(0);
-    }
-
-    angle.x = Math::PI/2.0f;
-    angle.y = 0.0f;
-    angle.z = m_particule[i].angle;
-
-    if ( m_engine->RetRankView() == 1 )  // underwater?
-    {
-        pos.y -= 1.0f;
-    }
-
-    eye = m_engine->RetEyePt();
-    if ( pos.y > eye.y )  // seen from below?
-    {
-        angle.x = -Math::PI/2.0f;
-    }
-
-    Math::LoadRotationXZYMatrix(matrix, angle);
-    matrix.Set(1, 4, pos.x);
-    matrix.Set(2, 4, pos.y);
-    matrix.Set(3, 4, pos.z);
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);
-
-    corner[0].x =  dim.x;
-    corner[0].y =  dim.y;
-    corner[0].z =  0.0f;
-
-    corner[1].x = -dim.x;
-    corner[1].y =  dim.y;
-    corner[1].z =  0.0f;
-
-    corner[2].x =  dim.x;
-    corner[2].y = -dim.y;
-    corner[2].z =  0.0f;
-
-    corner[3].x = -dim.x;
-    corner[3].y = -dim.y;
-    corner[3].z =  0.0f;
-
-    vertex[0] = D3DVERTEX2(corner[1], n, m_particule[i].texSup.x, m_particule[i].texSup.y);
-    vertex[1] = D3DVERTEX2(corner[0], n, m_particule[i].texInf.x, m_particule[i].texSup.y);
-    vertex[2] = D3DVERTEX2(corner[3], n, m_particule[i].texSup.x, m_particule[i].texInf.y);
-    vertex[3] = D3DVERTEX2(corner[2], n, m_particule[i].texInf.x, m_particule[i].texInf.y);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-}
-
-// Draw a particle in the form of radius.
-
-void CParticule::DrawParticuleRay(int i)
-{
-    CObject*        object;
-    D3DVERTEX2      vertex[4];  // 2 triangles
-    Math::Matrix        matrix;
-    Math::Vector        corner[4], eye, pos, goal, n, angle, proj;
-    Math::Point         dim, texInf, texSup;
-    bool            bLeft;
-    float           a, len, adv, prop, vario1, vario2;
-    int             r, rank, step, first, last;
-
-    if ( m_particule[i].zoom == 0.0f )  return;
-    if ( m_particule[i].intensity == 0.0f )  return;
-
-    eye = m_engine->RetEyePt();
-    pos = m_particule[i].pos;
-    goal = m_particule[i].goal;
-
-    object = m_particule[i].objLink;
-    if ( object != 0 )
-    {
-        pos += object->RetPosition(0);
-    }
-
-    a = Math::RotateAngle(Math::Point(pos.x,pos.z), Math::Point(goal.x,goal.z), Math::Point(eye.x,eye.z));
-    bLeft = (a < Math::PI);
-
-    proj = Math::Projection(pos, goal, eye);
-    angle.x = -Math::RotateAngle(Math::DistanceProjected(proj, eye), proj.y-eye.y);
-    angle.y = Math::RotateAngle(pos.z-goal.z, pos.x-goal.x)+Math::PI/2.0f;
-    angle.z = -Math::RotateAngle(Math::DistanceProjected(pos, goal), pos.y-goal.y);
-    if ( bLeft )  angle.x = -angle.x;
-
-    Math::LoadRotationZXYMatrix(matrix, angle);
-    matrix.Set(1, 4, pos.x);
-    matrix.Set(2, 4, pos.y);
-    matrix.Set(3, 4, pos.z);
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    n = Math::Vector(0.0f, 0.0f, bLeft?1.0f:-1.0f);
-
-    dim.x = m_particule[i].dim.x * m_particule[i].zoom;
-    dim.y = m_particule[i].dim.y * m_particule[i].zoom;
-
-    if ( bLeft )  dim.y = -dim.y;
-
-    len = Math::Distance(pos, goal);
-    adv = 0.0f;
-
-    step = (int)(len/(dim.x*2.0f))+1;
-
-    if ( step == 1 )
-    {
-        vario1 = 1.0f;
-        vario2 = 1.0f;
-    }
-    else
-    {
-        vario1 = 0.0f;
-        vario2 = 2.0f;
-    }
-
-    if ( m_particule[i].type == PARTIRAY2 )
-    {
-        first = 0;
-        last  = step;
-        vario1 = 0.0f;
-        vario2 = 0.0f;
-    }
-    else if ( m_particule[i].type == PARTIRAY3 )
-    {
-        if ( m_particule[i].time < m_particule[i].duration*0.40f )
-        {
-            prop = m_particule[i].time / (m_particule[i].duration*0.40f);
-            first = 0;
-            last  = (int)(prop*step);
-        }
-        else if ( m_particule[i].time < m_particule[i].duration*0.60f )
-        {
-            first = 0;
-            last  = step;
-        }
-        else
-        {
-            prop = (m_particule[i].time-m_particule[i].duration*0.60f) / (m_particule[i].duration*0.40f);
-            first = (int)(prop*step);
-            last  = step;
-        }
-    }
-    else
-    {
-        if ( m_particule[i].time < m_particule[i].duration*0.50f )
-        {
-            prop = m_particule[i].time / (m_particule[i].duration*0.50f);
-            first = 0;
-            last  = (int)(prop*step);
-        }
-        else if ( m_particule[i].time < m_particule[i].duration*0.75f )
-        {
-            first = 0;
-            last  = step;
-        }
-        else
-        {
-            prop = (m_particule[i].time-m_particule[i].duration*0.75f) / (m_particule[i].duration*0.25f);
-            first = (int)(prop*step);
-            last  = step;
-        }
-    }
-
-    corner[0].x = adv;
-    corner[2].x = adv;
-    corner[0].y =  dim.y;
-    corner[2].y = -dim.y;
-    corner[0].z = (Math::Rand()-0.5f)*vario1;
-    corner[1].z = (Math::Rand()-0.5f)*vario1;
-    corner[2].z = (Math::Rand()-0.5f)*vario1;
-    corner[3].z = (Math::Rand()-0.5f)*vario1;
-
-    for ( rank=0 ; rank<step ; rank++ )
-    {
-        corner[1].x = corner[0].x;
-        corner[3].x = corner[2].x;
-        corner[0].x = adv+dim.x*2.0f+(Math::Rand()-0.5f)*vario2;
-        corner[2].x = adv+dim.x*2.0f+(Math::Rand()-0.5f)*vario2;
-
-        corner[1].y = corner[0].y;
-        corner[3].y = corner[2].y;
-        corner[0].y =  dim.y+(Math::Rand()-0.5f)*vario2;
-        corner[2].y = -dim.y+(Math::Rand()-0.5f)*vario2;
-
-        if ( rank >= first && rank <= last )
-        {
-#if 1
-            texInf = m_particule[i].texInf;
-            texSup = m_particule[i].texSup;
-
-            r = rand()%16;
-            texInf.x += 0.25f*(r/4);
-            texSup.x += 0.25f*(r/4);
-            if ( r%2 < 1 && adv > 0.0f && m_particule[i].type != PARTIRAY1 )
-            {
-                Math::Swap(texInf.x, texSup.x);
-            }
-            if ( r%4 < 2 )
-            {
-                Math::Swap(texInf.y, texSup.y);
-            }
-#else
-            texInf.x = Math::Mod(texInf.x+0.25f, 1.0f);
-            texSup.x = Math::Mod(texSup.x+0.25f, 1.0f);
-#endif
-
-            vertex[0] = D3DVERTEX2(corner[1], n, texSup.x, texSup.y);
-            vertex[1] = D3DVERTEX2(corner[0], n, texInf.x, texSup.y);
-            vertex[2] = D3DVERTEX2(corner[3], n, texSup.x, texInf.y);
-            vertex[3] = D3DVERTEX2(corner[2], n, texInf.x, texInf.y);
-
-            m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-            m_engine->AddStatisticTriangle(2);
-        }
-        adv += dim.x*2.0f;
-    }
-}
-
-// Draws a spherical particle.
-
-void CParticule::DrawParticuleSphere(int i)
-{
-    D3DVERTEX2      vertex[2*16*(16+1)];  // triangles
-    Math::Matrix        matrix, rot;
-    Math::Vector        angle, v0, v1;
-    Math::Point         ts, ti;
-    float           zoom, deltaRingAngle, deltaSegAngle;
-    float           r0,r1, tu0,tv0, tu1,tv1;
-    int             j, ring, seg, numRings, numSegments;
-
-    zoom = m_particule[i].zoom;
-#if 0
-    if ( !m_engine->RetStateColor() && m_particule[i].intensity < 0.5f )
-    {
-        zoom *= m_particule[i].intensity/0.5f;
-    }
-#endif
-
-    if ( zoom == 0.0f )  return;
-
-    m_engine->SetState(D3DSTATETTb|D3DSTATE2FACE|D3DSTATEWRAP, RetColor(m_particule[i].intensity));
-
-    matrix.LoadIdentity();
-    matrix.Set(1, 1, zoom);
-    matrix.Set(2, 2, zoom);
-    matrix.Set(3, 3, zoom);
-    matrix.Set(1, 4, m_particule[i].pos.x);
-    matrix.Set(2, 4, m_particule[i].pos.y);
-    matrix.Set(3, 4, m_particule[i].pos.z);
-
-    if ( m_particule[i].angle != 0.0f )
-    {
-        angle.x = m_particule[i].angle*0.4f;
-        angle.y = m_particule[i].angle*1.0f;
-        angle.z = m_particule[i].angle*0.7f;
-        Math::LoadRotationZXYMatrix(rot, angle);
-        matrix = Math::MultiplyMatrices(rot, matrix);
-    }
-
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    ts.x = m_particule[i].texSup.x;
-    ts.y = m_particule[i].texSup.y;
-    ti.x = m_particule[i].texInf.x;
-    ti.y = m_particule[i].texInf.y;
-
-    // Choose a tesselation level.
-    if ( m_particule[i].type == PARTISPHERE3 ||
-         m_particule[i].type == PARTISPHERE5 )
-    {
-        numRings    = 16;
-        numSegments = 16;
-    }
-    else
-    {
-        numRings    = 8;
-        numSegments = 10;
-    }
-
-    // Establish constants used in sphere generation.
-    deltaRingAngle = Math::PI/numRings;
-    deltaSegAngle  = 2.0f*Math::PI/numSegments;
-
-    // Generate the group of rings for the sphere.
-    j = 0;
-    for ( ring=0 ; ring<numRings ; ring++ )
-    {
-        r0   = sinf((ring+0)*deltaRingAngle);
-        r1   = sinf((ring+1)*deltaRingAngle);
-        v0.y = cosf((ring+0)*deltaRingAngle);
-        v1.y = cosf((ring+1)*deltaRingAngle);
-
-        tv0 = (ring+0)/(float)numRings;
-        tv1 = (ring+1)/(float)numRings;
-        tv0 = ts.y+(ti.y-ts.y)*tv0;
-        tv1 = ts.y+(ti.y-ts.y)*tv1;
-
-        // Generate the group of segments for the current ring.
-        for ( seg=0 ; seg<numSegments+1 ; seg++ )
-        {
-            v0.x = r0*sinf(seg*deltaSegAngle);
-            v0.z = r0*cosf(seg*deltaSegAngle);
-            v1.x = r1*sinf(seg*deltaSegAngle);
-            v1.z = r1*cosf(seg*deltaSegAngle);
-
-            // Add two vertices to the strip which makes up the sphere.
-            tu0 = ((float)seg)/numSegments;
-            tu0 = ts.x+(ti.x-ts.x)*tu0;
-            tu1 = tu0;
-
-            vertex[j++] = D3DVERTEX2(v0,v0, tu0,tv0);
-            vertex[j++] = D3DVERTEX2(v1,v1, tu1,tv1);
-        }
-    }
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, j, NULL);
-    m_engine->AddStatisticTriangle(j);
-
-    m_engine->SetState(D3DSTATETTb, RetColor(m_particule[i].intensity));
-}
-
-// Returns the height depending on the progress.
-
-float ProgressCylinder(float progress)
-{
-    if ( progress < 0.5f )
-    {
-        return 1.0f - (powf(1.0f-progress*2.0f, 2.0f));
-    }
-    else
-    {
-        return 1.0f - (powf(progress*2.0f-1.0f, 2.0f));
-    }
-}
-
-// Draws a cylindrical particle.
-
-void CParticule::DrawParticuleCylinder(int i)
-{
-    D3DVERTEX2      vertex[2*5*(10+1)];  // triangles
-    Math::Matrix        matrix, rot;
-    Math::Vector        angle, v0, v1;
-    Math::Point         ts, ti;
-    float           progress, zoom, diam, deltaSegAngle, h[6], d[6];
-    float           r0,r1, tu0,tv0, tu1,tv1, p1, p2, pp;
-    int             j, ring, seg, numRings, numSegments;
-
-    progress = m_particule[i].zoom;
-    zoom = m_particule[i].dim.x;
-    diam = m_particule[i].dim.y;
-    if ( progress >= 1.0f || zoom == 0.0f )  return;
-
-    m_engine->SetState(D3DSTATETTb|D3DSTATE2FACE|D3DSTATEWRAP, RetColor(m_particule[i].intensity));
-
-    matrix.LoadIdentity();
-    matrix.Set(1, 1, zoom);
-    matrix.Set(2, 2, zoom);
-    matrix.Set(3, 3, zoom);
-    matrix.Set(1, 4, m_particule[i].pos.x);
-    matrix.Set(2, 4, m_particule[i].pos.y);
-    matrix.Set(3, 4, m_particule[i].pos.z);
-
-    {
-      D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-      m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    ts.x = m_particule[i].texSup.x;
-    ts.y = m_particule[i].texSup.y;
-    ti.x = m_particule[i].texInf.x;
-    ti.y = m_particule[i].texInf.y;
-
-    numRings = 5;
-    numSegments = 10;
-    deltaSegAngle  = 2.0f*Math::PI/numSegments;
-
-    if ( m_particule[i].type == PARTIPLOUF0 )
-    {
-#if 0
-        if ( progress <= 0.5f )
-        {
-            p1 = progress/0.5f;  // front
-            p2 = 0.0f;  // back
-        }
-        else
-        {
-            p1 = 1.0f;  // front
-            p2 = (progress-0.5f)/0.5f;  // back
-            ts.y += (ti.y-ts.y)*p2;
-        }
-#else
-        p1 = progress;  // front
-        p2 = powf(progress, 5.0f);  // back
-#endif
-
-        for ( ring=0 ; ring<=numRings ; ring++ )
-        {
-            pp = p2+(p1-p2)*((float)ring/numRings);
-            d[ring] = diam/zoom+pp*2.0f;
-            h[ring] = ProgressCylinder(pp);
-        }
-    }
-
-    j = 0;
-    for ( ring=0 ; ring<numRings ; ring++ )
-    {
-        r0   = 1.0f*d[ring+0];  // radius at the base
-        r1   = 1.0f*d[ring+1];  // radius at the top
-        v0.y = 1.0f*h[ring+0];  // bottom
-        v1.y = 1.0f*h[ring+1];  // top
-
-        tv0 = 1.0f-(ring+0)*(1.0f/numRings);
-        tv1 = 1.0f-(ring+1)*(1.0f/numRings);
-        tv0 = ts.y+(ti.y-ts.y)*tv0;
-        tv1 = ts.y+(ti.y-ts.y)*tv1;
-
-        for ( seg=0 ; seg<numSegments+1 ; seg++ )
-        {
-            v0.x = r0*sinf(seg*deltaSegAngle);
-            v0.z = r0*cosf(seg*deltaSegAngle);
-            v1.x = r1*sinf(seg*deltaSegAngle);
-            v1.z = r1*cosf(seg*deltaSegAngle);
-
-//?         tu0 = ((float)seg)/numSegments;
-            tu0 = (seg%2)?0.0f:1.0f;
-            tu0 = ts.x+(ti.x-ts.x)*tu0;
-            tu1 = tu0;
-
-            vertex[j++] = D3DVERTEX2(v0,v0, tu0,tv0);
-            vertex[j++] = D3DVERTEX2(v1,v1, tu1,tv1);
-        }
-    }
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, j, NULL);
-    m_engine->AddStatisticTriangle(j);
-
-    m_engine->SetState(D3DSTATETTb, RetColor(m_particule[i].intensity));
-}
-
-// Draws a tire mark.
-
-void CParticule::DrawParticuleWheel(int i)
-{
-    Math::Vector    pos[4], center;
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    n;
-    Math::Point     ts, ti;
-    float       dist, dp;
-
-    dist = Math::DistanceProjected(m_engine->RetEyePt(), m_wheelTrace[i].pos[0]);
-    if ( dist > 300.0f )  return;
-
-    pos[0] = m_wheelTrace[i].pos[0];
-    pos[1] = m_wheelTrace[i].pos[1];
-    pos[2] = m_wheelTrace[i].pos[2];
-    pos[3] = m_wheelTrace[i].pos[3];
-
-    if ( m_wheelTrace[i].type == PARTITRACE0 )  // white ground track?
-    {
-        ts.x =   8.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE1 )  // black ground track?
-    {
-        ts.x =   0.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE2 )  // gray ground track?
-    {
-        ts.x =   0.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE3 )  // light gray ground track?
-    {
-        ts.x =   8.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE4 )  // red ground track?
-    {
-        ts.x =  32.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE5 )  // pink ground track?
-    {
-        ts.x =  40.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE6 )  // violet ground track?
-    {
-        ts.x =  32.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE7 )  // orange ground track?
-    {
-        ts.x =  40.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE8 )  // yellow ground track?
-    {
-        ts.x =  16.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE9 )  // beige ground track?
-    {
-        ts.x =  24.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE10 )  // brown ground track?
-    {
-        ts.x =  16.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE11 )  // skin ground track?
-    {
-        ts.x =  24.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE12 )  // green ground track?
-    {
-        ts.x =  48.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE13 )  // light green ground track?
-    {
-        ts.x =  56.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE14 )  // blue ground track?
-    {
-        ts.x =  48.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE15 )  // light blue ground track?
-    {
-        ts.x =  56.0f/256.0f;
-        ts.y = 232.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE16 )  // black arrow ground track?
-    {
-        ts.x = 160.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else if ( m_wheelTrace[i].type == PARTITRACE17 )  // red arrow ground track?
-    {
-        ts.x = 176.0f/256.0f;
-        ts.y = 224.0f/256.0f;
-    }
-    else
-    {
-        return;
-    }
-
-    if ( m_wheelTrace[i].type == PARTITRACE16 ||
-         m_wheelTrace[i].type == PARTITRACE17 )
-    {
-        ti.x = ts.x+16.0f/256.0f;
-        ti.y = ts.y+16.0f/256.0f;
-    }
-    else
-    {
-        ti.x = ts.x+8.0f/256.0f;
-        ti.y = ts.y+8.0f/256.0f;
-    }
-
-    dp = (1.0f/256.0f)/2.0f;
-    ts.x = ts.x+dp;
-    ts.y = ts.y+dp;
-    ti.x = ti.x-dp;
-    ti.y = ti.y-dp;
-
-    n = Math::Vector(0.0f, 1.0f, 0.0f);
-
-    vertex[0] = D3DVERTEX2(pos[0], n, ts.x, ts.y);
-    vertex[1] = D3DVERTEX2(pos[1], n, ti.x, ts.y);
-    vertex[2] = D3DVERTEX2(pos[2], n, ts.x, ti.y);
-    vertex[3] = D3DVERTEX2(pos[3], n, ti.x, ti.y);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-}
-
-// Draws all the particles.
-
-void CParticule::DrawParticule(int sheet)
-{
-    D3DMATERIAL7    mat;
-    Math::Matrix        matrix;
-    bool            bLoadTexture;
-    char            name[20];
-    int             state, t, i, j, r;
-
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-
-    // Draw the basic particles of triangles.
-    if ( m_totalInterface[0][sheet] > 0 )
-    {
-        for ( i=0 ; i<MAXPARTICULE ; i++ )
-        {
-            if ( !m_particule[i].bUsed )  continue;
-            if ( m_particule[i].sheet != sheet )  continue;
-            if ( m_particule[i].type == PARTIPART )  continue;
-
-            m_engine->SetTexture(m_triangle[i].texName1);
-            m_engine->SetMaterial(m_triangle[i].material);
-            m_engine->SetState(m_triangle[i].state);
-            DrawParticuleTriangle(i);
-        }
-    }
-
-    // Draw the particles was calculated based on edge.
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-
-    ZeroMemory( &mat, sizeof(D3DMATERIAL7) );
-    mat.diffuse.r = 1.0f;
-    mat.diffuse.g = 1.0f;
-    mat.diffuse.b = 1.0f;  // white
-    mat.ambient.r = 0.5f;
-    mat.ambient.g = 0.5f;
-    mat.ambient.b = 0.5f;
-    m_engine->SetMaterial(mat);
-
-    // Draw tire marks.
-    if ( m_wheelTraceTotal > 0 && sheet == SH_WORLD )
-    {
-#if _POLISH
-        m_engine->SetTexture("textp.tga");
-#else
-        m_engine->SetTexture("text.tga");
-#endif
-        m_engine->SetState(D3DSTATETTw);
-//?     m_engine->SetState(D3DSTATENORMAL);
-        matrix.LoadIdentity();
-        {
-          D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-          m_pD3DDevice->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-        }
-        for ( i=0 ; i<m_wheelTraceTotal ; i++ )
-        {
-            DrawParticuleWheel(i);
-        }
-    }
-
-//? for ( t=1 ; t<MAXPARTITYPE ; t++ )
-    for ( t=MAXPARTITYPE-1 ; t>=1 ; t-- )  // black behind!
-    {
-        if ( m_totalInterface[t][sheet] == 0 )  continue;
-
-        bLoadTexture = false;
-
-        if ( t == 4 )  state = D3DSTATETTw;  // text.tga
-        else           state = D3DSTATETTb;  // effect[00..02].tga
-        m_engine->SetState(state);
-
-        for ( j=0 ; j<MAXPARTICULE ; j++ )
-        {
-            i = MAXPARTICULE*t+j;
-            if ( !m_particule[i].bUsed )  continue;
-            if ( m_particule[i].sheet != sheet )  continue;
-
-            if ( !bLoadTexture )
-            {
-                NameParticule(name, t);
-                m_engine->SetTexture(name);
-                bLoadTexture = true;
-            }
-
-            r = m_particule[i].trackRank;
-            if ( r != -1 )
-            {
-                m_engine->SetState(state);
-                TrackDraw(r, m_particule[i].type);  // draws the drag
-                if ( !m_track[r].bDrawParticule )  continue;
-            }
-
-            m_engine->SetState(state, RetColor(m_particule[i].intensity));
-
-            if ( m_particule[i].bRay )  // ray?
-            {
-                DrawParticuleRay(i);
-            }
-            else if ( m_particule[i].type == PARTIFLIC  ||  // circle in the water?
-                      m_particule[i].type == PARTISHOW  ||
-                      m_particule[i].type == PARTICHOC  ||
-                      m_particule[i].type == PARTIGFLAT )
-            {
-                DrawParticuleFlat(i);
-            }
-            else if ( m_particule[i].type >= PARTIFOG0 &&
-                      m_particule[i].type <= PARTIFOG9 )
-            {
-                DrawParticuleFog(i);
-            }
-            else if ( m_particule[i].type >= PARTISPHERE0 &&
-                      m_particule[i].type <= PARTISPHERE9 )  // sphere?
-            {
-                DrawParticuleSphere(i);
-            }
-            else if ( m_particule[i].type >= PARTIPLOUF0 &&
-                      m_particule[i].type <= PARTIPLOUF4 )  // cylinder?
-            {
-                DrawParticuleCylinder(i);
-            }
-            else    // normal?
-            {
-                DrawParticuleNorm(i);
-            }
-        }
-    }
-
-//? m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZENABLE, true);
-    m_pD3DDevice->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, true);
-}
-
-
-// Seeks if an object collided with a bullet.
-
-CObject* CParticule::SearchObjectGun(Math::Vector old, Math::Vector pos,
-                                     ParticuleType type, CObject *father)
-{
-    CObject     *pObj, *pBest;
-    Math::Vector    box1, box2, oPos, p;
-    ObjectType  oType;
-    bool        bShield;
-    float       min, oRadius, dist, shieldRadius;
-    int         i, j;
-    bool        bHimself;
-
-    if ( m_main->RetMovieLock() )  return 0;  // current movie?
-
-    bHimself = m_main->RetHimselfDamage();
-
-    min = 5.0f;
-    if ( type == PARTIGUN2 ) min = 2.0f;  // shooting insect?
-    if ( type == PARTIGUN3 ) min = 3.0f;  // suiciding spider?
-
-    box1 = old;
-    box2 = pos;
-    if ( box1.x > box2.x )  Math::Swap(box1.x, box2.x);  // box1 < box2
-    if ( box1.y > box2.y )  Math::Swap(box1.y, box2.y);
-    if ( box1.z > box2.z )  Math::Swap(box1.z, box2.z);
-    box1.x -= min;
-    box1.y -= min;
-    box1.z -= min;
-    box2.x += min;
-    box2.y += min;
-    box2.z += min;
-
-    pBest = 0;
-    bShield = false;
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( !pObj->RetActif() )  continue;  // inactive?
-        if ( pObj == father )  continue;
-
-        oType = pObj->RetType();
-
-        if ( oType == OBJECT_TOTO )  continue;
-
-        if ( type == PARTIGUN1 )  // fireball shooting?
-        {
-            if ( oType == OBJECT_MOTHER )  continue;
-            if ( bHimself )  // damage is oneself?
-            {
-                if ( !IsAlien(oType) &&
-                     !IsSoft(oType)  )  continue;
-            }
-            else    // damage only to enemies?
-            {
-                if ( !IsAlien(oType) )  continue;
-            }
-        }
-        else if ( type == PARTIGUN2 )  // shooting insect?
-        {
-            if ( !IsSoft(oType) )  continue;
-        }
-        else if ( type == PARTIGUN3 )  // suiciding spider?
-        {
-            if ( !IsSoft(oType) )  continue;
-        }
-        else if ( type == PARTIGUN4 )  // orgaball shooting?
-        {
-            if ( oType == OBJECT_MOTHER )  continue;
-            if ( bHimself )  // damage is oneself?
-            {
-                if ( !IsAlien(oType) &&
-                     !IsSoft(oType)  )  continue;
-            }
-            else    // damage only to enemies?
-            {
-                if ( !IsAlien(oType) )  continue;
-            }
-        }
-        else if ( type == PARTITRACK11 )  // phazer shooting?
-        {
-            if ( bHimself )  // damage is oneself?
-            {
-                if ( !IsAlien(oType) &&
-                     !IsSoft(oType)  )  continue;
-            }
-            else    // damage only to enemies?
-            {
-                if ( !IsAlien(oType) )  continue;
-            }
-        }
-        else
-        {
-            continue;
-        }
-
-        oPos = pObj->RetPosition(0);
-
-        if ( type == PARTIGUN2 ||  // shooting insect?
-             type == PARTIGUN3 )   // suiciding spider?
-        {
-            // Test if the ball is entered into the sphere of a shield.
-            shieldRadius = pObj->RetShieldRadius();
-            if ( shieldRadius > 0.0f )
-            {
-                dist = Math::Distance(oPos, pos);
-                if ( dist <= shieldRadius )
-                {
-                    pBest = pObj;
-                    bShield = true;
-                }
-            }
-        }
-        if ( bShield )  continue;
-
-        // Test the center of the object, which is necessary for objects
-        // that have no sphere in the center (station).
-        dist = Math::Distance(oPos, pos)-4.0f;
-        if ( dist < min )
-        {
-            pBest = pObj;
-        }
-
-        // Test with all spheres of the object.
-        j = 0;
-        while ( pObj->GetCrashSphere(j++, oPos, oRadius) )
-        {
-            if ( oPos.x+oRadius < box1.x || oPos.x-oRadius > box2.x ||  // outside the box?
-                 oPos.y+oRadius < box1.y || oPos.y-oRadius > box2.y ||
-                 oPos.z+oRadius < box1.z || oPos.z-oRadius > box2.z )  continue;
-
-            p = Math::Projection(old, pos, oPos);
-            dist = Math::Distance(p, oPos)-oRadius;
-            if ( dist < min )
-            {
-                pBest = pObj;
-            }
-        }
-    }
-
-    return pBest;
-}
-
-// Seeks if an object collided with a ray.
-
-CObject* CParticule::SearchObjectRay(Math::Vector pos, Math::Vector goal,
-                                     ParticuleType type, CObject *father)
-{
-    CObject*    pObj;
-    Math::Vector    box1, box2, oPos, p;
-    ObjectType  oType;
-    float       min, dist;
-    int         i;
-
-    if ( m_main->RetMovieLock() )  return 0;  // current movie?
-
-    min = 10.0f;
-
-    box1 = pos;
-    box2 = goal;
-    if ( box1.x > box2.x )  Math::Swap(box1.x, box2.x);  // box1 < box2
-    if ( box1.y > box2.y )  Math::Swap(box1.y, box2.y);
-    if ( box1.z > box2.z )  Math::Swap(box1.z, box2.z);
-    box1.x -= min;
-    box1.y -= min;
-    box1.z -= min;
-    box2.x += min;
-    box2.y += min;
-    box2.z += min;
-
-    for ( i=0 ; i<1000000 ; i++ )
-    {
-        pObj = (CObject*)m_iMan->SearchInstance(CLASS_OBJECT, i);
-        if ( pObj == 0 )  break;
-
-        if ( !pObj->RetActif() )  continue;  // inactive?
-        if ( pObj == father )  continue;
-
-        oType = pObj->RetType();
-
-        if ( oType == OBJECT_TOTO )  continue;
-
-        if ( type  == PARTIRAY1       &&
-             oType != OBJECT_MOBILEtg &&
-             oType != OBJECT_TEEN28   &&
-             oType != OBJECT_TEEN31   &&
-             oType != OBJECT_ANT      &&
-             oType != OBJECT_SPIDER   &&
-             oType != OBJECT_BEE      &&
-             oType != OBJECT_WORM     &&
-             oType != OBJECT_MOTHER   &&
-             oType != OBJECT_NEST     )  continue;
-
-        oPos = pObj->RetPosition(0);
-
-        if ( oPos.x < box1.x || oPos.x > box2.x ||  // outside the box?
-             oPos.y < box1.y || oPos.y > box2.y ||
-             oPos.z < box1.z || oPos.z > box2.z )  continue;
-
-        p = Math::Projection(pos, goal, oPos);
-        dist = Math::Distance(p, oPos);
-        if ( dist < min )  return pObj;
-    }
-
-    return 0;
-}
-
-
-// Sounded one.
-
-void CParticule::Play(Sound sound, Math::Vector pos, float amplitude)
-{
-    if ( m_sound == 0 )
-    {
-        m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
-    }
-
-    m_sound->Play(sound, pos, amplitude);
-}
-
-
-
-// Seeks the color if you're in the fog.
-// Returns black if you're not in the fog.
-
-D3DCOLORVALUE CParticule::RetFogColor(Math::Vector pos)
-{
-    D3DCOLORVALUE   result, color;
-    float           dist, factor;
-    int             fog, i;
-
-    result.r = 0.0f;
-    result.g = 0.0f;
-    result.b = 0.0f;
-    result.a = 0.0f;
-
-    for ( fog=0 ; fog<m_fogTotal ; fog++ )
-    {
-        i = m_fog[fog];  // i = rank of the particle
-
-        if ( pos.y >= m_particule[i].pos.y+FOG_HSUP )  continue;
-        if ( pos.y <= m_particule[i].pos.y-FOG_HINF )  continue;
-
-        dist = Math::DistanceProjected(pos, m_particule[i].pos);
-        if ( dist >= m_particule[i].dim.x*1.5f )  continue;
-
-        // Calculates the horizontal distance.
-        factor = 1.0f-powf(dist/(m_particule[i].dim.x*1.5f), 4.0f);
-
-        // Calculates the vertical distance.
-        if ( pos.y > m_particule[i].pos.y )
-        {
-            factor *= 1.0f-(pos.y-m_particule[i].pos.y)/FOG_HSUP;
-        }
-        else
-        {
-            factor *= 1.0f-(m_particule[i].pos.y-pos.y)/FOG_HINF;
-        }
-
-        factor *= 0.3f;
-
-        if ( m_particule[i].type == PARTIFOG0 ||
-             m_particule[i].type == PARTIFOG1 )  // blue?
-        {
-            color.r = 0.0f;
-            color.g = 0.5f;
-            color.b = 1.0f;
-        }
-        else if ( m_particule[i].type == PARTIFOG2 ||
-                  m_particule[i].type == PARTIFOG3 )  // red?
-        {
-            color.r = 2.0f;
-            color.g = 1.0f;
-            color.b = 0.0f;
-        }
-        else if ( m_particule[i].type == PARTIFOG4 ||
-                  m_particule[i].type == PARTIFOG5 )  // white?
-        {
-            color.r = 1.0f;
-            color.g = 1.0f;
-            color.b = 1.0f;
-        }
-        else if ( m_particule[i].type == PARTIFOG6 ||
-                  m_particule[i].type == PARTIFOG7 )  // yellow?
-        {
-            color.r = 0.8f;
-            color.g = 1.0f;
-            color.b = 0.4f;
-        }
-        else
-        {
-            color.r = 0.0f;
-            color.g = 0.0f;
-            color.b = 0.0f;
-        }
-
-        result.r += color.r*factor;
-        result.g += color.g*factor;
-        result.b += color.b*factor;
-    }
-
-    if ( result.r > 0.6f )  result.r = 0.6f;
-    if ( result.g > 0.6f )  result.g = 0.6f;
-    if ( result.b > 0.6f )  result.b = 0.6f;
-
-    return result;
-}
-
-
-// Writes a file. BMP containing all the tire tracks.
-
-bool CParticule::WriteWheelTrace(char *filename, int width, int height,
-                                 Math::Vector dl, Math::Vector ur)
-{
-    HDC             hDC;
-    HDC             hDCImage;
-    HBITMAP         hb;
-    PBITMAPINFO     info;
-    HBRUSH          hBrush;
-    HPEN            hPen;
-    HGDIOBJ         old;
-    RECT            rect;
-    COLORREF        color;
-    Math::Point         pos[4];
-    POINT           list[4];
-    int             i;
-
-    if ( !m_engine->GetRenderDC(hDC) )  return false;
-
-    hDCImage = CreateCompatibleDC(hDC);
-    if ( hDCImage == 0 )
-    {
-        m_engine->ReleaseRenderDC(hDC);
-        return false;
-    }
-
-    hb = CreateCompatibleBitmap(hDC, width, height);
-    if ( hb == 0 )
-    {
-        DeleteDC(hDCImage);
-        m_engine->ReleaseRenderDC(hDC);
-        return false;
-    }
-
-    SelectObject(hDCImage, hb);
-
-    rect.left   = 0;
-    rect.right  = width;
-    rect.top    = 0;
-    rect.bottom = height;
-    FillRect(hDCImage, &rect, (HBRUSH)GetStockObject(WHITE_BRUSH));
-
-    hPen = CreatePen(PS_NULL, 1, 0);
-    SelectObject(hDCImage, hPen);
-
-    for ( i=0 ; i<m_wheelTraceTotal ; i++ )
-    {
-        if ( m_wheelTrace[i].type == PARTITRACE0 )  // black ground track?
-        {
-            color = RGB(0,0,0);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE1 )  // red ground track?
-        {
-            color = RGB(255,0,0);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE2 )  // green ground track?
-        {
-            color = RGB(0,255,0);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE3 )  // blue ground track?
-        {
-            color = RGB(0,0,255);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE4 )  // cyan ground track?
-        {
-            color = RGB(0,255,255);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE5 )  // magenta ground track?
-        {
-            color = RGB(255,0,255);
-        }
-        else if ( m_wheelTrace[i].type == PARTITRACE6 )  // yellow ground track?
-        {
-            color = RGB(255,255,0);
-        }
-        else
-        {
-            color = RGB(0,0,0);
-        }
-        hBrush = CreateSolidBrush(color);
-        old = SelectObject(hDCImage, hBrush);
-
-        pos[0].x = ((m_wheelTrace[i].pos[0].x-dl.x)*width)/(ur.x-dl.x);
-        pos[0].y = ((m_wheelTrace[i].pos[0].z-dl.z)*width)/(ur.z-dl.z);
-        pos[1].x = ((m_wheelTrace[i].pos[1].x-dl.x)*width)/(ur.x-dl.x);
-        pos[1].y = ((m_wheelTrace[i].pos[1].z-dl.z)*width)/(ur.z-dl.z);
-        pos[2].x = ((m_wheelTrace[i].pos[2].x-dl.x)*width)/(ur.x-dl.x);
-        pos[2].y = ((m_wheelTrace[i].pos[2].z-dl.z)*width)/(ur.z-dl.z);
-        pos[3].x = ((m_wheelTrace[i].pos[3].x-dl.x)*width)/(ur.x-dl.x);
-        pos[3].y = ((m_wheelTrace[i].pos[3].z-dl.z)*width)/(ur.z-dl.z);
-
-        list[0].x = (int)pos[0].x;
-        list[0].y = (int)pos[0].y;
-        list[1].x = (int)pos[1].x;
-        list[1].y = (int)pos[1].y;
-        list[2].x = (int)pos[3].x;
-        list[2].y = (int)pos[3].y;
-        list[3].x = (int)pos[2].x;
-        list[3].y = (int)pos[2].y;
-        Polygon(hDCImage, list, 4);
-
-        if ( old != 0 )  SelectObject(hDCImage, old);
-        DeleteObject(hBrush);
-    }
-
-    info = m_engine->CreateBitmapInfoStruct(hb);
-    if ( info == 0 )
-    {
-        DeleteObject(hb);
-        DeleteDC(hDCImage);
-        m_engine->ReleaseRenderDC(hDC);
-        return false;
-    }
-
-    m_engine->CreateBMPFile(filename, info, hb, hDCImage);
-
-    DeleteObject(hb);
-    DeleteDC(hDCImage);
-    m_engine->ReleaseRenderDC(hDC);
-    return true;
-}
-
diff --git a/src/old/particule.h b/src/old/particule.h
deleted file mode 100644
index 23c9838..0000000
--- a/src/old/particule.h
+++ /dev/null
@@ -1,337 +0,0 @@
-// * 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/.
-
-// particule.h
-
-#pragma once
-
-
-#include "math/point.h"
-#include "old/d3dengine.h"
-#include "old/sound.h"
-
-
-class CInstanceManager;
-class CRobotMain;
-class CTerrain;
-class CWater;
-class CObject;
-
-
-const int MAXPARTICULE  = 500;
-const int MAXPARTITYPE  = 5;
-const int MAXTRACK      = 100;
-const int MAXTRACKLEN   = 10;
-const int MAXPARTIFOG   = 100;
-const int MAXWHEELTRACE = 1000;
-
-enum ParticulePlace
-{
-    SH_WORLD        = 0,    // particle in the world in the interface
-    SH_FRONT        = 1,    // particle in the world on the interface
-    SH_INTERFACE    = 2,    // particle in the interface
-    SH_MAX          = 3
-};
-
-// type == 0    ->  triangles
-// type == 1    ->  effect00 (black background)
-// type == 2    ->  effect01 (black background)
-// type == 3    ->  effect02 (black background)
-// type == 4    ->  text     (white background)
-
-
-enum ParticuleType
-{
-    PARTIEXPLOT     = 1,        // technology explosion
-    PARTIEXPLOO     = 2,        // organic explosion
-    PARTIMOTOR      = 3,        // the engine exhaust gas
-    PARTIGLINT      = 4,        // reflection
-    PARTIBLITZ      = 5,        // lightning recharging battery
-    PARTICRASH      = 6,        // dust after fall
-    PARTIGAS        = 7,        // gas from the reactor
-    PARTIFIRE       = 9,        // fireball shrinks
-    PARTIFIREZ      = 10,       // fireball grows
-    PARTIBLUE       = 11,       // blue ball
-    PARTISELY       = 12,       // yellow selection
-    PARTISELR       = 13,       // red selection
-    PARTIGUN1       = 18,       // a bullet (fireball)
-    PARTIGUN2       = 19,       // bullet 2 (ant)
-    PARTIGUN3       = 20,       // bullet 3 (spider)
-    PARTIGUN4       = 21,       // bullet 4 (orgaball)
-    PARTIFRAG       = 22,       // triangular fragment
-    PARTIQUEUE      = 23,       // inflamed tail
-    PARTIORGANIC1       = 24,       // organic ball mother
-    PARTIORGANIC2       = 25,       // organic ball daughter
-    PARTISMOKE1     = 26,       // black smoke
-    PARTISMOKE2     = 27,       // black smoke
-    PARTISMOKE3     = 28,       // black smoke
-    PARTISMOKE4     = 29,       // black smoke
-    PARTIBLOOD      = 30,       // human blood
-    PARTIBLOODM     = 31,       // blood laying
-    PARTIVAPOR      = 32,       // steam
-    PARTIVIRUS1     = 33,       // virus 1
-    PARTIVIRUS2     = 34,       // virus 2
-    PARTIVIRUS3     = 35,       // virus 3
-    PARTIVIRUS4     = 36,       // virus 4
-    PARTIVIRUS5     = 37,       // virus 5
-    PARTIVIRUS6     = 38,       // virus 6
-    PARTIVIRUS7     = 39,       // virus 7
-    PARTIVIRUS8     = 40,       // virus 8
-    PARTIVIRUS9     = 41,       // virus 9
-    PARTIVIRUS10        = 42,       // virus 10
-    PARTIRAY1       = 43,       // ray 1 (turn)
-    PARTIRAY2       = 44,       // ray 2 (electric arc)
-    PARTIRAY3       = 45,       // ray 3
-    PARTIRAY4       = 46,       // ray 4
-    PARTIFLAME      = 47,       // flame
-    PARTIBUBBLE     = 48,       // bubble
-    PARTIFLIC       = 49,       // circles in the water
-    PARTIEJECT      = 50,       // ejection from the reactor
-    PARTISCRAPS     = 51,       // waste from the reactor
-    PARTITOTO       = 52,       // reactor of tot
-    PARTIERROR      = 53,       // toto says no
-    PARTIWARNING        = 54,       // foo says blah
-    PARTIINFO       = 54,       // toto says yes
-    PARTIQUARTZ     = 55,       // reflection crystal
-    PARTISPHERE0        = 56,       // explosion sphere
-    PARTISPHERE1        = 57,       // energy sphere
-    PARTISPHERE2        = 58,       // analysis sphere
-    PARTISPHERE3        = 59,       // shield sphere
-    PARTISPHERE4        = 60,       // information sphere (emit)
-    PARTISPHERE5        = 61,       // botanical sphere (gravity root)
-    PARTISPHERE6        = 62,       // information sphere (receive)
-    PARTISPHERE7        = 63,       // sphere
-    PARTISPHERE8        = 64,       // sphere
-    PARTISPHERE9        = 65,       // sphere
-    PARTIGUNDEL     = 66,       // bullet destroyed by shield
-    PARTIPART       = 67,       // object part
-    PARTITRACK1     = 68,       // drag 1
-    PARTITRACK2     = 69,       // drag 2
-    PARTITRACK3     = 70,       // drag 3
-    PARTITRACK4     = 71,       // drag 4
-    PARTITRACK5     = 72,       // drag 5
-    PARTITRACK6     = 73,       // drag 6
-    PARTITRACK7     = 74,       // drag 7
-    PARTITRACK8     = 75,       // drag 8
-    PARTITRACK9     = 76,       // drag 9
-    PARTITRACK10        = 77,       // drag 10
-    PARTITRACK11        = 78,       // drag 11
-    PARTITRACK12        = 79,       // drag 12
-    PARTITRACK13        = 80,       // drag 13
-    PARTITRACK14        = 81,       // drag 14
-    PARTITRACK15        = 82,       // drag 15
-    PARTITRACK16        = 83,       // drag 16
-    PARTITRACK17        = 84,       // drag 17
-    PARTITRACK18        = 85,       // drag 18
-    PARTITRACK19        = 86,       // drag 19
-    PARTITRACK20        = 87,       // drag 20
-    PARTIGLINTb     = 88,       // blue reflection
-    PARTIGLINTr     = 89,       // red reflection
-    PARTILENS1      = 90,       // brilliance 1 (orange)
-    PARTILENS2      = 91,       // brilliance 2 (yellow)
-    PARTILENS3      = 92,       // brilliance 3 (red)
-    PARTILENS4      = 93,       // brilliance 4 (violet)
-    PARTICONTROL        = 94,       // reflection on button
-    PARTISHOW       = 95,       // shows a place
-    PARTICHOC       = 96,       // shock wave
-    PARTIGFLAT      = 97,       // shows if the ground is flat
-    PARTIRECOVER        = 98,       // blue ball recycler
-    PARTIROOT       = 100,      // gravity root smoke
-    PARTIPLOUF0     = 101,      // splash
-    PARTIPLOUF1     = 102,      // splash
-    PARTIPLOUF2     = 103,      // splash
-    PARTIPLOUF3     = 104,      // splash
-    PARTIPLOUF4     = 105,      // splash
-    PARTIDROP       = 106,      // drop
-    PARTIFOG0       = 107,      // fog 0
-    PARTIFOG1       = 108,      // fog 1
-    PARTIFOG2       = 109,      // fog 2
-    PARTIFOG3       = 110,      // fog 3
-    PARTIFOG4       = 111,      // fog 4
-    PARTIFOG5       = 112,      // fog 5
-    PARTIFOG6       = 113,      // fog 6
-    PARTIFOG7       = 114,      // fog 7
-    PARTIFOG8       = 115,      // fog 8
-    PARTIFOG9       = 116,      // fog 9
-    PARTILIMIT1     = 117,      // shows the limits 1
-    PARTILIMIT2     = 118,      // shows the limits 2
-    PARTILIMIT3     = 119,      // shows the limits 3
-    PARTILIMIT4     = 120,      // shows the limits 4
-    PARTIWATER      = 121,      // drop of water
-    PARTIEXPLOG1        = 122,      // ball explosion 1
-    PARTIEXPLOG2        = 123,      // ball explosion 2
-    PARTIBASE       = 124,      // gases of spaceship
-    PARTITRACE0     = 140,      // trace
-    PARTITRACE1     = 141,      // trace
-    PARTITRACE2     = 142,      // trace
-    PARTITRACE3     = 143,      // trace
-    PARTITRACE4     = 144,      // trace
-    PARTITRACE5     = 145,      // trace
-    PARTITRACE6     = 146,      // trace
-    PARTITRACE7     = 147,      // trace
-    PARTITRACE8     = 148,      // trace
-    PARTITRACE9     = 149,      // trace
-    PARTITRACE10        = 150,      // trace
-    PARTITRACE11        = 151,      // trace
-    PARTITRACE12        = 152,      // trace
-    PARTITRACE13        = 153,      // trace
-    PARTITRACE14        = 154,      // trace
-    PARTITRACE15        = 155,      // trace
-    PARTITRACE16        = 156,      // trace
-    PARTITRACE17        = 157,      // trace
-    PARTITRACE18        = 158,      // trace
-    PARTITRACE19        = 159,      // trace
-};
-
-enum ParticulePhase
-{
-    PARPHSTART      = 0,
-    PARPHEND        = 1,
-};
-
-struct Particule
-{
-    char            bUsed;      // true -> particle used
-    char            bRay;       // true -> ray with goal
-    unsigned short      uniqueStamp;    // unique mark
-    short           sheet;      // sheet (0..n)
-    ParticuleType       type;       // type PARTI*
-    ParticulePhase      phase;      // phase PARPH*
-    float           mass;       // mass of the particle (in rebounding)
-    float           weight;     // weight of the particle (for noise)
-    float           duration;   // length of life
-    Math::Vector        pos;        // absolute position (relative if object links)
-    Math::Vector        goal;       // goal position (if bRay)
-    Math::Vector        speed;      // speed of displacement
-    float           windSensitivity;
-    short           bounce;     // number of rebounds
-    Math::Point         dim;        // dimensions of the rectangle
-    float           zoom;       // zoom (0..1)
-    float           angle;      // angle of rotation
-    float           intensity;  // intensity
-    Math::Point         texSup;     // coordinated upper texture
-    Math::Point         texInf;     // coordinated lower texture
-    float           time;       // age of the particle (0..n)
-    float           phaseTime;  // age at the beginning of phase
-    float           testTime;   // time since last test
-    CObject*        objLink;    // father object (for example reactor)
-    CObject*        objFather;  // father object (for example reactor)
-    short           objRank;    // rank of the object, or -1
-    short           trackRank;  // rank of the drag
-};
-
-struct Track
-{
-    char            bUsed;      // true -> drag used
-    char            bDrawParticule;
-    float           step;       // duration of not
-    float           last;       // increase last not memorized
-    float           intensity;  // intensity at starting (0..1)
-    float           width;      // tail width
-    int         used;       // number of positions in "pos"
-    int         head;       // head to write index
-    Math::Vector        pos[MAXTRACKLEN];
-    float           len[MAXTRACKLEN];
-};
-
-struct WheelTrace
-{
-    ParticuleType       type;       // type PARTI*
-    Math::Vector        pos[4];     // rectangle positions
-    float           startTime;  // beginning of life
-};
-
-
-
-class CParticule
-{
-public:
-    CParticule(CInstanceManager* iMan, CD3DEngine* engine);
-    ~CParticule();
-
-    void        SetD3DDevice(LPDIRECT3DDEVICE7 device);
-
-    void        FlushParticule();
-    void        FlushParticule(int sheet);
-    int         CreateParticule(Math::Vector pos, Math::Vector speed, Math::Point dim, ParticuleType type, float duration=1.0f, float mass=0.0f, float windSensitivity=1.0f, int sheet=0);
-    int         CreateFrag(Math::Vector pos, Math::Vector speed, D3DTriangle *triangle, ParticuleType type, float duration=1.0f, float mass=0.0f, float windSensitivity=1.0f, int sheet=0);
-    int         CreatePart(Math::Vector pos, Math::Vector speed, ParticuleType type, float duration=1.0f, float mass=0.0f, float weight=0.0f, float windSensitivity=1.0f, int sheet=0);
-    int         CreateRay(Math::Vector pos, Math::Vector goal, ParticuleType type, Math::Point dim, float duration=1.0f, int sheet=0);
-    int         CreateTrack(Math::Vector pos, Math::Vector speed, Math::Point dim, ParticuleType type, float duration=1.0f, float mass=0.0f, float length=10.0f, float width=1.0f);
-    void        CreateWheelTrace(const Math::Vector &p1, const Math::Vector &p2, const Math::Vector &p3, const Math::Vector &p4, ParticuleType type);
-    void        DeleteParticule(ParticuleType type);
-    void        DeleteParticule(int channel);
-    void        SetObjectLink(int channel, CObject *object);
-    void        SetObjectFather(int channel, CObject *object);
-    void        SetPosition(int channel, Math::Vector pos);
-    void        SetDimension(int channel, Math::Point dim);
-    void        SetZoom(int channel, float zoom);
-    void        SetAngle(int channel, float angle);
-    void        SetIntensity(int channel, float intensity);
-    void        SetParam(int channel, Math::Vector pos, Math::Point dim, float zoom, float angle, float intensity);
-    void        SetPhase(int channel, ParticulePhase phase, float duration);
-    bool        GetPosition(int channel, Math::Vector &pos);
-
-    D3DCOLORVALUE RetFogColor(Math::Vector pos);
-
-    void        SetFrameUpdate(int sheet, bool bUpdate);
-    void        FrameParticule(float rTime);
-    void        DrawParticule(int sheet);
-
-    bool        WriteWheelTrace(char *filename, int width, int height, Math::Vector dl, Math::Vector ur);
-
-protected:
-    void        DeleteRank(int rank);
-    bool        CheckChannel(int &channel);
-    void        DrawParticuleTriangle(int i);
-    void        DrawParticuleNorm(int i);
-    void        DrawParticuleFlat(int i);
-    void        DrawParticuleFog(int i);
-    void        DrawParticuleRay(int i);
-    void        DrawParticuleSphere(int i);
-    void        DrawParticuleCylinder(int i);
-    void        DrawParticuleWheel(int i);
-    CObject*    SearchObjectGun(Math::Vector old, Math::Vector pos, ParticuleType type, CObject *father);
-    CObject*    SearchObjectRay(Math::Vector pos, Math::Vector goal, ParticuleType type, CObject *father);
-    void        Play(Sound sound, Math::Vector pos, float amplitude);
-    bool        TrackMove(int i, Math::Vector pos, float progress);
-    void        TrackDraw(int i, ParticuleType type);
-
-protected:
-    CInstanceManager*   m_iMan;
-    CD3DEngine*         m_engine;
-    LPDIRECT3DDEVICE7   m_pD3DDevice;
-    CRobotMain*         m_main;
-    CTerrain*           m_terrain;
-    CWater*             m_water;
-    CSound*             m_sound;
-
-    Particule   m_particule[MAXPARTICULE*MAXPARTITYPE];
-    D3DTriangle m_triangle[MAXPARTICULE];  // triangle if PartiType == 0
-    Track       m_track[MAXTRACK];
-    int         m_wheelTraceTotal;
-    int         m_wheelTraceIndex;
-    WheelTrace  m_wheelTrace[MAXWHEELTRACE];
-    int         m_totalInterface[MAXPARTITYPE][SH_MAX];
-    bool        m_bFrameUpdate[SH_MAX];
-    int         m_fogTotal;
-    int         m_fog[MAXPARTIFOG];
-    int         m_uniqueStamp;
-    int         m_exploGunCounter;
-    float       m_lastTimeGunDel;
-    float       m_absTime;
-};
-
diff --git a/src/old/patch16.txt b/src/old/patch16.txt
deleted file mode 100644
index cfd3982..0000000
--- a/src/old/patch16.txt
+++ /dev/null
@@ -1,10 +0,0 @@
-Liste des fichiers pour le patch 1.6

-

-help\cbot.txt            (/f)

-help\cbot\object.txt

-help\cbot\grab.txt

-help\cbot\drop.txt

-help\cbot\category.txt

-help\cbot\extern.txt     (/f)

-help\object\goal.txt

-help\object\atomic.txt

diff --git a/src/old/planet.cpp b/src/old/planet.cpp
deleted file mode 100644
index 48a3d4d..0000000
--- a/src/old/planet.cpp
+++ /dev/null
@@ -1,247 +0,0 @@
-// * 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/.
-
-// planet.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/planet.h"
-
-
-
-
-// Constructor of the terrain.
-
-CPlanet::CPlanet(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_PLANET, this);
-
-    m_engine = engine;
-    Flush();
-
-}
-
-// Destructor of the terrain.
-
-CPlanet::~CPlanet()
-{
-}
-
-
-// Removes all the planets.
-
-void CPlanet::Flush()
-{
-    int     i, j;
-
-    for ( j=0 ; j<2 ; j++ )
-    {
-        for ( i=0 ; i<MAXPLANET ; i++ )
-        {
-            m_planet[j][i].bUsed = false;
-        }
-    }
-
-    m_bPlanetExist = false;
-    m_mode = 0;
-    m_time = 0.0f;
-}
-
-
-// Management of an event.
-
-bool CPlanet::EventProcess(const Event &event)
-{
-    if ( event.event == EVENT_FRAME )
-    {
-        return EventFrame(event);
-    }
-    return true;
-}
-
-// Makes the planets evolve.
-
-bool CPlanet::EventFrame(const Event &event)
-{
-    float       a;
-    int         i;
-
-    if ( m_engine->RetPause() )  return true;
-
-    m_time += event.rTime;
-
-    for ( i=0 ; i<MAXPLANET ; i++ )
-    {
-        if ( !m_planet[m_mode][i].bUsed )  continue;
-
-        a = m_time*m_planet[m_mode][i].speed;
-        if ( a < 0.0f )
-        {
-            a += Math::PI*1000.0f;
-        }
-        m_planet[m_mode][i].angle.x = a+m_planet[m_mode][i].start.x;
-        m_planet[m_mode][i].angle.y = sinf(a)*sinf(m_planet[m_mode][i].dir)+m_planet[m_mode][i].start.y;
-    }
-
-    return true;
-}
-
-
-// Load all the textures for the planets.
-
-void CPlanet::LoadTexture()
-{
-    int     i, j;
-
-    for ( j=0 ; j<2 ; j++ )
-    {
-        for ( i=0 ; i<MAXPLANET ; i++ )
-        {
-            if ( !m_planet[j][i].bUsed )  continue;
-
-            m_engine->LoadTexture(m_planet[j][i].name);
-        }
-    }
-}
-
-// Draws all the planets.
-
-void CPlanet::Draw()
-{
-    LPDIRECT3DDEVICE7 device;
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Vector    n;
-    Math::Point     p1, p2;
-    float       eyeDirH, eyeDirV, dp, u1, u2, v1, v2, a;
-    int         i;
-
-    device = m_engine->RetD3DDevice();
-    eyeDirH = m_engine->RetEyeDirH();
-    eyeDirV = m_engine->RetEyeDirV();
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-    dp = 0.5f/256.0f;
-
-    for ( i=0 ; i<MAXPLANET ; i++ )
-    {
-        if ( !m_planet[m_mode][i].bUsed )  continue;
-
-        m_engine->SetTexture(m_planet[m_mode][i].name);
-
-        if ( m_planet[m_mode][i].bTGA )
-        {
-            m_engine->SetState(D3DSTATEWRAP|D3DSTATEALPHA);
-        }
-        else
-        {
-            m_engine->SetState(D3DSTATEWRAP|D3DSTATETTb);
-        }
-
-        a = eyeDirH + m_planet[m_mode][i].angle.x;
-        p1.x = Math::Mod(a, Math::PI*2.0f)-0.5f;
-
-        a = eyeDirV + m_planet[m_mode][i].angle.y;
-        p1.y = 0.4f+(Math::Mod(a+Math::PI, Math::PI*2.0f)-Math::PI)*(2.0f/Math::PI);
-
-        p1.x -= m_planet[m_mode][i].dim/2.0f*0.75f;
-        p1.y -= m_planet[m_mode][i].dim/2.0f;
-        p2.x = p1.x+m_planet[m_mode][i].dim*0.75f;
-        p2.y = p1.y+m_planet[m_mode][i].dim;
-
-        u1 = m_planet[m_mode][i].uv1.x + dp;
-        v1 = m_planet[m_mode][i].uv1.y + dp;
-        u2 = m_planet[m_mode][i].uv2.x - dp;
-        v2 = m_planet[m_mode][i].uv2.y - dp;
-
-        vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-        vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-        vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-        vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-        device->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-    }
-}
-
-
-// Creates a new planet.
-
-bool CPlanet::Create(int mode, Math::Point start, float dim, float speed,
-                     float dir, char *name, Math::Point uv1, Math::Point uv2)
-{
-    int     i;
-
-    if ( mode < 0 )  mode = 0;
-    if ( mode > 1 )  mode = 1;
-
-    for ( i=0 ; i<MAXPLANET ; i++ )
-    {
-        if ( m_planet[mode][i].bUsed )  continue;
-
-        m_planet[mode][i].bUsed = true;
-        m_planet[mode][i].start = start;
-        m_planet[mode][i].angle = start;
-        m_planet[mode][i].dim   = dim;
-        m_planet[mode][i].speed = speed;
-        m_planet[mode][i].dir   = dir;
-
-        strcpy(m_planet[mode][i].name, name);
-        m_planet[mode][i].uv1   = uv1;
-        m_planet[mode][i].uv2   = uv2;
-
-        m_planet[mode][i].bTGA = ( strstr(m_planet[mode][i].name, "planet") != 0 );
-
-        m_bPlanetExist = true;
-        return true;
-    }
-
-    return false;
-}
-
-// Indicates if there is at least one planet.
-
-bool CPlanet::PlanetExist()
-{
-    return m_bPlanetExist;
-}
-
-
-// Choice of mode.
-
-void CPlanet::SetMode(int mode)
-{
-    if ( mode < 0 )  mode = 0;
-    if ( mode > 1 )  mode = 1;
-    m_mode = mode;
-}
-
-int CPlanet::RetMode()
-{
-    return m_mode;
-}
-
diff --git a/src/old/planet.h b/src/old/planet.h
deleted file mode 100644
index 36f5586..0000000
--- a/src/old/planet.h
+++ /dev/null
@@ -1,76 +0,0 @@
-// * 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/.
-
-// planet.h
-
-#pragma once
-
-
-#include "common/event.h"
-#include "math/point.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-
-
-
-const int MAXPLANET = 10;
-
-struct Planet
-{
-    char        bUsed;      // true -> planet exists
-    Math::Point     start;      // initial position in degrees
-    Math::Point     angle;      // current position in degrees
-    float       dim;        // dimensions (0..1)
-    float       speed;      // speed
-    float       dir;        // direction in the sky
-    char        name[20];   // name of the texture
-    Math::Point     uv1, uv2;   // texture mapping
-    char        bTGA;       // texture .TGA
-};
-
-
-
-
-class CPlanet
-{
-public:
-    CPlanet(CInstanceManager* iMan, CD3DEngine* engine);
-    ~CPlanet();
-
-    void        Flush();
-    bool        EventProcess(const Event &event);
-    bool        Create(int mode, Math::Point start, float dim, float speed, float dir, char *name, Math::Point uv1, Math::Point uv2);
-    bool        PlanetExist();
-    void        LoadTexture();
-    void        Draw();
-    void        SetMode(int mode);
-    int         RetMode();
-
-protected:
-    bool        EventFrame(const Event &event);
-
-protected:
-    CInstanceManager*   m_iMan;
-    CD3DEngine*         m_engine;
-
-    float           m_time;
-    int             m_mode;
-    Planet          m_planet[2][MAXPLANET];
-    bool            m_bPlanetExist;
-};
-
diff --git a/src/old/pyro.cpp b/src/old/pyro.cpp
deleted file mode 100644
index eaad499..0000000
--- a/src/old/pyro.cpp
+++ /dev/null
@@ -1,2486 +0,0 @@
-// * 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 "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "object/robotmain.h"
-#include "old/terrain.h"
-#include "old/camera.h"
-#include "old/particule.h"
-#include "old/light.h"
-#include "object/object.h"
-#include "object/motion/motion.h"
-#include "object/motion/motionhuman.h"
-#include "ui/displaytext.h"
-#include "old/sound.h"
-#include "old/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;
-}
-
diff --git a/src/old/pyro.h b/src/old/pyro.h
deleted file mode 100644
index f64d8f0..0000000
--- a/src/old/pyro.h
+++ /dev/null
@@ -1,170 +0,0 @@
-// * 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.h
-
-#pragma once
-
-
-#include "old/d3dengine.h"
-#include "object/object.h"
-#include "common/misc.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-class CTerrain;
-class CCamera;
-class CParticule;
-class CLight;
-class CObject;
-class CDisplayText;
-class CRobotMain;
-class CSound;
-
-
-
-enum PyroType
-{
-    PT_NULL     = 0,
-    PT_FRAGT    = 1,        // fragmentation of technical object
-    PT_FRAGO    = 2,        // fragmentation of organic object
-    PT_FRAGW    = 4,        // fragmentation of object under water
-    PT_EXPLOT   = 5,        // explosion of technical object
-    PT_EXPLOO   = 6,        // explosion of organic object
-    PT_EXPLOW   = 8,        // explosion of object under water
-    PT_SHOTT    = 9,        // hit technical object
-    PT_SHOTH    = 10,       // hit human
-    PT_SHOTM    = 11,       // hit queen
-    PT_SHOTW    = 12,       // hit under water
-    PT_EGG      = 13,       // break the egg
-    PT_BURNT    = 14,       // burning of technical object
-    PT_BURNO    = 15,       // burning of organic object
-    PT_SPIDER   = 16,       // spider explosion
-    PT_FALL     = 17,       // cargo falling
-    PT_WPCHECK  = 18,       // indicator reaches
-    PT_FLCREATE = 19,       // flag create
-    PT_FLDELETE = 20,       // flag destroy
-    PT_RESET    = 21,       // reset position of the object
-    PT_WIN      = 22,       // fireworks
-    PT_LOST     = 23,       // black smoke
-    PT_DEADG    = 24,       // shooting death
-    PT_DEADW    = 25,       // drowning death
-    PT_FINDING  = 26,       // object discovered
-};
-
-
-struct PyroBurnPart
-{
-    int             part;
-    Math::Vector        initialPos;
-    Math::Vector        finalPos;
-    Math::Vector        initialAngle;
-    Math::Vector        finalAngle;
-};
-
-struct PyroLightOper
-{
-    float           progress;
-    float           intensity;
-    D3DCOLORVALUE   color;
-};
-
-
-
-class CPyro
-{
-public:
-    CPyro(CInstanceManager* iMan);
-    ~CPyro();
-
-    void        DeleteObject(bool bAll=false);
-    bool        Create(PyroType type, CObject* pObj, float force=1.0f);
-    bool        EventProcess(const Event &event);
-    Error       IsEnded();
-    void        CutObjectLink(CObject* pObj);
-
-protected:
-    void        DisplayError(PyroType type, CObject* pObj);
-    bool        CreateLight(Math::Vector pos, float height);
-    void        DeleteObject(bool bPrimary, bool bSecondary);
-
-    void        CreateTriangle(CObject* pObj, ObjectType oType, int part);
-
-    void        ExploStart();
-    void        ExploTerminate();
-
-    void        BurnStart();
-    void        BurnAddPart(int part, Math::Vector pos, Math::Vector angle);
-    void        BurnProgress();
-    bool        BurnIsKeepPart(int part);
-    void        BurnTerminate();
-
-    void        FallStart();
-    CObject*    FallSearchBeeExplo();
-    void        FallProgress(float rTime);
-    Error       FallIsEnded();
-
-    void        LightOperFlush();
-    void        LightOperAdd(float progress, float intensity, float r, float g, float b);
-    void        LightOperFrame(float rTime);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*     m_engine;
-    CTerrain*       m_terrain;
-    CCamera*        m_camera;
-    CParticule*     m_particule;
-    CLight*         m_light;
-    CObject*        m_object;
-    CDisplayText*   m_displayText;
-    CRobotMain*     m_main;
-    CSound*         m_sound;
-
-    Math::Vector        m_pos;          // center of the effect
-    Math::Vector        m_posPower;     // center of the battery
-    bool            m_bPower;       // battery exists?
-    PyroType        m_type;
-    float           m_force;
-    float           m_size;
-    float           m_progress;
-    float           m_speed;
-    float           m_time;
-    float           m_lastParticule;
-    float           m_lastParticuleSmoke;
-    int             m_soundChannel;
-
-    int             m_lightRank;
-    int             m_lightOperTotal;
-    PyroLightOper   m_lightOper[10];
-    float           m_lightHeight;
-
-    ObjectType      m_burnType;
-    int             m_burnPartTotal;
-    PyroBurnPart    m_burnPart[10];
-    int             m_burnKeepPart[10];
-    float           m_burnFall;
-
-    float           m_fallFloor;
-    float           m_fallSpeed;
-    float           m_fallBulletTime;
-    bool            m_bFallEnding;
-
-    int             m_crashSphereUsed;  // number of spheres used
-    Math::Vector        m_crashSpherePos[50];
-    float           m_crashSphereRadius[50];
-};
-
diff --git a/src/old/readme.txt b/src/old/readme.txt
deleted file mode 100644
index 55bdeeb..0000000
--- a/src/old/readme.txt
+++ /dev/null
@@ -1,872 +0,0 @@
-COLOBOT version 1.4 /f

-----------------------

-

-COLOBOT est un mélange d'un jeu de stratégie en temps réel et

-d'une initiation à la programmation. Le scénario vous place à

-la tête d'une expédition spatiale, composée d'un seul humain

-(vous) et de quelques robots. Vous devrez explorer et coloniser

-différentes planètes, tout en cherchant des matières premières

-nécessaires à votre survie.

-

-Petit à petit, vous pourrez construire et programmer de nouveaux

-robots, qui vous aideront dans vos tâches. Certaines planètes

-sont habitées par des créatures primitives et hostiles qu'il

-vous faudra combattre.

-

-

-Configuration minimale

-----------------------

-

-Processeur 300 MHz

-64 Mb RAM

-Carte graphique 3D avec 16 Mb RAM

-100 Mb d'espace libre sur le disque dur

-

-Si ce n'est pas déjà fait, DirectX 8a est installé.

-La présence du CD est nécessaire pour jouer.

-

-

-Missions

---------

-

-Les missions contiennent la partie "aventure" de COLOBOT. Elles

-sont au nombre de 36, réparties sur 9 planètes différentes.

-Elles doivent être faites dans l'ordre imposé.

-

-Jeu libre

----------

-

-Le mode "jeu libre" vous permet d'agir librement sur une

-planète, sans but déterminé. Seuls les planètes déjà visitées et

-les recherches effectuées sont disponibles.

-

-Programmation

--------------

-

-Cette partie de COLOBOT permet d'apprendre à programmer, même si

-vous n'avez aucune notion dans ce domaine. Différents chapitres

-présentent des sujets de plus en plus compliqués. Vous pouvez

-effectuer n'importe quel exercice, bien qu'il soit conseillé de

-commencer par les plus simples.

-

-Défis

------

-

-Les défis vous demandent une bonne connaissance de la

-programmation. Ils permettent de vérifier si les notions

-apprises sous "programmation" sont effectivement comprises.

-

-

-Autre joueur

-------------

-

-Après avoir installé COLOBOT sur un ordinateur, plusieurs

-personnes peuvent y jouer. Pour chaque joueur, COLOBOT

-enregistre automatiquement la progression dans les missions,

-les programmes écrits, etc.

-

-

-Options

--------

-

-Réglages du jeu, répartis dans 5 pages.

-

-

-Options - Affichage

--------------------

-

-- Pilotes

-Il faut choisir un pilote qui porte la mention HAL (Hardware

-Abstraction Layer). Evitez les pilotes ayant la mention

-"Emulation" ou "T&L". Il arrive fréquemment que des pilotes

-avec des noms différents aient des comportements identiques.

-

-- Résolutions

-Les premier et deuxième chiffres indiquent le nombre de pixels

-en largeur et en hauteur dans l'écran. Le troisième chiffre

-indique le nombre de couleurs affichables (16 pour 65'000

-couleurs et 32 pour 4 millions de couleurs).

-Plus la résolution est grande et plus le jeu est beau.

-Mais il risque de devenir lent. Commencez par mettre

-640 x 480 x 16. La plupart des cartes graphiques modernes

-supportent 1024 x 768 x 16. A vous d'essayer le meilleur

-compromis.

-

-- Plein écran

-Normalement, COLOBOT occupe tout l'écran, quelle que soit la

-résolution. Si vous enlevez la coche, COLOBOT tournera dans

-une fenêtre fixe ayant approximativement 640 x 480 pixels.

-

-- Appliquer les changements

-Il faut cliquer ce bouton pour que les changements effectués

-dans cette page prennent effet.

-

-

-Options - Graphique

--------------------

-

-- Ombres

-Normalement, tous les objets (robots, bâtiments, titanium,

-etc.) projettent une ombre sur le sol. Avec certaines cartes

-graphiques anciennes, un carré gris peut apparaître, en plus

-de l'ombre. Si cela vous semble inesthétique, supprimez cette

-option.

-

-- Marques sur le sol

-Les marques accentuent les berges. Elles donnent aussi des

-teintes différentes à certains endroits du terrain. Si cette

-option est déclenchée, il n'est pas possible de montrer les

-zones plates avec le cosmonaute.

-

-- Salissures

-Les salissures donnent un effet vieux et sale aux robots et aux

-bâtiments.

-

-- Ciel

-Avec cette option, le ciel de certaines planètes contient des

-nuages poussés par le vent. Sans cela, le ciel est généralement

-rempli par un simple dégradé de couleurs.

-

-- Rayons du soleil

-Lorsque vous vous tournez en direction du soleil, un reflet

-apparaît.

-

-- Planètes et étoiles

-Sur certaines planètes, vous voyez dans le ciel des planètes

-proches qui bougent lentement.

-

-- Brouillard

-Cette option correspond aux nappes de brouillard horizontales

-qui sont généralement très proches du sol.

-

-- Lumières dynamiques

-Les lumières dynamiques apparaissent lors d'explosions, ou

-lorsqu'un robot refait le plein d'énergie.

-

-- Quantité de particules (0% à 200%)

-Les particules servent à simuler la poussière, la fumée, les

-éclats, les bulles sous l'eau, etc.

-

-- Profondeur de champ (50% à 200%)

-La profondeur de champ détermine jusqu'où porte votre regard.

-Cette profondeur est de toute façon très différente selon

-l'atmosphère de la planète. Une grande valeur (par exemple

-200%) permet de voir loin, mais nécessite une bonne carte

-graphique 3D.

-

-- Détails des objets (0% à 200%)

-Lorsqu'un objet est au loin, il est représenté avec moins de

-détails. Une grande valeur éloigne la distance à laquelle le

-changement est effectué.

-

-- Nombre d'objets décoratifs (0% à 100%)

-Ce nombre détermine la quantité d'objets décoratifs présents,

-tels que les plantes, les arbres, les cristaux, etc.

-

-

-Options - Jeu

--------------

-

-- Séquences cinématiques

-Certaines missions commencent ou finissent par un petit film

-montrant l'atterrissage ou le décollage du vaisseau. La touche

-Esc permet toujours de stopper ces séquences. Si cette option

-est supprimée, ces films sont complètement sautés.

-

-- Défilement dans les bords

-Lorsque la caméra est derrière le cosmonaute ou derrière un

-robot, une rotation est effectuée si la souris s'approche du

-bord de l'écran.

-

-- Inversion souris X

-Inverse le sens de la rotation lorsque la souris touche le bord

-gauche ou le bord droite de l'écran.

-

-- Inversion souris Y

-Inverse le sens du mouvement lorsque la souris touche le bord

-supérieur ou le bord inférieur de l'écran, dans l'éditeur de

-programmes.

-

-- Secousses lors d'explosions

-Lors d'une explosion, ou lorsque vous effectuez un atterrissage

-brusque, la caméra subit un choc qui se manifeste par une

-secousse plus on moins prononcée. Supprimez cette option pour

-que la caméra soit toujours parfaitement stable.

-

-- Retour animé

-Indique comment la situation est réinitialisée dans les exercices

-de programmation et dans les défis.

-

-- Bulles d'aide

-Les bulles d'aide vous donnent un petit texte explicatif lorsque

-la souris s'arrête sur un bouton ou un objet.

-

-- Reflets sur les boutons

-Les reflets sont visibles lorsque la souris survole un bouton.

-

-- Particules dans l'interface

-Pluie de particules lorsque la souris bouge dans les écrans

-d'interface.

-

-- Souris ombrée

-La souris ombrée est gérée par COLOBOT. La souris normale est

-dessinée par Windows. Lorsque COLOBOT ne fonctionne pas en mode

-"plein écran", la souris est forcément normale.

-

-- Indentation automatique

-L'indentation déplace automatiquement le curseur vers la droite

-lors de l'édition d'un programme, en fonction des accolades

-{ et }.

-

-- Grande indentation

-Une grande indentation décale vers la droite d'une distance

-égale à 4 espaces. Sinon, le décalage est de 2 espaces.

-

-

-Options - Commandes

--------------------

-

-- Flèches gauche, droite, haut et bas

-Pour faire tourner, avancer ou reculer le cosmonaute ou un

-robot. Dans les exercices de programmation, notez que les robots

-ne peuvent pas être déplacés ainsi.

-

-- Shirt et Ctrl

-Pour faire monter ou descendre le cosmonaute ou un robot volant.

-Sur certaines planètes, le vol est impossible.

-

-- Entrée

-Cette touche effectue l'action principale du robot sélectionné,

-qui correspond au bouton avec un cadre rouge.

-

-- Espace

-Change le point de vue de la caméra. Pour la plupart des robots,

-la caméra passe alternativement d'une vue arrière à une vue

-intérieure.

-

-- . (pavé numérique)

-Met le jeu en pause et montre l'endroit correspondant au dernier

-message affiché en haut de l'écran. Si plusieurs messages sont

-affichés, une nouvelle pression montre le message précédent,

-chronologiquement parlant. Esc enlève la pause et le jeu reprend

-son cours.

-

-- Tab

-Sélectionne l'objet suivant, selon l'ordre des petites icônes

-tout en haut de l'écran.

-

-- Home

-Sélectionne toujours rapidement le cosmonaute.

-

-- 0 (pavé numérique)

-Sélectionne le robot ou le bâtiment qui était sélectionné

-précédemment.

-

-- + et - (pavé numérique)

-Approche ou éloigne la caméra de l'objet sélectionné.

-

-- F1

-Affiche les instructions sur la mission ou l'exercice à l'aide

-du SatCom.

-

-- F2

-Affiche le glossaire sur la programmation à l'aide du SatCom.

-

-- F3

-Pendant l'édition d'un programme, cette touche affiche des

-informations complémentaires sur l'instruction en cours de

-frappe.

-

-- F4, F5 et F6

-Choix de la vitesse du jeu. Le mode normal x1 correspond à la

-touche F4. Les modes rapides x1.5 et x2 doivent être utilisés

-avec prudence, car les ennemis vont également plus vite !

-

-- Esc

-Quitte la mission en cours.

-

-

-Options - Son

--------------

-

-- Bruitages

-Les bruitages sont générés par l'action en cours. Il s'agit de

-bruits de moteur, de pas, d'explosions, etc.

-

-- Fond sonore

-Le fond sonore dépend de la planète. Il donne une ambiance

-générale, indépendamment de l'action en cours. Chaque fond

-sonore correspond à une piste audio sur le CD. Dans les

-exercices, les défis ainsi que sur la lune, il n'y a pas de

-fond sonore.

-

-- Bruitages 3D

-Certaines cartes son permettent de localiser un son dans

-l'espace à l'aide de 4 haut-parleurs. Le réalisme est alors

-superbe. Si votre carte son ne le permet pas, le bouton est

-grisé.

-

-

-Créér des exercices

--------------------

-

-Tous les exercices sont dans le sous-dossier \scene\ :

-

-	\scene\trainxyy.txt -> exercices

-	\scene\defixyy.txt  -> défis

-	\scene\scenexyy.txt -> missions

-	\scene\freexyy.txt  -> jeux libres

-

-Le numéro de 3 chiffres est composé de :

-

-	x  -> numéro du chapitre (1..9)

-	yy -> rang dans le chapitre (01..99)

-

-Par exemple, train102.txt est le deuxième exercice du premier

-chapitre.

-Lorsque le rang dans le chapitre est 00, c'est qu'il s'agit de

-la description du chapitre.

-Les fichiers doivent avoir des numéros sucessifs. Supposons par

-exemple que les fichiers suivants existent :

-

-	train600.txt

-	train601.txt

-	train602.txt

-	train605.txt

-

-Le chapitre 6 ne contiendra dans ce cas que 2 exercices, les

-numéros 01 et 02. Le numéro 05 n'apparaît pas dans la liste,

-car il manque les numéros 03 et 04.

-

-Description

------------

-

-Un fichier de description d'exercice détermine le relief du

-terrain, les textures utilisées, la position initiale des

-différents robots, matières premières, plantes, etc.

-

-

-

-Couleur

--------

-

-Les couleurs sont spécifiées à l'aide de 4 composantes

-rouge/vert/bleu/alpha. Les valeurs sont comprises entre

-0 (noir) et 255 (blanc). La composante alpha est généralement

-nulle. Par exemple :

-

-	color=175;209;215;0  // bleu-sable

-

-

-

-

-Title.E text="Power Cell 1"

-Nom court de l'exercice, tel qu'il apparaît dans la liste de

-gauche.

-

-Resume.E text="Instruct a bot to change the power cell of a nearby winged shooter."

-Résumé de l'exercice, tel qu'il apparaît en dessous des deux

-listes.

-

-ScriptName.E text="Spider2"

-Nom par défaut donné à un nouveau programme créé.

-

-Instructions name="tcell1.txt"

-Nom du fichier qui contient les instructions de l'exercice,

-qui seront affichées dans le SatCom.

-Le fichier ttit1.txt doit être placé dans le dossier help\.

-

-HelpFile name="cbot.txt"

-Non du fichier qui contient les instructions sur la program-

-mation, affichées lorsque l'on presse sur F2.

-Le fichier cbot.txt doit être placé dans le dossier help\.

-Normalement, tous les exercices font référence aux mêmes

-instructions générales contenues dans cbot.txt.

-

-EndingFile win=2 lost=0

-Scène à utiliser lorsque l'exercice est réussi ou raté.

-win=2 signifie qu'il faut utiliser scene\win002.txt.

-lost=0 signifie qu'il faut utiliser scene\lost000.txt.

-

-Audio track=0

-Numéro de la piste audio du CD à jouer pendant l'exercice.

-Normalement, les exercices restent silencieux, en donnant le

-numéro de piste 0. Si nécessaire, il est possible de donner

-les numéros suivants :

-	2: Terre

-	3: Tropica

-	4: Crystalium

-	5: Saari

-	6: Volcano

-	7: Centaury

-	8: Orphéon

-	9: Terranova

-

-AmbiantColor air=102;102;102;102 water=20;20;20;20

-Couleur ambiante utilisée lorsqu'on est à l'air libre ou

-sous l'eau.

-

-FogColor air=180;222;255;0 water=10;20;100;0

-Couleur que prennent les objets lorsqu'ils sont au loin.

-

-VehicleColor color=175;209;215;0

-Couleur des robots et des bâtiments.

-

-DeepView air=100.00 water=25.00

-Distance en mètres jusqu'où porte la vue. Au delà de cette

-distance, plus rien n'est affiché.

-

-FogStart air=0.1 water=0.1

-Plus on s'approche de la distance maximale de vue (DeepView)

-et plus la couleur des objets fusionne avec la couleur du

-brouillard (FogColor), ce qui simule du brouillard. Une valeur

-de 0.1 indique un brouillard qui commence proche du point de

-vue, donc un brouillard dense. Une valeur de 0.9 indique un

-brouillard très peu dense.

-

-Par exemple :

-	DeepView air=100.00

-	FogStart air=0.2

-

-Distances à partir de l'observateur :

-0 à 20 mètres      -> affichage normal

-20 à 100 mètres    -> affichage de plus en plus brouillardeux

-100 mètres et plus -> plus rien n'est affiché

-

-SecondTexture rank=3

-Texture utilisée pour salir les robots et les bâtiments. Vous

-pouvez utiliser une valeur comprise entre 1 et 8.

-

-Background up=76;105;226;0 down=192;250;255;0

-Couleurs du fond d'écran, si aucune texture n'est utilisée.

-Un dégradé de couleur passe de "up" tout en haut de l'écran

-progressivement jusqu'à "down" en milieu d'écran. La moitié

-inférieure de l'écran prend la couleur unie "down". Cette

-moitié inférieure n'est en principe jamais visible, puisqu'il

-y a toujours une partie de terrain qui la recouvre.

-

-FrontsizeName image="lens5.tga"

-Nom de la texture d'avant-plan, qui contient un effet de

-"lens flare", plus ou moins visible selon l'orientation.

-

-

-TerrainRelief image="textures\relief41.bmp" factor=1.0

-Le relief du terrain est décrit dans une image BMP à 256

-niveaux de gris mesurant exactement 161 x 161 pixels.

-La couleur blanche correspond à l'altitude la plus basse.

-La couleur noire correspond à l'altitude la plus haute.

-Normalement, on utilise "factor=1.0". Dans ce cas, les 256

-niveaux permettent de s'élever de 64 mètres. Une différence

-d'intensité de gris de 1 correspond donc à une différence

-d'altitude de 0.25 mètres.

-

-La coordonnée du pixel central 80;80 de l'image correspond

-à la coordonnée 0;0 dans CoLoBoT.

-La coordonnée 0;0 du pixel en haut à gauche dans l'image

-correspond au point à l'extrème nord-ouest -400;400 dans CoLoBoT.

-Un pixel dans l'image correspond à un carré au sol de 5x5

-mètres dans CoLoBoT.

-

-Vous pouvez dessiner de nouveaux reliefs avec un logiciel tel

-que PaintShop, ou réutiliser les nombreux fichiers reliefxx.bmp

-placés dans le dossier textures\.

-

-TerrainResource image="textures\res00.bmp"

-Cette image détermine la présence des ressources dans le

-sous-sol. Il s'agit d'une image BMP en 256 couleurs de

-161 x 161 pixels.

-

-Rouge = 255;0;0   (index=5)  -> titanium

-Vert  = 0;255;0   (index=30) -> énergie

-Jaune = 255;255;0 (index=35) -> uranium

-

-Toutes les autres couleurs ou niveaux de gris sont ignorés.

-

-Généralement, un bon truc pour placer les zones de couleur au

-bon endroit est de partir de l'image à niveaux de gris du

-relief et de la convertir en 256 couleurs.

-

-TerrainWater level=7.5 ...

-Cette commande contient plusieurs paramètres, dont seul "level"

-nous intéresse ici. "level" indique donc le niveau de l'eau ou

-de la lave, par-rapport au niveau zéro qui correspond à la

-couleur blanche dans l'image du relief (TerrainResource).

-L'altitude des robots est par la suite toujours calculée par-

-rapport au niveau de la mer (level). Une altitude négative

-indiquera donc que le robot est sous l'eau.

-

-BeginObject

-Cette commande doit précéder le premier CreateObject.

-

-CreateObject pos=7;-10 dir=1.5 type=Me

-Création d'un objet dans l'exercice. Il peut s'agir d'un robot,

-d'un bâtiment, d'une matière première, d'une plante, etc.

-

-Pour déterminer la position d'un objet, un bon moyen consiste

-à déplacer le cosmonaute à l'endroit souhaité, puis de taper

-les commandes :

-

-    Ctrl+Pause showstat Entrée

-    Ctrl+Pause showpos Entrée

-

-La partie inférieure de l'écran indique alors les coordonnées

-de l'objet sélectionné, qu'il n'y a plus qu'à reporter dans le

-fichier de description de l'exercice.

-

-La direction est un nombre compris entre 0 et 2.

-	0.0 -> est

-	0.5 -> sud

-	1.0 -> ouest

-	1.5 -> nord

-Le sens de rotation est donc horaire.

-

-Les différents types possibles pour les objets sont :

-

-Base :

-	type=Me // cosmonaute

-	type=SpaceShip

-

-Robots :

-	type=PracticeBot // robot d'entraînement

-	type=TargetBot // robot cible

-

-	type=WheeledGrabber

-	type=TrackedGrabber

-	type=WingedGrabber

-	type=LeggedGrabber

-

-	type=WheeledShooter

-	type=TrackedShooter

-	type=WingedShooter

-	type=LeggedShooter

-

-	type=WheeledOrgaShooter

-	type=TrackedOrgaShooter

-	type=WingedOrgaShooter

-	type=LeggedOrgaShooter

-

-	type=WheeledSniffer

-	type=TrackedSniffer

-	type=WingedSniffer

-	type=LeggedSniffer

-

-	type=Thumper

-	type=PhazerShooter

-	type=Recycler

-	type=Shielder

-	type=Subber

-

-Bâtiments :

-	type=Derrick

-	type=BotFactory

-	type=PowerStation

-	type=Converter

-	type=RepairCenter

-	type=DefenseTower

-	type=AlienNest

-	type=ResearchCenter

-	type=RadarStation

-	type=ExchangePost

-	type=PowerPlant

-	type=AutoLab

-	type=NuclearPlant

-	type=PowerCaptor

-	type=Vault

-	type=StartArea

-	type=GoalArea

-	type=Target1 // pour l'entraînement au vol

-	type=Target2

-	type=Houston // centre de contrôle

-

-Objets transportables :

-	type=TitaniumOre

-	type=UraniumOre

-	type=Titanium

-	type=PowerCell

-	type=NuclearCell

-	type=OrgaMatter

-	type=BlackBox // boîte noire

-	type=KeyA..D

-	type=TNT // caisse d'explosif

-

-Plantes et décors :

-	type=Greenery0..4 // plante standard basse

-	type=Greenery5..7 // petit trèfle bas

-	type=Greenery10..14 // plante grasse montante

-	type=Greenery15..19 // fougère

-	type=Tree0..3 // arbre haut

-	type=Mushroom1 // champignon inoffensif

-	type=Mushroom2 // champignon corrosif

-	type=MegaStalk0..5 // plante étrange

-

-	type=Quartz0..3 // quartz petit..grand

-	type=Barrier0  // barrière courte

-	type=Barrier1  // barrière longue

-	type=ApolloLEM // sur la lune uniquement :

-	type=ApolloJeep

-	type=ApolloFlag

-	type=ApolloModule

-	type=ApolloAntenna

-

-Epaves de robots recyclables :

-	type=WreckBotw1..2 // robot à roues

-	type=WreckBott1..2 // robot à petites chenilles

-	type=WreckBotr1..2 // robot à grosses chenilles

-

-Bâtiments en ruine :

-	type=RuinBotFactory

-	type=RuinDoor // porte de convertisseur

-	type=RuinSupport // support de radar

-	type=RuinRadar // socle de radar

-	type=RuinConvert

-	type=RuinBaseCamp // socle du vaisseau spatial

-	type=RuinHeadCamp // coiffe du vaisseau spatial

-

-Ennemis :

-	type=AlienQueen

-	type=AlienEgg

-	type=AlienAnt

-	type=AlienSpider

-	type=AlienWasp

-	type=AlienWorm

-

-Indicateurs :

-	type=PowerSpot // indique la présence d'énergie en sous-sol

-	type=TitaniumSpot // indique la présence de titanium en sous-sol

-	type=UraniumSpot // indique la présence d'uranium en sous-sol

-	type=KeyA..DSpot // indique la présence de clé en sous-sol

-	type=WayPoint // croix pour les exercices

-	type=BlueFlag

-	type=RedFlag

-	type=GreenFlag

-	type=YellowFlag

-	type=VioletFlag

-

-Divers :	

-	type=Mine // bombe fixe à éviter

-	type=Portico // portique géant (sur la terre)

-	type=Bag // sac de survie

-	type=Home // petite maison sympa (sur terranova)

-	type=Tech // technicien de Houston

-	type=Firework // feu d'artifice

-

-La commande CreateObject peut contenir des paramètres

-supplémentaires :

-

-CreateObject ... script1="ttit1.txt"

-Nom du programme CBOT à charger à la position 1 dans le robot

-ou l'insecte. Il est possible de charger jusqu'à 10 programmes

-en utilisant les commandes script1 à script10.

-Les fichiers .txt des programmes doivent être placés dans le

-dossier script\.

-

-CreateObject ... run=1

-Numéro du programme à exécuter directement lorsque l'exercice

-démarre. Cela peut être utile, par exemple, pour un robot

-TargetBot que l'élève devra suivre.

-Si plusieurs programmes sont chargés (avec script1, script2,

-etc.), un seul pourra être exécuté, bien entendu.

-

-EnableResearch type=WINGER

-Liste des recherches déjà effectuées.

-

-DoneResearch type=WINGER

-Liste des recherches qu'il est autorisé de faire, en construisant

-un centre de recherche (ResearchCenter) ou un laboratoire (AutoLab).

-

-

-	TRACKER Robots Tracked*

-	WINGER Robots Winged*

-	THUMPER Robots Thumper

-	SHOOTER Robots *Shooter

-	TOWER Bâtiment DefenseTower

-	PHAZER Robots PhazerShooter

-	SHIELDER Robots Shielder

-	ATOMIC Bâtiment NuclearPlant

-

-	iPAW Robots Legged*

-	iGUN Robots *OrgaShooter

-

-	RECYCLER Robots recycleurs

-	SUBBER Robots Subber

-	SNIFFER Robots *Sniffer

-

-

-EndMissionTake pos=0.00;0.00 dist=25000.00 type=Me lost=0

-EndMissionTake pos=0.00;0.00 dist=25000.00 type=WheeledGrabber lost=0

-EndMissionTake pos=0.00;0.00 dist=1000.00 type=Titanium min=1 max=1

-Critères pour déterminer à quel moment l'exercice est terminé.

-

-

-

-

-Dossiers et réseau

-------------------

-

-Dans une utilisation en réseau, COLOBOT doit être installé

-sur chaque machine individuellement. Après cette opération,

-les exercices et les missions sont chargés localement,

-généralement dans le dossier :

-

-	C:\Program Files\Colobot\scene\

-

-Si vous avez créé des exercices spécifiques, il peut être

-utile de les charger à partir d'un dossier central commun à

-tous les ordinateurs. Pour cela, il faut modifier le fichier

-

-	C:\Program Files\Colobot\colobot.ini

-

-sur chaque machine. La section suivante permet de donner le

-chemin d'accès :

-

-	[Directory]

-	scene=scene

-

-Ici, il s'agit d'un chemin d'accès relatif. Vous pouvez par

-exemple le changer en un chemin absolu sur un serveur :

-

-	[Directory]

-	scene=\\Serveur\c\colobot\scene\

-

-De la même façon, vous pouvez changer le dossier dans lequel

-sont placés les programmes lorsque vous utilisez la commande

-ouvrir/enregistrer avec le mode "public", dans l'éditeur de

-programmes :

-

-	[Directory]

-	public=program

-

-En donnant un chemin d'accès commun à tous les ordinateurs, il

-sera possible d'échanger des programmes :

-

-	[Directory]

-	public=\\Serveur\c\colobot\program\

-

-

-

-Réglages

---------

-

-Pour afficher le nombre d'images par seconde, il faut appuyer

-sur Ctrl+Pause puis taper la commande "showstat" et valider

-avec la touche Entrée :

-

-    Ctrl+Pause showstat Entrée

-

-La partie supérieure de l'écran affiche alors, par exemple :

-

-    32.46 fps T=11558 (640x480x16)

-

-Le premier chiffre correspond au nombre d'images par seconde

-(fps = frame per second).

-Le deuxième chiffre indique le nombre de triangles affiché dans

-la scène.

-Les 3 derniers chiffres entre parenthèses sont la résolution

-(largeur x hauteur) et le nombre de bits pour les couleurs.

-

-Tous les réglages sont mémorisés dans le fichier colobot.ini,

-présent dans le dossier principal où COLOBOT a été installé.

-Ce fichier peut être modifié (avec prudence et après en avoir

-fait une copie) avec un éditeur de texte, comme par exemple le

-bloc-notes de Windows.

-

-

-Problèmes

----------

-

-Pour résoudre certains problèmes, il est possible de modifier

-le fichier colobot.ini avec un éditeur de texte (par exemple

-avec le bloc-notes de Windows). N'ajoutez pas de nouvelles

-lignes, mais modifiez simplement les valeurs existantes.

-Attention à ne pas insérer d'espace. Il faut quitter COLOBOT

-avant de modifier le fichier.

-

-Si la végétation s'affiche mal, ou même pas du tout, vous

-avez peut-être mis à zéro le nombre d'objets décoratifs dans

-les options. Pour remettre 100% :

-	[Setup]

-	GadgetQuantity=1.00

-Si la végétation ne s'affiche toujours pas, essayez :

-	[Engine]

-	AlphaMode=0

-ou

-	[Engine]

-	AlphaMode=2

-

-Si un carré apparaît autour des ombres, essayez :

-	[Engine]

-	WhiteSrcBlend=9

-	WhiteDestBlend=6

-ou

-	[Engine]

-	WhiteSrcBlend=6

-	WhiteDestBlend=3

-Si cela ne fonctionne pas, il faut supprimer les ombres :

-	[Engine]

-	WhiteSrcBlend=0

-	WhiteDestBlend=0

-	[Setup]

-	GroundShadow=0

-

-Lorsque un objet s'interpose entre l'objet sélectionné et la

-caméra, il devient transparent. Si l'objet n'est pas assez

-transparent, essayez :

-	[Engine]

-	StateColor=0

-ou

-	[Engine]

-	StateColor=1

-

-

-Equipe de développement

------------------------

-

-- Daniel Roux

-- Denis Dumoulin

-- Otto Kölbl

-- Michael Walz

-- Didier Gertsch

-

-Beta testeurs

--------------

-

-- Adrien Roux

-- Didier Raboud

-- Nicolas Beuchat

-- Joël Roux

-- Michael Jubin

-- Daniel Sauthier

-- Nicolas Stubi

-- Patrick Thévoz

-

-Copyright

----------

-

-La photo de la nébuleuse NGC3603 servant de fond pour la planète

-Orphéon a été prise avec le télescope spatial Hubble. Elle est

-utilisée avec l'autorisation des auteurs Wolfgang Brandner

-(JPL/IPAC), Eva K. Grebel (Université de Washington), You-Hua Chu

-(Université d'Illinois Urbana-Champaign) et de la NASA.

-

-Le son de tonnerre de la planète Orphéon est utilisé avec

-l'autorisation limitée de CREATIVE moyennant la mention :

-Material from products are used by limited permission from CREATIVE.

-

-Développeur

------------

-

-EPSITEC SA

-Mouette 5

-CH-1092 Belmont

-

-colobot@epsitec.ch

-www.colobot.com

-

-Editeur de la version française

--------------------------------

-

-ALSYD

-43, Ch. du vieux Chêne

-F-38240 Meylan

-

-www.alsyd.com

diff --git a/src/old/resource.h b/src/old/resource.h
deleted file mode 100644
index 4666323..0000000
--- a/src/old/resource.h
+++ /dev/null
@@ -1,55 +0,0 @@
-// * 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/.
-
-//{{NO_DEPENDENCIES}}
-// Microsoft Developer Studio generated include file.
-// Used by winmain.rc
-//
-#define IDI_MAIN_ICON                   101
-#define IDR_MAIN_ACCEL                  113
-#define IDR_MENU                        141
-#define IDR_POPUP                       142
-#define IDD_ABOUT                       143
-#define IDD_CHANGEDEVICE                144
-#define IDC_CURSORHAND                  149
-#define IDC_CURSORSCROLLL               150
-#define IDC_CURSORSCROLLR               151
-#define IDC_CURSORSCROLLU               152
-#define IDC_CURSORSCROLLD               153
-#define IDC_CURSORTARGET                154
-#define IDC_DEVICE_COMBO                1000
-#define IDC_MODE_COMBO                  1001
-#define IDC_WINDOWED_CHECKBOX           1012
-#define IDC_STEREO_CHECKBOX             1013
-#define IDC_FULLSCREEN_TEXT             1014
-#define IDM_ABOUT                       40001
-#define IDM_CHANGEDEVICE                40002
-#define IDM_TOGGLEFULLSCREEN            40003
-#define IDM_TOGGLESTART                 40004
-#define IDM_SINGLESTEP                  40005
-#define IDM_EXIT                        40006
-
-// Next default values for new objects
-//
-#ifdef APSTUDIO_INVOKED
-#ifndef APSTUDIO_READONLY_SYMBOLS
-#define _APS_3D_CONTROLS                     1
-#define _APS_NEXT_RESOURCE_VALUE        159
-#define _APS_NEXT_COMMAND_VALUE         40011
-#define _APS_NEXT_CONTROL_VALUE         1015
-#define _APS_NEXT_SYMED_VALUE           102
-#endif
-#endif
diff --git a/src/old/sound.cpp b/src/old/sound.cpp
deleted file mode 100644
index f6e4640..0000000
--- a/src/old/sound.cpp
+++ /dev/null
@@ -1,1659 +0,0 @@
-// * 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/.
-
-// sound.cpp
-
-
-#include <stdlib.h>
-#include <ctype.h>
-#include <d3dtypes.h>
-#include <dsound.h>
-#include <stdio.h>
-
-#include "common/language.h"
-#include "common/struct.h"
-#include "common/iman.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/math3d.h"
-#include "old/sound.h"
-
-
-/////////////////////////////////////////////////////////////////////////////
-
-
-const int LXIMAGE = 640;
-const int LYIMAGE = 480;
-
-
-
-// Header .WAV file.
-
-struct WaveHeader
-{
-    BYTE        RIFF[4];        // "RIFF"
-    DWORD       dwSize;         // size of data to follow
-    BYTE        WAVE[4];        // "WAVE"
-    BYTE        fmt_[4];        // "fmt "
-    DWORD       dw16;           // 16
-    WORD        wOne_0;         // 1
-    WORD        wChnls;         // number of Channels
-    DWORD       dwSRate;        // sample Rate
-    DWORD       BytesPerSec;        // sample Rate
-    WORD        wBlkAlign;      // 1
-    WORD        BitsPerSample;      // sample size
-    BYTE        DATA[4];        // "DATA"
-    DWORD       dwDSize;        // number of Samples
-};
-
-
-
-
-// Displays an error DirectSound.
-
-void DisplayError(char *name, Sound sound, HRESULT err)
-{
-    char    s[100];
-    unsigned int i = err;
-    if ( err == DS_OK )  return;
-    sprintf(s, "SoundError in %s, sound=%d err=%d\n", name, sound, i);
-    OutputDebugString(s);
-
-    if ( err == DSERR_ALLOCATED )  OutputDebugString("DSERR_ALLOCATED\n");
-    if ( err == DSERR_CONTROLUNAVAIL )  OutputDebugString("DSERR_CONTROLUNAVAIL\n");
-    if ( err == DSERR_INVALIDPARAM )  OutputDebugString("DSERR_INVALIDPARAM\n");
-    if ( err == DSERR_INVALIDCALL )  OutputDebugString("DSERR_INVALIDCALL\n");
-    if ( err == DSERR_GENERIC )  OutputDebugString("DSERR_GENERIC\n");
-    if ( err == DSERR_PRIOLEVELNEEDED )  OutputDebugString("DSERR_PRIOLEVELNEEDED\n");
-    if ( err == DSERR_OUTOFMEMORY )  OutputDebugString("DSERR_OUTOFMEMORY\n");
-    if ( err == DSERR_BADFORMAT )  OutputDebugString("DSERR_BADFORMAT\n");
-    if ( err == DSERR_UNSUPPORTED )  OutputDebugString("DSERR_UNSUPPORTED\n");
-    if ( err == DSERR_NODRIVER )  OutputDebugString("DSERR_NODRIVER\n");
-    if ( err == DSERR_ALREADYINITIALIZED )  OutputDebugString("DSERR_ALREADYINITIALIZED\n");
-    if ( err == DSERR_NOAGGREGATION )  OutputDebugString("DSERR_NOAGGREGATION\n");
-    if ( err == DSERR_BUFFERLOST )  OutputDebugString("DSERR_BUFFERLOST\n");
-    if ( err == DSERR_OTHERAPPHASPRIO )  OutputDebugString("DSERR_OTHERAPPHASPRIO\n");
-    if ( err == DSERR_UNINITIALIZED )  OutputDebugString("DSERR_UNINITIALIZED\n");
-    if ( err == DSERR_NOINTERFACE )  OutputDebugString("DSERR_NOINTERFACE\n");
-    if ( err == DSERR_ACCESSDENIED )  OutputDebugString("DSERR_ACCESSDENIED\n");
-}
-
-// Returns the name of the current folder.
-
-void GetCurrentDir(char *pName, int lg)
-{
-    int     i;
-
-    strncpy(pName, _pgmptr, lg-1);
-    pName[lg-1] = 0;
-
-    lg = strlen(pName);
-    if ( lg == 0 )  return;
-
-    for ( i=0 ; i<lg ; i++ )
-    {
-        pName[i] = tolower(pName[i]);
-    }
-
-    while ( lg > 0 )
-    {
-        lg --;
-        if ( pName[lg] == '\\' )
-        {
-            pName[lg+1] = 0;
-            break;
-        }
-    }
-
-    if ( lg > 6 && strcmp(pName+lg-6, "\\debug\\") == 0 )
-    {
-        pName[lg-5] = 0;  // ignores the folder \debug!
-    }
-
-    if ( lg > 6 && strcmp(pName+lg-6, "\\release\\") == 0 )
-    {
-        pName[lg-7] = 0;  // ignores the folder \release !
-    }
-}
-
-
-
-
-/////////////////////////////////////////////////////////////////////////////
-
-
-// Changes the volume of midi.
-// The volume is between 0 and 20!
-
-void InitMidiVolume(int volume)
-{
-    int         nb, i, n;
-    MMRESULT        result;
-    HMIDIOUT        hmo = 0;
-
-    static int table[21] =
-    {
-        0x00000000,
-        0x11111111,
-        0x22222222,
-        0x33333333,
-        0x44444444,
-        0x55555555,
-        0x66666666,
-        0x77777777,
-        0x88888888,
-        0x99999999,
-        0xAAAAAAAA,
-        0xBBBBBBBB,
-        0xCCCCCCCC,
-        0xDDDDDDDD,
-        0xEEEEEEEE,
-        0xF222F222,
-        0xF555F555,
-        0xF777F777,
-        0xFAAAFAAA,
-        0xFDDDFDDD,
-        0xFFFFFFFF,
-    };
-
-    if ( volume < 0         )  volume = 0;
-    if ( volume > MAXVOLUME )  volume = MAXVOLUME;
-
-    nb = midiOutGetNumDevs();
-    for ( i=0 ; i<nb ; i++ )
-    {
-        result = midiOutOpen((LPHMIDIOUT)&hmo, i, 0L, 0L, 0L);
-        if ( result != MMSYSERR_NOERROR )
-        {
-            continue;
-        }
-
-        result = midiOutSetVolume(hmo, table[volume]);
-        if ( result != MMSYSERR_NOERROR )
-        {
-            n = 1;
-        }
-        midiOutClose(hmo);
-        hmo = 0;
-    }
-}
-
-// Changes the volume of audio CD.
-// The volume is between 0 and 20!
-// Crashing in Vista. The current craft (if _SOUNDTRACKS = true) no longer crashes,
-// but this is not the correct volume which is modified!
-
-bool InitAudioTrackVolume(int volume)
-{
-#if _SOUNDTRACKS
-    MMRESULT rc;              // Return code.
-    HMIXER hMixer;            // Mixer handle used in mixer API calls.
-    MIXERCONTROL mxc;         // Holds the mixer control data.
-    MIXERLINE mxl;            // Holds the mixer line data.
-    MIXERLINECONTROLS mxlc;   // Obtains the mixer control.
-
-    if ( volume < 0         )  volume = 0;
-    if ( volume > MAXVOLUME )  volume = MAXVOLUME;
-
-    // Open the mixer. This opens the mixer with a deviceID of 0. If you
-    // have a single sound card/mixer, then this will open it. If you have
-    // multiple sound cards/mixers, the deviceIDs will be 0, 1, 2, and
-    // so on.
-    rc = mixerOpen(&hMixer, 0,0,0,0);
-    if ( rc != MMSYSERR_NOERROR )
-    {
-        return false;  // Couldn't open the mixer.
-    }
-
-    // Initialize MIXERLINE structure.
-    ZeroMemory(&mxl,sizeof(mxl));
-    mxl.cbStruct = sizeof(mxl);
-
-    // Specify the line you want to get. You are getting the input line
-    // here. If you want to get the output line, you need to use
-    // MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT.
-    mxl.dwComponentType = MIXERLINE_COMPONENTTYPE_SRC_COMPACTDISC;
-
-    rc = mixerGetLineInfo((HMIXEROBJ)hMixer, &mxl,
-                           MIXER_GETLINEINFOF_COMPONENTTYPE);
-    if ( rc != MMSYSERR_NOERROR )
-    {
-        return false;  // Couldn't get the mixer line.
-    }
-
-    // Get the control.
-    ZeroMemory(&mxlc, sizeof(mxlc));
-    mxlc.cbStruct = sizeof(mxlc);
-    mxlc.dwLineID = mxl.dwLineID;
-//? mxlc.dwControlType = MIXERCONTROL_CONTROLTYPE_PEAKMETER;
-//? mxlc.dwControlType = MIXERCONTROL_CONTROLF_UNIFORM;
-    mxlc.dwControlType = MIXERCONTROL_CONTROLTYPE_VOLUME;
-    mxlc.cControls = 1;
-    mxlc.cbmxctrl = sizeof(mxc);
-    mxlc.pamxctrl = &mxc;
-    ZeroMemory(&mxc, sizeof(mxc));
-    mxc.cbStruct = sizeof(mxc);
-    rc = mixerGetLineControls((HMIXEROBJ)hMixer,&mxlc,
-                               MIXER_GETLINECONTROLSF_ONEBYTYPE);
-//?                            MIXER_GETLINECONTROLSF_ALL);
-    if ( rc != MMSYSERR_NOERROR )
-    {
-        return false;  // Couldn't get the control.
-    }
-
-    // After successfully getting the peakmeter control, the volume range
-    // will be specified by mxc.Bounds.lMinimum to mxc.Bounds.lMaximum.
-
-    MIXERCONTROLDETAILS mxcd;             // Gets the control values.
-    MIXERCONTROLDETAILS_SIGNED volStruct; // Gets the control values.
-
-    volStruct.lValue = volume*(mxc.Bounds.lMaximum-mxc.Bounds.lMinimum);
-    volStruct.lValue /= MAXVOLUME;
-    volStruct.lValue += mxc.Bounds.lMinimum;
-
-    // Initialize the MIXERCONTROLDETAILS structure
-    ZeroMemory(&mxcd, sizeof(mxcd));
-    mxcd.cbStruct = sizeof(mxcd);
-    mxcd.cbDetails = sizeof(volStruct);
-    mxcd.dwControlID = mxc.dwControlID;
-    mxcd.paDetails = &volStruct;
-    mxcd.cChannels = 1;
-
-    // Get the current value of the peakmeter control. Typically, you
-    // would set a timer in your program to query the volume every 10th
-    // of a second or so.
-    rc = mixerSetControlDetails((HMIXEROBJ)hMixer, &mxcd,
-                                 MIXER_SETCONTROLDETAILSF_VALUE);
-    if ( rc != MMSYSERR_NOERROR )
-    {
-        return false;  // Couldn't get the current volume.
-    }
-#endif
-
-    return true;
-}
-
-
-/////////////////////////////////////////////////////////////////////////////
-
-
-// Constructor.
-
-CSound::CSound(CInstanceManager* iMan)
-{
-    int     i;
-
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_SOUND, this);
-
-    m_bEnable        = false;
-    m_bState         = false;
-    m_bAudioTrack    = true;
-    m_ctrl3D         = true;
-    m_bDebugMode     = false;
-    m_MidiDeviceID   = 0;
-    m_MIDIMusic      = 0;
-    m_audioVolume    = 20;
-    m_midiVolume     = 15;
-    m_lastMidiVolume = 0;
-    m_listener       = 0;
-    m_lastTime       = 0.0f;
-    m_playTime       = 0.0f;
-    m_uniqueStamp    = 0;
-    m_maxSound       = MAXSOUND;
-    m_eye            = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_hWnd           = 0;
-
-    m_lpDS = NULL;
-
-    ZeroMemory(m_channel, sizeof(SoundChannel)*MAXSOUND);
-    for ( i=0 ; i<MAXSOUND ; i++ )
-    {
-        m_channel[i].bUsed = false;
-    }
-
-    for ( i=0 ; i<MAXFILES ; i++ )
-    {
-        m_files[i] = 0;
-    }
-}
-
-// Destructor.
-
-CSound::~CSound()
-{
-    int     i;
-
-    if ( m_bEnable )
-    {
-        InitMidiVolume(15);  // gives an average volume!
-        InitAudioTrackVolume(15);  // gives an average volume!
-    }
-
-    for ( i=0 ; i<MAXSOUND ; i++ )
-    {
-        if ( m_channel[i].bUsed )
-        {
-            m_channel[i].soundBuffer->Stop();
-            m_channel[i].soundBuffer->Release();
-            m_channel[i].soundBuffer = 0;
-            m_channel[i].bUsed = false;
-        }
-    }
-
-    if ( m_listener != NULL )
-    {
-        m_listener->Release();
-        m_listener = NULL;
-    }
-
-    if ( m_lpDS != NULL )
-    {
-        m_lpDS->Release();
-        m_lpDS = NULL;
-    }
-}
-
-
-// Specifies whether you are in debug mode.
-
-void CSound::SetDebugMode(bool bMode)
-{
-    m_bDebugMode = bMode;
-}
-
-
-// Initializes DirectSound.
-
-bool CSound::Create(HWND hWnd, bool b3D)
-{
-    LPDIRECTSOUNDBUFFER primary;
-    DSBUFFERDESC        dsbdesc;
-    DSCAPS              dscaps;
-    WAVEFORMATEX        wfx;
-    HRESULT             hr;
-
-    if ( !DirectSoundCreate(NULL, &m_lpDS, NULL) == DS_OK )
-    {
-        OutputDebugString("Fatal error: DirectSoundCreate\n");
-        m_bEnable = false;
-        return false;
-    }
-
-//? m_lpDS->SetCooperativeLevel(hWnd, DSSCL_NORMAL);
-    m_lpDS->SetCooperativeLevel(hWnd, DSSCL_PRIORITY);
-
-    if ( !RetSound3DCap() )  b3D = false;
-
-    m_ctrl3D = false;
-    if ( b3D )
-    {
-        // Obtain primary buffer, asking it for 3D control.
-        ZeroMemory( &dsbdesc, sizeof(DSBUFFERDESC) );
-        dsbdesc.dwSize = sizeof(DSBUFFERDESC);
-        dsbdesc.dwFlags = DSBCAPS_PRIMARYBUFFER|DSBCAPS_CTRL3D;
-        hr = m_lpDS->CreateSoundBuffer( &dsbdesc, &primary, NULL );
-        if ( hr == S_OK )
-        {
-            m_ctrl3D = true;
-        }
-    }
-
-    if ( !m_ctrl3D )
-    {
-        // Obtain primary buffer, without 3D control.
-        ZeroMemory( &dsbdesc, sizeof(DSBUFFERDESC) );
-        dsbdesc.dwSize = sizeof(DSBUFFERDESC);
-        dsbdesc.dwFlags = DSBCAPS_PRIMARYBUFFER;
-        hr = m_lpDS->CreateSoundBuffer( &dsbdesc, &primary, NULL );
-        if ( hr != S_OK )
-        {
-            return false;
-        }
-        m_ctrl3D = false;
-    }
-
-    if ( m_ctrl3D )
-    {
-        hr = primary->QueryInterface( IID_IDirectSound3DListener,
-                                      (VOID**)&m_listener );
-        if ( hr != S_OK )
-        {
-            primary->Release();
-            return false;
-        }
-    }
-
-    // Set primary buffer format to 44kHz and 16-bit output.
-    ZeroMemory( &wfx, sizeof(WAVEFORMATEX) );
-    wfx.wFormatTag      = WAVE_FORMAT_PCM;
-    wfx.nChannels       = 2;
-    wfx.nSamplesPerSec  = 22050;
-//? wfx.nSamplesPerSec  = 44100;
-    wfx.wBitsPerSample  = 16;
-    wfx.nBlockAlign     = wfx.wBitsPerSample / 8 * wfx.nChannels;
-    wfx.nAvgBytesPerSec = wfx.nSamplesPerSec * wfx.nBlockAlign;
-    hr = primary->SetFormat(&wfx);
-    if ( hr != S_OK )
-    {
-        DisplayError("SetFormat", SOUND_CLICK, hr);
-    }
-
-    // Release the primary buffer, since it is not need anymore.
-    primary->Release();
-
-    // Search the maximum possible voices.
-    if ( m_ctrl3D )
-    {
-        ZeroMemory( &dscaps, sizeof(DSCAPS) );
-        dscaps.dwSize = sizeof(DSCAPS);
-        hr = m_lpDS->GetCaps(&dscaps);
-        if ( hr == DS_OK )
-        {
-            m_maxSound = dscaps.dwMaxHwMixingAllBuffers;
-            if ( dscaps.dwMaxHw3DAllBuffers > 0 &&
-                 m_maxSound > (int)dscaps.dwMaxHw3DAllBuffers )
-            {
-                m_maxSound = dscaps.dwMaxHw3DAllBuffers;
-            }
-            if ( m_maxSound > MAXSOUND )  m_maxSound = MAXSOUND;
-        }
-    }
-
-    m_bEnable = true;
-    m_hWnd    = hWnd;
-    return true;
-}
-
-
-// Indicates whether to play sounds in 3D or not.
-
-void CSound::SetSound3D(bool bMode)
-{
-    StopAll();
-
-    if ( m_listener != NULL )
-    {
-        m_listener->Release();
-        m_listener = NULL;
-    }
-
-    if ( m_lpDS != NULL )
-    {
-        m_lpDS->Release();
-        m_lpDS = NULL;
-    }
-
-    Create(m_hWnd, bMode);
-}
-
-bool CSound::RetSound3D()
-{
-    return m_ctrl3D;
-}
-
-// Indicates whether it is possible to play sounds in 3D.
-
-bool CSound::RetSound3DCap()
-{
-    DSCAPS      dscaps;
-    HRESULT     hr;
-
-    ZeroMemory( &dscaps, sizeof(DSCAPS) );
-    dscaps.dwSize = sizeof(DSCAPS);
-    hr = m_lpDS->GetCaps(&dscaps);
-    if ( hr != DS_OK )  return false;
-
-    return ( dscaps.dwMaxHw3DAllBuffers > 0 );
-}
-
-
-
-// Returns the state of DirectSound.
-
-bool CSound::RetEnable()
-{
-    return m_bEnable;
-}
-
-
-// Switches on or off the sound.
-
-void CSound::SetState(bool bState)
-{
-    m_bState = bState;
-}
-
-// Specifies the pathname to the CD.
-
-void CSound::SetCDpath(char *path)
-{
-    strcpy(m_CDpath, path);
-}
-
-// Switches on or off the CD-audio music.
-
-void CSound::SetAudioTrack(bool bAudio)
-{
-    m_bAudioTrack = bAudio;
-}
-
-
-// Manages volumes of audio (. Wav) and midi (. Mid).
-
-void CSound::SetAudioVolume(int volume)
-{
-    m_audioVolume = volume;
-}
-
-int CSound::RetAudioVolume()
-{
-    if ( !m_bEnable )  return 0;
-    return m_audioVolume;
-}
-
-void CSound::SetMidiVolume(int volume)
-{
-    m_midiVolume = volume;
-
-    if ( m_bAudioTrack )
-    {
-        InitAudioTrackVolume(m_midiVolume);
-    }
-}
-
-int CSound::RetMidiVolume()
-{
-    if ( !m_bEnable )  return 0;
-    return m_midiVolume;
-}
-
-
-// Reads a file.
-
-bool CSound::ReadFile(Sound sound, char *metaname, char *filename)
-{
-    WaveHeader  wavHdr;
-    DWORD       size;
-    int         err;
-
-    // Open the wave file.
-    err = g_metafile.Open(metaname, filename);
-    if ( err != 0 ) return false;
-
-    // Read in the wave header.
-    g_metafile.Read(&wavHdr, sizeof(wavHdr));
-
-    // Figure out the size of the data region.
-    size = wavHdr.dwDSize;
-
-    if ( m_files[sound] != 0 )
-    {
-        free(m_files[sound]);
-    }
-    m_files[sound] = (char*)malloc(sizeof(WaveHeader)+size);
-
-    memcpy(m_files[sound], &wavHdr, sizeof(WaveHeader));
-    g_metafile.Read(m_files[sound]+sizeof(WaveHeader), size);
-
-    // Close out the wave file.
-    g_metafile.Close();
-    return true;
-}
-
-// Hides all sound files (. Wav).
-
-void CSound::CacheAll()
-{
-    int         i;
-    char        meta[50];
-    char        name[50];
-
-    if ( !m_bEnable )  return;
-
-    if ( m_bDebugMode )
-    {
-        strcpy(meta, "");
-    }
-    else
-    {
-#if _SCHOOL
-        strcpy(meta, "ceebot3.dat");
-#else
-        strcpy(meta, "colobot3.dat");
-#endif
-    }
-
-    for ( i=0 ; i<MAXFILES ; i++ )
-    {
-        if ( m_bDebugMode )
-        {
-            sprintf(name, "sound\\sound%.3d.wav", i);
-        }
-        else
-        {
-            sprintf(name, "sound%.3d.wav", i);
-        }
-        if ( !ReadFile((Sound)i, meta, name) )  break;
-    }
-}
-
-
-// Return the priority of a sound.
-// The higher the value, the greater the sound is important.
-
-int CSound::RetPriority(Sound sound)
-{
-    if ( sound == SOUND_FLYh   ||
-         sound == SOUND_FLY    ||
-         sound == SOUND_MOTORw ||
-         sound == SOUND_MOTORt ||
-         sound == SOUND_MOTORr ||
-         sound == SOUND_MOTORs ||
-         sound == SOUND_SLIDE  ||
-         sound == SOUND_ERROR  )
-    {
-        return 30;
-    }
-
-    if ( sound == SOUND_CONVERT  ||
-         sound == SOUND_ENERGY   ||
-         sound == SOUND_DERRICK  ||
-         sound == SOUND_STATION  ||
-         sound == SOUND_REPAIR   ||
-         sound == SOUND_RESEARCH ||
-         sound == SOUND_BURN     ||
-         sound == SOUND_BUILD    ||
-         sound == SOUND_TREMBLE  ||
-         sound == SOUND_NUCLEAR  ||
-         sound == SOUND_EXPLO    ||
-         sound == SOUND_EXPLOl   ||
-         sound == SOUND_EXPLOlp  ||
-         sound == SOUND_EXPLOp   ||
-         sound == SOUND_EXPLOi   )
-    {
-        return 20;
-    }
-
-    if ( sound == SOUND_BLUP    ||
-         sound == SOUND_INSECTs ||
-         sound == SOUND_INSECTa ||
-         sound == SOUND_INSECTb ||
-         sound == SOUND_INSECTw ||
-         sound == SOUND_INSECTm ||
-         sound == SOUND_PSHHH   ||
-         sound == SOUND_EGG     )
-    {
-        return 0;
-    }
-
-    return 10;
-}
-
-// Seeks a free buffer.
-
-bool CSound::SearchFreeBuffer(Sound sound, int &channel, bool &bAlreadyLoaded)
-{
-    DWORD   status;
-    int     i, priority;
-
-    priority = RetPriority(sound);
-
-#if 1
-    // Seeks a channel used which sound is stopped.
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-        if ( m_channel[i].type != sound )  continue;
-
-        m_channel[i].soundBuffer->GetStatus(&status);
-        if ( (status&DSBSTATUS_PLAYING) == 0 )
-        {
-            m_channel[i].priority = priority;
-            m_channel[i].uniqueStamp = m_uniqueStamp++;
-            channel = i;
-            bAlreadyLoaded = true;
-            return true;
-        }
-    }
-#endif
-
-    // Seeks a channel completely free.
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )
-        {
-            m_channel[i].priority = priority;
-            m_channel[i].uniqueStamp = m_uniqueStamp++;
-            channel = i;
-            bAlreadyLoaded = false;
-            return true;
-        }
-    }
-
-    // Seeks a channel used which sound is stopped.
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-
-        m_channel[i].soundBuffer->GetStatus(&status);
-        if ( (status&DSBSTATUS_PLAYING) == 0 )
-        {
-            m_channel[i].soundBuffer->Release();
-            m_channel[i].soundBuffer = 0;
-            m_channel[i].priority = priority;
-            m_channel[i].uniqueStamp = m_uniqueStamp++;
-
-            channel = i;
-            bAlreadyLoaded = false;
-            return true;
-        }
-    }
-
-    // Seeks a lower priority channel used.
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-        if ( m_channel[i].priority >= priority )  continue;
-
-        m_channel[i].soundBuffer->Stop();
-        m_channel[i].soundBuffer->Release();
-        m_channel[i].soundBuffer = 0;
-        m_channel[i].priority = priority;
-        m_channel[i].uniqueStamp = m_uniqueStamp++;
-
-        channel = i;
-        bAlreadyLoaded = false;
-        return true;
-    }
-
-    // Seeks a channel used the same or lower priority.
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-        if ( m_channel[i].priority > priority )  continue;
-
-        m_channel[i].soundBuffer->Stop();
-        m_channel[i].soundBuffer->Release();
-        m_channel[i].soundBuffer = 0;
-        m_channel[i].priority = priority;
-        m_channel[i].uniqueStamp = m_uniqueStamp++;
-
-        channel = i;
-        bAlreadyLoaded = false;
-        return true;
-    }
-
-    char s[100];
-    sprintf(s, "Sound %d forget (priority=%d)\n", sound, priority);
-    OutputDebugString(s);
-
-    return false;
-}
-
-// Reads in data from a wave file.
-
-bool CSound::ReadData(LPDIRECTSOUNDBUFFER lpDSB, Sound sound, DWORD size)
-{
-    LPVOID  pData1;
-    DWORD   dwData1Size;
-    LPVOID  pData2;
-    DWORD   dwData2Size;
-    HRESULT hr;
-
-    // Lock data in buffer for writing.
-    hr = lpDSB->Lock(0, size, &pData1, &dwData1Size, &pData2, &dwData2Size, DSBLOCK_FROMWRITECURSOR);
-    if ( hr != DS_OK )
-    {
-        return false;
-    }
-
-    // Read in first chunk of data.
-    if ( dwData1Size > 0 )
-    {
-        memcpy(pData1, m_files[sound]+sizeof(WaveHeader), dwData1Size);
-    }
-
-    // Read in second chunk if necessary.
-    if ( dwData2Size > 0 )
-    {
-        memcpy(pData2, m_files[sound]+sizeof(WaveHeader)+dwData1Size, dwData2Size);
-    }
-
-    // Unlock data in buffer.
-    hr = lpDSB->Unlock(pData1, dwData1Size, pData2, dwData2Size);
-    if ( hr != DS_OK )
-    {
-        return false;
-    }
-
-    return true;
-}
-
-// Creates a DirectSound buffer.
-
-bool CSound::CreateSoundBuffer(int channel, DWORD size, DWORD freq,
-                               DWORD bitsPerSample, DWORD blkAlign,
-                               bool bStereo)
-{
-    PCMWAVEFORMAT   pcmwf;
-    DSBUFFERDESC    dsbdesc;
-    DS3DBUFFER      bufferParams;  // 3D buffer properties
-    HRESULT         hr;
-
-    // Set up wave format structure.
-    memset( &pcmwf, 0, sizeof(PCMWAVEFORMAT) );
-    pcmwf.wf.wFormatTag      = WAVE_FORMAT_PCM;
-    pcmwf.wf.nChannels       = bStereo ? 2 : 1;
-    pcmwf.wf.nSamplesPerSec  = freq;
-    pcmwf.wf.nBlockAlign     = (WORD)blkAlign;
-    pcmwf.wf.nAvgBytesPerSec = pcmwf.wf.nSamplesPerSec * pcmwf.wf.nBlockAlign;
-    pcmwf.wBitsPerSample     = (WORD)bitsPerSample;
-
-    // Set up DSBUFFERDESC structure.
-    memset(&dsbdesc, 0, sizeof(DSBUFFERDESC));  // Zero it out.
-    dsbdesc.dwSize = sizeof(DSBUFFERDESC);
-    if ( m_ctrl3D )
-    {
-        dsbdesc.dwFlags = DSBCAPS_CTRL3D|DSBCAPS_MUTE3DATMAXDISTANCE|
-                          DSBCAPS_LOCDEFER|
-                          DSBCAPS_CTRLVOLUME|DSBCAPS_CTRLFREQUENCY;
-    }
-    else
-    {
-        dsbdesc.dwFlags = DSBCAPS_CTRLVOLUME|DSBCAPS_CTRLPAN|DSBCAPS_CTRLFREQUENCY;
-    }
-    dsbdesc.dwBufferBytes = size;
-    dsbdesc.lpwfxFormat   = (LPWAVEFORMATEX)&pcmwf;
-
-    hr = m_lpDS->CreateSoundBuffer(&dsbdesc, &m_channel[channel].soundBuffer, NULL);
-    if ( hr != DS_OK )  return false;
-
-    if ( m_ctrl3D )
-    {
-        hr = m_channel[channel].soundBuffer->QueryInterface
-                            (
-                                IID_IDirectSound3DBuffer,
-                                (VOID**)&m_channel[channel].soundBuffer3D
-                            );
-        if ( hr != DS_OK )  return false;
-    }
-
-    m_channel[channel].bUsed = true;
-    m_channel[channel].bMute = false;
-    return true;
-}
-
-// Creates a DirectSound buffer from a wave file.
-
-bool CSound::CreateBuffer(int channel, Sound sound)
-{
-    WaveHeader* wavHdr;
-    DWORD       size;
-    bool        bStereo;
-
-    if ( m_files[sound] == 0 )  return false;
-
-    wavHdr = (WaveHeader*)m_files[sound];
-    size = wavHdr->dwDSize;
-    bStereo = wavHdr->wChnls > 1 ? true : false;
-
-    // Create the sound buffer for the wave file.
-    if ( !CreateSoundBuffer(channel, size, wavHdr->dwSRate,
-                            wavHdr->BitsPerSample, wavHdr->wBlkAlign, bStereo) )
-    {
-        return false;
-    }
-
-    // Read the data for the wave file into the sound buffer.
-    if ( !ReadData(m_channel[channel].soundBuffer, sound, size) )
-    {
-        return false;
-    }
-
-    m_channel[channel].type = sound;
-
-    // Close out the wave file.
-    return true;
-}
-
-// Calculates the volume and pan of a sound, non-3D mode.
-
-void CSound::ComputeVolumePan2D(int channel, const Math::Vector &pos)
-{
-    float   dist, a, g;
-
-    if ( pos.x == m_eye.x &&
-         pos.y == m_eye.y &&
-         pos.z == m_eye.z )
-    {
-        m_channel[channel].volume = 1.0f;  // maximum volume
-        m_channel[channel].pan    = 0.0f;  // at the center
-        return;
-    }
-
-#if _TEEN
-    dist = Math::Distance(pos, m_eye);
-    if ( dist >= 210.0f )  // very far?
-    {
-        m_channel[channel].volume = 0.0f;  // silence
-        m_channel[channel].pan    = 0.0f;  // at the center
-        return;
-    }
-    if ( dist <= 10.0f )  // very close?
-    {
-        m_channel[channel].volume = 1.0f;  // maximum volume
-        m_channel[channel].pan    = 0.0f;  // at the center
-        return;
-    }
-    m_channel[channel].volume = 1.0f-((dist-10.0f)/200.0f);
-#else
-    dist = Math::Distance(pos, m_eye);
-    if ( dist >= 110.0f )  // very far?
-    {
-        m_channel[channel].volume = 0.0f;  // silence
-        m_channel[channel].pan    = 0.0f;  // at the center
-        return;
-    }
-    if ( dist <= 10.0f )  // very close?
-    {
-        m_channel[channel].volume = 1.0f;  // maximum volume
-        m_channel[channel].pan    = 0.0f;  // at the center
-        return;
-    }
-    m_channel[channel].volume = 1.0f-((dist-10.0f)/100.0f);
-#endif
-
-    a = Math::RotateAngle(m_lookat.x-m_eye.x, m_eye.z-m_lookat.z);
-    g = Math::RotateAngle(pos.x-m_eye.x, m_eye.z-pos.z);
-    m_channel[channel].pan = sinf(Math::Direction(a, g));
-}
-
-// Sounds in the middle.
-// Returns the associated channel or -1.
-
-int CSound::Play(Sound sound, float amplitude, float frequency, bool bLoop)
-{
-    return Play(sound, m_lookat, amplitude, frequency, bLoop);
-}
-
-// Sounds at a given position.
-// Returns the associated channel or -1.
-
-int CSound::Play(Sound sound, Math::Vector pos,
-                 float amplitude, float frequency, bool bLoop)
-{
-    DS3DBUFFER  sb;
-    int         channel, iVolume, iPan, iFreq, uniqueStamp;
-    bool        bAlreadyLoaded;
-    DWORD       flag, freq;
-    HRESULT     err;
-
-    if ( !m_bEnable )  return -1;
-    if ( !m_bState || m_audioVolume == 0 )  return -1;
-
-//? if ( Math::Distance(pos, m_eye) > 100.0f )  return -1;
-
-    if ( !SearchFreeBuffer(sound, channel, bAlreadyLoaded) )  return -1;
-
-    if ( !bAlreadyLoaded )
-    {
-        if ( !CreateBuffer(channel, sound) )
-        {
-            if ( m_channel[channel].bUsed            &&
-                 m_channel[channel].soundBuffer != 0 )
-            {
-                m_channel[channel].soundBuffer->Release();
-                m_channel[channel].soundBuffer = 0;
-            }
-            m_channel[channel].bUsed = false;
-            return -1;
-        }
-    }
-
-    m_channel[channel].pos = pos;
-
-    if ( m_ctrl3D )
-    {
-        m_channel[channel].volume = 1.0f;
-        m_channel[channel].pan    = 0.0f;
-    }
-    else
-    {
-        ComputeVolumePan2D(channel, pos);
-    }
-
-#if 0
-    DWORD status;
-    m_channel[channel].soundBuffer->GetStatus(&status);
-    char s[100];
-    sprintf(s, "Play sound=%d status=%d channel=%d flag=%d\n", sound, status, channel, bAlreadyLoaded);
-    OutputDebugString(s);
-#endif
-
-    m_channel[channel].oper[0].bUsed = false;
-    m_channel[channel].startAmplitude = amplitude;
-    m_channel[channel].startFrequency = frequency;
-    m_channel[channel].changeFrequency = 1.0f;
-
-    if ( m_ctrl3D )
-    {
-        sb.dwSize = sizeof(DS3DBUFFER);
-        err = m_channel[channel].soundBuffer3D->GetAllParameters(&sb);
-        DisplayError("GetAllParameters", sound, err);
-
-        sb.vPosition = VEC_TO_D3DVEC(pos);
-//?     sb.dwInsideConeAngle = 90;
-//?     sb.dwOutsideConeAngle = 180;
-//?     sb.vConeOrientation = Math::Vector(0.0f, 1.0f, 0.0f);
-        sb.lConeOutsideVolume = DSBVOLUME_MIN;
-#if _TEEN
-        sb.flMinDistance = 50.0f;
-#else
-        sb.flMinDistance = 20.0f;
-#endif
-        sb.flMaxDistance = DS3D_DEFAULTMAXDISTANCE;
-
-        err = m_channel[channel].soundBuffer3D->SetAllParameters(&sb, DS3D_IMMEDIATE);
-        DisplayError("SetAllParameters", sound, err);
-    }
-
-    amplitude *= m_channel[channel].volume;
-    amplitude *= (float)m_audioVolume/MAXVOLUME;
-    iVolume = (int)((powf(amplitude, 0.2f)-1.0f)*10000.0f);
-    if ( iVolume > 0 )  iVolume = 0;
-    err = m_channel[channel].soundBuffer->SetVolume(iVolume);
-    DisplayError("SetVolume", sound, err);
-
-    if ( !m_ctrl3D )
-    {
-        iPan = (int)(m_channel[channel].pan*10000.0f);
-        err = m_channel[channel].soundBuffer->SetPan(iPan);
-        DisplayError("SetPan", sound, err);
-    }
-
-    if ( !bAlreadyLoaded )
-    {
-        err = m_channel[channel].soundBuffer->GetFrequency(&freq);
-        DisplayError("GetFrequency", sound, err);
-        m_channel[channel].initFrequency = freq;
-    }
-    iFreq = (int)(frequency*m_channel[channel].initFrequency);
-    err = m_channel[channel].soundBuffer->SetFrequency(iFreq);
-    DisplayError("SetFrequency", sound, err);
-
-    err = m_channel[channel].soundBuffer->SetCurrentPosition(0);
-    DisplayError("SetCurrentPosition", sound, err);
-
-    flag = bLoop?DSBPLAY_LOOPING:0;
-//? flag |= DSBPLAY_LOCHARDWARE|DSBPLAY_TERMINATEBY_DISTANCE;
-//? flag |= DSBPLAY_TERMINATEBY_DISTANCE;
-    err = m_channel[channel].soundBuffer->Play(0, 0, flag);
-    DisplayError("Play", sound, err);
-    if ( err == DSERR_BADFORMAT )
-    {
-        iFreq = m_channel[channel].initFrequency;
-        err = m_channel[channel].soundBuffer->SetFrequency(iFreq);
-        DisplayError("SetFrequency (repeat)", sound, err);
-
-        err = m_channel[channel].soundBuffer->Play(0, 0, flag);
-        DisplayError("Play (repeat)", sound, err);
-    }
-
-    uniqueStamp = m_channel[channel].uniqueStamp;
-    return channel | ((uniqueStamp&0xffff)<<16);
-}
-
-// Check a channel number.
-// Adapts the channel, so it can be used as an offset in m_channel.
-
-bool CSound::CheckChannel(int &channel)
-{
-    int     uniqueStamp;
-
-    uniqueStamp = (channel>>16)&0xffff;
-    channel &= 0xffff;
-
-    if ( !m_bEnable )  return false;
-    if ( !m_bState || m_audioVolume == 0 )  return false;
-
-    if ( channel < 0 || channel >= m_maxSound )  return false;
-    if ( !m_channel[channel].bUsed )  return false;
-
-    if ( m_channel[channel].uniqueStamp != uniqueStamp )  return false;
-
-    return true;
-}
-
-// Removes all envelopes.
-
-bool CSound::FlushEnvelope(int channel)
-{
-    if ( !CheckChannel(channel) )  return false;
-
-    m_channel[channel].oper[0].bUsed = false;
-    return true;
-}
-
-// Adds an operation envelope.
-
-bool CSound::AddEnvelope(int channel, float amplitude, float frequency,
-                         float time, SoundNext oper)
-{
-    int     i;
-
-    if ( !CheckChannel(channel) )  return false;
-
-    for ( i=0 ; i<MAXOPER ; i++ )
-    {
-        if ( m_channel[channel].oper[i].bUsed )  continue;
-
-        m_channel[channel].oper[i].bUsed = true;
-        m_channel[channel].oper[i].finalAmplitude = amplitude;
-        m_channel[channel].oper[i].finalFrequency = frequency;
-        m_channel[channel].oper[i].totalTime = time;
-        m_channel[channel].oper[i].currentTime = 0;
-        m_channel[channel].oper[i].nextOper = oper;
-
-        if ( i < MAXOPER-1 )
-        {
-            m_channel[channel].oper[i+1].bUsed = false;
-        }
-        return true;
-    }
-    return false;
-}
-
-// Changes the position of a sound.
-
-bool CSound::Position(int channel, Math::Vector pos)
-{
-    float       amplitude, pan;
-    int         iVolume, iPan;
-    HRESULT     err;
-
-    if ( !CheckChannel(channel) )  return false;
-
-    m_channel[channel].pos = pos;
-
-    if ( m_ctrl3D )
-    {
-        m_channel[channel].soundBuffer3D->SetPosition(pos.x, pos.y, pos.z, DS3D_DEFERRED);
-    }
-    else
-    {
-        ComputeVolumePan2D(channel, pos);
-
-        if ( !m_channel[channel].oper[0].bUsed )
-        {
-            amplitude = m_channel[channel].startAmplitude;
-            amplitude *= m_channel[channel].volume;
-            amplitude *= (float)m_audioVolume/MAXVOLUME;
-            iVolume = (int)((powf(amplitude, 0.2f)-1.0f)*10000.0f);
-            if ( iVolume > 0 )  iVolume = 0;
-            err = m_channel[channel].soundBuffer->SetVolume(iVolume);
-            DisplayError("SetVolume", m_channel[channel].type, err);
-        }
-
-        pan = m_channel[channel].pan;
-        iPan = (int)(pan*10000.0f);
-        err = m_channel[channel].soundBuffer->SetPan(iPan);
-        DisplayError("SetPan", m_channel[channel].type, err);
-    }
-    return true;
-}
-
-// Changes the frequency of a sound.
-// 0.5 down of an octave and 2.0 up of an octave.
-
-bool CSound::Frequency(int channel, float frequency)
-{
-    HRESULT err;
-    int     iFreq;
-
-    if ( !CheckChannel(channel) )  return false;
-
-    m_channel[channel].changeFrequency = frequency;
-
-    if ( !m_channel[channel].oper[0].bUsed )
-    {
-        iFreq = (int)(frequency*m_channel[channel].initFrequency);
-        err = m_channel[channel].soundBuffer->SetFrequency(iFreq);
-        DisplayError("Frequency", m_channel[channel].type, err);
-    }
-
-    return true;
-}
-
-// Stops sound.
-
-bool CSound::Stop(int channel)
-{
-    if ( !CheckChannel(channel) )  return false;
-
-    m_channel[channel].soundBuffer->Stop();
-    return true;
-}
-
-// Stops all sounds.
-
-bool CSound::StopAll()
-{
-    DWORD   status;
-    int     i;
-
-    for ( i=0 ; i<MAXSOUND ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-
-        m_channel[i].soundBuffer->GetStatus(&status);
-        if ( (status&DSBSTATUS_PLAYING) == DSBSTATUS_PLAYING )
-        {
-            m_channel[i].soundBuffer->Stop();
-        }
-        m_channel[i].soundBuffer->Stop();
-        m_channel[i].soundBuffer->Release();
-        m_channel[i].soundBuffer = 0;
-
-        m_channel[i].bUsed = false;
-    }
-    return true;
-}
-
-// Silent all sounds.
-
-bool CSound::MuteAll(bool bMute)
-{
-    int     i;
-
-    for ( i=0 ; i<MAXSOUND ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-
-        m_channel[i].bMute = bMute;
-    }
-    return true;
-}
-
-
-// Passes the following operation for a channel.
-
-void CSound::OperNext(int channel)
-{
-    int     i;
-
-    m_channel[channel].startAmplitude = m_channel[channel].oper[0].finalAmplitude;
-    m_channel[channel].startFrequency = m_channel[channel].oper[0].finalFrequency;
-
-    for ( i=0 ; i<MAXOPER-1 ; i++ )
-    {
-        if ( !m_channel[channel].oper[i+1].bUsed )  break;
-
-        m_channel[channel].oper[i] = m_channel[channel].oper[i+1];
-    }
-
-    m_channel[channel].oper[i].bUsed = false;
-}
-
-// Updates the sound buffers.
-
-void CSound::FrameMove(float rTime)
-{
-    HRESULT     err;
-    SoundNext   next;
-    float       progress, volume, freq;
-    int         i, iVolume, iFreq;
-
-    m_playTime += rTime;
-
-    for ( i=0 ; i<m_maxSound ; i++ )
-    {
-        if ( !m_channel[i].bUsed )  continue;
-        if ( !m_channel[i].oper[0].bUsed )  continue;
-
-        if ( m_channel[i].bMute )
-        {
-            m_channel[i].soundBuffer->SetVolume(-10000);  // silence
-            continue;
-        }
-
-        m_channel[i].oper[0].currentTime += rTime;
-
-        progress = m_channel[i].oper[0].currentTime / m_channel[i].oper[0].totalTime;
-        if ( progress > 1.0f )  progress = 1.0f;
-
-        volume = progress;
-        volume *= m_channel[i].oper[0].finalAmplitude-m_channel[i].startAmplitude;
-        volume += m_channel[i].startAmplitude;
-        volume *= m_channel[i].volume;
-        volume *= (float)m_audioVolume/MAXVOLUME;
-        iVolume = (int)((powf(volume, 0.2f)-1.0f)*10000.0f);
-        if ( iVolume > 0 )  iVolume = 0;
-        m_channel[i].soundBuffer->SetVolume(iVolume);
-
-        freq = progress;
-        freq *= m_channel[i].oper[0].finalFrequency-m_channel[i].startFrequency;
-        freq += m_channel[i].startFrequency;
-        freq *= m_channel[i].changeFrequency;
-        iFreq = (int)(freq*m_channel[i].initFrequency);
-        err = m_channel[i].soundBuffer->SetFrequency(iFreq);
-        DisplayError("FrameMove::Frequency", m_channel[i].type, err);
-
-        if ( m_channel[i].oper[0].currentTime >=
-             m_channel[i].oper[0].totalTime )
-        {
-            next = m_channel[i].oper[0].nextOper;
-
-            if ( next == SOPER_LOOP )
-            {
-                m_channel[i].oper[0].currentTime = 0.0f;
-            }
-            else
-            {
-                OperNext(i);
-
-                if ( next == SOPER_STOP )
-                {
-                    m_channel[i].soundBuffer->Stop();
-                }
-            }
-        }
-    }
-
-    m_lastTime += rTime;
-    if ( m_lastTime >= 0.05f && m_listener != 0 )
-    {
-        m_lastTime = 0.0f;
-        m_listener->CommitDeferredSettings();
-    }
-}
-
-// Specifies the position of the listener.
-// Must be called whenever the camera moves.
-
-void CSound::SetListener(Math::Vector eye, Math::Vector lookat)
-{
-    DS3DLISTENER    listenerParams;
-    HRESULT         err;
-    float           amplitude, pan;
-    int             i, iVolume, iPan;
-
-    m_eye = eye;
-    m_lookat = lookat;
-
-    if ( m_listener == 0 )
-    {
-        if ( m_ctrl3D )  return;
-
-        for ( i=0 ; i<m_maxSound ; i++ )
-        {
-            if ( !m_channel[i].bUsed )  continue;
-
-            ComputeVolumePan2D(i, m_channel[i].pos);
-
-            if ( !m_channel[i].oper[0].bUsed )
-            {
-                amplitude = m_channel[i].startAmplitude;
-                amplitude *= m_channel[i].volume;
-                amplitude *= (float)m_audioVolume/MAXVOLUME;
-                iVolume = (int)((powf(amplitude, 0.2f)-1.0f)*10000.0f);
-                if ( iVolume > 0 )  iVolume = 0;
-                err = m_channel[i].soundBuffer->SetVolume(iVolume);
-                DisplayError("SetVolume", m_channel[i].type, err);
-            }
-
-            pan = m_channel[i].pan;
-            iPan = (int)(pan*10000.0f);
-            err = m_channel[i].soundBuffer->SetPan(iPan);
-            DisplayError("SetPan", m_channel[i].type, err);
-        }
-        return;
-    }
-
-    // Get listener parameters.
-    listenerParams.dwSize = sizeof(DS3DLISTENER);
-    m_listener->GetAllParameters(&listenerParams);
-
-    listenerParams.vPosition = VEC_TO_D3DVEC(eye);
-    listenerParams.vOrientFront = VEC_TO_D3DVEC(lookat-eye);
-    listenerParams.vOrientTop = D3DVECTOR(0.0f, 1.0f, 0.0f);
-    listenerParams.flDistanceFactor = 10.0f;
-    listenerParams.flRolloffFactor = 1.0f;
-
-    m_listener->SetAllParameters(&listenerParams, DS3D_DEFERRED);
-}
-
-
-
-
-// Uses MCI to play a MIDI file. The window procedure
-// is notified when playback is complete.
-
-bool CSound::PlayMusic(int rank, bool bRepeat)
-{
-    MCI_OPEN_PARMS  mciOpenParms;
-    MCI_PLAY_PARMS  mciPlayParms;
-    DWORD           dwReturn;
-    char            filename[MAX_PATH];
-
-    m_bRepeatMusic = bRepeat;
-    m_playTime = 0.0f;
-
-    if ( m_midiVolume == 0 )  return true;
-
-    if ( m_bAudioTrack )
-    {
-        return PlayAudioTrack(rank);
-    }
-
-    if ( !m_bEnable )  return true;
-    InitMidiVolume(m_midiVolume);
-    m_lastMidiVolume = m_midiVolume;
-
-    GetCurrentDir(filename, MAX_PATH-30);
-    sprintf(filename+strlen(filename), "sound\\music%.3d.blp", rank-1);
-
-    // Open the device by specifying the device and filename.
-    // MCI will attempt to choose the MIDI mapper as the output port.
-    mciOpenParms.lpstrDeviceType = "sequencer";
-    mciOpenParms.lpstrElementName = filename;
-    dwReturn = mciSendCommand(NULL,
-                              MCI_OPEN,
-                              MCI_OPEN_TYPE|MCI_OPEN_ELEMENT,
-                              (DWORD)(LPVOID)&mciOpenParms);
-    if ( dwReturn != 0 )
-    {
-        mciGetErrorString(dwReturn, filename, 128);
-        // Failed to open device. Don't close it; just return error.
-        return false;
-    }
-
-    // The device opened successfully; get the device ID.
-    m_MidiDeviceID = mciOpenParms.wDeviceID;
-
-    // Begin playback.
-    mciPlayParms.dwCallback = (DWORD)m_hWnd;
-    dwReturn = mciSendCommand(m_MidiDeviceID,
-                              MCI_PLAY,
-                              MCI_NOTIFY,
-                              (DWORD)(LPVOID)&mciPlayParms);
-    if ( dwReturn != 0 )
-    {
-        mciGetErrorString(dwReturn, filename, 128);
-        StopMusic();
-        return false;
-    }
-
-    m_MIDIMusic = rank;
-    return true;
-}
-
-// Uses MCI to play a CD-audio track. The window procedure
-// is notified when playback is complete.
-// The rank parameter is in space [1..n] !
-// For CD mix (data/audio), it will be [2..n] !
-
-bool CSound::PlayAudioTrack(int rank)
-{
-#if _SOUNDTRACKS
-    MCI_OPEN_PARMS  mciOpenParms;
-    MCI_PLAY_PARMS  mciPlayParms;
-    MCI_SET_PARMS   mciSetParms;
-    DWORD           dwReturn;
-    char            filename[MAX_PATH];
-    char            device[10];
-
-    if ( !m_bEnable )  return true;
-//? if ( m_midiVolume == 0 )  return true;
-    InitAudioTrackVolume(m_midiVolume);
-    m_lastMidiVolume = m_midiVolume;
-
-    // Open the device by specifying the device and filename.
-    // MCI will attempt to choose the MIDI mapper as the output port.
-    memset(&mciOpenParms, 0, sizeof(MCI_OPEN_PARMS));
-//? mciOpenParms.lpstrDeviceType = (LPCTSTR)MCI_DEVTYPE_CD_AUDIO;
-//? dwReturn = mciSendCommand(NULL,
-//?                           MCI_OPEN,
-//?                           MCI_OPEN_TYPE|MCI_OPEN_TYPE_ID,
-//?                           (DWORD)(LPVOID)&mciOpenParms);
-    mciOpenParms.lpstrDeviceType = (LPCTSTR)MCI_DEVTYPE_CD_AUDIO;
-    if ( m_CDpath[0] == 0 )
-    {
-        dwReturn = mciSendCommand(NULL,
-                                  MCI_OPEN,
-                                  MCI_OPEN_TYPE|MCI_OPEN_TYPE_ID,
-                                  (DWORD)(LPVOID)&mciOpenParms);
-    }
-    else
-    {
-        device[0] = m_CDpath[0];
-        device[1] = ':';
-        device[2] = 0;
-        mciOpenParms.lpstrElementName = device;
-        dwReturn = mciSendCommand(NULL,
-                                  MCI_OPEN,
-                                  MCI_OPEN_TYPE|MCI_OPEN_TYPE_ID|MCI_OPEN_ELEMENT,
-                                  (DWORD)(LPVOID)&mciOpenParms);
-    }
-    if ( dwReturn != 0 )
-    {
-        mciGetErrorString(dwReturn, filename, 128);
-        // Failed to open device. Don't close it; just return error.
-        return false;
-    }
-
-    // The device opened successfully; get the device ID.
-    m_MidiDeviceID = mciOpenParms.wDeviceID;
-
-    // Set the time format to track/minute/second/frame (TMSF).
-    memset(&mciSetParms, 0, sizeof(MCI_SET_PARMS));
-    mciSetParms.dwTimeFormat = MCI_FORMAT_TMSF;
-    dwReturn = mciSendCommand(m_MidiDeviceID,
-                              MCI_SET,
-                              MCI_SET_TIME_FORMAT,
-                              (DWORD)&mciSetParms);
-    if ( dwReturn != 0 )
-    {
-        mciGetErrorString(dwReturn, filename, 128);
-        StopMusic();
-        return false;
-    }
-
-    // Begin playback.
-    memset(&mciPlayParms, 0, sizeof(MCI_PLAY_PARMS));
-    mciPlayParms.dwCallback = (DWORD)m_hWnd;
-    mciPlayParms.dwFrom = MCI_MAKE_TMSF(rank+0, 0, 0, 0);
-    mciPlayParms.dwTo   = MCI_MAKE_TMSF(rank+1, 0, 0, 0);
-    dwReturn = mciSendCommand(m_MidiDeviceID,
-                              MCI_PLAY,
-                              MCI_NOTIFY|MCI_FROM|MCI_TO,
-                              (DWORD)(LPVOID)&mciPlayParms);
-    if ( dwReturn != 0 )
-    {
-        mciGetErrorString(dwReturn, filename, 128);
-        StopMusic();
-        return false;
-    }
-
-    m_MIDIMusic = rank;
-#endif
-    return true;
-}
-
-// Restart the MIDI player.
-
-bool CSound::RestartMusic()
-{
-    if ( !m_bRepeatMusic )  return false;
-
-    OutputDebugString("RestartMusic\n");
-    if ( !m_bEnable )  return true;
-//? if ( m_midiVolume == 0 )  return true;
-    if ( m_MIDIMusic == 0 )  return false;
-    if ( m_playTime < 5.0f )  return false;
-
-    return PlayMusic(m_MIDIMusic, true);
-}
-
-// Shuts down the MIDI player.
-
-void CSound::SuspendMusic()
-{
-    if ( !m_bEnable )  return;
-
-//? if ( m_MidiDeviceID && m_midiVolume != 0 )
-    if ( m_MidiDeviceID )
-    {
-        if ( m_bAudioTrack )  mciSendCommand(m_MidiDeviceID, MCI_STOP, 0, NULL);
-        mciSendCommand(m_MidiDeviceID, MCI_CLOSE, 0, NULL);
-    }
-    m_MidiDeviceID = 0;
-}
-
-// Shuts down the MIDI player.
-
-void CSound::StopMusic()
-{
-    SuspendMusic();
-    m_MIDIMusic = 0;
-}
-
-// Returns true if the music is in progress.
-
-bool CSound::IsPlayingMusic()
-{
-    return (m_MIDIMusic != 0);
-}
-
-// Adjusts the volume of currently music, if necessary.
-
-void CSound::AdaptVolumeMusic()
-{
-    if ( m_midiVolume != m_lastMidiVolume )
-    {
-        if ( m_bAudioTrack )
-        {
-            InitAudioTrackVolume(m_midiVolume);
-        }
-        else
-        {
-            InitMidiVolume(m_midiVolume);
-        }
-        m_lastMidiVolume = m_midiVolume;
-        RestartMusic();
-    }
-}
-
diff --git a/src/old/sound.h b/src/old/sound.h
deleted file mode 100644
index 157eb2e..0000000
--- a/src/old/sound.h
+++ /dev/null
@@ -1,242 +0,0 @@
-// * 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/.
-
-// sound.h
-
-#pragma once
-
-
-#include <dsound.h>
-
-
-const int MAXFILES  = 200;
-const int MAXSOUND  = 32;
-const int MAXVOLUME = 20;
-const int MAXOPER   = 4;
-
-class CInstanceManager;
-
-
-enum Sound
-{
-    SOUND_CLICK     = 0,
-    SOUND_BOUM      = 1,
-    SOUND_EXPLO     = 2,
-    SOUND_FLYh      = 3,    // human
-    SOUND_FLY       = 4,
-    SOUND_STEPs     = 5,    // smooth
-    SOUND_MOTORw        = 6,    // wheel
-    SOUND_MOTORt        = 7,    // tank
-    SOUND_MOTORr        = 8,    // roller
-    SOUND_ERROR     = 9,
-    SOUND_CONVERT       = 10,
-    SOUND_ENERGY        = 11,
-    SOUND_PLOUF     = 12,
-    SOUND_BLUP      = 13,
-    SOUND_WARNING       = 14,
-    SOUND_DERRICK       = 15,
-    SOUND_LABO      = 16,
-    SOUND_STATION       = 17,
-    SOUND_REPAIR        = 18,
-    SOUND_RESEARCH      = 19,
-    SOUND_INSECTs       = 20,   // spider
-    SOUND_BURN      = 21,
-    SOUND_TZOING        = 22,
-    SOUND_GGG       = 23,
-    SOUND_MANIP     = 24,
-    SOUND_FIRE      = 25,   // shooting with fireball
-    SOUND_HUMAN1        = 26,   // breathing
-    SOUND_STEPw     = 27,   // water
-    SOUND_SWIM      = 28,
-    SOUND_RADAR     = 29,
-    SOUND_BUILD     = 30,
-    SOUND_ALARM     = 31,   // energy alarm
-    SOUND_SLIDE     = 32,
-    SOUND_EXPLOi        = 33,   // insect
-    SOUND_INSECTa       = 34,   // ant
-    SOUND_INSECTb       = 35,   // bee
-    SOUND_INSECTw       = 36,   // worm
-    SOUND_INSECTm       = 37,   // mother
-    SOUND_TREMBLE       = 38,
-    SOUND_PSHHH     = 39,
-    SOUND_NUCLEAR       = 40,
-    SOUND_INFO      = 41,
-    SOUND_OPEN      = 42,
-    SOUND_CLOSE     = 43,
-    SOUND_FACTORY       = 44,
-    SOUND_EGG       = 45,
-    SOUND_MOTORs        = 46,   // submarine
-    SOUND_MOTORi        = 47,   // insect (legs)
-    SOUND_SHIELD        = 48,
-    SOUND_FIREi     = 49,   // shooting with orgaball (insect)
-    SOUND_GUNDEL        = 50,
-    SOUND_PSHHH2        = 51,   // shield
-    SOUND_MESSAGE       = 52,
-    SOUND_BOUMm     = 53,   // metal
-    SOUND_BOUMv     = 54,   // plant
-    SOUND_BOUMs     = 55,   // smooth
-    SOUND_EXPLOl        = 56,   // little
-    SOUND_EXPLOlp       = 57,   // little power
-    SOUND_EXPLOp        = 58,   // power
-    SOUND_STEPh     = 59,   // hard
-    SOUND_STEPm     = 60,   // metal
-    SOUND_POWERON       = 61,
-    SOUND_POWEROFF      = 62,
-    SOUND_AIE       = 63,
-    SOUND_WAYPOINT      = 64,
-    SOUND_RECOVER       = 65,
-    SOUND_DEADi     = 66,
-    SOUND_JOSTLE        = 67,
-    SOUND_GFLAT     = 68,
-    SOUND_DEADg     = 69,   // shooting death
-    SOUND_DEADw     = 70,   // drowning
-    SOUND_FLYf      = 71,   // reactor fail
-    SOUND_ALARMt        = 72,   // temperature alarm
-    SOUND_FINDING       = 73,   // finds a cache object
-    SOUND_THUMP     = 74,
-    SOUND_TOUCH     = 75,
-    SOUND_BLITZ     = 76,
-    SOUND_MUSHROOM      = 77,
-    SOUND_FIREp     = 78,   // shooting with phazer
-    SOUND_EXPLOg1       = 79,   // impact gun 1
-    SOUND_EXPLOg2       = 80,   // impact gun 2
-    SOUND_MOTORd        = 81,   // engine friction
-};
-
-enum SoundNext
-{
-    SOPER_CONTINUE  = 1,
-    SOPER_STOP      = 2,
-    SOPER_LOOP      = 3,
-};
-
-struct SoundOper
-{
-    char        bUsed;
-    float       finalAmplitude;
-    float       finalFrequency;
-    float       totalTime;
-    float       currentTime;
-    SoundNext   nextOper;
-};
-
-struct SoundChannel
-{
-    char                    bUsed;          // buffer used?
-    char                    bMute;          // silence?
-    Sound                   type;           // SOUND_*
-    int                 priority;       // so great -> important
-    Math::Vector                pos;            // position in space
-    unsigned short              uniqueStamp;        // unique marker
-    LPDIRECTSOUNDBUFFER         soundBuffer;
-    LPDIRECTSOUND3DBUFFER           soundBuffer3D;
-    float                   startAmplitude;
-    float                   startFrequency;
-    float                   changeFrequency;
-    int                 initFrequency;
-    float                   volume;         // 2D: volume 1..0 depending on position
-    float                   pan;            // 2D: pan -1..+1 depending on position
-    SoundOper               oper[MAXOPER];
-};
-
-
-
-class CSound
-{
-public:
-    CSound(CInstanceManager* iMan);
-    ~CSound();
-
-    void    SetDebugMode(bool bMode);
-    bool    Create(HWND hWnd, bool b3D);
-    void    CacheAll();
-
-    void    SetState(bool bState);
-    bool    RetEnable();
-
-    void    SetCDpath(char *path);
-    void    SetAudioTrack(bool bAudio);
-
-    void    SetSound3D(bool bMode);
-    bool    RetSound3D();
-    bool    RetSound3DCap();
-
-    void    SetAudioVolume(int volume);
-    int     RetAudioVolume();
-    void    SetMidiVolume(int volume);
-    int     RetMidiVolume();
-
-    void    SetListener(Math::Vector eye, Math::Vector lookat);
-    void    FrameMove(float rTime);
-
-    int     Play(Sound sound, float amplitude=1.0f, float frequency=1.0f, bool bLoop=false);
-    int     Play(Sound sound, Math::Vector pos, float amplitude=1.0f, float frequency=1.0f, bool bLoop=false);
-    bool    FlushEnvelope(int channel);
-    bool    AddEnvelope(int channel, float amplitude, float frequency, float time, SoundNext oper);
-    bool    Position(int channel, Math::Vector pos);
-    bool    Frequency(int channel, float frequency);
-    bool    Stop(int channel);
-    bool    StopAll();
-    bool    MuteAll(bool bMute);
-
-    bool    PlayMusic(int rank, bool bRepeat);
-    bool    RestartMusic();
-    void    SuspendMusic();
-    void    StopMusic();
-    bool    IsPlayingMusic();
-    void    AdaptVolumeMusic();
-
-protected:
-    bool    CheckChannel(int &channel);
-    bool    CreateSoundBuffer(int channel, DWORD size, DWORD freq, DWORD bitsPerSample, DWORD blkAlign, bool bStereo);
-    bool    ReadData(LPDIRECTSOUNDBUFFER lpDSB, Sound sound, DWORD size);
-    bool    CreateBuffer(int channel, Sound sound);
-    void    ComputeVolumePan2D(int channel, const Math::Vector &pos);
-    bool    ReadFile(Sound sound, char *metaname, char *filename);
-    int     RetPriority(Sound sound);
-    bool    SearchFreeBuffer(Sound sound, int &channel, bool &bAlreadyLoaded);
-    void    OperNext(int channel);
-    bool    PlayAudioTrack(int rank);
-
-protected:
-    CInstanceManager*       m_iMan;
-
-    HWND                    m_hWnd;
-    bool                    m_bEnable;
-    bool                    m_bState;
-    bool                    m_bAudioTrack;
-    bool                    m_ctrl3D;
-    bool                    m_bDebugMode;
-    LPDIRECTSOUND           m_lpDS;
-    LPDIRECTSOUND3DLISTENER m_listener;
-    SoundChannel            m_channel[MAXSOUND];
-    char*                   m_files[MAXFILES];
-    UINT                    m_MidiDeviceID;
-    int                     m_MIDIMusic;
-    bool                    m_bRepeatMusic;
-    int                     m_audioVolume;
-    int                     m_midiVolume;
-    int                     m_lastMidiVolume;
-    Math::Vector                m_eye;
-    Math::Vector                m_lookat;
-    float                   m_lastTime;
-    float                   m_playTime;
-    int                     m_uniqueStamp;
-    int                     m_maxSound;
-    char                    m_CDpath[100];
-};
-
-
diff --git a/src/old/t.txt b/src/old/t.txt
deleted file mode 100644
index 9dd81fb..0000000
--- a/src/old/t.txt
+++ /dev/null
@@ -1,11 +0,0 @@
-extern void object::Go()

-{

-//float a = energyLevel;

-//message(a);

-

-//object item=energyCell;

-//float i = item.energyLevel;

-//message(i);

-float i = energyCell.energyLevel;

-

-}

diff --git a/src/old/terrain.cpp b/src/old/terrain.cpp
deleted file mode 100644
index 9804261..0000000
--- a/src/old/terrain.cpp
+++ /dev/null
@@ -1,2270 +0,0 @@
-// * 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/.
-
-// terrain.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/const.h"
-#include "math/geometry.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "old/d3dutil.h"
-#include "common/language.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/modfile.h"
-#include "old/water.h"
-#include "old/terrain.h"
-
-
-const int BMPHEAD = 1078;
-
-
-
-// Constructor of the terrain.
-
-CTerrain::CTerrain(CInstanceManager* iMan)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_TERRAIN, this);
-
-    m_engine = (CD3DEngine*)m_iMan->SearchInstance(CLASS_ENGINE);
-    m_water  = (CWater*)m_iMan->SearchInstance(CLASS_WATER);
-
-    m_mosaic        = 20;
-    m_brick         = 1<<4;
-    m_size          = 10.0f;
-    m_vision        = 200.0f;
-    m_relief        = 0;
-    m_texture       = 0;
-    m_objRank       = 0;
-    m_scaleMapping  = 0.01f;
-    m_scaleRelief   = 1.0f;
-    m_subdivMapping = 1;
-    m_depth         = 2;
-    m_texBaseName[0]= 0;
-    m_texBaseExt[0] = 0;
-    m_bMultiText    = true;
-    m_bLevelText    = false;
-    m_resources     = 0;
-    m_levelMatTotal = 0;
-    m_levelMatMax   = 0;
-    m_levelDot      = 0;
-    m_wind          = Math::Vector(0.0f, 0.0f, 0.0f);
-    m_defHardness   = 0.5f;
-
-    FlushBuildingLevel();
-    FlushFlyingLimit();
-}
-
-// Destructor of the terrain.
-
-CTerrain::~CTerrain()
-{
-    free(m_relief);
-    free(m_texture);
-    free(m_objRank);
-    free(m_resources);
-}
-
-
-// Generates a new flat terrain.
-// The terrain is composed of mosaics, themselves composed of bricks.
-// Each brick is composed of two triangles.
-// mosaic:       number of mosaics along the axes X and Z
-// brick:        number of bricks (power of 2)
-// size:         size of a brick along the axes X and Z
-// vision:       vision before a change of resolution
-// scaleMapping: scale textures for mapping
-//
-//              ^ z
-//          |   <--->  brick*size
-//  +---+---+---+---+
-//  |   |   |   |_|_|  mosaic = 4
-//  |   |   |   | | |  brick  = 2 (brickP2=1)
-//  +---+---+---+---+
-//  |\ \|   |   |   |
-//  |\ \|   |   |   |
-//  +---+---o---+---+---> x
-//  |   |   |   |   |
-//  |   |   |   |   |
-//  +---+---+---+---+
-//  |   |   |   |   |  The land is viewed from above here.
-//  |   |   |   |   |
-//  +---+---+---+---+
-//      <--------------->  mosaic*brick*size
-
-bool CTerrain::Generate(int mosaic, int brickP2, float size, float vision,
-                        int depth, float hardness)
-{
-    int     dim;
-
-    m_mosaic        = mosaic;
-    m_brick         = 1<<brickP2;
-    m_size          = size;
-    m_vision        = vision;
-    m_depth         = depth;
-    m_defHardness   = hardness;
-
-    m_engine->SetTerrainVision(vision);
-
-    m_bMultiText    = true;
-    m_bLevelText    = false;
-    m_scaleMapping  = 1.0f/(m_brick*m_size);
-    m_subdivMapping = 1;
-
-    dim = (m_mosaic*m_brick+1)*(m_mosaic*m_brick+1);
-    m_relief = (float*)malloc(sizeof(float)*dim);
-    ZeroMemory(m_relief, sizeof(float)*dim);
-
-    dim = m_mosaic*m_subdivMapping*m_mosaic*m_subdivMapping;
-    m_texture = (int*)malloc(sizeof(int)*dim);
-    ZeroMemory(m_texture, sizeof(int)*dim);
-
-    dim = m_mosaic*m_mosaic;
-    m_objRank = (int*)malloc(sizeof(int)*dim);
-    ZeroMemory(m_objRank, sizeof(int)*dim);
-
-    return true;
-}
-
-
-int CTerrain::RetMosaic()
-{
-    return m_mosaic;
-}
-
-int CTerrain::RetBrick()
-{
-    return m_brick;
-}
-
-float CTerrain::RetSize()
-{
-    return m_size;
-}
-
-float CTerrain::RetScaleRelief()
-{
-    return m_scaleRelief;
-}
-
-
-// Initializes the names of textures to use for the land.
-
-bool CTerrain::InitTextures(char* baseName, int* table, int dx, int dy)
-{
-    int     x, y;
-    char*   p;
-
-    m_bLevelText = false;
-
-    strcpy(m_texBaseName, baseName);
-    p = strchr(m_texBaseName, '.');  // p <- ^beginning of the extension
-    if ( p == 0 )
-    {
-        strcpy(m_texBaseExt, ".tga");
-    }
-    else
-    {
-        strcpy(m_texBaseExt, p);  // m_texBaseExt <- ".tga" or ".bmp"
-        *p = 0;                   // m_texBaseName <- name without extension
-    }
-
-    for ( y=0 ; y<m_mosaic*m_subdivMapping ; y++ )
-    {
-        for ( x=0 ; x<m_mosaic*m_subdivMapping ; x++ )
-        {
-            m_texture[x+y*m_mosaic] = table[(x%dx)+(y%dy)*dx];
-        }
-    }
-    return true;
-}
-
-
-// Empties level.
-
-void CTerrain::LevelFlush()
-{
-    m_levelMatTotal = 0;
-    m_levelMatMax   = 0;
-    m_levelID       = 1000;
-    LevelCloseTable();
-}
-
-// Initializes the names of textures to use for the land.
-
-bool CTerrain::LevelMaterial(int id, char* baseName, float u, float v,
-                             int up, int right, int down, int left,
-                             float hardness)
-{
-    int     i;
-
-    i = m_levelMatTotal;
-    if ( i >= MAXMATTERRAIN-1 )  return false;
-
-    LevelOpenTable();
-
-    if ( id == 0 )
-    {
-        id = m_levelID++;  // puts an ID internal standard
-    }
-
-    strcpy(m_levelMat[i].texName, baseName);
-    m_levelMat[i].id     = id;
-    m_levelMat[i].u      = u;
-    m_levelMat[i].v      = v;
-    m_levelMat[i].mat[0] = up;
-    m_levelMat[i].mat[1] = right;
-    m_levelMat[i].mat[2] = down;
-    m_levelMat[i].mat[3] = left;
-    m_levelMat[i].hardness = hardness;
-
-    if ( m_levelMatMax < up+1    )  m_levelMatMax = up+1;
-    if ( m_levelMatMax < right+1 )  m_levelMatMax = right+1;
-    if ( m_levelMatMax < down+1  )  m_levelMatMax = down+1;
-    if ( m_levelMatMax < left+1  )  m_levelMatMax = left+1;
-
-    m_bLevelText = true;
-    m_subdivMapping = 4;
-
-    m_levelMatTotal ++;
-    return true;
-}
-
-
-// Load relief from a BMP file.
-// The size of the image must be dimension dx and dy with dx=dy=(mosaic*brick)+1.
-// The image must be 8 bits/pixel, 256 colors with a standard pallet.
-
-// Converts coordinated image (x;y) -> world (x;-;z) :
-//  Wx =   5*Ix-400
-//  Wz = -(5*Iy-400)
-
-// Converts coordinated world (x;-;z) -> image (x;y) :
-//  Ix = (400+Wx)/5
-//  Iy = (400-Wz)/5
-
-bool CTerrain::ResFromBMP(const char* filename)
-{
-    FILE*           file;
-    int             size, sizem;
-
-    file = fopen(filename, "rb");
-    if ( file == NULL )  return false;
-
-    size  = (m_mosaic*m_brick)+1;
-    sizem = ((size+4-1)/4)*4;  // upper size multiple of 4
-
-    if ( m_resources != 0 )
-    {
-        free(m_resources);
-    }
-
-    m_resources = (unsigned char*)malloc(BMPHEAD+sizem*size);
-    fread(m_resources, BMPHEAD+sizem*size, 1, file);
-
-    if ( m_resources[18] != (size&0xff) || m_resources[19] != (size>>8) ||
-         m_resources[22] != (size&0xff) || m_resources[23] != (size>>8) )
-    {
-        free(m_resources);
-        m_resources = 0;
-        fclose(file);
-        return false;
-    }
-
-    fclose(file);
-    return true;
-}
-
-// Returns the resource type available underground.
-
-TerrainRes CTerrain::RetResource(const Math::Vector &p)
-{
-    int     x, y, size, sizem, ress;
-
-    if ( m_resources == 0 )  return TR_NULL;
-
-    x = (int)((p.x + (m_mosaic*m_brick*m_size)/2.0f)/m_size);
-    y = (int)((p.z + (m_mosaic*m_brick*m_size)/2.0f)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return TR_NULL;
-
-    size  = (m_mosaic*m_brick)+1;
-    sizem = ((size+4-1)/4)*4;  // upper size multiple of 4
-
-    ress = m_resources[BMPHEAD+x+sizem*y];
-    if ( ress ==  5 )  return TR_STONE;    // red?
-    if ( ress == 35 )  return TR_URANIUM;  // yellow?
-    if ( ress == 30 )  return TR_POWER;    // green?
-    if ( ress == 24 )  return TR_KEYa;     // ~green?
-    if ( ress == 25 )  return TR_KEYb;     // ~green?
-    if ( ress == 26 )  return TR_KEYc;     // ~green?
-    if ( ress == 27 )  return TR_KEYd;     // ~green?
-
-    return TR_NULL;
-}
-
-
-// Initializes a completely flat terrain.
-
-void CTerrain::FlushRelief()
-{
-    free(m_relief);
-    m_relief = 0;
-}
-
-// Load relief from a BMP file.
-// The size of the image must be dimension dx and dy with dx=dy=(mosaic*brick)+1.
-// The image must be 8 bits/pixel, 256 gray scale:
-// white = ground (y=0)
-// black = mountain (y=255*scaleRelief)
-
-// Converts coordinated image(x;y) -> world (x;-;z) :
-//  Wx =   5*Ix-400
-//  Wz = -(5*Iy-400)
-
-// Converts coordinated world (x;-;z) -> image (x;y) :
-//  Ix = (400+Wx)/5
-//  Iy = (400-Wz)/5
-
-bool CTerrain::ReliefFromBMP(const char* filename, float scaleRelief,
-                             bool adjustBorder)
-{
-    FILE*           file;
-    unsigned char*  buffer;
-    int             size, sizem, x, y;
-    float           level, limit, dist, border;
-
-    m_scaleRelief = scaleRelief;
-
-    file = fopen(filename, "rb");
-    if ( file == NULL )  return false;
-
-    size  = (m_mosaic*m_brick)+1;
-    sizem = ((size+4-1)/4)*4;  // upper size multiple of 4
-
-    buffer = (unsigned char*)malloc(BMPHEAD+sizem*size);
-    fread(buffer, BMPHEAD+sizem*size, 1, file);
-
-    if ( buffer[18] != (size&0xff) || buffer[19] != (size>>8) ||
-         buffer[22] != (size&0xff) || buffer[23] != (size>>8) )
-    {
-        free(buffer);
-        fclose(file);
-        return false;
-    }
-
-    limit = 0.9f;
-    for ( y=0 ; y<size ; y++ )
-    {
-        for ( x=0 ; x<size ; x++ )
-        {
-            level = (255-buffer[BMPHEAD+x+sizem*y])*scaleRelief;
-
-//?         dist = Length((float)(x-size/2), (float)(y-size/2));
-            dist = Math::Max(fabs((float)(x-size/2)), fabs((float)(y-size/2)));
-            dist = dist/(float)(size/2);
-            if ( dist > limit && adjustBorder )
-            {
-                dist = (dist-limit)/(1.0f-limit);  // 0..1
-                if ( dist > 1.0f )  dist = 1.0f;
-                border = 300.0f+Math::Rand()*20.0f;
-                level = level+dist*(border-level);
-            }
-
-            m_relief[x+y*size] = level;
-        }
-    }
-
-    free(buffer);
-    fclose(file);
-    return true;
-}
-
-// Adds a point of elevation in the buffer of relief.
-
-bool CTerrain::ReliefAddDot(Math::Vector pos, float scaleRelief)
-{
-    float   dim;
-    int     size, x, y;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-    size = (m_mosaic*m_brick)+1;
-
-    pos.x = (pos.x+dim)/m_size;
-    pos.z = (pos.z+dim)/m_size;
-
-    x = (int)pos.x;
-    y = (int)pos.z;
-
-    if ( x < 0 || x >= size ||
-         y < 0 || y >= size )  return false;
-
-    if ( m_relief[x+y*size] < pos.y*scaleRelief )
-    {
-        m_relief[x+y*size] = pos.y*scaleRelief;
-    }
-    return true;
-}
-
-// Load relief from a DXF file.
-
-bool CTerrain::ReliefFromDXF(const char* filename, float scaleRelief)
-{
-    FILE*       file = NULL;
-    char        line[100];
-    int         command, rankSommet, nbSommet, nbFace, size;
-    Math::Vector*   table;
-    bool        bWaitNbSommet;
-    bool        bWaitNbFace;
-    bool        bWaitSommetX;
-    bool        bWaitSommetY;
-    bool        bWaitSommetZ;
-    bool        bWaitFaceX;
-    bool        bWaitFaceY;
-    bool        bWaitFaceZ;
-    float       x,y,z;
-    int         p1,p2,p3;
-
-    ZeroMemory(m_relief, sizeof(float)*(m_mosaic*m_brick+1)*(m_mosaic*m_brick+1));
-
-    file = fopen(filename, "r");
-    if ( file == NULL )  return false;
-
-    size  = (m_mosaic*m_brick)+1;
-    table = (Math::Vector*)malloc(sizeof(Math::Vector)*size*size);
-
-    rankSommet = 0;
-    bWaitNbSommet = false;
-    bWaitNbFace   = false;
-    bWaitSommetX  = false;
-    bWaitSommetY  = false;
-    bWaitSommetZ  = false;
-    bWaitFaceX    = false;
-    bWaitFaceY    = false;
-    bWaitFaceZ    = false;
-
-    while ( fgets(line, 100, file) != NULL )
-    {
-        sscanf(line, "%d", &command);
-        if ( fgets(line, 100, file) == NULL )  break;
-
-        if ( command == 66 )
-        {
-            bWaitNbSommet = true;
-        }
-
-        if ( command == 71 && bWaitNbSommet )
-        {
-            bWaitNbSommet = false;
-            sscanf(line, "%d", &nbSommet);
-            if ( nbSommet > size*size )  nbSommet = size*size;
-            rankSommet = 0;
-            bWaitNbFace = true;
-        }
-
-        if ( command == 72 && bWaitNbFace )
-        {
-            bWaitNbFace = false;
-            sscanf(line, "%d", &nbFace);
-            bWaitSommetX = true;
-        }
-
-        if ( command == 10 && bWaitSommetX )
-        {
-            bWaitSommetX = false;
-            sscanf(line, "%f", &x);
-            bWaitSommetY = true;
-        }
-
-        if ( command == 20 && bWaitSommetY )
-        {
-            bWaitSommetY = false;
-            sscanf(line, "%f", &y);
-            bWaitSommetZ = true;
-        }
-
-        if ( command == 30 && bWaitSommetZ )
-        {
-            bWaitSommetZ = false;
-            sscanf(line, "%f", &z);
-
-            nbSommet --;
-            if ( nbSommet >= 0 )
-            {
-                Math::Vector p(x,z,y);  // permutation of Y and Z!
-                table[rankSommet++] = p;
-                bWaitSommetX = true;
-            }
-            else
-            {
-                bWaitFaceX = true;
-            }
-        }
-
-        if ( command == 71 && bWaitFaceX )
-        {
-            bWaitFaceX = false;
-            sscanf(line, "%d", &p1);
-            if ( p1 < 0 )  p1 = -p1;
-            bWaitFaceY = true;
-        }
-
-        if ( command == 72 && bWaitFaceY )
-        {
-            bWaitFaceY = false;
-            sscanf(line, "%d", &p2);
-            if ( p2 < 0 )  p2 = -p2;
-            bWaitFaceZ = true;
-        }
-
-        if ( command == 73 && bWaitFaceZ )
-        {
-            bWaitFaceZ = false;
-            sscanf(line, "%d", &p3);
-            if ( p3 < 0 )  p3 = -p3;
-
-            nbFace --;
-            if ( nbFace >= 0 )
-            {
-                ReliefAddDot(table[p3-1], scaleRelief);
-                ReliefAddDot(table[p2-1], scaleRelief);
-                ReliefAddDot(table[p1-1], scaleRelief);
-                bWaitFaceX = true;
-            }
-        }
-
-    }
-
-    free(table);
-    fclose(file);
-    return true;
-}
-
-
-// Adjusts a position so that it does not exceed the boundaries.
-
-void CTerrain::LimitPos(Math::Vector &pos)
-{
-    float       dim;
-
-#if _TEEN
-    dim = (m_mosaic*m_brick*m_size)/2.0f*0.98f;
-#else
-    dim = (m_mosaic*m_brick*m_size)/2.0f*0.92f;
-#endif
-
-    if ( pos.x < -dim )  pos.x = -dim;
-    if ( pos.x >  dim )  pos.x =  dim;
-    if ( pos.z < -dim )  pos.z = -dim;
-    if ( pos.z >  dim )  pos.z =  dim;
-}
-
-
-// Adjust the edges of each mosaic to be compatible with all lower resolutions.
-
-void CTerrain::AdjustRelief()
-{
-    int     x, y, xx, yy, ii, b;
-    float   level1, level2;
-
-    if ( m_depth == 1 )  return;
-
-    ii = m_mosaic*m_brick+1;
-    b = 1<<(m_depth-1);
-
-    for ( y=0 ; y<m_mosaic*m_brick ; y+=b )
-    {
-        for ( x=0 ; x<m_mosaic*m_brick ; x+=b )
-        {
-            yy = 0;
-            if ( (y+yy)%m_brick == 0 )
-            {
-                level1 = m_relief[(x+0)+(y+yy)*ii];
-                level2 = m_relief[(x+b)+(y+yy)*ii];
-                for ( xx=1 ; xx<b ; xx++ )
-                {
-                    m_relief[(x+xx)+(y+yy)*ii] = ((level2-level1)/b)*xx+level1;
-                }
-            }
-
-            yy = b;
-            if ( (y+yy)%m_brick == 0 )
-            {
-                level1 = m_relief[(x+0)+(y+yy)*ii];
-                level2 = m_relief[(x+b)+(y+yy)*ii];
-                for ( xx=1 ; xx<b ; xx++ )
-                {
-                    m_relief[(x+xx)+(y+yy)*ii] = ((level2-level1)/b)*xx+level1;
-                }
-            }
-
-            xx = 0;
-            if ( (x+xx)%m_brick == 0 )
-            {
-                level1 = m_relief[(x+xx)+(y+0)*ii];
-                level2 = m_relief[(x+xx)+(y+b)*ii];
-                for ( yy=1 ; yy<b ; yy++ )
-                {
-                    m_relief[(x+xx)+(y+yy)*ii] = ((level2-level1)/b)*yy+level1;
-                }
-            }
-
-            xx = b;
-            if ( (x+xx)%m_brick == 0 )
-            {
-                level1 = m_relief[(x+xx)+(y+0)*ii];
-                level2 = m_relief[(x+xx)+(y+b)*ii];
-                for ( yy=1 ; yy<b ; yy++ )
-                {
-                    m_relief[(x+xx)+(y+yy)*ii] = ((level2-level1)/b)*yy+level1;
-                }
-            }
-        }
-    }
-}
-
-
-// Calculates a vector of the terrain.
-
-Math::Vector CTerrain::RetVector(int x, int y)
-{
-    Math::Vector    p;
-
-    p.x = x*m_size - (m_mosaic*m_brick*m_size)/2;
-    p.z = y*m_size - (m_mosaic*m_brick*m_size)/2;
-
-    if ( m_relief != 0                   &&
-         x >= 0 && x <= m_mosaic*m_brick &&
-         y >= 0 && y <= m_mosaic*m_brick )
-    {
-        p.y = m_relief[x+y*(m_mosaic*m_brick+1)];
-    }
-    else
-    {
-        p.y = 0.0f;
-    }
-
-    return p;
-}
-
-// Calculates a vertex of the terrain.
-// Calculates a normal soft, taking into account the six adjacent triangles:
-//
-//  ^ y
-//  |
-//  b---c---+
-//  |\  |\  |
-//  |  \|  \|
-//  a---o---d
-//  |\  |\  |
-//  |  \|  \|
-//  +---f---e--> x
-
-D3DVERTEX2 CTerrain::RetVertex(int x, int y, int step)
-{
-    D3DVERTEX2  v;
-    Math::Vector    o, oo, a,b,c,d,e,f, n, s;
-    int         brick;
-
-    o = RetVector(x, y);
-    v.x = o.x;
-    v.y = o.y;
-    v.z = o.z;
-
-    a = RetVector(x-step, y     );
-    b = RetVector(x-step, y+step);
-    c = RetVector(x,      y+step);
-    d = RetVector(x+step, y     );
-    e = RetVector(x+step, y-step);
-    f = RetVector(x,      y-step);
-
-    s = Math::Vector(0.0f, 0.0f, 0.0f);
-
-    if ( x-step >= 0 && y+step <= m_mosaic*m_brick+1 )
-    {
-        s += Math::NormalToPlane(b,a,o);
-        s += Math::NormalToPlane(c,b,o);
-    }
-
-    if ( x+step <= m_mosaic*m_brick+1 && y+step <= m_mosaic*m_brick+1 )
-    {
-        s += Math::NormalToPlane(d,c,o);
-    }
-
-    if ( x+step <= m_mosaic*m_brick+1 && y-step >= 0 )
-    {
-        s += Math::NormalToPlane(e,d,o);
-        s += Math::NormalToPlane(f,e,o);
-    }
-
-    if ( x-step >= 0 && y-step >= 0 )
-    {
-        s += Math::NormalToPlane(a,f,o);
-    }
-
-    s = Normalize(s);
-    v.nx = s.x;
-    v.ny = s.y;
-    v.nz = s.z;
-
-    if ( m_bMultiText )
-    {
-        brick = m_brick/m_subdivMapping;
-        oo = RetVector((x/brick)*brick, (y/brick)*brick);
-        o  = RetVector(x, y);
-        v.tu =        (o.x-oo.x)*m_scaleMapping*m_subdivMapping;
-        v.tv = 1.0f - (o.z-oo.z)*m_scaleMapping*m_subdivMapping;
-    }
-    else
-    {
-        v.tu = o.x*m_scaleMapping;
-        v.tv = o.z*m_scaleMapping;
-    }
-
-    return v;
-}
-
-// Creates all objects of a mosaic.
-// The origin of mosaic is his center.
-//
-//  ^ z
-//  |
-//  |  2---4---6--
-//  |  |\  |\  |\
-//  |  |  \|  \|
-//  |  1---3---5--- ...
-//  |
-//  +-------------------> x
-
-bool CTerrain::CreateMosaic(int ox, int oy, int step, int objRank,
-                            const D3DMATERIAL7 &mat,
-                            float min, float max)
-{
-    Math::Matrix        transform;
-    D3DVERTEX2      o, p1, p2;
-    D3DObjLevel6*   buffer;
-    Math::Point         uv;
-    int             brick, total, size, mx, my, x, y, xx, yy, i;
-    char            texName1[20];
-    char            texName2[20];
-    float           pixel, dp;
-
-    if ( step == 1 && m_engine->RetGroundSpot() )
-    {
-        i = (ox/5) + (oy/5)*(m_mosaic/5);
-        sprintf(texName2, "shadow%.2d.tga", i);
-    }
-    else
-    {
-        texName2[0] = 0;
-    }
-
-    brick = m_brick/m_subdivMapping;
-
-    o = RetVertex(ox*m_brick+m_brick/2, oy*m_brick+m_brick/2, step);
-    total = ((brick/step)+1)*2;
-    size = sizeof(D3DObjLevel6)+sizeof(D3DVERTEX2)*(total-1);
-
-    pixel = 1.0f/256.0f;  // 1 pixel cover (*)
-//? dp = 0.5f/512.0f;
-    dp = 1.0f/512.0f;
-
-    for ( my=0 ; my<m_subdivMapping ; my++ )
-    {
-        for ( mx=0 ; mx<m_subdivMapping ; mx++ )
-        {
-            if ( m_bLevelText )
-            {
-                xx = ox*m_brick + mx*(m_brick/m_subdivMapping);
-                yy = oy*m_brick + my*(m_brick/m_subdivMapping);
-                LevelTextureName(xx, yy, texName1, uv);
-            }
-            else
-            {
-                i = (ox*m_subdivMapping+mx)+(oy*m_subdivMapping+my)*m_mosaic;
-                sprintf(texName1, "%s%.3d%s", m_texBaseName, m_texture[i], m_texBaseExt);
-            }
-
-            for ( y=0 ; y<brick ; y+=step )
-            {
-                buffer = (D3DObjLevel6*)malloc(size);
-                ZeroMemory(buffer, sizeof(D3DObjLevel6));
-                buffer->totalPossible = total;
-                buffer->totalUsed = total;
-                buffer->type     = D3DTYPE6S;
-                buffer->material = mat;
-                if ( m_bMultiText )
-                {
-//?                 buffer->state = D3DSTATENORMAL;
-                    buffer->state = D3DSTATEWRAP;
-                }
-                else
-                {
-                    buffer->state = D3DSTATEWRAP;
-                }
-                buffer->state |= D3DSTATESECOND;
-                if ( step == 1 )
-                {
-                    buffer->state |= D3DSTATEDUALb;
-                }
-                i = 0;
-                for ( x=0 ; x<=brick ; x+=step )
-                {
-                    p1 = RetVertex(ox*m_brick+mx*brick+x, oy*m_brick+my*brick+y+0   , step);
-                    p2 = RetVertex(ox*m_brick+mx*brick+x, oy*m_brick+my*brick+y+step, step);
-                    p1.x -= o.x;  p1.z -= o.z;
-                    p2.x -= o.x;  p2.z -= o.z;
-
-                    if ( m_bMultiText )
-                    {
-                        if ( x == 0 )
-                        {
-                            p1.tu = 0.0f+(0.5f/256.0f);
-                            p2.tu = 0.0f+(0.5f/256.0f);
-                        }
-                        if ( x == brick )
-                        {
-                            p1.tu = 1.0f-(0.5f/256.0f);
-                            p2.tu = 1.0f-(0.5f/256.0f);
-                        }
-                        if ( y == 0 )
-                        {
-                            p1.tv = 1.0f-(0.5f/256.0f);
-                        }
-                        if ( y == brick-step )
-                        {
-                            p2.tv = 0.0f+(0.5f/256.0f);
-                        }
-                    }
-
-                    if ( m_bLevelText )
-                    {
-                        p1.tu /= m_subdivMapping;  // 0..1 -> 0..0.25
-                        p1.tv /= m_subdivMapping;
-                        p2.tu /= m_subdivMapping;
-                        p2.tv /= m_subdivMapping;
-
-                        if ( x == 0 )
-                        {
-                            p1.tu = 0.0f+dp;
-                            p2.tu = 0.0f+dp;
-                        }
-                        if ( x == brick )
-                        {
-                            p1.tu = (1.0f/m_subdivMapping)-dp;
-                            p2.tu = (1.0f/m_subdivMapping)-dp;
-                        }
-                        if ( y == 0 )
-                        {
-                            p1.tv = (1.0f/m_subdivMapping)-dp;
-                        }
-                        if ( y == brick-step )
-                        {
-                            p2.tv = 0.0f+dp;
-                        }
-
-                        p1.tu += uv.x;
-                        p1.tv += uv.y;
-                        p2.tu += uv.x;
-                        p2.tv += uv.y;
-                    }
-
-#if 1
-                    xx = mx*(m_brick/m_subdivMapping) + x;
-                    yy = my*(m_brick/m_subdivMapping) + y;
-                    p1.tu2 = ((float)(ox%5)*m_brick+xx+0.0f)/(m_brick*5);
-                    p1.tv2 = ((float)(oy%5)*m_brick+yy+0.0f)/(m_brick*5);
-                    p2.tu2 = ((float)(ox%5)*m_brick+xx+0.0f)/(m_brick*5);
-                    p2.tv2 = ((float)(oy%5)*m_brick+yy+1.0f)/(m_brick*5);
-
-                    // Correction for 1 pixel cover (*).
-                    p1.tu2 = (p1.tu2+pixel)*(1.0f-pixel)/(1.0f+pixel);
-                    p1.tv2 = (p1.tv2+pixel)*(1.0f-pixel)/(1.0f+pixel);
-                    p2.tu2 = (p2.tu2+pixel)*(1.0f-pixel)/(1.0f+pixel);
-                    p2.tv2 = (p2.tv2+pixel)*(1.0f-pixel)/(1.0f+pixel);
-#endif
-
-                    buffer->vertex[i++] = p1;
-                    buffer->vertex[i++] = p2;
-                }
-                m_engine->AddQuick(objRank, buffer, texName1, texName2, min, max, true);
-            }
-        }
-    }
-
-    transform.LoadIdentity();
-    transform.Set(1, 4, o.x);
-    transform.Set(3, 4, o.z);
-    m_engine->SetObjectTransform(objRank, transform);
-
-    return true;
-}
-
-// (*) There is 1 pixel cover around each of the 16 surfaces:
-//
-//  |<--------------256-------------->|
-//  |   |<----------254---------->|   |
-//  |---|---|---|-- ... --|---|---|---|
-//    |  0.0                   1.0  |
-//    |   |                     |   |
-//   0.0 min                   max 1.0
-//
-// The uv coordinates used for texturing are between min and max (instead of 0 and 1).
-// This allows to exclude the pixels situated in a margin of a pixel around the surface.
-
-
-// Seeks a materials based on theirs identifier.
-
-TerrainMaterial* CTerrain::LevelSearchMat(int id)
-{
-    int     i;
-
-    for ( i=0 ; i<m_levelMatTotal ; i++ )
-    {
-        if ( id == m_levelMat[i].id )
-        {
-            return &m_levelMat[i];
-        }
-    }
-
-    return 0;
-}
-
-// Chooses texture to use for a given square.
-
-void CTerrain::LevelTextureName(int x, int y, char *name, Math::Point &uv)
-{
-    TerrainMaterial*    tm;
-
-    x /= m_brick/m_subdivMapping;
-    y /= m_brick/m_subdivMapping;
-
-    tm = LevelSearchMat(m_levelDot[x+y*m_levelDotSize].id);
-    if ( tm == 0 )
-    {
-        strcpy(name, "xxx.tga");
-        uv.x = 0.0f;
-        uv.y = 0.0f;
-    }
-    else
-    {
-//?     sprintf(name, "%s.tga", tm->texName);
-        strcpy(name, tm->texName);
-        uv.x = tm->u;
-        uv.y = tm->v;
-    }
-}
-
-// Returns the height of the terrain.
-
-float CTerrain::LevelRetHeight(int x, int y)
-{
-    int     size;
-
-    size = (m_mosaic*m_brick+1);
-
-    if ( x <  0    )  x = 0;
-    if ( x >= size )  x = size-1;
-    if ( y <  0    )  y = 0;
-    if ( y >= size )  y = size-1;
-
-    return m_relief[x+y*size];
-}
-
-// Decide whether a point is using the materials.
-
-bool CTerrain::LevelGetDot(int x, int y, float min, float max, float slope)
-{
-    float   hc, h[4];
-    int     i;
-
-    hc   = LevelRetHeight(x, y);
-    h[0] = LevelRetHeight(x+0, y+1);
-    h[1] = LevelRetHeight(x+1, y+0);
-    h[2] = LevelRetHeight(x+0, y-1);
-    h[3] = LevelRetHeight(x-1, y+0);
-
-    if ( hc < min ||
-         hc > max )  return false;
-
-    if ( slope == 0.0f )
-    {
-        return true;
-    }
-
-    if ( slope > 0.0f )
-    {
-        for ( i=0 ; i<4 ; i++ )
-        {
-            if ( fabs(hc-h[i]) >= slope )
-            {
-                return false;
-            }
-        }
-        return true;
-    }
-
-    if ( slope < 0.0f )
-    {
-        for ( i=0 ; i<4 ; i++ )
-        {
-            if ( fabs(hc-h[i]) < -slope )
-            {
-                return false;
-            }
-        }
-        return true;
-    }
-
-    return false;
-}
-
-// Seeks if material exists.
-// Returns the index within m_levelMat or -1 if there is not.
-// m_levelMat[i].id gives the identifier.
-
-int CTerrain::LevelTestMat(char *mat)
-{
-    int     i;
-
-    for ( i=0 ; i<m_levelMatTotal ; i++ )
-    {
-        if ( m_levelMat[i].mat[0] == mat[0] &&
-             m_levelMat[i].mat[1] == mat[1] &&
-             m_levelMat[i].mat[2] == mat[2] &&
-             m_levelMat[i].mat[3] == mat[3] )  return i;
-    }
-
-    return -1;
-}
-
-// Modifies the state of a point and its four neighbors, without testing if possible.
-
-void CTerrain::LevelSetDot(int x, int y, int id, char *mat)
-{
-    TerrainMaterial*    tm;
-    int                 i, ii;
-
-    tm = LevelSearchMat(id);
-    if ( tm == 0 )  return;
-
-    if ( tm->mat[0] != mat[0] ||
-         tm->mat[1] != mat[1] ||
-         tm->mat[2] != mat[2] ||
-         tm->mat[3] != mat[3] )  // id incompatible with mat?
-    {
-        ii = LevelTestMat(mat);
-        if ( ii == -1 )  return;
-        id = m_levelMat[ii].id;  // looking for a id compatible with mat
-    }
-
-    // Changes the point.
-    m_levelDot[x+y*m_levelDotSize].id     = id;
-    m_levelDot[x+y*m_levelDotSize].mat[0] = mat[0];
-    m_levelDot[x+y*m_levelDotSize].mat[1] = mat[1];
-    m_levelDot[x+y*m_levelDotSize].mat[2] = mat[2];
-    m_levelDot[x+y*m_levelDotSize].mat[3] = mat[3];
-
-    // Changes the lower neighbor.
-    if ( (x+0) >= 0 && (x+0) < m_levelDotSize &&
-         (y-1) >= 0 && (y-1) < m_levelDotSize )
-    {
-        i = (x+0)+(y-1)*m_levelDotSize;
-        if ( m_levelDot[i].mat[0] != mat[2] )
-        {
-            m_levelDot[i].mat[0] = mat[2];
-            ii = LevelTestMat(m_levelDot[i].mat);
-            if ( ii != -1 )
-            {
-                m_levelDot[i].id = m_levelMat[ii].id;
-            }
-        }
-    }
-
-    // Modifies the left neighbor.
-    if ( (x-1) >= 0 && (x-1) < m_levelDotSize &&
-         (y+0) >= 0 && (y+0) < m_levelDotSize )
-    {
-        i = (x-1)+(y+0)*m_levelDotSize;
-        if ( m_levelDot[i].mat[1] != mat[3] )
-        {
-            m_levelDot[i].mat[1] = mat[3];
-            ii = LevelTestMat(m_levelDot[i].mat);
-            if ( ii != -1 )
-            {
-                m_levelDot[i].id = m_levelMat[ii].id;
-            }
-        }
-    }
-
-    // Changes the upper neighbor.
-    if ( (x+0) >= 0 && (x+0) < m_levelDotSize &&
-         (y+1) >= 0 && (y+1) < m_levelDotSize )
-    {
-        i = (x+0)+(y+1)*m_levelDotSize;
-        if ( m_levelDot[i].mat[2] != mat[0] )
-        {
-            m_levelDot[i].mat[2] = mat[0];
-            ii = LevelTestMat(m_levelDot[i].mat);
-            if ( ii != -1 )
-            {
-                m_levelDot[i].id = m_levelMat[ii].id;
-            }
-        }
-    }
-
-    // Changes the right neighbor.
-    if ( (x+1) >= 0 && (x+1) < m_levelDotSize &&
-         (y+0) >= 0 && (y+0) < m_levelDotSize )
-    {
-        i = (x+1)+(y+0)*m_levelDotSize;
-        if ( m_levelDot[i].mat[3] != mat[1] )
-        {
-            m_levelDot[i].mat[3] = mat[1];
-            ii = LevelTestMat(m_levelDot[i].mat);
-            if ( ii != -1 )
-            {
-                m_levelDot[i].id = m_levelMat[ii].id;
-            }
-        }
-    }
-}
-
-// Tests if a material can give a place, according to its four neighbors.
-// If yes, puts the point.
-
-bool CTerrain::LevelIfDot(int x, int y, int id, char *mat)
-{
-    char            test[4];
-
-    // Compatible with lower neighbor?
-    if ( x+0 >= 0 && x+0 < m_levelDotSize &&
-         y-1 >= 0 && y-1 < m_levelDotSize )
-    {
-        test[0] = mat[2];
-        test[1] = m_levelDot[(x+0)+(y-1)*m_levelDotSize].mat[1];
-        test[2] = m_levelDot[(x+0)+(y-1)*m_levelDotSize].mat[2];
-        test[3] = m_levelDot[(x+0)+(y-1)*m_levelDotSize].mat[3];
-
-        if ( LevelTestMat(test) == -1 )  return false;
-    }
-
-    // Compatible with left neighbor?
-    if ( x-1 >= 0 && x-1 < m_levelDotSize &&
-         y+0 >= 0 && y+0 < m_levelDotSize )
-    {
-        test[0] = m_levelDot[(x-1)+(y+0)*m_levelDotSize].mat[0];
-        test[1] = mat[3];
-        test[2] = m_levelDot[(x-1)+(y+0)*m_levelDotSize].mat[2];
-        test[3] = m_levelDot[(x-1)+(y+0)*m_levelDotSize].mat[3];
-
-        if ( LevelTestMat(test) == -1 )  return false;
-    }
-
-    // Compatible with upper neighbor?
-    if ( x+0 >= 0 && x+0 < m_levelDotSize &&
-         y+1 >= 0 && y+1 < m_levelDotSize )
-    {
-        test[0] = m_levelDot[(x+0)+(y+1)*m_levelDotSize].mat[0];
-        test[1] = m_levelDot[(x+0)+(y+1)*m_levelDotSize].mat[1];
-        test[2] = mat[0];
-        test[3] = m_levelDot[(x+0)+(y+1)*m_levelDotSize].mat[3];
-
-        if ( LevelTestMat(test) == -1 )  return false;
-    }
-
-    // Compatible with right neighbor?
-    if ( x+1 >= 0 && x+1 < m_levelDotSize &&
-         y+0 >= 0 && y+0 < m_levelDotSize )
-    {
-        test[0] = m_levelDot[(x+1)+(y+0)*m_levelDotSize].mat[0];
-        test[1] = m_levelDot[(x+1)+(y+0)*m_levelDotSize].mat[1];
-        test[2] = m_levelDot[(x+1)+(y+0)*m_levelDotSize].mat[2];
-        test[3] = mat[1];
-
-        if ( LevelTestMat(test) == -1 )  return false;
-    }
-
-    LevelSetDot(x, y, id, mat);  // puts the point
-    return true;
-}
-
-// Modifies the state of a point.
-
-bool CTerrain::LevelPutDot(int x, int y, int id)
-{
-    TerrainMaterial *tm;
-    char            mat[4];
-    int             up, right, down, left;
-
-    x /= m_brick/m_subdivMapping;
-    y /= m_brick/m_subdivMapping;
-
-    if ( x < 0 || x >= m_levelDotSize ||
-         y < 0 || y >= m_levelDotSize )  return false;
-
-    tm = LevelSearchMat(id);
-    if ( tm == 0 )  return false;
-
-    // Tries without changing neighbors.
-    if ( LevelIfDot(x, y, id, tm->mat) )  return true;
-
-    // Tries changing a single neighbor (4x).
-    for ( up=0 ; up<m_levelMatMax ; up++ )
-    {
-        mat[0] = up;
-        mat[1] = tm->mat[1];
-        mat[2] = tm->mat[2];
-        mat[3] = tm->mat[3];
-
-        if ( LevelIfDot(x, y, id, mat) )  return true;
-    }
-
-    for ( right=0 ; right<m_levelMatMax ; right++ )
-    {
-        mat[0] = tm->mat[0];
-        mat[1] = right;
-        mat[2] = tm->mat[2];
-        mat[3] = tm->mat[3];
-
-        if ( LevelIfDot(x, y, id, mat) )  return true;
-    }
-
-    for ( down=0 ; down<m_levelMatMax ; down++ )
-    {
-        mat[0] = tm->mat[0];
-        mat[1] = tm->mat[1];
-        mat[2] = down;
-        mat[3] = tm->mat[3];
-
-        if ( LevelIfDot(x, y, id, mat) )  return true;
-    }
-
-    for ( left=0 ; left<m_levelMatMax ; left++ )
-    {
-        mat[0] = tm->mat[0];
-        mat[1] = tm->mat[1];
-        mat[2] = tm->mat[2];
-        mat[3] = left;
-
-        if ( LevelIfDot(x, y, id, mat) )  return true;
-    }
-
-    // Tries changing two neighbors (6x).
-    for ( up=0 ; up<m_levelMatMax ; up++ )
-    {
-        for ( down=0 ; down<m_levelMatMax ; down++ )
-        {
-            mat[0] = up;
-            mat[1] = tm->mat[1];
-            mat[2] = down;
-            mat[3] = tm->mat[3];
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    for ( right=0 ; right<m_levelMatMax ; right++ )
-    {
-        for ( left=0 ; left<m_levelMatMax ; left++ )
-        {
-            mat[0] = tm->mat[0];
-            mat[1] = right;
-            mat[2] = tm->mat[2];
-            mat[3] = left;
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    for ( up=0 ; up<m_levelMatMax ; up++ )
-    {
-        for ( right=0 ; right<m_levelMatMax ; right++ )
-        {
-            mat[0] = up;
-            mat[1] = right;
-            mat[2] = tm->mat[2];
-            mat[3] = tm->mat[3];
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    for ( right=0 ; right<m_levelMatMax ; right++ )
-    {
-        for ( down=0 ; down<m_levelMatMax ; down++ )
-        {
-            mat[0] = tm->mat[0];
-            mat[1] = right;
-            mat[2] = down;
-            mat[3] = tm->mat[3];
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    for ( down=0 ; down<m_levelMatMax ; down++ )
-    {
-        for ( left=0 ; left<m_levelMatMax ; left++ )
-        {
-            mat[0] = tm->mat[0];
-            mat[1] = tm->mat[1];
-            mat[2] = down;
-            mat[3] = left;
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    for ( up=0 ; up<m_levelMatMax ; up++ )
-    {
-        for ( left=0 ; left<m_levelMatMax ; left++ )
-        {
-            mat[0] = up;
-            mat[1] = tm->mat[1];
-            mat[2] = tm->mat[2];
-            mat[3] = left;
-
-            if ( LevelIfDot(x, y, id, mat) )  return true;
-        }
-    }
-
-    // Tries changing all the neighbors.
-    for ( up=0 ; up<m_levelMatMax ; up++ )
-    {
-        for ( right=0 ; right<m_levelMatMax ; right++ )
-        {
-            for ( down=0 ; down<m_levelMatMax ; down++ )
-            {
-                for ( left=0 ; left<m_levelMatMax ; left++ )
-                {
-                    mat[0] = up;
-                    mat[1] = right;
-                    mat[2] = down;
-                    mat[3] = left;
-
-                    if ( LevelIfDot(x, y, id, mat) )  return true;
-                }
-            }
-        }
-    }
-
-    OutputDebugString("LevelPutDot error\n");
-    return false;
-}
-
-// Initializes all the ground with a material.
-
-bool CTerrain::LevelInit(int id)
-{
-    TerrainMaterial*    tm;
-    int                 i, j;
-
-    tm = LevelSearchMat(id);
-    if ( tm == 0 )  return false;
-
-    for ( i=0 ; i<m_levelDotSize*m_levelDotSize ; i++ )
-    {
-        m_levelDot[i].id = id;
-
-        for ( j=0 ; j<4 ; j++ )
-        {
-            m_levelDot[i].mat[j] = tm->mat[j];
-        }
-    }
-
-    return true;
-}
-
-// Generates a level in the terrain.
-
-bool CTerrain::LevelGenerate(int *id, float min, float max,
-                             float slope, float freq,
-                             Math::Vector center, float radius)
-{
-    TerrainMaterial *tm;
-    Math::Vector        pos;
-    int             i, numID, x, y, xx, yy, group, rnd;
-    float           dim;
-
-    static char random[100] =
-    {
-        84,25,12, 6,34,52,85,38,97,16,
-        21,31,65,19,62,40,72,22,48,61,
-        56,47, 8,53,73,77, 4,91,26,88,
-        76, 1,44,93,39,11,71,17,98,95,
-        88,83,18,30, 3,57,28,49,74, 9,
-        32,13,96,66,15,70,36,10,59,94,
-        45,86, 2,29,63,42,51, 0,79,27,
-        54, 7,20,69,89,23,64,43,81,92,
-        90,33,46,14,67,35,50, 5,87,60,
-        68,55,24,78,41,75,58,80,37,82,
-    };
-
-    i = 0;
-    while ( id[i] != 0 )
-    {
-        tm = LevelSearchMat(id[i++]);
-        if ( tm == 0 )  return false;
-    }
-    numID = i;
-
-    group = m_brick/m_subdivMapping;
-
-    if ( radius > 0.0f && radius < 5.0f )  // just a square?
-    {
-        dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-        xx = (int)((center.x+dim)/m_size);
-        yy = (int)((center.z+dim)/m_size);
-
-        x = xx/group;
-        y = yy/group;
-
-        tm = LevelSearchMat(id[0]);
-        if ( tm != 0 )
-        {
-            LevelSetDot(x, y, id[0], tm->mat);  // puts the point
-        }
-//?     LevelPutDot(xx,yy, id[0]);
-    }
-    else
-    {
-        for ( y=0 ; y<m_levelDotSize ; y++ )
-        {
-            for ( x=0 ; x<m_levelDotSize ; x++ )
-            {
-                if ( radius != 0.0f )
-                {
-                    pos.x = ((float)x-m_levelDotSize/2.0f)*group*m_size;
-                    pos.z = ((float)y-m_levelDotSize/2.0f)*group*m_size;
-                    if ( Math::DistanceProjected(pos, center) > radius )  continue;
-                }
-
-                if ( freq < 100.0f )
-                {
-                    rnd = random[(x%10)+(y%10)*10];
-                    if ( (float)rnd > freq )  continue;
-                }
-
-                xx = x*group + group/2;
-                yy = y*group + group/2;
-
-                if ( LevelGetDot(xx,yy, min, max, slope) )
-                {
-                    rnd = random[(x%10)+(y%10)*10];
-                    i = rnd%numID;
-                    LevelPutDot(xx,yy, id[i]);
-                }
-            }
-        }
-    }
-
-    return true;
-}
-
-// Initializes an table with empty levels.
-
-void CTerrain::LevelOpenTable()
-{
-    int     i, j;
-
-    if ( !m_bLevelText )  return;
-    if ( m_levelDot != 0 )  return;  // already allocated
-
-    m_levelDotSize = (m_mosaic*m_brick)/(m_brick/m_subdivMapping)+1;
-    m_levelDot = (DotLevel*)malloc(m_levelDotSize*m_levelDotSize*sizeof(DotLevel));
-
-    for ( i=0 ; i<m_levelDotSize*m_levelDotSize ; i++ )
-    {
-        for ( j=0 ; j<4 ; j++ )
-        {
-            m_levelDot[i].mat[j] = 0;
-        }
-    }
-}
-
-// Closes the level table.
-
-void CTerrain::LevelCloseTable()
-{
-    free(m_levelDot);
-    m_levelDot = 0;
-}
-
-
-
-// Creates all objects in a mesh square ground.
-
-bool CTerrain::CreateSquare(bool bMultiRes, int x, int y)
-{
-    D3DMATERIAL7    mat;
-    float           min, max;
-    int             step, objRank;
-
-    ZeroMemory( &mat, sizeof(D3DMATERIAL7) );
-    mat.diffuse.r = 1.0f;
-    mat.diffuse.g = 1.0f;
-    mat.diffuse.b = 1.0f;
-    mat.ambient.r = 0.0f;
-    mat.ambient.g = 0.0f;
-    mat.ambient.b = 0.0f;
-
-    objRank = m_engine->CreateObject();
-    m_engine->SetObjectType(objRank, TYPETERRAIN);  // it is a terrain
-
-    m_objRank[x+y*m_mosaic] = objRank;
-
-    if ( bMultiRes )
-    {
-        min = 0.0f;
-        max = m_vision;
-        max *= m_engine->RetClippingDistance();
-        for ( step=0 ; step<m_depth ; step++ )
-        {
-            CreateMosaic(x, y, 1<<step, objRank, mat, min, max);
-            min = max;
-            max *= 2;
-            if ( step == m_depth-1 )  max = g_HUGE;
-        }
-    }
-    else
-    {
-        CreateMosaic(x, y, 1, objRank, mat, 0.0f, g_HUGE);
-    }
-
-    return true;
-}
-
-// Creates all objects of the terrain within the 3D engine.
-
-bool CTerrain::CreateObjects(bool bMultiRes)
-{
-    int     x, y;
-
-    AdjustRelief();
-
-    for ( y=0 ; y<m_mosaic ; y++ )
-    {
-        for ( x=0 ; x<m_mosaic ; x++ )
-        {
-            CreateSquare(bMultiRes, x, y);
-        }
-    }
-
-    return true;
-}
-
-
-// Modifies the terrain's relief.
-// ATTENTION: ok only with m_depth = 2!
-
-bool CTerrain::Terraform(const Math::Vector &p1, const Math::Vector &p2, float height)
-{
-    POINT       tp1, tp2, pp1, pp2;
-    float       dim, avg;
-    int         x, y, size, nb;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-    tp1.x = (int)((p1.x+dim+m_size/2.0f)/m_size);
-    tp1.y = (int)((p1.z+dim+m_size/2.0f)/m_size);
-    tp2.x = (int)((p2.x+dim+m_size/2.0f)/m_size);
-    tp2.y = (int)((p2.z+dim+m_size/2.0f)/m_size);
-
-    if ( tp1.x > tp2.x )
-    {
-        x     = tp1.x;
-        tp1.x = tp2.x;
-        tp2.x = x;
-    }
-
-    if ( tp1.y > tp2.y )
-    {
-        y     = tp1.y;
-        tp1.y = tp2.y;
-        tp2.y = y;
-    }
-
-    size = (m_mosaic*m_brick)+1;
-
-    // Calculates the current average height.
-    avg = 0.0f;
-    nb = 0;
-    for ( y=tp1.y ; y<=tp2.y ; y++ )
-    {
-        for ( x=tp1.x ; x<=tp2.x ; x++ )
-        {
-            avg += m_relief[x+y*size];
-            nb ++;
-        }
-    }
-    avg /= (float)nb;
-
-    // Changes the description of the relief.
-    for ( y=tp1.y ; y<=tp2.y ; y++ )
-    {
-        for ( x=tp1.x ; x<=tp2.x ; x++ )
-        {
-            m_relief[x+y*size] = avg+height;
-
-            if ( x%m_brick == 0 && y%m_depth != 0 )
-            {
-                m_relief[(x+0)+(y-1)*size] = avg+height;
-                m_relief[(x+0)+(y+1)*size] = avg+height;
-            }
-
-            if ( y%m_brick == 0 && x%m_depth != 0 )
-            {
-                m_relief[(x-1)+(y+0)*size] = avg+height;
-                m_relief[(x+1)+(y+0)*size] = avg+height;
-            }
-        }
-    }
-    AdjustRelief();
-
-    pp1.x = (tp1.x-2)/m_brick;
-    pp1.y = (tp1.y-2)/m_brick;
-    pp2.x = (tp2.x+1)/m_brick;
-    pp2.y = (tp2.y+1)/m_brick;
-
-    if ( pp1.x <  0        )  pp1.x = 0;
-    if ( pp1.x >= m_mosaic )  pp1.x = m_mosaic-1;
-    if ( pp1.y <  0        )  pp1.y = 0;
-    if ( pp1.y >= m_mosaic )  pp1.y = m_mosaic-1;
-
-    for ( y=pp1.y ; y<=pp2.y ; y++ )
-    {
-        for ( x=pp1.x ; x<=pp2.x ; x++ )
-        {
-            m_engine->DeleteObject(m_objRank[x+y*m_mosaic]);
-            CreateSquare(m_bMultiText, x, y);  // recreates the square
-        }
-    }
-    m_engine->Update();
-
-    return true;
-}
-
-
-// Management of the wind.
-
-void CTerrain::SetWind(Math::Vector speed)
-{
-    m_wind = speed;
-}
-
-Math::Vector CTerrain::RetWind()
-{
-    return m_wind;
-}
-
-
-// Gives the exact slope of the terrain of a place given.
-
-float CTerrain::RetFineSlope(const Math::Vector &pos)
-{
-    Math::Vector    n;
-
-    if ( !GetNormal(n, pos) )  return 0.0f;
-    return fabs(Math::RotateAngle(Math::Point(n.x, n.z).Length(), n.y)-Math::PI/2.0f);
-}
-
-// Gives the approximate slope of the terrain of a specific location.
-
-float CTerrain::RetCoarseSlope(const Math::Vector &pos)
-{
-    float   dim, level[4], min, max;
-    int     x, y;
-
-    if ( m_relief == 0 )  return 0.0f;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((pos.x+dim)/m_size);
-    y = (int)((pos.z+dim)/m_size);
-
-    if ( x < 0 || x >= m_mosaic*m_brick ||
-         y < 0 || y >= m_mosaic*m_brick )  return 0.0f;
-
-    level[0] = m_relief[(x+0)+(y+0)*(m_mosaic*m_brick+1)];
-    level[1] = m_relief[(x+1)+(y+0)*(m_mosaic*m_brick+1)];
-    level[2] = m_relief[(x+0)+(y+1)*(m_mosaic*m_brick+1)];
-    level[3] = m_relief[(x+1)+(y+1)*(m_mosaic*m_brick+1)];
-
-    min = Math::Min(level[0], level[1], level[2], level[3]);
-    max = Math::Max(level[0], level[1], level[2], level[3]);
-
-    return atanf((max-min)/m_size);
-}
-
-// Gives the normal vector at the position p (x,-,z) of the ground.
-
-bool CTerrain::GetNormal(Math::Vector &n, const Math::Vector &p)
-{
-    Math::Vector    p1, p2, p3, p4;
-    float       dim;
-    int         x, y;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((p.x+dim)/m_size);
-    y = (int)((p.z+dim)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return false;
-
-    p1 = RetVector(x+0, y+0);
-    p2 = RetVector(x+1, y+0);
-    p3 = RetVector(x+0, y+1);
-    p4 = RetVector(x+1, y+1);
-
-    if ( fabs(p.z-p2.z) < fabs(p.x-p2.x) )
-    {
-        n = Math::NormalToPlane(p1,p2,p3);
-    }
-    else
-    {
-        n = Math::NormalToPlane(p2,p4,p3);
-    }
-    return true;
-}
-
-// Returns the height of the ground.
-
-float CTerrain::RetFloorLevel(const Math::Vector &p, bool bBrut, bool bWater)
-{
-    Math::Vector    p1, p2, p3, p4, ps;
-    float       dim, level;
-    int         x, y;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((p.x+dim)/m_size);
-    y = (int)((p.z+dim)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return false;
-
-    p1 = RetVector(x+0, y+0);
-    p2 = RetVector(x+1, y+0);
-    p3 = RetVector(x+0, y+1);
-    p4 = RetVector(x+1, y+1);
-
-    ps = p;
-    if ( fabs(p.z-p2.z) < fabs(p.x-p2.x) )
-    {
-        if ( !IntersectY(p1, p2, p3, ps) )  return 0.0f;
-    }
-    else
-    {
-        if ( !IntersectY(p2, p4, p3, ps) )  return 0.0f;
-    }
-
-    if ( !bBrut )  AdjustBuildingLevel(ps);
-
-    if ( bWater )  // not going underwater?
-    {
-        level = m_water->RetLevel();
-        if ( ps.y < level )  ps.y = level;  // not under water
-    }
-
-    return ps.y;
-}
-
-// Returns the height to the ground.
-// This height is positive when you are above the ground.
-
-float CTerrain::RetFloorHeight(const Math::Vector &p, bool bBrut, bool bWater)
-{
-    Math::Vector    p1, p2, p3, p4, ps;
-    float       dim, level;
-    int         x, y;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((p.x+dim)/m_size);
-    y = (int)((p.z+dim)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return false;
-
-    p1 = RetVector(x+0, y+0);
-    p2 = RetVector(x+1, y+0);
-    p3 = RetVector(x+0, y+1);
-    p4 = RetVector(x+1, y+1);
-
-    ps = p;
-    if ( fabs(p.z-p2.z) < fabs(p.x-p2.x) )
-    {
-        if ( !IntersectY(p1, p2, p3, ps) )  return 0.0f;
-    }
-    else
-    {
-        if ( !IntersectY(p2, p4, p3, ps) )  return 0.0f;
-    }
-
-    if ( !bBrut )  AdjustBuildingLevel(ps);
-
-    if ( bWater )  // not going underwater?
-    {
-        level = m_water->RetLevel();
-        if ( ps.y < level )  ps.y = level;  // not under water
-    }
-
-    return p.y-ps.y;
-}
-
-// Modifies the coordinate "y" of point "p" to rest on the ground floor.
-
-bool CTerrain::MoveOnFloor(Math::Vector &p, bool bBrut, bool bWater)
-{
-    Math::Vector    p1, p2, p3, p4;
-    float       dim, level;
-    int         x, y;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((p.x+dim)/m_size);
-    y = (int)((p.z+dim)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return false;
-
-    p1 = RetVector(x+0, y+0);
-    p2 = RetVector(x+1, y+0);
-    p3 = RetVector(x+0, y+1);
-    p4 = RetVector(x+1, y+1);
-
-    if ( fabs(p.z-p2.z) < fabs(p.x-p2.x) )
-    {
-        if ( !IntersectY(p1, p2, p3, p) )  return false;
-    }
-    else
-    {
-        if ( !IntersectY(p2, p4, p3, p) )  return false;
-    }
-
-    if ( !bBrut )  AdjustBuildingLevel(p);
-
-    if ( bWater )  // not going underwater?
-    {
-        level = m_water->RetLevel();
-        if ( p.y < level )  p.y = level;  // not under water
-    }
-
-    return true;
-}
-
-// Modifies a coordinate so that it is on the ground.
-// Returns false if the initial coordinate was too far.
-
-bool CTerrain::ValidPosition(Math::Vector &p, float marging)
-{
-    bool    bOK = true;
-    float   limit;
-
-    limit = m_mosaic*m_brick*m_size/2.0f - marging;
-
-    if ( p.x < -limit )
-    {
-        p.x = -limit;
-        bOK = false;
-    }
-
-    if ( p.z < -limit )
-    {
-        p.z = -limit;
-        bOK = false;
-    }
-
-    if ( p.x > limit )
-    {
-        p.x = limit;
-        bOK = false;
-    }
-
-    if ( p.z > limit )
-    {
-        p.z = limit;
-        bOK = false;
-    }
-
-    return bOK;
-}
-
-
-
-// Empty the table of elevations.
-
-void CTerrain::FlushBuildingLevel()
-{
-    m_buildingUsed = 0;
-}
-
-// Adds a new elevation for a building.
-
-bool CTerrain::AddBuildingLevel(Math::Vector center, float min, float max,
-                                float height, float factor)
-{
-    int     i;
-
-    for ( i=0 ; i<m_buildingUsed ; i++ )
-    {
-        if ( center.x == m_buildingTable[i].center.x &&
-             center.z == m_buildingTable[i].center.z )
-        {
-            goto update;
-        }
-    }
-
-    if ( m_buildingUsed >= MAXBUILDINGLEVEL )  return false;
-    i = m_buildingUsed++;
-
-    update:
-    m_buildingTable[i].center   = center;
-    m_buildingTable[i].min      = min;
-    m_buildingTable[i].max      = max;
-    m_buildingTable[i].level    = RetFloorLevel(center, true);
-    m_buildingTable[i].height   = height;
-    m_buildingTable[i].factor   = factor;
-    m_buildingTable[i].bboxMinX = center.x-max;
-    m_buildingTable[i].bboxMaxX = center.x+max;
-    m_buildingTable[i].bboxMinZ = center.z-max;
-    m_buildingTable[i].bboxMaxZ = center.z+max;
-
-    return true;
-}
-
-// Updates the elevation for a building when it was moved up (after a terraforming).
-
-bool CTerrain::UpdateBuildingLevel(Math::Vector center)
-{
-    int     i;
-
-    for ( i=0 ; i<m_buildingUsed ; i++ )
-    {
-        if ( center.x == m_buildingTable[i].center.x &&
-             center.z == m_buildingTable[i].center.z )
-        {
-            m_buildingTable[i].center = center;
-            m_buildingTable[i].level  = RetFloorLevel(center, true);
-            return true;
-        }
-    }
-    return false;
-}
-
-// Removes the elevation for a building when it was destroyed.
-
-bool CTerrain::DeleteBuildingLevel(Math::Vector center)
-{
-    int     i, j;
-
-    for ( i=0 ; i<m_buildingUsed ; i++ )
-    {
-        if ( center.x == m_buildingTable[i].center.x &&
-             center.z == m_buildingTable[i].center.z )
-        {
-            for ( j=i+1 ; j<m_buildingUsed ; j++ )
-            {
-                m_buildingTable[j-1] = m_buildingTable[j];
-            }
-            m_buildingUsed --;
-            return true;
-        }
-    }
-    return false;
-}
-
-// Returns the influence factor whether a position is on a possible rise.
-
-float CTerrain::RetBuildingFactor(const Math::Vector &p)
-{
-    float       dist;
-    int         i;
-
-    for ( i=0 ; i<m_buildingUsed ; i++ )
-    {
-        if ( p.x < m_buildingTable[i].bboxMinX ||
-             p.x > m_buildingTable[i].bboxMaxX ||
-             p.z < m_buildingTable[i].bboxMinZ ||
-             p.z > m_buildingTable[i].bboxMaxZ )  continue;
-
-        dist = Math::DistanceProjected(p, m_buildingTable[i].center);
-
-        if ( dist <= m_buildingTable[i].max )
-        {
-            return m_buildingTable[i].factor;
-        }
-    }
-    return 1.0f;  // it is normal on the ground
-}
-
-// Adjusts a position according to a possible rise.
-
-void CTerrain::AdjustBuildingLevel(Math::Vector &p)
-{
-    Math::Vector    border;
-    float       dist, base;
-    int         i;
-
-    for ( i=0 ; i<m_buildingUsed ; i++ )
-    {
-        if ( p.x < m_buildingTable[i].bboxMinX ||
-             p.x > m_buildingTable[i].bboxMaxX ||
-             p.z < m_buildingTable[i].bboxMinZ ||
-             p.z > m_buildingTable[i].bboxMaxZ )  continue;
-
-        dist = Math::DistanceProjected(p, m_buildingTable[i].center);
-
-        if ( dist > m_buildingTable[i].max )  continue;
-
-        if ( dist < m_buildingTable[i].min )
-        {
-            p.y = m_buildingTable[i].level+m_buildingTable[i].height;
-            return;
-        }
-
-#if 0
-        p.y = m_buildingTable[i].level;
-        p.y += (m_buildingTable[i].max-dist)/
-               (m_buildingTable[i].max-m_buildingTable[i].min)*
-               m_buildingTable[i].height;
-
-        base = RetFloorLevel(p, true);
-        if ( p.y < base )  p.y = base;
-#else
-        border.x = ((p.x-m_buildingTable[i].center.x)*m_buildingTable[i].max)/
-                   dist+m_buildingTable[i].center.x;
-        border.z = ((p.z-m_buildingTable[i].center.z)*m_buildingTable[i].max)/
-                   dist+m_buildingTable[i].center.z;
-
-        base = RetFloorLevel(border, true);
-
-        p.y = (m_buildingTable[i].max-dist)/
-              (m_buildingTable[i].max-m_buildingTable[i].min)*
-              (m_buildingTable[i].level+m_buildingTable[i].height-base)+
-              base;
-#endif
-        return;
-    }
-}
-
-
-// Returns the hardness of the ground in a given place.
-// The hardness determines the noise (SOUND_STEP and SOUND_BOUM).
-
-float CTerrain::RetHardness(const Math::Vector &p)
-{
-    TerrainMaterial*    tm;
-    float               factor, dim;
-    int                 x, y, id;
-
-    factor = RetBuildingFactor(p);
-    if ( factor != 1.0f )  return 1.0f;  // on building
-
-    if ( m_levelDot == 0 )  return m_defHardness;
-
-    dim = (m_mosaic*m_brick*m_size)/2.0f;
-
-    x = (int)((p.x+dim)/m_size);
-    y = (int)((p.z+dim)/m_size);
-
-    if ( x < 0 || x > m_mosaic*m_brick ||
-         y < 0 || y > m_mosaic*m_brick )  return m_defHardness;
-
-    x /= m_brick/m_subdivMapping;
-    y /= m_brick/m_subdivMapping;
-
-    if ( x < 0 || x >= m_levelDotSize ||
-         y < 0 || y >= m_levelDotSize )  return m_defHardness;
-
-    id = m_levelDot[x+y*m_levelDotSize].id;
-    tm = LevelSearchMat(id);
-    if ( tm == 0 )  return m_defHardness;
-
-    return tm->hardness;
-}
-
-
-// Shows the flat areas on the ground.
-
-void CTerrain::GroundFlat(Math::Vector pos)
-{
-    Math::Vector    p;
-    float       rapport, angle;
-    int         x, y, i;
-    static char table[41*41];
-
-
-    rapport = 3200.0f/1024.0f;
-
-    for ( y=0 ; y<=40 ; y++ )
-    {
-        for ( x=0 ; x<=40 ; x++ )
-        {
-            i = x + y*41;
-            table[i] = 0;
-
-            p.x = (x-20)*rapport;
-            p.z = (y-20)*rapport;
-            p.y = 0.0f;
-            if ( Math::Point(p.x, p.y).Length() > 20.0f*rapport )  continue;
-
-            angle = RetFineSlope(pos+p);
-
-            if ( angle < FLATLIMIT )
-            {
-                table[i] = 1;
-            }
-            else
-            {
-                table[i] = 2;
-            }
-        }
-    }
-
-    m_engine->GroundMarkCreate(pos, 40.0f, 0.001f, 15.0f, 0.001f, 41, 41, table);
-}
-
-
-// Calculates the radius of the largest flat area available.
-// This calculation is not optimized!
-
-float CTerrain::RetFlatZoneRadius(Math::Vector center, float max)
-{
-    Math::Vector    pos;
-    Math::Point     c, p;
-    float       ref, radius, angle, h;
-    int         i, nb;
-
-    angle = RetFineSlope(center);
-    if ( angle >= FLATLIMIT )  return 0.0f;
-
-    ref = RetFloorLevel(center, true);
-
-    radius = 1.0f;
-    while ( radius <= max )
-    {
-        angle = 0.0f;
-        nb = (int)(2.0f*Math::PI*radius);
-        if ( nb < 8 )  nb = 8;
-        for ( i=0 ; i<nb ; i++ )
-        {
-            c.x = center.x;
-            c.y = center.z;
-            p.x = center.x+radius;
-            p.y = center.z;
-            p = Math::RotatePoint(c, angle, p);
-            pos.x = p.x;
-            pos.z = p.y;
-            h = RetFloorLevel(pos, true);
-            if ( fabs(h-ref) > 1.0f )  return radius;
-
-            angle += Math::PI*2.0f/8.0f;
-        }
-        radius += 1.0f;
-    }
-    return max;
-}
-
-
-
-// Specifies the maximum height of flight.
-
-void CTerrain::SetFlyingMaxHeight(float height)
-{
-    m_flyingMaxHeight = height;
-}
-
-// Returns the maximum height of flight.
-
-float CTerrain::RetFlyingMaxHeight()
-{
-    return m_flyingMaxHeight;
-}
-
-
-// Empty the limits table of flight.
-
-void CTerrain::FlushFlyingLimit()
-{
-    m_flyingMaxHeight = 280.0f;
-    m_flyingLimitTotal = 0;
-}
-
-// Empty the limits table of flight.
-
-bool CTerrain::AddFlyingLimit(Math::Vector center,
-                              float extRadius, float intRadius,
-                              float maxHeight)
-{
-    int     i;
-
-    if ( m_flyingLimitTotal >= MAXFLYINGLIMIT )  return false;
-
-    i = m_flyingLimitTotal;
-    m_flyingLimit[i].center    = center;
-    m_flyingLimit[i].extRadius = extRadius;
-    m_flyingLimit[i].intRadius = intRadius;
-    m_flyingLimit[i].maxHeight = maxHeight;
-    m_flyingLimitTotal = i+1;
-
-    return true;
-}
-
-// Returns the maximum height of flight.
-
-float CTerrain::RetFlyingLimit(Math::Vector pos, bool bNoLimit)
-{
-    float   dist, h;
-    int     i;
-
-    if ( bNoLimit )  return 280.0f;
-    if ( m_flyingLimitTotal == 0 )  return m_flyingMaxHeight;
-
-    for ( i=0 ; i<m_flyingLimitTotal ; i++ )
-    {
-        dist = Math::DistanceProjected(pos, m_flyingLimit[i].center);
-
-        if ( dist >= m_flyingLimit[i].extRadius )  continue;
-
-        if ( dist <= m_flyingLimit[i].intRadius )
-        {
-            return m_flyingLimit[i].maxHeight;
-        }
-
-        dist -= m_flyingLimit[i].intRadius;
-
-        h = dist*(m_flyingMaxHeight-m_flyingLimit[i].maxHeight)/
-            (m_flyingLimit[i].extRadius-m_flyingLimit[i].intRadius);
-
-        return h + m_flyingLimit[i].maxHeight;
-    }
-
-    return m_flyingMaxHeight;
-}
-
diff --git a/src/old/terrain.h b/src/old/terrain.h
deleted file mode 100644
index c763682..0000000
--- a/src/old/terrain.h
+++ /dev/null
@@ -1,209 +0,0 @@
-// * 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/.
-
-// terrain.h
-
-#pragma once
-
-
-#include "common/struct.h"
-#include "math/point.h"
-#include "old/d3dengine.h"
-
-
-class CInstanceManager;
-class CD3DEngine;
-class CWater;
-
-
-
-const float FLATLIMIT = (5.0f*Math::PI/180.0f);
-
-
-enum TerrainRes
-{
-    TR_NULL     = 0,
-    TR_STONE    = 1,
-    TR_URANIUM  = 2,
-    TR_POWER    = 3,
-    TR_KEYa     = 4,
-    TR_KEYb     = 5,
-    TR_KEYc     = 6,
-    TR_KEYd     = 7,
-};
-
-
-const int MAXBUILDINGLEVEL = 100;
-
-struct BuildingLevel
-{
-    Math::Vector    center;
-    float       factor;
-    float       min;
-    float       max;
-    float       level;
-    float       height;
-    float       bboxMinX;
-    float       bboxMaxX;
-    float       bboxMinZ;
-    float       bboxMaxZ;
-};
-
-
-const int MAXMATTERRAIN = 100;
-
-struct TerrainMaterial
-{
-    short       id;
-    char        texName[20];
-    float       u,v;
-    float       hardness;
-    char        mat[4];     // up, right, down, left
-};
-
-struct DotLevel
-{
-    short       id;
-    char        mat[4];     // up, right, down, left
-};
-
-
-const int MAXFLYINGLIMIT = 10;
-
-struct FlyingLimit
-{
-    Math::Vector    center;
-    float       extRadius;
-    float       intRadius;
-    float       maxHeight;
-};
-
-
-
-class CTerrain
-{
-public:
-    CTerrain(CInstanceManager* iMan);
-    ~CTerrain();
-
-    bool        Generate(int mosaic, int brickP2, float size, float vision, int depth, float hardness);
-    bool        InitTextures(char* baseName, int* table, int dx, int dy);
-    void        LevelFlush();
-    bool        LevelMaterial(int id, char* baseName, float u, float v, int up, int right, int down, int left, float hardness);
-    bool        LevelInit(int id);
-    bool        LevelGenerate(int *id, float min, float max, float slope, float freq, Math::Vector center, float radius);
-    void        FlushRelief();
-    bool        ReliefFromBMP(const char* filename, float scaleRelief, bool adjustBorder);
-    bool        ReliefFromDXF(const char* filename, float scaleRelief);
-    bool        ResFromBMP(const char* filename);
-    bool        CreateObjects(bool bMultiRes);
-    bool        Terraform(const Math::Vector &p1, const Math::Vector &p2, float height);
-
-    void        SetWind(Math::Vector speed);
-    Math::Vector    RetWind();
-
-    float       RetFineSlope(const Math::Vector &pos);
-    float       RetCoarseSlope(const Math::Vector &pos);
-    bool        GetNormal(Math::Vector &n, const Math::Vector &p);
-    float       RetFloorLevel(const Math::Vector &p, bool bBrut=false, bool bWater=false);
-    float       RetFloorHeight(const Math::Vector &p, bool bBrut=false, bool bWater=false);
-    bool        MoveOnFloor(Math::Vector &p, bool bBrut=false, bool bWater=false);
-    bool        ValidPosition(Math::Vector &p, float marging);
-    TerrainRes  RetResource(const Math::Vector &p);
-    void        LimitPos(Math::Vector &pos);
-
-    void        FlushBuildingLevel();
-    bool        AddBuildingLevel(Math::Vector center, float min, float max, float height, float factor);
-    bool        UpdateBuildingLevel(Math::Vector center);
-    bool        DeleteBuildingLevel(Math::Vector center);
-    float       RetBuildingFactor(const Math::Vector &p);
-    float       RetHardness(const Math::Vector &p);
-
-    int         RetMosaic();
-    int         RetBrick();
-    float       RetSize();
-    float       RetScaleRelief();
-
-    void        GroundFlat(Math::Vector pos);
-    float       RetFlatZoneRadius(Math::Vector center, float max);
-
-    void        SetFlyingMaxHeight(float height);
-    float       RetFlyingMaxHeight();
-    void        FlushFlyingLimit();
-    bool        AddFlyingLimit(Math::Vector center, float extRadius, float intRadius, float maxHeight);
-    float       RetFlyingLimit(Math::Vector pos, bool bNoLimit);
-
-protected:
-    bool        ReliefAddDot(Math::Vector pos, float scaleRelief);
-    void        AdjustRelief();
-    Math::Vector    RetVector(int x, int y);
-    D3DVERTEX2  RetVertex(int x, int y, int step);
-    bool        CreateMosaic(int ox, int oy, int step, int objRank, const D3DMATERIAL7 &mat, float min, float max);
-    bool        CreateSquare(bool bMultiRes, int x, int y);
-
-    TerrainMaterial* LevelSearchMat(int id);
-    void        LevelTextureName(int x, int y, char *name, Math::Point &uv);
-    float       LevelRetHeight(int x, int y);
-    bool        LevelGetDot(int x, int y, float min, float max, float slope);
-    int         LevelTestMat(char *mat);
-    void        LevelSetDot(int x, int y, int id, char *mat);
-    bool        LevelIfDot(int x, int y, int id, char *mat);
-    bool        LevelPutDot(int x, int y, int id);
-    void        LevelOpenTable();
-    void        LevelCloseTable();
-
-    void        AdjustBuildingLevel(Math::Vector &p);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*     m_engine;
-    CWater*         m_water;
-
-    int         m_mosaic;       // number of mosaics
-    int         m_brick;        // number of bricks per mosaics
-    float           m_size;         // size of an item in an brick
-    float           m_vision;       // vision before a change of resolution
-    float*          m_relief;       // table of the relief
-    int*            m_texture;      // table of textures
-    int*            m_objRank;      // table of rows of objects
-    bool            m_bMultiText;
-    bool            m_bLevelText;
-    float           m_scaleMapping;     // scale of the mapping
-    float           m_scaleRelief;
-    int         m_subdivMapping;
-    int         m_depth;        // number of different resolutions (1,2,3,4)
-    char            m_texBaseName[20];
-    char            m_texBaseExt[10];
-    float           m_defHardness;
-
-    TerrainMaterial m_levelMat[MAXMATTERRAIN+1];
-    int             m_levelMatTotal;
-    int             m_levelMatMax;
-    int             m_levelDotSize;
-    DotLevel*       m_levelDot;
-    int             m_levelID;
-
-    int             m_buildingUsed;
-    BuildingLevel   m_buildingTable[MAXBUILDINGLEVEL];
-
-    unsigned char*  m_resources;
-    Math::Vector        m_wind;         // wind speed
-
-    float           m_flyingMaxHeight;
-    int             m_flyingLimitTotal;
-    FlyingLimit     m_flyingLimit[MAXFLYINGLIMIT];
-};
-
diff --git a/src/old/text.cpp b/src/old/text.cpp
deleted file mode 100644
index 8573816..0000000
--- a/src/old/text.cpp
+++ /dev/null
@@ -1,1879 +0,0 @@
-// * 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/.
-
-// text.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "old/d3dengine.h"
-#include "common/language.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/text.h"
-
-
-
-static short table_text_colobot[] =
-{
-//  x1, y1, x2, y2
-    219,34, 225,50,     // 0
-     1,188, 9,203,      // .
-    51,188,59,203,      // square
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    11,188,19,203,      // \t
-    21,188,29,203,      // \n
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,     // \r
-    219,34, 225,50,
-    219,34, 225,50,
-    41,188,49,203,      // >
-    31,188,39,203,      // <
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-#if _NEWLOOK
-    0,  0,  4,  16,     // 32
-    7,  0,  9,  16,     // !
-    9,  0,  13, 16,     // "
-    13, 0,  24, 16,     // #
-    24, 0,  31, 16,     // $
-    31, 0,  43, 16,     // %
-    43, 0,  54, 16,     // &
-    54, 0,  56, 16,     // '
-    56, 0,  61, 16,     // (
-    61, 0,  67, 16,     // )
-    67, 0,  73, 16,     // *
-    73, 0,  83, 16,     // +
-    83, 0,  87, 16,     // ,
-    87, 0,  92, 16,     // -
-    92, 0,  94, 16,     // .
-    94, 0,  101,16,     // /
-    101,0,  109,16,     // 0
-    109,0,  114,16,     // 1
-    114,0,  122,16,     // 2
-    122,0,  129,16,     // 3
-    129,0,  138,16,     // 4
-    138,0,  146,16,     // 5
-    146,0,  154,16,     // 6
-    154,0,  161,16,     // 7
-    161,0,  169,16,     // 8
-    169,0,  177,16,     // 9
-    177,0,  179,16,     // :
-    179,0,  183,16,     // ;
-    183,0,  193,16,     // <
-    193,0,  203,16,     // =
-    203,0,  213,16,     // >
-    213,0,  219,16,     // ?
-
-    0,  17, 14, 33,     // @ 64
-    14, 17, 26, 33,     // A
-    26, 17, 33, 33,     // B
-    33, 17, 42, 33,     // C
-    42, 17, 51, 33,     // D
-    51, 17, 58, 33,     // E
-    58, 17, 63, 33,     // F
-    63, 17, 73, 33,     // G
-    73, 17, 82, 33,     // H
-    82, 17, 84, 33,     // I
-    84, 17, 90, 33,     // J
-    90, 17, 98, 33,     // K
-    98, 17, 103,33,     // L
-    103,17, 115,33,     // M
-    115,17, 124,33,     // N
-    124,17, 136,33,     // O
-    136,17, 142,33,     // P
-    142,17, 154,33,     // Q
-    154,17, 160,33,     // R
-    160,17, 167,33,     // S
-    167,17, 175,33,     // T
-    175,17, 183,33,     // U
-    183,17, 194,33,     // V
-    194,17, 208,33,     // W
-    208,17, 218,33,     // X
-    218,17, 227,33,     // Y
-    227,17, 236,33,     // Z
-    236,17, 241,33,     // [
-    241,17, 248,33,     // \
-    248,17, 252,33,     // ]
-    219,0,  229,16,     // ^
-    0,  34, 9,  50,     // _
-
-    54, 0,  56, 16,     // ` 96
-    9,  34, 16, 50,     // a
-    16, 34, 25, 50,     // b
-    25, 34, 33, 50,     // c
-    33, 34, 42, 50,     // d
-    42, 34, 50, 50,     // e
-    50, 34, 55, 50,     // f
-    55, 34, 62, 50,     // g
-    62, 34, 69, 50,     // h
-    69, 34, 71, 50,     // i
-    71, 34, 75, 50,     // j
-    75, 34, 81, 50,     // k
-    81, 34, 83, 50,     // l
-    83, 34, 93, 50,     // m
-    93, 34, 100,50,     // n
-    100,34, 109,50,     // o
-    109,34, 118,50,     // p
-    118,34, 127,50,     // q
-    127,34, 132,50,     // r
-    132,34, 138,50,     // s
-    138,34, 143,50,     // t
-    143,34, 150,50,     // u
-    150,34, 158,50,     // v
-    158,34, 171,50,     // w
-    171,34, 179,50,     // x
-    179,34, 187,50,     // y
-    187,34, 195,50,     // z
-    195,34, 201,50,     // {
-    201,34, 203,50,     // |
-    203,34, 209,50,     // }
-    209,34, 219,50,     // ~
-    219,34, 228,50,     //
-
-    219,34, 225,50,     // 128
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 144
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 160
-    219,34, 225,50,     // 161 A1 ! reverse
-    219,34, 225,50,
-    219,34, 225,50,     // 163 A3 �
-    219,34, 225,50,
-    219,34, 225,50,
-    0,  0,  4,  16,     // 166 A6 ¦ (space)
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 176
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,     // 191 BF ? reverse
-
-    12, 51, 24, 67,     // 192 C0 Å• big
-    0,  51, 12, 67,     // 193 C1 á big
-    24, 51, 36, 67,     // 194 C2 â big
-    48, 51, 60, 67,     // 195 C3 ă big
-    36, 51, 48, 67,     // 196 C4 ä big
-    219,34, 225,50,
-    219,34, 225,50,
-    60, 51, 69, 67,     // 199 C7 ç big
-    77, 51, 84, 67,     // 200 C8 � big
-    70, 51, 77, 67,     // 201 C9 é big
-    85, 51, 92, 67,     // 202 CA Ä™ big
-    93, 51, 100,67,     // 203 CB ë big
-    219,34, 225,50,
-    100,51, 104,67,     // 205 CD í big
-    108,51, 113,67,     // 206 CE î big
-    113,51, 117,67,     // 207 CF � big
-
-    219,34, 225,50,     // 208
-    117,51, 126,67,     // 209 D1 Å„ big
-    219,34, 225,50,
-    126,51, 138,67,     // 211 D3 ó big
-    150,51, 162,67,     // 212 D4 ô big
-    219,34, 225,50,
-    162,51, 174,67,     // 214 D6 ö big
-    219,34, 225,50,
-    219,34, 225,50,
-    194,51, 202,67,     // 217 D9 ů big
-    186,51, 194,67,     // 218 DA ú big
-    202,51, 210,67,     // 219 DB ű big
-    210,51, 218,67,     // 220 DC ü big
-    219,34, 225,50,
-    219,34, 225,50,
-    218,51, 227,67,     // 223 DF German SS
-
-    7,  68, 14, 84,     // 224 E0 Å• small
-    0,  68, 7,  84,     // 225 E1 á small
-    14, 68, 21, 84,     // 226 E2 â small
-    28, 68, 35, 84,     // 227 E3 ă small
-    21, 68, 28, 84,     // 228 E4 ä small
-    219,34, 225,50,
-    219,34, 225,50,
-    35, 68, 43, 84,     // 231 E7 ç small
-    51, 68, 59, 84,     // 232 E8 � small
-    43, 68, 51, 84,     // 233 E9 é small
-    59, 68, 67, 84,     // 234 EA Ä™ small
-    67, 68, 75, 84,     // 235 EB ë small
-    219,34, 225,50,
-    75, 68, 79, 84,     // 237 ED í small
-    83, 68, 88, 84,     // 238 EE î small
-    88, 68, 92, 84,     // 239 EF � small
-
-    219,34, 225,50,     // 240
-    92, 68, 99, 84,     // 241 F1 Å„ small
-    219,34, 225,50,
-    99, 68, 108,84,     // 243 F3 ó small
-    117,68, 126,84,     // 244 F4 ô small
-    219,34, 225,50,
-    126,68, 135,84,     // 246 F6 ö small
-    219,34, 225,50,
-    219,34, 225,50,
-    151,68, 158,84,     // 249 F9 ů small
-    144,68, 151,84,     // 250 FA ú small
-    158,68, 165,84,     // 251 FB ű small
-    165,68, 172,84,     // 252 FC ü small
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-#else
-    0,  0,  4,  16,     // 32
-    4,  0,  7,  16,     // !
-    7,  0,  13, 16,
-    14, 0,  21, 16,
-    22, 0,  28, 16,
-    29, 0,  38, 16,
-    39, 0,  48, 16,
-    48, 0,  51, 16,
-    51, 0,  55, 16,
-    55, 0,  59, 16,
-    59, 0,  65, 16,
-    66, 0,  72, 16,
-    73, 0,  76, 16,
-    76, 0,  82, 16,
-    82, 0,  85, 16,
-    85, 0,  90, 16,
-    90, 0,  97, 16,
-    98, 0,  103,16,
-    104,0,  111,16,
-    111,0,  118,16,
-    118,0,  125,16,
-    125,0,  132,16,
-    132,0,  139,16,
-    139,0,  146,16,
-    146,0,  153,16,
-    153,0,  160,16,
-    160,0,  165,16,     // :
-    164,0,  169,16,     // ;
-    169,0,  177,16,     // <
-    177,0,  185,16,     // =
-    185,0,  193,16,     // >
-    193,0,  201,16,     // ?
-
-    201,0,  215,16,     // 64
-    0,  17, 10, 33,     // A
-    10, 17, 18, 33,
-    19, 17, 28, 33,
-    28, 17, 36, 33,
-    37, 17, 44, 33,
-    45, 17, 52, 33,
-    53, 17, 62, 33,
-    63, 17, 71, 33,
-    72, 17, 75, 33,
-    75, 17, 82, 33,
-    83, 17, 91, 33,
-    92, 17, 99, 33,
-    100,17, 110,33,
-    111,17, 119,33,
-//? 120,17, 129,33,     // O
-    216,0,  227,16,     // O
-    130,17, 138,33,
-    139,17, 148,33,
-    149,17, 158,33,
-    158,17, 166,33,
-    166,17, 175,33,
-    175,17, 183,33,
-    183,17, 193,33,
-    193,17, 207,33,
-    207,17, 215,33,
-    215,17, 224,33,
-    224,17, 232,33,     // Z
-    232,17, 236,33,
-    236,17, 241,33,
-    241,17, 245,33,
-    245,17, 252,33,     // ^
-    0,  34, 8,  50,     // _
-
-    45, 17, 52, 33,     // 96
-    8,  34, 15, 50,     // a
-    16, 34, 23, 50,
-    24, 34, 31, 50,
-    31, 34, 38, 50,
-    39, 34, 46, 50,
-    46, 34, 52, 50,
-    52, 34, 59, 50,
-    60, 34, 67, 50,
-    68, 34, 71, 50,
-    71, 34, 76, 50,
-    77, 34, 84, 50,
-    84, 34, 87, 50,
-    88, 34, 99, 50,
-    100,34, 107,50,
-//? 108,34, 115,50,     // o
-    238,0,  246,16,     // o
-    116,34, 123,50,
-    124,34, 131,50,
-    132,34, 137,50,
-    137,34, 144,50,
-    144,34, 149,50,
-    149,34, 156,50,
-    156,34, 164,50,
-    164,34, 176,50,
-    176,34, 183,50,
-    183,34, 191,50,
-    191,34, 197,50,     // z
-    197,34, 203,50,
-    203,34, 205,50,
-    205,34, 211,50,
-    211,34, 219,50,
-    219,34, 225,50,
-
-#if _POLISH
-    219,34, 225,50,     // 128
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    0,  51, 8,  67,     // 140 S´
-    219,34, 225,50,
-    219,34, 225,50,
-    9,  51, 17, 67,     // 143 Z´
-
-    219,34, 225,50,     // 144
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    0,  68, 7,  84,     // 156 s´
-    219,34, 225,50,
-    219,34, 225,50,
-    8,  68, 14, 84,     // 159 z´
-
-    219,34, 225,50,     // 160
-    219,34, 225,50,
-    219,34, 225,50,
-    18, 51, 27, 67,     // 163 L/
-    219,34, 225,50,
-    28, 51, 39, 67,     // 165 A,
-    0,  0,  4,  16,     // 166 A6 ¦ (space)
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    40, 51, 48, 67,     // 175 Zo
-
-    219,34, 225,50,     // 176
-    219,34, 225,50,
-    219,34, 225,50,
-    16, 68, 21, 84,     // 179 l/
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    23, 68, 31, 84,     // 185 a,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    32, 68, 38, 84,     // 191 zo
-
-    219,34, 225,50,     // 192
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    49, 51, 58, 67,     // 198 C´
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    59, 51, 66, 67,     // 202 E,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 208
-    67, 51, 75, 67,     // 209 N´
-    219,34, 225,50,
-//? 76, 51, 85, 67,     // 211 O´
-    86, 51, 97, 67,     // 211 O´
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 224
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    39, 68, 46, 84,     // 230 c´
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    47, 68, 54, 84,     // 234 e,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 240
-    55, 68, 62, 84,     // 241 n´
-    219,34, 225,50,
-//? 63, 68, 70, 84,     // 243 o´
-    71, 68, 79, 84,     // 243 o´
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-#else
-    219,34, 225,50,     // 128
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 144
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 160
-    219,34, 225,50,     // 161 A1 ! reverse
-    219,34, 225,50,
-    219,34, 225,50,     // 163 A3 �
-    219,34, 225,50,
-    219,34, 225,50,
-    0,  0,  4,  16,     // 166 A6 ¦ (space)
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-
-    219,34, 225,50,     // 176
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,     // 191 BF ? reverse
-
-    10, 51, 20, 67,     // 192 C0 Å• big
-    0,  51, 10, 67,     // 193 C1 á big
-    20, 51, 30, 67,     // 194 C2 â big
-    40, 51, 50, 67,     // 195 C3 ă big
-    30, 51, 40, 67,     // 196 C4 ä big
-    219,34, 225,50,
-    219,34, 225,50,
-    50, 51, 59, 67,     // 199 C7 ç big
-    67, 51, 74, 67,     // 200 C8 � big
-    59, 51, 66, 67,     // 201 C9 é big
-    75, 51, 82, 67,     // 202 CA Ä™ big
-    83, 51, 90, 67,     // 203 CB ë big
-    219,34, 225,50,
-    91, 51, 95, 67,     // 205 CD í big
-    100,51, 103,67,     // 206 CE î big
-    104,51, 109,67,     // 207 CF � big
-
-    219,34, 225,50,     // 208
-    109,51, 117,67,     // 209 D1 Å„ big
-    219,34, 225,50,
-    118,51, 127,67,     // 211 D3 ó big
-    138,51, 147,67,     // 212 D4 ô big
-    219,34, 225,50,
-    148,51, 157,67,     // 214 D6 ö big
-    219,34, 225,50,
-    219,34, 225,50,
-    177,51, 185,67,     // 217 D9 ů big
-    168,51, 176,67,     // 218 DA ú big
-    186,51, 194,67,     // 219 DB ű big
-    195,51, 203,67,     // 220 DC ü big
-    219,34, 225,50,
-    219,34, 225,50,
-    211,51, 220,67,     // 223 DF German SS
-
-    8,  68, 15, 84,     // 224 E0 Å• small
-    0,  68, 7,  84,     // 225 E1 á small
-    16, 68, 23, 84,     // 226 E2 â small
-    32, 68, 39, 84,     // 227 E3 ă small
-    24, 68, 31, 84,     // 228 E4 ä small
-    219,34, 225,50,
-    219,34, 225,50,
-    40, 68, 47, 84,     // 231 E7 ç small
-    55, 68, 62, 84,     // 232 E8 � small
-    47, 68, 54, 84,     // 233 E9 é small
-    63, 68, 70, 84,     // 234 EA Ä™ small
-    71, 68, 78, 84,     // 235 EB ë small
-    219,34, 225,50,
-    79, 68, 83, 84,     // 237 ED í small
-    88, 68, 92, 84,     // 238 EE î small
-    92, 68, 97, 84,     // 239 EF � small
-
-    219,34, 225,50,     // 240
-    97, 68, 104,84,     // 241 F1 Å„ small
-    219,34, 225,50,
-    105,68, 112,84,     // 243 F3 ó small
-    121,68, 128,84,     // 244 F4 ô small
-    219,34, 225,50,
-    129,68, 136,84,     // 246 F6 ö small
-    219,34, 225,50,
-    219,34, 225,50,
-    153,68, 160,84,     // 249 F9 ů small
-    145,68, 152,84,     // 250 FA ú small
-    161,68, 168,84,     // 251 FB ű small
-    169,68, 176,84,     // 252 FC ü small
-    219,34, 225,50,
-    219,34, 225,50,
-    219,34, 225,50,
-#endif
-#endif
-};
-
-
-static short table_text_courier[] =
-{
-//   x1, y1, x2, y2
-    231,137,239,153,    // 0
-     1,188, 9,204,      // .
-    51,188,59,204,      // square
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    11,188,19,204,      // \t
-    21,188,29,204,      // \n
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,    // \r
-    231,137,239,153,
-    231,137,239,153,
-    41,188,49,204,      // >
-    31,188,39,204,      // <
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-      1, 86,  9,102,    // 32
-     11, 86, 19,102,
-     21, 86, 29,102,
-     31, 86, 39,102,
-     41, 86, 49,102,
-     51, 86, 59,102,
-     61, 86, 69,102,
-     71, 86, 79,102,
-     81, 86, 89,102,
-     91, 86, 99,102,
-    101, 86,109,102,
-    111, 86,119,102,
-    121, 86,129,102,
-    131, 86,139,102,
-    141, 86,149,102,
-    151, 86,159,102,
-    161, 86,169,102,
-    171, 86,179,102,
-    181, 86,189,102,
-    191, 86,199,102,
-    201, 86,209,102,
-    211, 86,219,102,
-    221, 86,229,102,
-    231, 86,239,102,
-      1,103,  9,119,    // 56
-     11,103, 19,119,
-     21,103, 29,119,
-     31,103, 39,119,
-     41,103, 49,119,
-     51,103, 59,119,
-     61,103, 69,119,
-     71,103, 79,119,
-
-     81,103, 89,119,    // @
-     91,103, 99,119,
-    101,103,109,119,
-    111,103,119,119,
-    121,103,129,119,
-    131,103,139,119,
-    141,103,149,119,
-    151,103,159,119,
-    161,103,169,119,
-    171,103,179,119,
-    181,103,189,119,
-    191,103,199,119,
-    201,103,209,119,
-    211,103,219,119,
-    221,103,229,119,
-    231,103,239,119,
-      1,120,  9,136,    // P
-     11,120, 19,136,
-     21,120, 29,136,
-     31,120, 39,136,
-     41,120, 49,136,
-     51,120, 59,136,
-     61,120, 69,136,
-     71,120, 79,136,
-     81,120, 89,136,
-     91,120, 99,136,
-    101,120,109,136,
-    111,120,119,136,    // [
-    121,120,129,136,
-    131,120,139,136,
-    141,120,149,136,
-    151,120,159,136,    // _
-
-    161,120,169,136,
-    171,120,179,136,    // a
-    181,120,189,136,
-    191,120,199,136,
-    201,120,209,136,
-    211,120,219,136,
-    221,120,229,136,
-    231,120,239,136,
-      1,137,  9,153,
-     11,137, 19,153,
-     21,137, 29,153,
-     31,137, 39,153,
-     41,137, 49,153,
-     51,137, 59,153,
-     61,137, 69,153,
-     71,137, 79,153,    // o
-     81,137, 89,153,
-     91,137, 99,153,
-    101,137,109,153,
-    111,137,119,153,
-    121,137,129,153,
-    131,137,139,153,
-    141,137,149,153,
-    151,137,159,153,
-    161,137,169,153,
-    171,137,179,153,
-    181,137,189,153,
-    191,137,199,153,
-    201,137,209,153,
-    211,137,219,153,
-    221,137,229,153,    // ~
-    231,137,239,153,
-
-#if _POLISH
-    231,137,239,153,    // 128
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-      1,154,  9,170,    // 140 S´
-    231,137,239,153,
-    231,137,239,153,
-     11,154, 19,170,    // 143 Z´
-
-    231,137,239,153,    // 144
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-      1,171,  9,187,    // 156 s´
-    231,137,239,153,
-    231,137,239,153,
-     11,171, 19,187,    // 159 z´
-
-    231,137,239,153,    // 160
-    231,137,239,153,
-    231,137,239,153,
-     21,154, 29,170,    // 163 L/
-    231,137,239,153,
-     31,154, 39,170,    // 165 A,
-      1, 86,  9,102,    // 166 A6 ¦ (space)
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     41,154, 49,170,    // 175 Zo
-
-    231,137,239,153,    // 176
-    231,137,239,153,
-    231,137,239,153,
-     21,171, 29,187,    // 179 l/
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     31,171, 39,187,    // 185 a,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     41,171, 49,187,    // 191 zo
-
-    231,137,239,153,    // 192
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     51,154, 59,170,    // 198 C´
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     61,154, 69,170,    // 202 E,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 208
-     71,154, 79,170,    // 209 N´
-    231,137,239,153,
-     81,171, 89,187,    // 211 O´
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 224
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     51,171, 59,187,    // 230 c´
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-     61,171, 69,187,    // 234 e,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 240
-     71,171, 79,187,    // 241 n´
-    231,137,239,153,
-     81,171, 89,187,    // 243 ó small
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-#else
-    231,137,239,153,    // 128
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 144
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 160
-    231,137,239,153,    // 161 A1 ! reverse
-    231,137,239,153,
-    231,137,239,153,    // 163 A3 �
-    231,137,239,153,
-    231,137,239,153,
-      1, 86,  9,102,    // 166 A6 ¦ (space)
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-
-    231,137,239,153,    // 176
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,    // 191 BF ? reverse
-
-     11,154, 19,170,    // Å• big
-      1,154,  9,170,    // á big
-     21,154, 29,170,    // â big
-     41,154, 49,170,    // ă big
-     31,154, 39,170,    // ä big
-    231,137,239,153,
-    231,137,239,153,
-     51,154, 59,170,    // ç big
-     71,154, 79,170,    // � big
-     61,154, 69,170,    // é big
-     81,154, 89,170,    // Ä™ big
-     91,154, 99,170,    // ë big
-    231,137,239,153,
-    101,154,109,170,    // í big
-    121,154,129,170,    // î big
-    131,154,139,170,    // � big
-    231,137,239,153,
-    141,154,149,170,    // Å„ big
-    231,137,239,153,
-    151,154,159,170,    // ó big
-    171,154,179,170,    // ô big
-    231,137,239,153,
-    181,154,189,170,    // ö big
-    231,137,239,153,
-    231,137,239,153,
-    211,154,219,170,    // ů big
-    201,154,209,170,    // ú big
-    221,154,229,170,    // ű big
-    231,154,239,170,    // ü big
-    231,137,239,153,
-    231,137,239,153,
-    241,154,249,170,    // 223 DF German SS
-
-     11,171, 19,187,    // Å• small
-      1,171,  9,187,    // á small
-     21,171, 29,187,    // â small
-     41,171, 49,187,    // ă small
-     31,171, 39,187,    // ä small
-    231,137,239,153,
-    231,137,239,153,
-     51,171, 59,187,    // ç small
-     71,171, 79,187,    // � small
-     61,171, 69,187,    // é small
-     81,171, 89,187,    // Ä™ small
-     91,171, 99,187,    // ë small
-    231,137,239,153,
-    111,171,119,187,    // Ä› small
-    121,171,129,187,    // î small
-    131,171,139,187,    // � small
-    231,137,239,153,
-    141,171,149,187,    // Å„ small
-    231,137,239,153,
-    151,171,159,187,    // ó small
-    171,171,179,187,    // ô small
-    231,137,239,153,
-    181,171,189,187,    // ö small
-    231,137,239,153,
-    231,137,239,153,
-    211,171,219,187,    // ů small
-    201,171,209,187,    // ú small
-    221,171,229,187,    // ű small
-    231,171,239,187,    // ü small
-    231,137,239,153,
-    231,137,239,153,
-    231,137,239,153,
-#endif
-};
-
-
-// Returns the pointer to the table by the font.
-
-short* RetTable(FontType font)
-{
-    if ( font == FONT_COLOBOT )  return table_text_colobot;
-    else                         return table_text_courier;
-}
-
-
-
-// Object's constructor.
-
-CText::CText(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_TEXT, this);
-
-    m_pD3DDevice = 0;
-    m_engine = engine;
-}
-
-// Object's destructor.
-
-CText::~CText()
-{
-    m_iMan->DeleteInstance(CLASS_TEXT, this);
-}
-
-
-void CText::SetD3DDevice(LPDIRECT3DDEVICE7 device)
-{
-    m_pD3DDevice = device;
-}
-
-
-// Displays multi-font text.
-// The vertical position is at the bottom of the box of the character.
-
-void CText::DrawText(char *string, char *format, int len, Math::Point pos,
-                     float width, int justif, float size, float stretch,
-                     int eol)
-{
-    float   sw;
-
-    if ( justif == 0 )  // center?
-    {
-        sw = RetStringWidth(string, format, len, size, stretch);
-        if ( sw > width )  sw = width;
-        pos.x -= sw/2.0f;
-    }
-    if ( justif < 0 )  // flag was left?
-    {
-        sw = RetStringWidth(string, format, len, size, stretch);
-        if ( sw > width )  sw = width;
-        pos.x -= sw;
-    }
-    DrawString(string, format, len, pos, width, size, stretch, eol);
-}
-
-// Displays multi-font text.
-// The vertical position is at the bottom of the box of the character.
-
-void CText::DrawText(char *string, char *format, Math::Point pos, float width,
-                     int justif, float size, float stretch,
-                     int eol)
-{
-    DrawText(string, format, strlen(string), pos, width, justif, size, stretch, eol);
-}
-
-// Displays text.
-// The vertical position is at the bottom of the box of the character.
-
-void CText::DrawText(char *string, int len, Math::Point pos, float width,
-                     int justif, float size, float stretch, FontType font,
-                     int eol)
-{
-    float   sw;
-
-    if ( justif == 0 )  // center?
-    {
-        sw = RetStringWidth(string, len, size, stretch, font);
-        if ( sw > width )  sw = width;
-        pos.x -= sw/2.0f;
-    }
-    if ( justif < 0 )  // flag was left?
-    {
-        sw = RetStringWidth(string, len, size, stretch, font);
-        if ( sw > width )  sw = width;
-        pos.x -= sw;
-    }
-    DrawString(string, len, pos, width, size, stretch, font, eol);
-}
-
-// Displays text.
-// The vertical position is at the bottom of the box of the character.
-
-void CText::DrawText(char *string, Math::Point pos, float width,
-                     int justif, float size, float stretch, FontType font,
-                     int eol)
-{
-    DrawText(string, strlen(string), pos, width, justif, size, stretch, font, eol);
-}
-
-
-// Returns the size of a multi-font text.
-
-void CText::DimText(char *string, char *format, int len, Math::Point pos,
-                    int justif, float size, float stretch,
-                    Math::Point &start, Math::Point &end)
-{
-    float   sw;
-
-    start = end = pos;
-
-    sw = RetStringWidth(string, format, len, size, stretch);
-    end.x += sw;
-    if ( justif == 0 )  // center?
-    {
-        start.x -= sw/2.0f;
-        end.x   -= sw/2.0f;
-    }
-    if ( justif < 0 )  // flag was left?
-    {
-        start.x -= sw;
-        end.x   -= sw;
-    }
-
-    start.y -= RetDescent(size, FONT_COLOBOT);
-    end.y   += RetAscent(size, FONT_COLOBOT);
-}
-
-// Returns the size of a multi-font text.
-
-void CText::DimText(char *string, char *format, Math::Point pos, int justif,
-                    float size, float stretch,
-                    Math::Point &start, Math::Point &end)
-{
-    DimText(string, format, strlen(string), pos, justif, size, stretch, start, end);
-}
-
-// Returns the size of a text.
-
-void CText::DimText(char *string, int len, Math::Point pos, int justif,
-                    float size, float stretch, FontType font,
-                    Math::Point &start, Math::Point &end)
-{
-    float   sw;
-
-    start = end = pos;
-
-    sw = RetStringWidth(string, len, size, stretch, font);
-    end.x += sw;
-    if ( justif == 0 )  // center?
-    {
-        start.x -= sw/2.0f;
-        end.x   -= sw/2.0f;
-    }
-    if ( justif < 0 )  // flag was left?
-    {
-        start.x -= sw;
-        end.x   -= sw;
-    }
-
-    start.y -= RetDescent(size, font);
-    end.y   += RetAscent(size, font);
-}
-
-// Returns the size of a text.
-
-void CText::DimText(char *string, Math::Point pos, int justif,
-                    float size, float stretch, FontType font,
-                    Math::Point &start, Math::Point &end)
-{
-    DimText(string, strlen(string), pos, justif, size, stretch, font, start, end);
-}
-
-
-// Returns the height above the baseline.
-
-float CText::RetAscent(float size, FontType font)
-{
-    return (13.0f/256.0f)*(size/20.0f);
-}
-
-// Returns the height below the baseline.
-
-float CText::RetDescent(float size, FontType font)
-{
-    return (3.0f/256.0f)*(size/20.0f);
-}
-
-// Returns the total height of the character.
-
-float CText::RetHeight(float size, FontType font)
-{
-    return (16.0f/256.0f)*(size/20.0f);
-}
-
-
-// Returns the width of a string of multi-font characters.
-
-float CText::RetStringWidth(char *string, char *format, int len,
-                            float size, float stretch)
-{
-    FontType    font;
-    float       st, tab, w, width = 0.0f;
-    short       *table, *pt;
-    int         i, c;
-
-    for ( i=0 ; i<len ; i++ )
-    {
-        font = (FontType)(format[i]&FONT_MASK);
-        if ( font == FONT_BUTTON )
-        {
-            width += (12.0f/256.0f)*(size/20.0f);
-        }
-        else
-        {
-            table = RetTable(font);
-            c = (unsigned char)string[i];
-
-            if ( c == '\t' )
-            {
-                pt = table+' '*4;
-                tab = (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*stretch*m_engine->RetEditIndentValue();
-                w = tab-Math::Mod(width, tab);
-                if ( w < tab*0.1f )  w += tab;
-                width += w;
-                continue;
-            }
-
-            if ( c > 255 )  continue;
-
-            pt = table+c*4;
-            st = stretch;
-            if ( font == FONT_COLOBOT && (c == 'O' || c == 'o') )  st = 0.8f;
-            width += (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*st;
-        }
-    }
-
-    return width;
-}
-
-// Returns the width of a string of characters.
-
-float CText::RetStringWidth(char *string, int len,
-                            float size, float stretch, FontType font)
-{
-    float   st, tab, w, width = 0.0f;
-    short   *table, *pt;
-    int     i, c;
-
-    table = RetTable(font);
-    for ( i=0 ; i<len ; i++ )
-    {
-        c = (unsigned char)string[i];
-
-        if ( c == '\t' )
-        {
-            pt = table+' '*4;
-            tab = (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*stretch*m_engine->RetEditIndentValue();
-            w = tab-Math::Mod(width, tab);
-            if ( w < tab*0.1f )  w += tab;
-            width += w;
-            continue;
-        }
-
-        if ( c > 255 )  continue;
-
-        pt = table+c*4;
-        st = stretch;
-        if ( font == FONT_COLOBOT && (c == 'O' || c == 'o') )  st = 0.8f;
-        width += (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*st;
-    }
-
-    return width;
-}
-
-// Returns the width of a character.
-// 'offset' is the current position in the line.
-
-float CText::RetCharWidth(int character, float offset,
-                          float size, float stretch, FontType font)
-{
-    float       st, tab, w;
-    short*      pt;
-
-    if ( font == FONT_BUTTON )  return (12.0f/256.0f)*(size/20.0f);
-
-    if ( character == '\t' )
-    {
-        pt = RetTable(font)+' '*4;
-        tab = (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*stretch*m_engine->RetEditIndentValue();
-        w = tab-Math::Mod(offset, tab);
-        if ( w < tab*0.1f )  w += tab;
-        return w;
-    }
-
-    if ( character > 255 )  return 0.0f;
-
-    pt = RetTable(font)+character*4;
-    st = stretch;
-#if !_NEWLOOK
-    if ( font == FONT_COLOBOT && (character == 'O' || character == 'o') )  st = 0.8f;
-#endif
-    return (float)(pt[2]-pt[0])/256.0f*(size/20.0f)*st;
-}
-
-
-// Justifies a line of multi-font text. Returns the offset of the cut.
-
-int CText::Justif(char *string, char *format, int len, float width,
-                  float size, float stretch)
-{
-    FontType    font;
-    float       pos;
-    int         i, character, cut;
-
-    pos = 0.0f;
-    cut = 0;
-    for ( i=0 ; i<len ; i++ )
-    {
-        font = (FontType)(format[i]&FONT_MASK);
-        character = (unsigned char)string[i];
-
-        if ( character == 0 )
-        {
-            return i;
-        }
-        if ( font != FONT_BUTTON )
-        {
-            if ( character == '\n' )
-            {
-                return i+1;
-            }
-            if ( character == ' ' )
-            {
-                cut = i+1;
-            }
-        }
-
-        pos += RetCharWidth(character, pos, size, stretch, font);
-        if ( pos > width )
-        {
-            if ( cut == 0 )  return i;
-            else             return cut;
-        }
-    }
-    return i;
-}
-
-// Justify a line of text. Returns the offset of the cut.
-
-int CText::Justif(char *string, int len, float width,
-                  float size, float stretch, FontType font)
-{
-    float   pos;
-    int     i, character, cut;
-
-    pos = 0.0f;
-    cut = 0;
-    for ( i=0 ; i<len ; i++ )
-    {
-        character = (unsigned char)string[i];
-
-        if ( character == 0 )
-        {
-            return i;
-        }
-        if ( character == '\n' )
-        {
-            return i+1;
-        }
-        if ( character == ' ' )
-        {
-            cut = i+1;
-        }
-
-        pos += RetCharWidth(character, pos, size, stretch, font);
-        if ( pos > width )
-        {
-            if ( cut == 0 )  return i;
-            else             return cut;
-        }
-    }
-    return i;
-}
-
-// Returns the most suitable position to a given offset (multi-font).
-
-int CText::Detect(char *string, char *format, int len, float offset,
-                  float size, float stretch)
-{
-    FontType    font;
-    float       pos, width;
-    int         i, character, cut;
-
-    pos = 0.0f;
-    cut = 0;
-    for ( i=0 ; i<len ; i++ )
-    {
-        font = (FontType)(format[i]&FONT_MASK);
-        character = (unsigned char)string[i];
-
-        if ( character == 0 )
-        {
-            return i;
-        }
-        if ( font != FONT_BUTTON )
-        {
-            if ( character == '\n' )
-            {
-                return i;
-            }
-        }
-
-        width = RetCharWidth(character, pos, size, stretch, font);
-        if ( offset <= pos+width/2.0f )
-        {
-            return i;
-        }
-        pos += width;
-    }
-    return i;
-}
-
-// Returns the most suitable position to a given offset (multi-font).
-
-int CText::Detect(char *string, int len, float offset,
-                  float size, float stretch, FontType font)
-{
-    float   pos, width;
-    int     i, character, cut;
-
-    pos = 0.0f;
-    cut = 0;
-    for ( i=0 ; i<len ; i++ )
-    {
-        character = (unsigned char)string[i];
-
-        if ( character == 0    ||
-             character == '\n' )
-        {
-            return i;
-        }
-
-        width = RetCharWidth(character, pos, size, stretch, font);
-        if ( offset <= pos+width/2.0f )
-        {
-            return i;
-        }
-        pos += width;
-    }
-    return i;
-}
-
-
-// Displays multi-font text.
-
-void CText::DrawString(char *string, char *format, int len, Math::Point pos,
-                       float width, float size, float stretch, int eol)
-{
-    FontType    font;
-    float       start, offset, cw;
-    int         i, c;
-
-#if _POLISH
-    m_engine->SetTexture("textp.tga");
-#else
-    m_engine->SetTexture("text.tga");
-#endif
-    m_engine->SetState(D3DSTATETTw);
-
-    font = FONT_COLOBOT;
-
-    start = pos.x;
-    offset = 0.0f;
-    for ( i=0 ; i<len ; i++ )
-    {
-        font = (FontType)(format[i]&FONT_MASK);
-        c = (unsigned char)string[i];
-        cw = RetCharWidth(c, offset, size, stretch, font);
-
-        if ( offset+cw > width )  // exceeds the maximum width?
-        {
-            cw = RetCharWidth(16, offset, size, stretch, font);
-            pos.x = start+width-cw;
-            DrawChar(16, pos, size, stretch, font);  // >
-            break;
-        }
-
-        if ( (format[i]&COLOR_MASK) != 0 )
-        {
-            DrawColor(pos, size, cw, format[i]&COLOR_MASK);
-        }
-        DrawChar(c, pos, size, stretch, font);
-        offset += cw;
-        pos.x += cw;
-    }
-
-    if ( eol != 0 )
-    {
-        DrawChar(eol, pos, size, stretch, font);
-    }
-}
-
-// Displays text.
-
-void CText::DrawString(char *string, int len, Math::Point pos, float width,
-                       float size, float stretch, FontType font,
-                       int eol)
-{
-    float       start, offset, cw;
-    int         i, c;
-
-#if _POLISH
-    m_engine->SetTexture("textp.tga");
-#else
-    m_engine->SetTexture("text.tga");
-#endif
-    m_engine->SetState(D3DSTATETTw);
-
-    start = pos.x;
-    offset = 0.0f;
-    for ( i=0 ; i<len ; i++ )
-    {
-        c = (unsigned char)string[i];
-        cw = RetCharWidth(c, offset, size, stretch, font);
-
-        if ( offset+cw > width )  // exceeds the maximum width?
-        {
-            cw = RetCharWidth(16, offset, size, stretch, font);
-            pos.x = start+width-cw;
-            DrawChar(16, pos, size, stretch, font);  // >
-            break;
-        }
-
-        DrawChar(c, pos, size, stretch, font);
-        offset += cw;
-        pos.x += cw;
-    }
-
-    if ( eol != 0 )
-    {
-        DrawChar(eol, pos, size, stretch, font);
-    }
-}
-
-// Displays the link to a character.
-
-void CText::DrawColor(Math::Point pos, float size, float width, int color)
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Point     p1, p2;
-    POINT       dim;
-    Math::Vector    n;
-    float       h, u1, u2, v1, v2, dp;
-    int         icon;
-
-    icon = -1;
-    if ( color == COLOR_LINK  )  icon =  9;  // blue
-    if ( color == COLOR_TOKEN )  icon =  4;  // orange
-    if ( color == COLOR_TYPE  )  icon =  5;  // green
-    if ( color == COLOR_CONST )  icon =  8;  // red
-    if ( color == COLOR_REM   )  icon =  6;  // magenta
-    if ( color == COLOR_KEY   )  icon = 10;  // gray
-    if ( icon == -1 )  return;
-
-    if ( color == COLOR_LINK )
-    {
-        m_engine->SetState(D3DSTATENORMAL);
-    }
-
-    dim = m_engine->RetDim();
-    if ( dim.y <= 768.0f )  // 1024x768 or less?
-    {
-        h = 1.01f/dim.y;  // 1 pixel
-    }
-    else    // more than 1024x768?
-    {
-        h = 2.0f/dim.y;  // 2 pixels
-    }
-
-    p1.x = pos.x;
-    p2.x = pos.x + width;
-
-    if ( color == COLOR_LINK )
-    {
-        p1.y = pos.y;
-        p2.y = pos.y + h;  // just emphasized
-    }
-    else
-    {
-#if 1
-        p1.y = pos.y;
-        p2.y = pos.y + (16.0f/256.0f)*(size/20.0f);
-//?     p2.y = pos.y + h*4.0f;  // just emphasized thick
-#else
-        p1.y = pos.y;
-        p2.y = pos.y + (16.0f/256.0f)*(size/20.0f)/4.0f;
-#endif
-    }
-
-    u1 = (16.0f/256.0f)*(icon%16);
-    v1 = (240.0f/256.0f);
-    u2 = (16.0f/256.0f)+u1;
-    v2 = (16.0f/256.0f)+v1;
-
-    dp = 0.5f/256.0f;
-    u1 += dp;
-    v1 += dp;
-    u2 -= dp;
-    v2 -= dp;
-
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-
-    if ( color == COLOR_LINK )
-    {
-        m_engine->SetState(D3DSTATETTw);
-    }
-}
-
-// Displays a character.
-
-void CText::DrawChar(int character, Math::Point pos, float size,
-                     float stretch, FontType font)
-{
-    D3DVERTEX2  vertex[4];  // 2 triangles
-    Math::Point     p1, p2;
-    Math::Vector    n;
-    float       width, height, u1, u2, v1, v2, dp;
-    short*      pt;
-
-    dp = 0.5f/256.0f;
-    n = Math::Vector(0.0f, 0.0f, -1.0f);  // normal
-
-    if ( font == FONT_BUTTON )
-    {
-        m_engine->SetTexture("button1.tga");
-        m_engine->SetState(D3DSTATENORMAL);
-
-        p1.x = pos.x;
-        p1.y = pos.y;
-        p2.x = pos.x + (12.0f/256.0f)*(size/20.0f);
-        p2.y = pos.y + (16.0f/256.0f)*(size/20.0f);
-
-        if ( character <= 64 || character >= 128+56 )
-        {
-            u1 =  66.0f/256.0f;
-            v1 =   2.0f/256.0f;
-            u2 =  94.0f/256.0f;
-            v2 =  30.0f/256.0f;
-        }
-        else
-        {
-            u1 = 224.0f/256.0f;
-            v1 =  32.0f/256.0f;
-            u2 = 256.0f/256.0f;
-            v2 =  64.0f/256.0f;
-        }
-
-        u1 += dp;
-        v1 += dp;
-        u2 -= dp;
-        v2 -= dp;
-
-        vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-        vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-        vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-        vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-
-//?     p1.x += (12.0f/256.0f)*(size/20.0f)*0.1f;
-//?     p1.y += (16.0f/256.0f)*(size/20.0f)*0.1f;
-//?     p2.x -= (12.0f/256.0f)*(size/20.0f)*0.1f;
-//?     p2.y -= (16.0f/256.0f)*(size/20.0f)*0.1f;
-
-        if ( character >= 64 && character < 64+64 )
-        {
-            character -= 64;
-            m_engine->SetTexture("button2.tga");
-        }
-        if ( character >= 128 && character < 128+64 )
-        {
-            character -= 128;
-            m_engine->SetTexture("button3.tga");
-        }
-
-        m_engine->SetState(D3DSTATETTw);
-
-        u1 = (32.0f/256.0f)*(character%8);
-        v1 = (32.0f/256.0f)*(character/8);  // uv texture
-        u2 = (32.0f/256.0f)+u1;
-        v2 = (32.0f/256.0f)+v1;
-
-        u1 += dp;
-        v1 += dp;
-        u2 -= dp;
-        v2 -= dp;
-
-        vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-        vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-        vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-        vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-        m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-        m_engine->AddStatisticTriangle(2);
-
-
-#if _POLISH
-        m_engine->SetTexture("textp.tga");
-#else
-        m_engine->SetTexture("text.tga");
-#endif
-        return;
-    }
-
-    if ( character > 255 )  return;
-
-//? if ( character == '\t' )  character = ' ';  // if tab, does not display ->
-
-#if !_NEWLOOK
-    if ( font == FONT_COLOBOT && (character == 'O' || character == 'o') )
-    {
-        stretch = 0.8f;
-    }
-#endif
-    if ( font == FONT_COURIER )
-    {
-        stretch *= 1.2f;
-    }
-
-    pt = RetTable(font)+character*4;
-    width  = (float)(pt[2]-pt[0])/256.0f*stretch*0.9f;
-//? width  = (float)(pt[2]-pt[0])/256.0f*stretch;
-    height = (float)(pt[3]-pt[1])/256.0f;
-
-#if _NEWLOOK
-        pos.y += height*(size/20.0f)/17.0f;
-#endif
-    p1.x = pos.x;
-    p1.y = pos.y;
-    p2.x = pos.x + width*(size/20.0f);
-    p2.y = pos.y + height*(size/20.0f);
-
-    u1 = (float)pt[0]/256.0f;
-    v1 = (float)pt[1]/256.0f;
-    u2 = (float)pt[2]/256.0f;
-    v2 = (float)pt[3]/256.0f;
-
-    if ( font == FONT_COLOBOT )
-    {
-        u1 += dp;
-        u2 += dp;
-#if _NEWLOOK
-        v2 += dp;
-#endif
-    }
-    if ( font == FONT_COURIER )
-    {
-        u1 -= dp;
-        u2 += dp*2.0f;
-    }
-
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p1.y, 0.0f), n, u1,v2);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p2.y, 0.0f), n, u1,v1);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p1.y, 0.0f), n, u2,v2);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p2.y, 0.0f), n, u2,v1);
-
-    m_pD3DDevice->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-}
-
diff --git a/src/old/text.h b/src/old/text.h
deleted file mode 100644
index 3b2fd90..0000000
--- a/src/old/text.h
+++ /dev/null
@@ -1,111 +0,0 @@
-// * 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/.
-
-// text.h
-
-#pragma once
-
-
-#include "math/point.h"
-#include "old/d3dengine.h"
-
-
-class CInstanceManager;
-
-
-
-const float SMALLFONT   = 10.0f;
-const float BIGFONT     = 15.0f;
-
-const float NORMSTRETCH = 0.8f;
-
-
-
-enum FontType
-{
-    FONT_COLOBOT    = 0,
-    FONT_COURIER    = 1,
-    FONT_BUTTON     = 2,
-};
-
-enum FontTitle
-{
-    TITLE_BIG       = 0x04,
-    TITLE_NORM      = 0x08,
-    TITLE_LITTLE    = 0x0c,
-};
-
-enum FontColor
-{
-    COLOR_LINK      = 0x10,
-    COLOR_TOKEN     = 0x20,
-    COLOR_TYPE      = 0x30,
-    COLOR_CONST     = 0x40,
-    COLOR_REM       = 0x50,
-    COLOR_KEY       = 0x60,
-    COLOR_TABLE     = 0x70,
-};
-
-const int FONT_MASK     = 0x03;
-const int TITLE_MASK    = 0x0c;
-const int COLOR_MASK    = 0x70;
-const int IMAGE_MASK    = 0x80;
-
-
-
-class CText
-{
-public:
-    CText(CInstanceManager *iMan, CD3DEngine* engine);
-    ~CText();
-
-    void        SetD3DDevice(LPDIRECT3DDEVICE7 device);
-
-    void        DrawText(char *string, char *format, int len, Math::Point pos, float width, int justif, float size, float stretch, int eol);
-    void        DrawText(char *string, char *format, Math::Point pos, float width, int justif, float size, float stretch, int eol);
-    void        DrawText(char *string, int len, Math::Point pos, float width, int justif, float size, float stretch, FontType font, int eol);
-    void        DrawText(char *string, Math::Point pos, float width, int justif, float size, float stretch, FontType font, int eol);
-    void        DimText(char *string, char *format, int len, Math::Point pos, int justif, float size, float stretch, Math::Point &start, Math::Point &end);
-    void        DimText(char *string, char *format, Math::Point pos, int justif, float size, float stretch, Math::Point &start, Math::Point &end);
-    void        DimText(char *string, int len, Math::Point pos, int justif, float size, float stretch, FontType font, Math::Point &start, Math::Point &end);
-    void        DimText(char *string, Math::Point pos, int justif, float size, float stretch, FontType font, Math::Point &start, Math::Point &end);
-
-    float       RetAscent(float size, FontType font);
-    float       RetDescent(float size, FontType font);
-    float       RetHeight(float size, FontType font);
-
-    float       RetStringWidth(char *string, char *format, int len, float size, float stretch);
-    float       RetStringWidth(char *string, int len, float size, float stretch, FontType font);
-    float       RetCharWidth(int character, float offset, float size, float stretch, FontType font);
-
-    int         Justif(char *string, char *format, int len, float width, float size, float stretch);
-    int         Justif(char *string, int len, float width, float size, float stretch, FontType font);
-    int         Detect(char *string, char *format, int len, float offset, float size, float stretch);
-    int         Detect(char *string, int len, float offset, float size, float stretch, FontType font);
-
-protected:
-    void        DrawString(char *string, char *format, int len, Math::Point pos, float width, float size, float stretch, int eol);
-    void        DrawString(char *string, int len, Math::Point pos, float width, float size, float stretch, FontType font, int eol);
-    void        DrawColor(Math::Point pos, float size, float width, int color);
-    void        DrawChar(int character, Math::Point pos, float size, float stretch, FontType font);
-
-protected:
-    CInstanceManager* m_iMan;
-    CD3DEngine*       m_engine;
-    LPDIRECT3DDEVICE7 m_pD3DDevice;
-
-};
-
diff --git a/src/old/tracks.txt b/src/old/tracks.txt
deleted file mode 100644
index 8d80872..0000000
--- a/src/old/tracks.txt
+++ /dev/null
@@ -1,17 +0,0 @@
-Utilisation des tracks

-

- 1: data

- 2: terre      Terre

- 3: tropica    Tropica

- 4: crystalium Crystalium

- 5: saari      Saari

- 6: volcano    Volcano

- 7: centaury   Centaury

- 8: orpheon    Orphéon

- 9: terranova  Terranova

-10: lost       perdu

-11: win        gagné

-12: fox        fin du jeu

-13: shuffle    -

-

-DR 12.06.01

diff --git a/src/old/traduc.txt b/src/old/traduc.txt
deleted file mode 100644
index 73bbf55..0000000
--- a/src/old/traduc.txt
+++ /dev/null
@@ -1,151 +0,0 @@
-Types des objets COLOBOT

-------------------------

-

-

-	...					// sac de survie

-

-	BaseCamp			// fusée principale

-	Derrick				// derrick

-	BotFactory			// fabrique de véhicules

-	PowerStation		// station de recharge

-	Converter			// conversion minerai en titanium

-	RepairCenter		// centre de réparation

-	DefenceTower		// tour de défense

-	AlienNest			// nid

-	ResearchCenter		// centre de recherches

-	RadarStation		// radar

-	PowerPlant			// fabrique de piles

-	AutoLab				// analyseur de matières organiques

-	NuclearPlant		// centrale nucléaire

-	StartArea			// départ

-	GoalArea			// arrivée

-	ExchangePost		// borne d'information

-

-	TitaniumOre			// minerai de titanium

-	UraniumOre			// minerai d'uranium

-	Titanium			// titanium

-	PowerPack			// pile normale

-	NuclearPack			// pile nucléaire

-	OrgaStuff			// matière organique

-	BlackBox			// boîte noire

-	TNT					// explosif

-

-	PowerSpot			// énergie en sous-sol

-	TitaniumSpot		// titanium en sous-sol

-	UraniumSpot			// uranium en sous-sol

-	PathSpot			// chemin

-

-	TrainingRollerBot	// véhicule d'entraînement :

-	TrainingCrawlerBot

-	TrainingJetBot

-	TrainingSpiderBot

-

-	GrabberRollerBot	// véhicule manipulateur :

-	GrabberCrawlerBot

-	GrabberJetBot

-	GrabberSpiderBot

-

-	FireballRollerBot	// véhicule de défense :

-	FireballCrawlerBot

-	FireballJetBot

-	FireballSpiderBot

-

-	OrgaballRollerBot	// véhicule de défense :

-	OrgaballCrawlerBot

-	OrgaballJetBot

-	OrgaballSpiderBot

-

-	SnifferRollerBot	// véhicule sondeur :

-	SnifferCrawlerBot

-	SnifferJetBot

-	SnifferSpiderBot

-

-	ThumperBot			// véhicule de terrassement

-	FazerBot			// véhicule de défense

-	RecyclerBot			// véhicule de récupération

-	ShieldBot			// véhicule de protection

-	SubBot				// sous-marin

-	TargetBot			// cible d'entraînement

-

-	Me					// homme

-	Wiz					// toto

-

-	AlienBigLady		// mère pondeuse

-	AlienEgg			// oeuf

-	AlienAnt			// fourmi

-	AlienSpider			// araignée

-	AlienWasp			// guèpe

-	AlienWorm			// ver

-

-	Wreck				// épave de véhicule

-	Ruin				// bâtiment en ruine

-	Firework			// feu d'artifice

-	Mine				// mine

-	Barrier				// barrière

-	Greenery			// plante

-	Tree				// arbre

-	Quartz				// quartz

-	MegaStalk			// racine

-	...					// gravi-plante

-

-

-Fonction du langage CBOT :

-

-	Move				// avance d'une certaine distance

-	Turn				// tourne d'un certain angle

-	Goto				// va à une coordonnée donnée

-	Motor				// commande directe des moteurs gauche & droite

-	Jet					// commande directe du réacteur

-

-	Radar				// détecte un objet

-	Direction			// calcule une direction

-	Distance			// calcule la distance entre deux points

-	Wait				// attend

-	Produce				// crée un objet

-	Message				// affiche un message

-

-	Grab				// prend un objet avec le bras manipulateur

-	Drop				// dépose un objet avec le bras manipulateur

-	Sniff				// sonde le sous-sol

-	Receive				// reçoit une information

-	Send				// envoie une information

-	Thump				// terraforme le terrain

-	Recycle				// récupère une épave

-	Shield				// actionne le bouclier de protection

-	Fire				// tir avec un canon

-	Aim					// hausse du canon

-

-

-Classes :

-

-	point				// point avec coordonnées x,y,z

-	object				// descriptif d'un objet

-

-

-Descripteur d'un objet :

-

-	category			// catégorie de l'objet

-	energyPack			// object pile

-	load				// objet transporté

-	position			// position x,y,z

-	direction			// orientation

-	energyLevel			// niveau d'énergie

-	shieldLevel			// niveau du bouclier

-	altitude			// hauteur par rapport au sol

-

-

-Argument de la commande Manip( ) :

-

-	InFront				// prend ou dépose devant

-	Behind				// prend ou dépose derrière

-	EnergyPack			// prend ou dépose sa propre pile

-

-

-Filtre pour la commande Radar( ) ;

-

-	FilterNone			// pas de filtre

-	FilterOnlyLanding	// seulement les robots qui roulent

-	FilterOnlyFliying	// seulement les robots qui volent

-

-

-DR 14.03.01

diff --git a/src/old/version.txt b/src/old/version.txt
deleted file mode 100644
index da31287..0000000
--- a/src/old/version.txt
+++ /dev/null
@@ -1,108 +0,0 @@
-1.18 (24.01.08)

-- Ne vérifie plus la présence des pistes audio.

-

-1.17 (08.01.08)

-- Sound.cpp:InitAudioTrackVolume:mixerGetLineControls ne devrait plus planter

-  sous Vista, grace à l'abandon de MIXER_GETLINECONTROLSF_ALL.

-- CoLoBoT ne joue plus les pistes audio, et le réglage du volume a disparu

-- CoLoBoT n'affiche plus Alsyd

-- Texte "www.colobot.com" remplacé par "www.ceebot.com"

-

-1.16 (10.11.03)

-- Options: si "accès aux solutions" décoché -> Lancer défi,

-  éditer programme, Esc, Abandonner: plus de bouton "accès à la solution"

-

-1.15 (02.09.03)

-- EVENT_INTERFACE_KGUP:    plus si CeeBot-Teen !

-- EVENT_INTERFACE_KGDOWN:  plus si CeeBot-Teen !

-- EVENT_INTERFACE_KACTION: plus si CeeBot-Teen !

-- EVENT_INTERFACE_KVISIT:  plus si CeeBot-Teen !

-- EVENT_INTERFACE_KNEXT:   plus si CeeBot-Teen !

-- EVENT_INTERFACE_KHUMAN:  plus si CeeBot-Teen !

-- EVENT_INTERFACE_KDESEL:  plus si CeeBot-Teen !

-- EVENT_INTERFACE_KCBOT:   plus si CeeBot-Teen !

-

-1.14 (28.07.03)

-- Switch -nosetup -> plus de bouton "Options" pendant jeu

-

-1.8 ()

-- instruction shield(1, radius) ok avec radius 10..25

-- instruction shield(1, radius) possible si bouclier déjà déployé

-

-1.8 BETA (05.10.01)

-- CBOT: public, static, synchronized, private, protected

-- CBOT: strlen, strleft, strright, strmid, strval, strfind, strupper, strlower

-- CBOT: file, open, close, writeln, readln, eof, deletefile

-- extern/public: aide en cliquant dans la ligne d'info de l'éditeur

-- ExchangePost: UpdateList si infos reçues

-- ok si lien d'un seul caractère: \l;x\u file;

-- colobot.ini: [Setup] DeleteGamer=1

-- colobot.ini: [Directory] files=files

-- studio: nb max de caractères: 10000 -> 20000

-- script antt41 (scene904): AlienMother -> AlienQueen

-- load: recompilation ok si procédures "public" dans d'autres robots

-- si le volume CD est nul, la piste n'est pas du tout jouée

-- goto ResearchCenter toujours possible

-- meilleure gestion des touches Ctrl et Shift dans l'éditeur

-- object.temperature=12 impossible (PR_READ)

-- studio: ne plante plus si on tape plus de 100 car. sans espace

-- studio: "enregistrer" se rappelle du nom de fichier dans la mission

-- studio: Ctrl+A sélectionne tout

-- studio: run: si liste < 5 variables -> fond gris

-

-1.7 (13.09.01)

-- object.lifeTime

-- object.range Winged* idem si camera OnBoard/Back

-- float flatground(center, rmax);

-- float abstime();

-- float receive(name, power);

-- void send(name, value, power);

-- void deleteinfo(name, power);

-- bool testinfo(name, power);

-- Le cosmonaute peut construire une borne d'information

-

-1.6 (06.09.01)

-- niveaux supplémentaires avec %user%

-- fonction "send" plus coloriée

-- english help: EnergyPack -> EnergyCell

-- english help: energyPack -> energyCell

-- english help: FinishArea -> GoalArea

-

-1.5 (24.08.01)

-- first execute: prefered first non-T&L, second T&L

-- fondus welcome: D3DSTATETTb/w -> D3DSTATETCb/w

-

-1.4 (02.08.01)

-- n'importe quelle touche/clic passe les écrans welcome1, 2 et 3

-- icône associée au CD dans autorun.inf

-- SatCom: icône "Aide à la programmation" présente dans exercices

-- welcome: phase "Alsyd" plus longue (8s)

-- SaveOneScript quand on quitte le studio par ok, cancel ou run

-

-1.3 (27.07.01)

-- goto BotFactory toujours possible

-- documentation errmode(0)

-- petites corrections anglaises par MW

-- enlever pile pendant recherche ne bloque plus

-- si human porte qq chose et vaisseau décole -> ne reste plus sur place

-- robot sur vaisseau puis sauvegarder-reprendre -> impossible gravir pentes

-

-GoldMaster 1.3 /e envoyé à CD PRESS pour 1000x

-

-1.2

-- bouton de fermeture (en haut à droite) supprimé en mode fenêtré

-- suppression du réglage "nice reset"

-

-1.1 (20.07.01)

-- volume du son non nul après installation

-- images logo au démarrage du jeu

-- image generic != si français ou anglais

-- install: nouvelle clé pour uninstall depuis autorun

-

-GoldMaster 1.1 /f envoyé à Alsyd

-

-1.0

-- commande "reset" (exercices) tjrs ok (fichier rechargé)

-- nom sauvegarde avec date/heure au format anglais

-- ScriptName.F et .E

-

diff --git a/src/old/water.cpp b/src/old/water.cpp
deleted file mode 100644
index dfde09e..0000000
--- a/src/old/water.cpp
+++ /dev/null
@@ -1,844 +0,0 @@
-// * 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/.
-
-// water.cpp
-
-
-#include <windows.h>
-#include <stdio.h>
-#include <d3d.h>
-
-#include "common/struct.h"
-#include "math/geometry.h"
-#include "math/conv.h"
-#include "old/d3dengine.h"
-#include "old/d3dmath.h"
-#include "old/d3dutil.h"
-#include "common/event.h"
-#include "common/misc.h"
-#include "common/iman.h"
-#include "old/math3d.h"
-#include "old/particule.h"
-#include "old/terrain.h"
-#include "object/object.h"
-#include "old/sound.h"
-#include "old/water.h"
-
-
-
-
-// Constructor of the terrain.
-
-CWater::CWater(CInstanceManager* iMan, CD3DEngine* engine)
-{
-    m_iMan = iMan;
-    m_iMan->AddInstance(CLASS_WATER, this);
-
-    m_engine = engine;
-    m_terrain = 0;
-    m_particule = 0;
-    m_sound = 0;
-
-    m_type[0] = WATER_NULL;
-    m_type[1] = WATER_NULL;
-    m_level = 0.0f;
-    m_bDraw = true;
-    m_bLava = false;
-    m_color = 0xffffffff;
-    m_subdiv = 4;
-    m_filename[0] = 0;
-}
-
-// Destructor of the terrain.
-
-CWater::~CWater()
-{
-}
-
-
-bool CWater::EventProcess(const Event &event)
-{
-    if ( event.event == EVENT_FRAME )
-    {
-        return EventFrame(event);
-    }
-
-    if ( event.event == EVENT_KEYDOWN )
-    {
-#if 0
-        if ( event.param == 'S' )
-        {
-                 if ( m_subdiv == 1 )  m_subdiv = 2;
-            else if ( m_subdiv == 2 )  m_subdiv = 4;
-            else if ( m_subdiv == 4 )  m_subdiv = 8;
-            else if ( m_subdiv == 8 )  m_subdiv = 1;
-            SetLevel(m_level);
-        }
-        if ( event.param == 'M' )
-        {
-            SetLevel(m_level+1.0f);
-        }
-        if ( event.param == 'D' )
-        {
-            SetLevel(m_level-1.0f);
-        }
-        if ( event.param == 'H' )
-        {
-            m_bDraw = !m_bDraw;
-        }
-        if ( event.param == 'C' )
-        {
-                 if ( m_color == 0xffffffff )  m_color = 0xcccccccc;
-            else if ( m_color == 0xcccccccc )  m_color = 0x88888888;
-            else if ( m_color == 0x88888888 )  m_color = 0x44444444;
-            else if ( m_color == 0x44444444 )  m_color = 0x00000000;
-            else if ( m_color == 0x00000000 )  m_color = 0xffffffff;
-        }
-        if ( event.param == 'Q' )
-        {
-            int     i;
-            i = (m_color>>24);
-            i += 0x44;
-            i &= 0xff;
-            i = (i<<24);
-            m_color &= 0x00ffffff;
-            m_color |= i;
-        }
-        if ( event.param == 'W' )
-        {
-            int     i;
-            i = (m_color>>16);
-            i += 0x44;
-            i &= 0xff;
-            i = (i<<16);
-            m_color &= 0xff00ffff;
-            m_color |= i;
-        }
-        if ( event.param == 'E' )
-        {
-            int     i;
-            i = (m_color>>8);
-            i += 0x44;
-            i &= 0xff;
-            i = (i<<8);
-            m_color &= 0xffff00ff;
-            m_color |= i;
-        }
-        if ( event.param == 'R' )
-        {
-            int     i;
-            i = m_color;
-            i += 0x44;
-            i &= 0xff;
-            m_color &= 0xffffff00;
-            m_color |= i;
-        }
-#endif
-    }
-    return true;
-}
-
-// Makes water evolve.
-
-bool CWater::EventFrame(const Event &event)
-{
-    if ( m_engine->RetPause() )  return true;
-
-    m_time += event.rTime;
-
-    if ( m_type[0] == WATER_NULL )  return true;
-
-    if ( m_bLava )
-    {
-        LavaFrame(event.rTime);
-    }
-    return true;
-}
-
-// Makes evolve the steam jets on the lava.
-
-void CWater::LavaFrame(float rTime)
-{
-    Math::Vector    eye, lookat, dir, perp, pos;
-    float       distance, shift, level;
-    int         i;
-
-    if ( m_particule == 0 )
-    {
-        m_particule = (CParticule*)m_iMan->SearchInstance(CLASS_PARTICULE);
-    }
-
-    for ( i=0 ; i<MAXWATVAPOR ; i++ )
-    {
-        VaporFrame(i, rTime);
-    }
-
-    if ( m_time-m_lastLava >= 0.1f )
-    {
-        eye    = m_engine->RetEyePt();
-        lookat = m_engine->RetLookatPt();
-
-        distance = Math::Rand()*200.0f;
-        shift = (Math::Rand()-0.5f)*200.0f;
-
-        dir = Normalize(lookat-eye);
-        pos = eye + dir*distance;
-
-        perp.x = -dir.z;
-        perp.y =  dir.y;
-        perp.z =  dir.x;
-        pos = pos + perp*shift;
-
-        level = m_terrain->RetFloorLevel(pos, true);
-        if ( level < m_level )
-        {
-            pos.y = m_level;
-
-            level = Math::Rand();
-            if ( level < 0.8f )
-            {
-                if ( VaporCreate(PARTIFIRE, pos, 0.02f+Math::Rand()*0.06f) )
-                {
-                    m_lastLava = m_time;
-                }
-            }
-            else if ( level < 0.9f )
-            {
-                if ( VaporCreate(PARTIFLAME, pos, 0.5f+Math::Rand()*3.0f) )
-                {
-                    m_lastLava = m_time;
-                }
-            }
-            else
-            {
-                if ( VaporCreate(PARTIVAPOR, pos, 0.2f+Math::Rand()*2.0f) )
-                {
-                    m_lastLava = m_time;
-                }
-            }
-        }
-    }
-}
-
-// Removes all the steam jets.
-
-void CWater::VaporFlush()
-{
-    int     i;
-
-    for ( i=0 ; i<MAXWATVAPOR ; i++ )
-    {
-        m_vapor[i].bUsed = false;
-    }
-}
-
-// Creates a new steam.
-
-bool CWater::VaporCreate(ParticuleType type, Math::Vector pos, float delay)
-{
-    int     i;
-
-    for ( i=0 ; i<MAXWATVAPOR ; i++ )
-    {
-        if ( !m_vapor[i].bUsed )
-        {
-            m_vapor[i].bUsed = true;
-            m_vapor[i].type  = type;
-            m_vapor[i].pos   = pos;
-            m_vapor[i].delay = delay;
-            m_vapor[i].time  = 0.0f;
-            m_vapor[i].last  = 0.0f;
-
-            if ( m_vapor[i].type == PARTIFIRE )
-            {
-                m_sound->Play(SOUND_BLUP, pos, 1.0f, 1.0f-Math::Rand()*0.5f);
-            }
-            if ( m_vapor[i].type == PARTIFLAME )
-            {
-//?             m_sound->Play(SOUND_SWIM, pos, 1.0f, 1.0f-Math::Rand()*0.5f);
-            }
-            if ( m_vapor[i].type == PARTIVAPOR )
-            {
-                m_sound->Play(SOUND_PSHHH, pos, 0.3f, 2.0f);
-            }
-
-            return true;
-        }
-    }
-    return false;
-}
-
-// Makes evolve a steam jet,
-
-void CWater::VaporFrame(int i, float rTime)
-{
-    Math::Vector    pos, speed;
-    Math::Point     dim;
-    int         j;
-
-    m_vapor[i].time += rTime;
-
-    if ( m_sound == 0 )
-    {
-        m_sound = (CSound*)m_iMan->SearchInstance(CLASS_SOUND);
-    }
-
-    if ( m_vapor[i].time <= m_vapor[i].delay )
-    {
-        if ( m_time-m_vapor[i].last >= m_engine->ParticuleAdapt(0.02f) )
-        {
-            m_vapor[i].last = m_time;
-
-            if ( m_vapor[i].type == PARTIFIRE )
-            {
-                for ( j=0 ; j<10 ; j++ )
-                {
-                    pos = m_vapor[i].pos;
-                    pos.x += (Math::Rand()-0.5f)*2.0f;
-                    pos.z += (Math::Rand()-0.5f)*2.0f;
-                    pos.y -= 1.0f;
-                    speed.x = (Math::Rand()-0.5f)*6.0f;
-                    speed.z = (Math::Rand()-0.5f)*6.0f;
-                    speed.y = 8.0f+Math::Rand()*5.0f;
-                    dim.x = Math::Rand()*1.5f+1.5f;
-                    dim.y = dim.x;
-                    m_particule->CreateParticule(pos, speed, dim, PARTIERROR, 2.0f, 10.0f);
-                }
-            }
-            else if ( m_vapor[i].type == PARTIFLAME )
-            {
-                pos = m_vapor[i].pos;
-                pos.x += (Math::Rand()-0.5f)*8.0f;
-                pos.z += (Math::Rand()-0.5f)*8.0f;
-                pos.y -= 2.0f;
-                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()*2.0f+2.0f;
-                dim.y = dim.x;
-                m_particule->CreateParticule(pos, speed, dim, PARTIFLAME);
-            }
-            else
-            {
-                pos = m_vapor[i].pos;
-                pos.x += (Math::Rand()-0.5f)*4.0f;
-                pos.z += (Math::Rand()-0.5f)*4.0f;
-                pos.y -= 2.0f;
-                speed.x = (Math::Rand()-0.5f)*2.0f;
-                speed.z = (Math::Rand()-0.5f)*2.0f;
-                speed.y = 8.0f+Math::Rand()*8.0f;
-                dim.x = Math::Rand()*1.0f+1.0f;
-                dim.y = dim.x;
-                m_particule->CreateParticule(pos, speed, dim, PARTIVAPOR);
-            }
-        }
-    }
-    else
-    {
-        m_vapor[i].bUsed = false;
-    }
-}
-
-
-// Adjusts the position to normal, to imitate reflections on an expanse of water at rest.
-
-void CWater::AdjustLevel(Math::Vector &pos, Math::Vector &norm,
-                         Math::Point &uv1, Math::Point &uv2)
-{
-#if 0
-    float       t1, t2;
-
-    uv1.x = (pos.x+10000.0f)/40.0f;
-    uv1.y = (pos.z+10000.0f)/40.0f;
-
-    t1 = m_time*1.5f + pos.x*0.1f * pos.z*0.2f;
-    pos.y += sinf(t1)*m_eddy.y;
-
-    t1 = m_time*0.6f + pos.x*0.1f * pos.z*0.2f;
-    t2 = m_time*0.7f + pos.x*0.3f * pos.z*0.4f;
-    pos.x += sinf(t1)*m_eddy.x;
-    pos.z += sinf(t2)*m_eddy.z;
-
-//? uv2.x = (pos.x+10000.0f)/40.0f+0.3f;
-//? uv2.y = (pos.z+10000.0f)/40.0f+0.4f;
-    uv2.x = (pos.x+10000.0f)/20.0f;
-    uv2.y = (pos.z+10000.0f)/20.0f;
-
-    t1 = m_time*0.7f + pos.x*5.5f + pos.z*5.6f;
-    t2 = m_time*0.8f + pos.x*5.7f + pos.z*5.8f;
-    norm = Math::Vector(sinf(t1)*m_glint, 1.0f, sinf(t2)*m_glint);
-#else
-    float       t1, t2;
-
-    t1 = m_time*1.5f + pos.x*0.1f * pos.z*0.2f;
-    pos.y += sinf(t1)*m_eddy.y;
-
-    t1 = m_time*1.5f;
-    uv1.x = (pos.x+10000.0f)/40.0f+sinf(t1)*m_eddy.x*0.02f;
-    uv1.y = (pos.z+10000.0f)/40.0f-cosf(t1)*m_eddy.z*0.02f;
-    uv2.x = (pos.x+10010.0f)/20.0f+cosf(-t1)*m_eddy.x*0.02f;
-    uv2.y = (pos.z+10010.0f)/20.0f-sinf(-t1)*m_eddy.z*0.02f;
-
-    t1 = m_time*0.50f + pos.x*2.1f + pos.z*1.1f;
-    t2 = m_time*0.75f + pos.x*2.0f + pos.z*1.0f;
-    norm = Math::Vector(sinf(t1)*m_glint, 1.0f, sinf(t2)*m_glint);
-#endif
-}
-
-// Draw the back surface of the water.
-// This surface prevents to see the sky (background) underwater!
-
-void CWater::DrawBack()
-{
-    LPDIRECT3DDEVICE7 device;
-    D3DVERTEX2      vertex[4];      // 2 triangles
-    D3DMATERIAL7    material;
-    Math::Matrix        matrix;
-    Math::Vector        eye, lookat, n, p, p1, p2;
-    Math::Point         uv1, uv2;
-    float           deep, dist;
-
-    if ( !m_bDraw )  return;
-    if ( m_type[0] == WATER_NULL )  return;
-    if ( m_lineUsed == 0 )  return;
-
-    eye = m_engine->RetEyePt();
-    lookat = m_engine->RetLookatPt();
-
-    ZeroMemory( &material, sizeof(D3DMATERIAL7) );
-    material.diffuse = m_diffuse;
-    material.ambient = m_ambient;
-    m_engine->SetMaterial(material);
-
-    m_engine->SetTexture("", 0);
-
-    device = m_engine->RetD3DDevice();
-    device->SetRenderState(D3DRENDERSTATE_LIGHTING, false);
-    device->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-    device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-    m_engine->SetState(D3DSTATENORMAL);
-
-    deep = m_engine->RetDeepView(0);
-    m_engine->SetDeepView(deep*2.0f, 0);
-    m_engine->SetFocus(m_engine->RetFocus());
-    m_engine->UpdateMatProj();  // twice the depth of view
-
-    matrix.LoadIdentity();
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-        device->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    p.x = eye.x;
-    p.z = eye.z;
-    dist = Math::DistanceProjected(eye, lookat);
-    p.x = (lookat.x-eye.x)*deep*1.0f/dist + eye.x;
-    p.z = (lookat.z-eye.z)*deep*1.0f/dist + eye.z;
-
-    p1.x =  (lookat.z-eye.z)*deep*2.0f/dist + p.x;
-    p1.z = -(lookat.x-eye.x)*deep*2.0f/dist + p.z;
-    p2.x = -(lookat.z-eye.z)*deep*2.0f/dist + p.x;
-    p2.z =  (lookat.x-eye.x)*deep*2.0f/dist + p.z;
-
-    p1.y = -50.0f;
-    p2.y = m_level;
-
-    n.x = (lookat.x-eye.x)/dist;
-    n.z = (lookat.z-eye.z)/dist;
-    n.y = 0.0f;
-
-    uv1.x = uv1.y = 0.0f;
-    uv2.x = uv2.y = 0.0f;
-
-    vertex[0] = D3DVERTEX2(Math::Vector(p1.x, p2.y, p1.z), n, uv1.x,uv2.y);
-    vertex[1] = D3DVERTEX2(Math::Vector(p1.x, p1.y, p1.z), n, uv1.x,uv1.y);
-    vertex[2] = D3DVERTEX2(Math::Vector(p2.x, p2.y, p2.z), n, uv2.x,uv2.y);
-    vertex[3] = D3DVERTEX2(Math::Vector(p2.x, p1.y, p2.z), n, uv2.x,uv1.y);
-
-    device->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, 4, NULL);
-    m_engine->AddStatisticTriangle(2);
-
-    m_engine->SetDeepView(deep, 0);
-    m_engine->SetFocus(m_engine->RetFocus());
-    m_engine->UpdateMatProj();  // gives the initial depth of view
-
-    device->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-    device->SetRenderState(D3DRENDERSTATE_ZENABLE, true);
-    device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-}
-
-// Draws the flat surface of the water.
-
-void CWater::DrawSurf()
-{
-    LPDIRECT3DDEVICE7 device;
-    D3DVERTEX2*     vertex;     // triangles
-    D3DMATERIAL7    material;
-    Math::Matrix        matrix;
-    Math::Vector        eye, lookat, n, pos, p;
-    Math::Point         uv1, uv2;
-    bool            bUnder;
-    DWORD           flags;
-    float           deep, size, sizez, radius;
-    int             rankview, i, j, u;
-
-    if ( !m_bDraw )  return;
-    if ( m_type[0] == WATER_NULL )  return;
-    if ( m_lineUsed == 0 )  return;
-
-    vertex = (D3DVERTEX2*)malloc(sizeof(D3DVERTEX2)*(m_brick+2)*2);
-
-    eye = m_engine->RetEyePt();
-    lookat = m_engine->RetLookatPt();
-
-    rankview = m_engine->RetRankView();
-    bUnder = ( rankview == 1);
-
-    device = m_engine->RetD3DDevice();
-//? device->SetRenderState(D3DRENDERSTATE_AMBIENT, 0xffffffff);
-//? device->SetRenderState(D3DRENDERSTATE_LIGHTING, true);
-//? device->SetRenderState(D3DRENDERSTATE_ZENABLE, false);
-    device->SetRenderState(D3DRENDERSTATE_ZWRITEENABLE, false);
-
-    matrix.LoadIdentity();
-    {
-        D3DMATRIX mat = MAT_TO_D3DMAT(matrix);
-        device->SetTransform(D3DTRANSFORMSTATE_WORLD, &mat);
-    }
-
-    ZeroMemory( &material, sizeof(D3DMATERIAL7) );
-    material.diffuse = m_diffuse;
-    material.ambient = m_ambient;
-    m_engine->SetMaterial(material);
-
-    m_engine->SetTexture(m_filename, 0);
-    m_engine->SetTexture(m_filename, 1);
-
-    if ( m_type[rankview] == WATER_TT )
-    {
-        m_engine->SetState(D3DSTATETTb|D3DSTATEDUALw|D3DSTATEWRAP, m_color);
-    }
-    if ( m_type[rankview] == WATER_TO )
-    {
-        m_engine->SetState(D3DSTATENORMAL|D3DSTATEDUALw|D3DSTATEWRAP);
-    }
-    if ( m_type[rankview] == WATER_CT )
-    {
-        m_engine->SetState(D3DSTATETTb);
-    }
-    if ( m_type[rankview] == WATER_CO )
-    {
-        m_engine->SetState(D3DSTATENORMAL);
-    }
-    device->SetRenderState(D3DRENDERSTATE_FOGENABLE, true);
-
-    size = m_size/2.0f;
-    if ( bUnder )  sizez = -size;
-    else           sizez =  size;
-
-    // Draws all the lines.
-    deep = m_engine->RetDeepView(0)*1.5f;
-
-    for ( i=0 ; i<m_lineUsed ; i++ )
-    {
-        pos.y = m_level;
-        pos.z = m_line[i].pz;
-        pos.x = m_line[i].px1;
-
-        // Visible line?
-        p = pos;
-        p.x += size*(m_line[i].len-1);
-        radius = sqrtf(powf(size, 2.0f)+powf(size*m_line[i].len, 2.0f));
-        if ( Math::Distance(p, eye) > deep+radius )  continue;
-
-        D3DVECTOR pD3D = VEC_TO_D3DVEC(p);
-        device->ComputeSphereVisibility(&pD3D, &radius, 1, 0, &flags);
-
-        if ( flags & D3DSTATUS_CLIPINTERSECTIONALL )  continue;
-
-        u = 0;
-        p.x = pos.x-size;
-        p.z = pos.z-sizez;
-        p.y = pos.y;
-        AdjustLevel(p, n, uv1, uv2);
-        if ( bUnder )  n.y = -n.y;
-        vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-        p.x = pos.x-size;
-        p.z = pos.z+sizez;
-        p.y = pos.y;
-        AdjustLevel(p, n, uv1, uv2);
-        if ( bUnder )  n.y = -n.y;
-        vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-        for ( j=0 ; j<m_line[i].len ; j++ )
-        {
-            p.x = pos.x+size;
-            p.z = pos.z-sizez;
-            p.y = pos.y;
-            AdjustLevel(p, n, uv1, uv2);
-            if ( bUnder )  n.y = -n.y;
-            vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-            p.x = pos.x+size;
-            p.z = pos.z+sizez;
-            p.y = pos.y;
-            AdjustLevel(p, n, uv1, uv2);
-            if ( bUnder )  n.y = -n.y;
-            vertex[u++] = D3DVERTEX2(p, n, uv1.x,uv1.y, uv2.x,uv2.y);
-
-            pos.x += size*2.0f;
-        }
-
-        device->DrawPrimitive(D3DPT_TRIANGLESTRIP, D3DFVF_VERTEX2, vertex, u, NULL);
-        m_engine->AddStatisticTriangle(u-2);
-    }
-
-    free(vertex);
-}
-
-
-// Indicates if there is water in a given position.
-
-bool CWater::RetWater(int x, int y)
-{
-    Math::Vector    pos;
-    float       size, offset, level;
-    int         dx, dy;
-
-    x *= m_subdiv;
-    y *= m_subdiv;
-
-    size = m_size/m_subdiv;
-    offset = m_brick*m_size/2.0f;
-
-    for ( dy=0 ; dy<=m_subdiv ; dy++ )
-    {
-        for ( dx=0 ; dx<=m_subdiv ; dx++ )
-        {
-            pos.x = (x+dx)*size - offset;
-            pos.z = (y+dy)*size - offset;
-            pos.y = 0.0f;
-            level = m_terrain->RetFloorLevel(pos, true);
-            if ( level < m_level+m_eddy.y )  return true;
-        }
-    }
-    return false;
-}
-
-// Updates the positions, relative to the ground.
-
-bool CWater::CreateLine(int x, int y, int len)
-{
-    float   offset;
-
-    m_line[m_lineUsed].x   = x;
-    m_line[m_lineUsed].y   = y;
-    m_line[m_lineUsed].len = len;
-
-    offset = m_brick*m_size/2.0f - m_size/2.0f;
-
-    m_line[m_lineUsed].px1 = m_size* m_line[m_lineUsed].x - offset;
-    m_line[m_lineUsed].px2 = m_size*(m_line[m_lineUsed].x+m_line[m_lineUsed].len) - offset;
-    m_line[m_lineUsed].pz  = m_size* m_line[m_lineUsed].y - offset;
-
-    m_lineUsed ++;
-
-    return ( m_lineUsed < MAXWATERLINE );
-}
-
-// Creates all expanses of water.
-
-bool CWater::Create(WaterType type1, WaterType type2, const char *filename,
-                    D3DCOLORVALUE diffuse, D3DCOLORVALUE ambient,
-                    float level, float glint, Math::Vector eddy)
-{
-    int         x, y, len;
-
-    m_type[0]  = type1;
-    m_type[1]  = type2;
-    m_diffuse  = diffuse;
-    m_ambient  = ambient;
-    m_level    = level;
-    m_glint    = glint;
-    m_eddy     = eddy;
-    m_time     = 0.0f;
-    m_lastLava = 0.0f;
-    strcpy(m_filename, filename);
-
-    VaporFlush();
-
-    if ( m_filename[0] != 0 )
-    {
-        m_engine->LoadTexture(m_filename, 0);
-        m_engine->LoadTexture(m_filename, 1);
-    }
-
-    if ( m_terrain == 0 )
-    {
-        m_terrain = (CTerrain*)m_iMan->SearchInstance(CLASS_TERRAIN);
-    }
-    m_brick = m_terrain->RetBrick()*m_terrain->RetMosaic();
-    m_size  = m_terrain->RetSize();
-
-    m_brick /= m_subdiv;
-    m_size  *= m_subdiv;
-
-    if ( m_type[0] == WATER_NULL )  return true;
-
-    m_lineUsed = 0;
-    for ( y=0 ; y<m_brick ; y++ )
-    {
-        len = 0;
-        for ( x=0 ; x<m_brick ; x++ )
-        {
-            if ( RetWater(x,y) )  // water here?
-            {
-                len ++;
-                if ( len >= 5 )
-                {
-                    if ( !CreateLine(x-len+1, y, len) )  return false;
-                    len = 0;
-                }
-            }
-            else    // dry?
-            {
-                if ( len != 0 )
-                {
-                    if ( !CreateLine(x-len, y, len) )  return false;
-                    len = 0;
-                }
-            }
-        }
-        if ( len != 0 )
-        {
-            if ( !CreateLine(x-len, y, len) )  return false;
-        }
-    }
-    return true;
-}
-
-// Removes all the water.
-
-void CWater::Flush()
-{
-    m_type[0] = WATER_NULL;
-    m_type[1] = WATER_NULL;
-    m_level = 0.0f;
-    m_bLava = false;
-}
-
-
-// Changes the level of the water.
-
-bool CWater::SetLevel(float level)
-{
-    m_level = level;
-
-    return Create(m_type[0], m_type[1], m_filename, m_diffuse, m_ambient,
-                  m_level, m_glint, m_eddy);
-}
-
-// Returns the current level of water.
-
-float CWater::RetLevel()
-{
-    return m_level;
-}
-
-// Returns the current level of water for a given object.
-
-float CWater::RetLevel(CObject* object)
-{
-    ObjectType  type;
-
-    type = object->RetType();
-
-    if ( type == OBJECT_HUMAN ||
-         type == OBJECT_TECH  )
-    {
-        return m_level-3.0f;
-    }
-
-    if ( 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 )
-    {
-        return m_level-2.0f;
-    }
-
-    return m_level;
-}
-
-
-// Management of the mode of lava/water.
-
-void CWater::SetLava(bool bLava)
-{
-    m_bLava = bLava;
-}
-
-bool CWater::RetLava()
-{
-    return m_bLava;
-}
-
-
-// Adjusts the eye of the camera, not to be in the water.
-
-void CWater::AdjustEye(Math::Vector &eye)
-{
-    if ( m_bLava )
-    {
-        if ( eye.y < m_level+2.0f )
-        {
-            eye.y = m_level+2.0f;  // never under the lava
-        }
-    }
-    else
-    {
-        if ( eye.y >= m_level-2.0f &&
-             eye.y <= m_level+2.0f )  // close to the surface?
-        {
-            eye.y = m_level+2.0f;  // bam, well above
-        }
-    }
-}
-
diff --git a/src/old/water.h b/src/old/water.h
deleted file mode 100644
index 8a68dd6..0000000
--- a/src/old/water.h
+++ /dev/null
@@ -1,130 +0,0 @@
-// * 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/.
-
-// water.h
-
-#pragma once
-
-
-#include "common/event.h"
-#include "old/d3dengine.h"
-#include "old/particule.h"
-
-
-class CInstanceManager;
-class CTerrain;
-class CSound;
-
-
-
-const int MAXWATERLINE = 500;
-
-struct WaterLine
-{
-    short       x, y;       // beginning
-    short       len;        // length by x
-    float       px1, px2, pz;
-};
-
-
-const int MAXWATVAPOR = 10;
-
-struct WaterVapor
-{
-    bool            bUsed;
-    ParticuleType   type;
-    Math::Vector        pos;
-    float           delay;
-    float           time;
-    float           last;
-};
-
-
-enum WaterType
-{
-    WATER_NULL      = 0,    // no water
-    WATER_TT        = 1,    // transparent texture
-    WATER_TO        = 2,    // opaque texture
-    WATER_CT        = 3,    // transparent color
-    WATER_CO        = 4,    // opaque color
-};
-
-
-class CWater
-{
-public:
-    CWater(CInstanceManager* iMan, CD3DEngine* engine);
-    ~CWater();
-
-    void        SetD3DDevice(LPDIRECT3DDEVICE7 device);
-    bool        EventProcess(const Event &event);
-    void        Flush();
-    bool        Create(WaterType type1, WaterType type2, const char *filename, D3DCOLORVALUE diffuse, D3DCOLORVALUE ambient, float level, float glint, Math::Vector eddy);
-    void        DrawBack();
-    void        DrawSurf();
-
-    bool        SetLevel(float level);
-    float       RetLevel();
-    float       RetLevel(CObject* object);
-
-    void        SetLava(bool bLava);
-    bool        RetLava();
-
-    void        AdjustEye(Math::Vector &eye);
-
-protected:
-    bool        EventFrame(const Event &event);
-    void        LavaFrame(float rTime);
-    void        AdjustLevel(Math::Vector &pos, Math::Vector &norm, Math::Point &uv1, Math::Point &uv2);
-    bool        RetWater(int x, int y);
-    bool        CreateLine(int x, int y, int len);
-
-    void        VaporFlush();
-    bool        VaporCreate(ParticuleType type, Math::Vector pos, float delay);
-    void        VaporFrame(int i, float rTime);
-
-protected:
-    CInstanceManager*   m_iMan;
-    CD3DEngine*         m_engine;
-    LPDIRECT3DDEVICE7   m_pD3DDevice;
-    CTerrain*           m_terrain;
-    CParticule*         m_particule;
-    CSound*             m_sound;
-
-    WaterType       m_type[2];
-    char            m_filename[100];
-    float           m_level;        // overall level
-    float           m_glint;        // amplitude of reflections
-    Math::Vector        m_eddy;         // amplitude of swirls
-    D3DCOLORVALUE       m_diffuse;      // diffuse color
-    D3DCOLORVALUE       m_ambient;      // ambient color
-    float           m_time;
-    float           m_lastLava;
-    int         m_subdiv;
-
-    int         m_brick;        // number of brick*mosaics
-    float           m_size;         // size of a item in an brick
-
-    int         m_lineUsed;
-    WaterLine       m_line[MAXWATERLINE];
-
-    WaterVapor      m_vapor[MAXWATVAPOR];
-
-    bool            m_bDraw;
-    bool            m_bLava;
-    D3DCOLOR        m_color;
-};
-
diff --git a/src/old/winmain.aps b/src/old/winmain.aps
deleted file mode 100644
index 6a1e0df..0000000
--- a/src/old/winmain.aps
+++ /dev/null
diff --git a/src/old/winmain.rc b/src/old/winmain.rc
deleted file mode 100644
index 547d4c2..0000000
--- a/src/old/winmain.rc
+++ /dev/null
@@ -1,265 +0,0 @@
-//Microsoft Developer Studio generated resource script.

-//

-#include "resource.h"

-

-#define APSTUDIO_READONLY_SYMBOLS

-/////////////////////////////////////////////////////////////////////////////

-//

-// Generated from the TEXTINCLUDE 2 resource.

-//

-#define IDC_STATIC -1

-#include <windows.h>

-

-

-

-/////////////////////////////////////////////////////////////////////////////

-#undef APSTUDIO_READONLY_SYMBOLS

-

-/////////////////////////////////////////////////////////////////////////////

-// English (U.S.) resources

-

-#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ENU)

-#ifdef _WIN32

-LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US

-#pragma code_page(1252)

-#endif //_WIN32

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// Icon

-//

-

-// Icon with lowest ID value placed first to ensure application icon

-// remains consistent on all systems.

-IDI_MAIN_ICON           ICON    DISCARDABLE     "DirectX.ico"

-

-#ifdef APSTUDIO_INVOKED

-/////////////////////////////////////////////////////////////////////////////

-//

-// TEXTINCLUDE

-//

-

-1 TEXTINCLUDE DISCARDABLE 

-BEGIN

-    "resource.h\0"

-END

-

-2 TEXTINCLUDE DISCARDABLE 

-BEGIN

-    "#define IDC_STATIC -1\r\n"

-    "#include <windows.h>\r\n"

-    "\r\n"

-    "\r\n"

-    "\0"

-END

-

-3 TEXTINCLUDE DISCARDABLE 

-BEGIN

-    "\r\n"

-    "\0"

-END

-

-#endif    // APSTUDIO_INVOKED

-

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// Accelerator

-//

-

-IDR_MAIN_ACCEL ACCELERATORS DISCARDABLE 

-BEGIN

-    VK_F12,         IDM_CHANGEDEVICE,       VIRTKEY, SHIFT, NOINVERT

-END

-

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// DESIGNINFO

-//

-

-#ifdef APSTUDIO_INVOKED

-GUIDELINES DESIGNINFO DISCARDABLE 

-BEGIN

-    IDD_ABOUT, DIALOG

-    BEGIN

-        LEFTMARGIN, 7

-        RIGHTMARGIN, 165

-        TOPMARGIN, 7

-        BOTTOMMARGIN, 117

-    END

-

-    IDD_CHANGEDEVICE, DIALOG

-    BEGIN

-        LEFTMARGIN, 7

-        RIGHTMARGIN, 174

-        TOPMARGIN, 7

-        BOTTOMMARGIN, 83

-    END

-END

-#endif    // APSTUDIO_INVOKED

-

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// Dialog

-//

-

-IDD_ABOUT DIALOG DISCARDABLE  0, 0, 172, 124

-STYLE DS_SYSMODAL | DS_MODALFRAME | DS_NOIDLEMSG | DS_SETFOREGROUND | 

-    DS_3DLOOK | DS_CENTER | WS_POPUP | WS_VISIBLE | WS_CAPTION

-CAPTION "About"

-FONT 8, "MS Sans Serif"

-BEGIN

-    DEFPUSHBUTTON   "OK",IDOK,115,103,50,14

-    ICON            IDI_MAIN_ICON,IDC_STATIC,5,5,20,20

-    LTEXT           "Robot Sample",IDC_STATIC,35,5,46,8

-    LTEXT           "Copyright (c) 1999-2000 EPSITEC SA",IDC_STATIC,35,15,

-                    120,8

-    LTEXT           "About",IDC_STATIC,62,52,20,8

-    LTEXT           "Select Driver / Device / Mode",IDC_STATIC,62,62,97,8

-    CTEXT           "<Alt+Enter>",IDC_STATIC,12,72,45,8

-    LTEXT           "Toggle Fullscreen / Windowed",IDC_STATIC,62,72,98,8

-    LTEXT           "Exit",IDC_STATIC,62,82,12,8

-    CTEXT           "<F1>",IDC_STATIC,12,52,45,8

-    CTEXT           "<F2>",IDC_STATIC,12,62,45,8

-    CTEXT           "<ESC>",IDC_STATIC,12,82,45,8

-    GROUPBOX        "Usage",IDC_STATIC,7,42,160,55

-    LTEXT           "Daniel Roux, version 0.1 Janvier 2000",IDC_STATIC,35,26,

-                    121,8

-END

-

-IDD_CHANGEDEVICE DIALOG DISCARDABLE  0, 0, 182, 90

-STYLE DS_MODALFRAME | DS_CENTER | WS_POPUP | WS_CAPTION | WS_SYSMENU

-CAPTION "Change device"

-FONT 8, "MS Sans Serif"

-BEGIN

-    GROUPBOX        "&Device selection",-1,5,5,115,40

-    COMBOBOX        IDC_DEVICE_COMBO,10,15,105,100,CBS_DROPDOWNLIST | 

-                    WS_VSCROLL | WS_TABSTOP

-    CONTROL         "Use desktop &window",IDC_WINDOWED_CHECKBOX,"Button",

-                    BS_AUTOCHECKBOX | WS_TABSTOP,10,30,85,10

-    GROUPBOX        "Fullscreen &modes",IDC_FULLSCREEN_TEXT,5,45,115,40

-    COMBOBOX        IDC_MODE_COMBO,10,55,105,100,CBS_DROPDOWNLIST | 

-                    WS_VSCROLL | WS_TABSTOP

-    CONTROL         "&Stereoscopic viewing",IDC_STEREO_CHECKBOX,"Button",

-                    BS_AUTOCHECKBOX | WS_TABSTOP,10,70,85,9

-    DEFPUSHBUTTON   "OK",IDOK,125,5,50,14

-    PUSHBUTTON      "Cancel",IDCANCEL,125,25,50,14

-END

-

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// Menu

-//

-

-IDR_MENU MENU DISCARDABLE 

-BEGIN

-    POPUP "&File"

-    BEGIN

-        MENUITEM "&Go/stop\tEnter",             IDM_TOGGLESTART

-        MENUITEM "&Single step\tSpace",         IDM_SINGLESTEP

-        MENUITEM SEPARATOR

-        MENUITEM "&About...\tF1",               IDM_ABOUT

-        MENUITEM "&Change device...\tF2",       IDM_CHANGEDEVICE

-        MENUITEM SEPARATOR

-        MENUITEM "E&xit\tESC",                  IDM_EXIT

-    END

-END

-

-IDR_POPUP MENU DISCARDABLE 

-BEGIN

-    POPUP "Popup"

-    BEGIN

-        MENUITEM "&Go/stop",                    IDM_TOGGLESTART

-        MENUITEM "&Single step",                IDM_SINGLESTEP

-        MENUITEM SEPARATOR

-        MENUITEM "&About...",                   IDM_ABOUT

-        MENUITEM "&Change device...",           IDM_CHANGEDEVICE

-        MENUITEM SEPARATOR

-        MENUITEM "E&xit",                       IDM_EXIT

-    END

-END

-

-#endif    // English (U.S.) resources

-/////////////////////////////////////////////////////////////////////////////

-

-

-/////////////////////////////////////////////////////////////////////////////

-// French (Switzerland) resources

-

-#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_FRS)

-#ifdef _WIN32

-LANGUAGE LANG_FRENCH, SUBLANG_FRENCH_SWISS

-#pragma code_page(1252)

-#endif //_WIN32

-

-#ifndef _MAC

-/////////////////////////////////////////////////////////////////////////////

-//

-// Version

-//

-

-VS_VERSION_INFO VERSIONINFO

- FILEVERSION 1,0,0,0

- PRODUCTVERSION 1,0,0,0

- FILEFLAGSMASK 0x3fL

-#ifdef _DEBUG

- FILEFLAGS 0x1L

-#else

- FILEFLAGS 0x0L

-#endif

- FILEOS 0x40004L

- FILETYPE 0x1L

- FILESUBTYPE 0x0L

-BEGIN

-    BLOCK "StringFileInfo"

-    BEGIN

-        BLOCK "100c04b0"

-        BEGIN

-            VALUE "CompanyName", "www.epsitec.com\0"

-            VALUE "FileDescription", "CeeBot\0"

-            VALUE "FileVersion", "Version 1.0\0"

-            VALUE "InternalName", "CeeBot\0"

-            VALUE "LegalCopyright", "Copyright © 2001 by EPSITEC SA\0"

-            VALUE "OriginalFilename", "ceebot.exe\0"

-            VALUE "ProductName", "EPSITEC CeeBot\0"

-            VALUE "ProductVersion", "Version 1.0\0"

-        END

-    END

-    BLOCK "VarFileInfo"

-    BEGIN

-        VALUE "Translation", 0x100c, 1200

-    END

-END

-

-#endif    // !_MAC

-

-

-/////////////////////////////////////////////////////////////////////////////

-//

-// Cursor

-//

-

-IDC_CURSORHAND          CURSOR  DISCARDABLE     "cursor1.cur"

-IDC_CURSORSCROLLL       CURSOR  DISCARDABLE     "cursorha.cur"

-IDC_CURSORSCROLLR       CURSOR  DISCARDABLE     "cursorsc.cur"

-IDC_CURSORSCROLLU       CURSOR  DISCARDABLE     "cur00001.cur"

-IDC_CURSORSCROLLD       CURSOR  DISCARDABLE     "cur00002.cur"

-IDC_CURSORTARGET        CURSOR  DISCARDABLE     "cur00003.cur"

-#endif    // French (Switzerland) resources

-/////////////////////////////////////////////////////////////////////////////

-

-

-

-#ifndef APSTUDIO_INVOKED

-/////////////////////////////////////////////////////////////////////////////

-//

-// Generated from the TEXTINCLUDE 3 resource.

-//

-

-

-/////////////////////////////////////////////////////////////////////////////

-#endif    // not APSTUDIO_INVOKED

-