Changeset 522 for trunk/AI/StdAI/ToolAI.pas

Timestamp:

Jan 7, 2024, 10:24:51 PM (4 months ago)

Author:

chronos

Message:

• Modified: Code cleanup.
• Added: High DPI aware SetWindowPos function.

File:

• trunk/AI/StdAI/ToolAI.pas (modified) (3 diffs)

trunk/AI/StdAI/ToolAI.pas

@@ -420 +420 @@
             begin
               Inc(BestCount);
-              if random(BestCount) = 0 then
+              if Random(BestCount) = 0 then
               begin
                 BestScore := TestScore;
@@ -1129 +1129 @@
         begin
           Loc_to_ab(MyUnit[uix].Loc, MyUnit[uixTransportLoad[tuix]].Loc, A, B);
-          if (abs(A) <= 1) and (abs(B) <= 1) then
+          if (Abs(A) <= 1) and (Abs(B) <= 1) then
           begin
             Assert((A <> 0) or (B <> 0));
@@ -1146 +1146 @@
           begin
             Loc_to_ab(TransportPlan.LoadLoc, MyUnit[uixTransportLoad[tuix]].Loc, A, B);
-            if (abs(A) <= 1) and (abs(B) <= 1) then
+            if (Abs(A) <= 1) and (Abs(B) <= 1) then
             begin
               TransportPlan.uixLoad[TransportPlan.nLoad] := uixTransportLoad[tuix];