From 0a3691c3dce981365f950f9939f9a9dd278c6b90 Mon Sep 17 00:00:00 2001
From: devapromix <maxwof@ukr.net>
Date: Sat, 11 Jun 2022 00:01:01 +0300
Subject: [PATCH] Refactoring.

---
 Sources/TransportTycoon.dpr | 14 +++---
 Sources/TransportTycoon.lpi | 86 ++++++++++++++++++++++++++++++++++++-
 2 files changed, 92 insertions(+), 8 deletions(-)

diff --git a/Sources/TransportTycoon.dpr b/Sources/TransportTycoon.dpr
index d59b8b7..d39a670 100644
--- a/Sources/TransportTycoon.dpr
+++ b/Sources/TransportTycoon.dpr
@@ -5,27 +5,27 @@ uses
   BearLibTerminal in 'Third-Party\BearLibTerminal\BearLibTerminal.pas',
   TransportTycoon.Map in 'Game\TransportTycoon.Map.pas',
   TransportTycoon.Game in 'Game\TransportTycoon.Game.pas',
+  TransportTycoon.City in 'Game\TransportTycoon.City.pas',
+  TransportTycoon.Company in 'Game\TransportTycoon.Company.pas',
+  TransportTycoon.Finances in 'Game\TransportTycoon.Finances.pas',
+  TransportTycoon.Order in 'Game\TransportTycoon.Order.pas',
+  TransportTycoon.Vehicle in 'Game\TransportTycoon.Vehicle.pas',
+  TransportTycoon.Vehicles in 'Game\TransportTycoon.Vehicles.pas',
+  TransportTycoon.Aircraft in 'Game\TransportTycoon.Aircraft.pas',
   TransportTycoon.Scenes in 'Scenes\TransportTycoon.Scenes.pas',
   TransportTycoon.Scene.City in 'Scenes\TransportTycoon.Scene.City.pas',
   TransportTycoon.Scene.BuildInCity in 'Scenes\TransportTycoon.Scene.BuildInCity.pas',
   TransportTycoon.Scene.World in 'Scenes\TransportTycoon.Scene.World.pas',
-  TransportTycoon.City in 'Game\TransportTycoon.City.pas',
   TransportTycoon.Scene.Airport in 'Scenes\TransportTycoon.Scene.Airport.pas',
   TransportTycoon.Scene.MainMenu in 'Scenes\TransportTycoon.Scene.MainMenu.pas',
   TransportTycoon.Scene.Gen in 'Scenes\TransportTycoon.Scene.Gen.pas',
-  TransportTycoon.Aircraft in 'Game\TransportTycoon.Aircraft.pas',
   TransportTycoon.Scene.GameMenu in 'Scenes\TransportTycoon.Scene.GameMenu.pas',
   TransportTycoon.Scene.Hangar in 'Scenes\TransportTycoon.Scene.Hangar.pas',
-  TransportTycoon.Vehicle in 'Game\TransportTycoon.Vehicle.pas',
-  TransportTycoon.Vehicles in 'Game\TransportTycoon.Vehicles.pas',
   TransportTycoon.Scene.Aircraft in 'Scenes\TransportTycoon.Scene.Aircraft.pas',
   TransportTycoon.Scene.Orders in 'Scenes\TransportTycoon.Scene.Orders.pas',
   TransportTycoon.Scene.Aircrafts in 'Scenes\TransportTycoon.Scene.Aircrafts.pas',
-  TransportTycoon.Order in 'Game\TransportTycoon.Order.pas',
   TransportTycoon.Scene.Finances in 'Scenes\TransportTycoon.Scene.Finances.pas',
-  TransportTycoon.Finances in 'Game\TransportTycoon.Finances.pas',
   TransportTycoon.Scene.Towns in 'Scenes\TransportTycoon.Scene.Towns.pas',
-  TransportTycoon.Company in 'Game\TransportTycoon.Company.pas',
   TransportTycoon.Scene.Company in 'Scenes\TransportTycoon.Scene.Company.pas';
 
 var
diff --git a/Sources/TransportTycoon.lpi b/Sources/TransportTycoon.lpi
index cc05d14..4378cb1 100644
--- a/Sources/TransportTycoon.lpi
+++ b/Sources/TransportTycoon.lpi
@@ -31,7 +31,7 @@
         <PackageName Value="LCL"/>
       </Item1>
     </RequiredPackages>
-    <Units Count="5">
+    <Units Count="26">
       <Unit0>
         <Filename Value="TransportTycoon.dpr"/>
         <IsPartOfProject Value="True"/>
@@ -52,6 +52,90 @@
         <Filename Value="Game\TransportTycoon.Map.pas"/>
         <IsPartOfProject Value="True"/>
       </Unit4>
+      <Unit5>
+        <Filename Value="Game\TransportTycoon.Finances.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit5>
+      <Unit6>
+        <Filename Value="Game\TransportTycoon.Company.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit6>
+      <Unit7>
+        <Filename Value="Game\TransportTycoon.Vehicles.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit7>
+      <Unit8>
+        <Filename Value="Game\TransportTycoon.Aircraft.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit8>
+      <Unit9>
+        <Filename Value="Game\TransportTycoon.City.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit9>
+      <Unit10>
+        <Filename Value="Game\TransportTycoon.Order.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit10>
+      <Unit11>
+        <Filename Value="Game\TransportTycoon.Vehicle.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit11>
+      <Unit12>
+        <Filename Value="Scenes\TransportTycoon.Scene.City.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit12>
+      <Unit13>
+        <Filename Value="Scenes\TransportTycoon.Scene.BuildInCity.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit13>
+      <Unit14>
+        <Filename Value="Scenes\TransportTycoon.Scene.World.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit14>
+      <Unit15>
+        <Filename Value="Scenes\TransportTycoon.Scene.Airport.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit15>
+      <Unit16>
+        <Filename Value="Scenes\TransportTycoon.Scene.MainMenu.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit16>
+      <Unit17>
+        <Filename Value="Scenes\TransportTycoon.Scene.Gen.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit17>
+      <Unit18>
+        <Filename Value="Scenes\TransportTycoon.Scene.GameMenu.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit18>
+      <Unit19>
+        <Filename Value="Scenes\TransportTycoon.Scene.Hangar.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit19>
+      <Unit20>
+        <Filename Value="Scenes\TransportTycoon.Scene.Aircraft.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit20>
+      <Unit21>
+        <Filename Value="Scenes\TransportTycoon.Scene.Orders.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit21>
+      <Unit22>
+        <Filename Value="Scenes\TransportTycoon.Scene.Aircrafts.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit22>
+      <Unit23>
+        <Filename Value="Scenes\TransportTycoon.Scene.Finances.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit23>
+      <Unit24>
+        <Filename Value="Scenes\TransportTycoon.Scene.Towns.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit24>
+      <Unit25>
+        <Filename Value="Scenes\TransportTycoon.Scene.Company.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit25>
     </Units>
   </ProjectOptions>
   <CompilerOptions>