Changeset 442 for trunk/AI/StdAI/AI.pas

Timestamp:

May 18, 2022, 10:43:27 PM (2 years ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

• trunk/AI/StdAI/AI.pas (modified) (17 diffs)

trunk/AI/StdAI/AI.pas

@@ -176 +176 @@
   LeaveOutValue: array[0..nAdv - 1] of integer;
 
-
 constructor TAI.Create(Nation: integer);
 begin
@@ -209 +208 @@
   Result := Data.BehaviorFlags and bBarbarina <> 0;
 end;
-
 
 //-------------------------------
@@ -653 +651 @@
       Result := ad;
 end;
-
 
 //-------------------------------
@@ -1145 +1142 @@
         end;
       end;
-end; // ProcessSettlers
-
+end;
 
 //-------------------------------
@@ -1350 +1346 @@
   SetAdvanceValues;
 
-
 {$IFDEF DEBUG}
 (*for p1:=0 to nPl-1 do
@@ -1380 +1375 @@
     end;
 end;
-
 {$ENDIF}
-
 
 procedure TAI.CheckGender;
@@ -1416 +1409 @@
   end;
 end;
-
 
 procedure TAI.SetAdvanceValues;
@@ -1785 +1777 @@
 end;
 
-
 procedure TAI.MoveUnitsHome;
 const
@@ -2055 +2046 @@
             Dec(UnitLack[District[Loc], ModelCat[mix]])
         end;
-end; // MoveUnitsHome
-
+end;
 
 procedure TAI.CheckAttack(uix: integer);
@@ -2176 +2166 @@
     until Exhausted;
   end;
-end; // CheckAttack
-
+end;
 
 procedure TAI.Patrol(uix: integer);
@@ -2282 +2271 @@
     until Exhausted;
   end;
-end; // Patrol
+end;
 
 procedure TAI.AttackAndPatrol;
@@ -2342 +2331 @@
           Patrol(uix);
       end;
-end; // AttackAndPatrol
-
+end;
 
 function TAI.HavePort: boolean;
@@ -2369 +2357 @@
       end;
 end;
-
 
 procedure TAI.SetCityProduction;
@@ -2836 +2823 @@
 
   ChangeHomeCities;
-end; // SetCityProduction
-
+end;
 
 function TAI.ChooseGovernment: integer;
@@ -2855 +2841 @@
     Result := gDespotism;
 end;
-
 
 //-------------------------------
@@ -2927 +2912 @@
     end;
 end;
-
 
 function TAI.WantNegotiation(Nation: integer; NegoTime: TNegoTime): boolean;
@@ -3153 +3137 @@
     end;
   end;
-end; // Negotiation
-
+end;
 
 procedure SetLeaveOutValue;