anchor.diff:      fFirstLineCnt: Word;
       fPositions: TKMList;
   
  -    fAttack: TKMArmyAttack;
  -
       function GetCount: Integer; inline;
       function GetPosition(aIndex: Integer): TKMDefencePosition; inline;
       function GetGroupsCount(): Word;
     public
       TroopFormations: array [TKMGroupType] of TKMFormation; //Defines how defending troops will be formatted. 0 means leave unchanged.
   
  -    constructor Create(aOwner: TKMHandID; aAttack: TKMArmyAttack);
  +    constructor Create(aOwner: TKMHandID);
       destructor Destroy; override;
       procedure Save(SaveStream: TKMemoryStream);
       procedure Load(LoadStream: TKMemoryStream);
  
positive.code:   COLOR_YELLOW = $00FFFF;
    COLOR_BLUE = $FF0000;
  var
    I, K, Idx, Threat: Integer;
    Col: Cardinal;
    Loc, Pos: TKMPoint;
    GT: TKMGroupType;
  
negative.code: interface
  uses
    Classes, KM_CommonClasses, KM_CommonTypes, KM_Defaults,
    KM_Points, KM_UnitGroup, KM_NavMeshDefences, KM_AIDefensePos;
  
  
  type
  