Changeset 205 for trunk/GameServer.pas

Timestamp:

May 8, 2020, 4:54:17 PM (5 years ago)

Author:

chronos

Message:

• Fixed: Removed various code compilation warnings and hints.

File:

• trunk/GameServer.pas (modified) (3 diffs)

trunk/GameServer.pas

@@ -7 +7 @@
 
 uses
-  Protocol, Database, dynlibs, Platform, dateutils, fgl, FileUtil, Graphics;
+  Protocol, Database, dynlibs, Platform, dateutils, fgl, LazFileUtils, Graphics;
 
 const
@@ -2700 +2700 @@
   end;
 
-const
-  Dirx: array [0 .. 7] of integer = (1, 2, 1, 0, -1, -2, -1, 0);
-  Diry: array [0 .. 7] of integer = (-1, 0, 1, 2, 1, 0, -1, -2);
-
 var
   d, i, j, p1, p2, pt0, pt1, uix1, cix1, Loc0, Loc1, dx, dy, NewCap, MinCap,
@@ -2709 +2705 @@
     StopTurn, FutureMCost, NewProject, OldImp, mix, V8, V21, AStr, DStr,
     ABaseDamage, DBaseDamage: integer;
-  CityReport, AltCityReport: TCityReport;
+  CityReport: TCityReport;
   FormerCLState: TCmdListState;
-  EndTime: int64;
   Adjacent: TVicinity8Loc;
   Radius: TVicinity21Loc;