Changeset 548 for trunk/LocalPlayer/CityScreen.pas

Timestamp:

Apr 21, 2024, 10:57:18 AM (4 weeks ago)

Author:

chronos

Message:

• Fixed: Bad unit drawing in battle dialog.
• Modified: Code cleanup.

File:

• trunk/LocalPlayer/CityScreen.pas (modified) (2 diffs)

trunk/LocalPlayer/CityScreen.pas

@@ -1366 +1366 @@
       and (Y >= ymOpt - 32) and (Y < ymOpt + 32) then
     begin
-      I := sqr(X - xmOpt) + sqr(Y - ymOpt); // click radius
+      I := Sqr(X - xmOpt) + Sqr(Y - ymOpt); // click radius
       if I <= 32 * 32 then
       begin
@@ -1375 +1375 @@
             I := 3 // rwGrowth
         else
-          case trunc(arctan2(X - xmOpt, ymOpt - Y) * 180 / pi) of
+          case Trunc(ArcTan2(X - xmOpt, ymOpt - Y) * 180 / Pi) of
             - 25 - 52 * 2 .. -26 - 52:
               I := 1;