anchor.diff:    procedure AddDefence(aDefIdx1: Word);
     var
       SecondIndice: Boolean;
  -    I,K, DefIdx2: Word;
  +    I,K, DefIdx2: Integer;
     begin
       fBestDefLines.Lines[ fBestDefLines.Count ].Polygon := aDefIdx1;
       // For defensive position we dont need proper defensive lines only border polygon for position flood fill
  
positive.code:   // Prepare init polygons for backward flood fill (polygons near enemy)
    procedure CreateBorders();
    var
      I, K, QueueIdx, NearbyIdx: Word;
    begin
      QueueIdx := fStartQueue;
      for I := 1 to fQueueCnt do // Enemy polygons are prepared in Queue
  
negative.code:       Inc(fBestDefLines.Count);
    end;
  var
    I, QueueIdx: Integer;
    Evaluation: Single;
  begin
    // Calculate evaluation of actual defensive position
  